cdc:nos2.source:opl.opl871:deck:route
Deck ROUTE
8 Modifications
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.route +++| IDENT ROUTE,ROU,ROUTE 00002 M01S00002.route +++| ABS 00003 M01S00003.route +++| SST 00004 M01S00004.route +++| SYSCOM B1 00005 M01S00005.route +++| ENTRY ROUTE 00006 M01S00006.route +++| ENTRY NPC= 00007 M01S00007.route +++| ENTRY RFL= 00008 M01S00008.route +++|*COMMENT ROUTE - ROUTE FILE TO I/O QUEUE.
Line S00009 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00009 M02S00009.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1982. 00010 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00011 M01S00010.route +++| TITLE ROUTE COMMAND PROCESSOR. 00012 M01S00011.route +++| SPACE 4,10 00013 M01S00012.route +++|*** ROUTE - PROCESS ROUTE COMMAND. 00014 M01S00013.route +++|* R.N. LAGERSTROM 76/01/30. 00015 M01S00014.route +++|* 00016 M01S00015.route +++|* ROUTE IS USED TO PLACE FILES INTO THE INPUT AND 00017 M01S00016.route +++|* OUTPUT QUEUES. 00018 M01S00017.route +++| SPACE 4,20 00019 M01S00018.route +++|*** CALL. 00020 M01S00019.route +++|* 00021 M01S00020.route +++|* ROUTE(LFN,P1,P2,...,PN) 00022 M01S00021.route +++|* 00023 M01S00022.route +++|* LFN - FILE NAME TO ROUTE. 00024 M01S00023.route +++|* 00025 M01S00024.route +++|* THE REMAINING PARAMETERS ARE ORDER INDEPENDENT. 00026 M01S00025.route +++|* 00027 M01S00001.tlrout1 +++|* CM=XX - *TLF* CONVERSION MODE. 00028 M01S00026.route +++|* DC=AA - TWO-CHARACTER DISPOSITION CODE (ALPHA CODE). 00029 M01S00027.route +++|* DEF - INDICATES DEFERRED (END-OF-JOB) ROUTING. 00030 M01S00028.route +++|* DO=XXX - DEFAULT OUTPUT MAINFRAME LOGICAL ID. 00031 M01S00029.route +++|* EC=XX - EXTERNAL CHARACTERISTICS. 00032 M01S00030.route +++|* FC=XX - FORMS CODE (TWO-CHARACTER ALPHA-NUMERIC). 00033 M01S00031.route +++|* FID=XXXXXXX - FILE ID. (NOS/BE COMPATIBILITY) 00034 M01S00032.route +++|* FM=XXXXXXX - FAMILY NAME. 00035 M01S00033.route +++|* FM - IMPLICIT REMOTE ROUTING. 00036 M01S00034.route +++|* IC=XX - INTERNAL CHARACTERISTICS. 00037 M01S00035.route +++|* ID=NN - SELECT LOCAL DEVICE (0-67 OCTAL DEFAULT). 00038 M01S00036.route +++|* ID - IMPLICIT CENTRAL SITE ROUTING. 00039 M01S00037.route +++|* JSN=XXX - FORCE A UNIQUE THREE CHARACTER JSN ON A JOB. 00040 M01S00038.route +++|* OT=XXXX - SET THE ORIGIN TYPE OF THE FILE. 00041 M01S00039.route +++|* PI=N - PRINT IMAGE ORDINAL ( 0 - 7 ) 00042 M01S00040.route +++|* PI=XXXXXXX - PRINT IMAGE NAME ( 1 TO 7 CHARACTER NAME ) 00043 M01S00041.route +++|* PRI=NNNN - FILE PRIORITY. IGNORED WITH MESSAGE.
Line S00042 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2591 |
Seq # *Modification Id* Act ----------------------------+ 00044 M02S00042.ns2591 ---|* REP=NN - REPEAT COUNT (0-31 DECIMAL DEFAULT). 00045 M01S00001.ns2591 +++|* REP=NN - REPEAT COUNT (0-63 DECIMAL DEFAULT). 00046 M01S00043.route +++|* SC=XX - SPACING CODE (FOR 580-PFC SUPPORT). 00047 M01S00044.route +++|* SCL=XX - SELECT SERVICE CLASS FOR OUTPUT FILES (TWO-CHARACTER 00048 M01S00045.route +++|* ALPHA-NUMERIC). 00049 M01S00046.route +++|* ST=XXX - LOGICAL ID (LID) OF SYSTEM TO WHICH FILE IS TO 00050 M01S00047.route +++|* BE ROUTED. 00051 M01S00048.route +++|* TID=XX - PROCESSED AS UN=XXXXXXX (FOR NOS/BE COMPATIBILITY). 00052 M01S00049.route +++|* TID=C - IMPLICIT CENTRAL SITE ROUTING. 00053 M01S00050.route +++|* TID - IMPLICIT REMOTE ROUTING. 00054 M01S00051.route +++|* UJN=XXXXXXX - USER JOB NAME. 00055 M01S00052.route +++|* UN=XXXXXXX - USER NAME. 00056 M01S00053.route +++|* UN - IMPLICIT REMOTE ROUTING. 00057 M01S00054.route +++|* 00058 M01S00055.route +++|* NOTE- 00059 M01S00056.route +++|* 00060 M01S00057.route +++|* 1. CENTRAL SITE ROUTING WILL BE SELECTED BY DEFAULT FOR ALL 00061 M01S00058.route +++|* ORIGIN TYPES EXCEPT *RBOT* UNLESS TID (EXCEPT TID=C), FM, 00062 M01S00059.route +++|* OR UN IS INCLUDED. 00063 M01S00060.route +++|* 00064 M01S00061.route +++|* 2. FOR *RBOT* ORIGIN JOBS, ROUTING WILL BE TO THE TERMINAL 00065 M01S00062.route +++|* OF ORIGIN UNLESS TID, FM, OR UN ARE SPECIFIED WITH A 00066 M01S00063.route +++|* PARAMETER. *TID=C* OR *TID* WILL ROUTE TO CENTRAL SITE. 00067 M01S00064.route +++|* 00068 M01S00065.route +++|* 3. IMPLICIT REMOTE ROUTING MEANS THAT ROUTING WILL BE TO A 00069 M01S00066.route +++|* REMOTE TERMINAL IDENTIFIED BY THE FM-UN OF THE JOB MAKING 00070 M01S00067.route +++|* THE REQUEST. 00071 M01S00068.route +++|* 00072 M01S00069.route +++|* 4. IMPLICIT CENTRAL SITE ROUTING WILL SUPPLY THE DEFAULT 00073 M01S00070.route +++|* LOCAL DEVICE ID AND OVER-RIDE DEFAULT REMOTE ROUTING FOR 00074 M01S00071.route +++|* *RBOT* ORIGIN JOBS. 00075 M01S00072.route +++| SPACE 4,10 00076 M01S00073.route +++|** PROGRAMS CALLED. 00077 M01S00074.route +++|* 00078 M01S00075.route +++|* DSP - ROUTE FILE. 00079 M01S00076.route +++| SPACE 4,10 00080 M01S00077.route +++|** COMMON DECKS CALLED. 00081 M01S00078.route +++|* 00082 M01S00079.route +++|* COMCDXB 00083 M01S00080.route +++|* COMCMAC 00084 M01S00081.route +++|* COMCSYS 00085 M01S00082.route +++|* COMSBIO 00086 M01S00083.route +++|* COMSDSP 00087 M01S00084.route +++|* COMSJIO 00088 M01S00085.route +++|* COMSSCD 00089 M01S00086.route +++|* COMSSSJ 00090 M01S00087.route +++| SPACE 4,20 00091 M01S00088.route +++|*** MESSAGES ISSUED. 00092 M01S00089.route +++|* 00093 M01S00090.route +++|* ROUTE COMMAND ERROR. 00094 M01S00091.route +++|* ROUTE COMPLETE. 00095 M01S00092.route +++|* ROUTE COMPLETE. JSN IS XXXX. 00096 M01S00093.route +++|* ROUTE *DC* INCOMPATIBLE WITH *EC*. 00097 M01S00002.tlrout1 +++|* ROUTE INCORRECT *CM* PARAMETER. 00098 M01S00094.route +++|* ROUTE INCORRECT *DO* PARAMETER. 00099 M01S00095.route +++|* ROUTE INCORRECT *EC* PARAMETER. 00100 M01S00096.route +++|* ROUTE INCORRECT *FC* PARAMETER. 00101 M01S00097.route +++|* ROUTE INCORRECT *IC* PARAMETER. 00102 M01S00001.271l716 +++|* ROUTE INCORRECT *JSN* PARAMETER. 00103 M01S00098.route +++|* ROUTE INCORRECT KEYWORD. 00104 M01S00099.route +++|* ROUTE INCORRECT *OT* PARAMETER. 00105 M01S00100.route +++|* ROUTE INCORRECT SPACING CODE. 00106 M01S00101.route +++|* ROUTE INCORRECT *ST* PARAMETER. 00107 M01S00002.271l716 +++|* ROUTE *JSN* NOT ALLOWED. 00108 M01S00102.route +++|* ROUTE *OT* NOT ALLOWED. 00109 M01S00103.route +++|* ROUTE *PRI* IGNORED.
Line S00104 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2591 |
Seq # *Modification Id* Act ----------------------------+ 00110 M02S00104.ns2591 ---|* ROUTE *REP* GT 31. DEFAULT USED. 00111 M01S00002.ns2591 +++|* ROUTE *REP* .GT. 63. DEFAULT USED. 00112 M01S00105.route +++|* ROUTE *TID* AND *FM/UN* CONFLICT. 00113 M01S00106.route +++|* ROUTE *TID/FM/UN* AND *ID* CONFLICT. 00114 M01S00107.route +++|* ROUTE UNDEFINED SERVICE CLASS. 00115 M01S00108.route +++|* ROUTE UNKNOWN *PI* PARAMETER.
Line S00109 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00116 M02S00109.271l716 ---|* ROUTE *JSN* NOT ALLOWED.
Line S00110 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00117 M02S00110.271l716 ---|* ROUTE INCORRECT *JSN* PARAMETER. 00118 M01S00111.route +++| SPACE 4,10 00119 M01S00112.route +++|** DEFINE. 00120 M01S00113.route +++|* EXTERNAL CHARACTERISTICS (EC), AND 00121 M01S00114.route +++|* INTERNAL CHARACTERISTICS (IC). 00122 M01S00115.route +++| SPACE 4,10 00123 M01S00116.route +++|* SPECIAL ENTRY POINT. 00124 M01S00117.route +++| 00125 M01S00118.route +++| NPC= EQU 0 FORCE OPERATING SYSTEM PARAMETER FORMAT 00126 M01S00119.route +++| 00127 M01S00120.route +++| 00128 M01S00121.route +++| QUAL BIO 00129 M01S00122.route +++|*CALL COMSBIO 00130 M01S00123.route +++| QUAL * 00131 M01S00124.route +++|*CALL COMSDSP 00132 M01S00125.route +++|*CALL COMCMAC 00133 M01S00126.route +++|*CALL COMSSSJ 00134 M01S00127.route +++| LIST X 00135 M01S00128.route +++| 00136 M01S00129.route +++|*CALL COMSJIO 00137 M01S00130.route +++| 00138 M01S00131.route +++| LIST *
Line S00132 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00139 M02S00132.ns2624 ---| SCLASS SPACE 4,15
Line S00133 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00140 M02S00133.ns2624 ---|** SCLASS - DEFINE SERVICE CLASS TABLE.
Line S00134 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00141 M02S00134.ns2624 ---|*
Line S00135 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00142 M02S00135.ns2624 ---|* SCLASS NM,MN,DF,ST,TX
Line S00136 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00143 M02S00136.ns2624 ---|*
Line S00137 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00144 M02S00137.ns2624 ---|* ENTRY *NM* = SERVICE CLASS NAME.
Line S00138 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00145 M02S00138.ns2624 ---|* *MN* = TWO CHARACTER MNEMONIC.
Line S00139 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00146 M02S00139.ns2624 ---|* *DF* = DAYFILE MESSAGE CHARACTER.
Line S00140 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00147 M02S00140.ns2624 ---|* *ST* = SHORT TEXT FOR *QFTLIST*.
Line S00141 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00148 M02S00141.ns2624 ---|* *TX* = TEXT OF SERVICE CLASS NAME FOR BANNER PAGE.
Line S00142 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00149 M02S00142.ns2624 ---|*
Line S00143 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00150 M02S00143.ns2624 ---|* NOTE - THE CALL TO *COMSSCD* MUST FOLLOW THE DEFINITION OF
Line S00144 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00151 M02S00144.ns2624 ---|* THIS MACRO.
Line S00145 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00152 M02S00145.ns2624 ---|
Line S00146 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00153 M02S00146.ns2624 ---|
Line S00147 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00154 M02S00147.ns2624 ---| PURGMAC SCLASS
Line S00148 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00155 M02S00148.ns2624 ---|
Line S00149 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00156 M02S00149.ns2624 ---| SCLASS MACRO NM,MN,DF,ST,TX
Line S00150 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00157 M02S00150.ns2624 ---| .SCL RMT
Line S00151 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00158 M02S00151.ns2624 ---| VFD 12/0L_MN,48/0 TX
Line S00152 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00159 M02S00152.ns2624 ---| .SCL RMT
Line S00153 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00160 M02S00153.ns2624 ---| SCLASS ENDM
Line S00154 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00161 M02S00154.ns2624 ---|
Line S00155 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00162 M02S00155.ns2624 ---|
Line S00156 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00163 M02S00156.ns2624 ---| SCL$ EQU 0 ONLY PROCESS CLASSES WITH JCB-S
Line S00157 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00164 M02S00157.ns2624 ---|*CALL COMSSCD 00165 M01S00158.route +++| TITLE TABLE DEFINITIONS. 00166 M01S00159.route +++| ORG 103B 00167 M01S00160.route +++| ROU BSS 0 00168 M01S00161.route +++| TDSP SPACE 4,30 00169 M01S00162.route +++|** TDSP - DSP PARAMETER BLOCK. 00170 M01S00163.route +++|* 00171 M01S00164.route +++|*T W0 42/ FILE NAME,6/ ,1/F,4/ ,6/ OT,1/C
Figure W0
00172 M01S00165.route +++|*T, W1 12/ ,12/ FC,12/ DC,3/ EC,3/ IC,18/ FLAGS
Figure W1
00173 M01S00166.route +++|*T, W2 18/ SLID,18/ DLID,24/ DA
Figure W2
00174 M01S00167.route +++|*T, W3 42/ UJN,18/
Figure W3
Line S00168 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2591 |
Seq # *Modification Id* Act ----------------------------+ 00175 M02S00168.ns2591 ---|*T, W4 2/ 0,1/ P,3/ PI,6/ SC,12/ SCL,12/ FA,7/ ,5/ RC,12/
Figure W4
00176 M01S00003.ns2591 +++|*T, W4 2/ 0,1/ P,3/ PI,6/ SC,12/ SCL,12/ FA,6/ ,6/ RC,12/
Figure W4
00177 M01S00169.route +++|*T, W5 60/
Figure W5
00178 M01S00170.route +++|*T, W6 60/
Figure W6
00179 M01S00003.tlrout1 +++|*T, W7 12/ DD, 24/ , 6/0, 18/ EFLAGS
Figure W7
00180 M01S00004.tlrout1 +++|*T,W10-16 60/
Figure W10-16
00181 M01S00171.route +++|* 00182 M01S00172.route +++|* F - FORCE ORIGIN TYPE FLAG. 00183 M01S00173.route +++|* OT - DESIRED ORIGIN TYPE. 00184 M01S00174.route +++|* C - COMPLETE BIT. 00185 M01S00175.route +++|* FC - FORMS CODE 00186 M01S00176.route +++|* DC - DISPOSITION CODE 00187 M01S00177.route +++|* EC - EXTERNAL CHARACTERISTICS 00188 M01S00178.route +++|* IC - INTERNAL CHARACTERISTICS 00189 M01S00179.route +++|* SLID - LOGICAL ID (LID) TO RECEIVE OUTPUT FROM INPUT FILES. 00190 M01S00180.route +++|* DLID - DESTINATION LOGICAL ID OF MAINFRAME TO RECEIVE FILES. 00191 M01S00181.route +++|* DA - TID OR POINTER TO FM/UN 00192 M01S00182.route +++|* P - PRINT IMAGE FLAG (INDICATES PRINT IMAGE CODE PRESENT). 00193 M01S00183.route +++|* PI - PRINT IMAGE CODE (0-7) IF PRINT IMAGE FLAG SET. 00194 M01S00184.route +++|* SC - SPACING CODE 00195 M01S00185.route +++|* SCL - SERVICE CLASS 00196 M01S00186.route +++|* FA - ABORT CODE 00197 M01S00187.route +++|* RC - REPEAT COUNT 00198 M01S00188.route +++|* UJN - USER JOB NAME 00199 M01S00005.tlrout1 +++|* DD - DATA DECLARATION. 00200 M01S00006.tlrout1 +++|* EFLAGS - EXTENDED *DSP* FLAGS. 00201 M01S00189.route +++| 00202 M01S00190.route +++| 00203 M01S00191.route +++| TDSP BSS 0 00204 M01S00192.route +++| CON 0 00205 M01S00193.route +++| VFD 42/0,18/FRFN 00206 M01S00194.route +++| VFD 36/0,24/-0 00207 M01S00195.route +++| CON 0 00208 M01S00196.route +++| CON 0 00209 M01S00197.route +++| CON 0 00210 M01S00198.route +++| CON 0 00211 M01S00007.tlrout1 +++| CON 0 00212 M01S00008.tlrout1 +++| CON 0 00213 M01S00009.tlrout1 +++| CON 0 00214 M01S00010.tlrout1 +++| CON 0 00215 M01S00011.tlrout1 +++| CON 0 00216 M01S00012.tlrout1 +++| CON 0 00217 M01S00013.tlrout1 +++| CON 0 00218 M01S00014.tlrout1 +++| CON 0 00219 M01S00015.tlrout1 +++| CON 0 00220 M01S00016.tlrout1 +++| CON 0 00221 M01S00017.tlrout1 +++| CON 0 00222 M01S00018.tlrout1 +++| TDSPL EQU *-TDSP 00223 M01S00019.tlrout1 +++| ERRNZ TDSPL-EPBL *DSP* EXTENDED BLOCK LENGTH ERROR 00224 M01S00199.route +++| TFUN SPACE 4,10 00225 M01S00200.route +++|** TFUN - FAMILY NAME, USER NAME TABLE 00226 M01S00201.route +++|* 00227 M01S00202.route +++|*T W0 42/ FAMILY NAME,18/
Figure W0
00228 M01S00203.route +++|*T, W1 42/ USER NAME,18/
Figure W1
00229 M01S00204.route +++| 00230 M01S00205.route +++| 00231 M01S00206.route +++| TFUN BSSZ 2 FAMILY NAME - USER NAME 00232 M01S00207.route +++| 00233 M01S00208.route +++| SPACE 4,10 00234 M01S00209.route +++|* INTERNAL FLAGS. 00235 M01S00210.route +++| 00236 M01S00211.route +++| PTID CON 0 TID PROCESSED 00237 M01S00212.route +++| PFUN CON 0 FM-UN PROCESSED 00238 M01S00213.route +++| PDID CON 0 DEVICE ID PROCESSED 00239 M01S00214.route +++| PDEF CON 0 DEF PROCESSED 00240 M01S00215.route +++| PJSN CON 0 JSN PROCESSED 00241 M01S00216.route +++| PUJN CON 0 UJN PROCESSED 00242 M01S00217.route +++| PDCT CON 0 DISPOSITION TYPE - SEE *TDCC* 00243 M01S00218.route +++| PECT CON 0 EXTERNAL CHARACTERISTICS TYPE - SEE *TECC* 00244 M01S00219.route +++| PJOT CON 0 ORIGIN OF JOB 00245 M01S00020.tlrout1 +++| TCDD SPACE 4,15 00246 M01S00021.tlrout1 +++|** TCDD - *TLF* CONVERSION MODE/DATA DECLARATION TABLE. 00247 M01S00022.tlrout1 +++|* 00248 M01S00023.tlrout1 +++|* 42/ CM, 6/ 0, 12/ DD 00249 M01S00024.tlrout1 +++|* 00250 M01S00025.tlrout1 +++|* CM = *TLF* CONVERSION MODE (DISPLAY CODE). 00251 M01S00026.tlrout1 +++|* DD = DATA DECLARATION (DISPLAY CODE). 00252 M01S00027.tlrout1 +++| 00253 M01S00028.tlrout1 +++| 00254 M01S00029.tlrout1 +++| TCDD BSS 00255 M01S00030.tlrout1 +++| VFD 42/0LUC,6/0,12/0LC6 UPPER CASE DISPLAY CODE 00256 M01S00031.tlrout1 +++| VFD 42/0LUCDC,6/0,12/0LC6 UPPER CASE DISPLAY CODE 00257 M01S00032.tlrout1 +++| VFD 42/0LUL,6/0,12/0LC8 UPPER/LOWER CASE DISPLAY CODE 00258 M01S00033.tlrout1 +++| VFD 42/0LULDC,6/0,12/0LC8 UPPER/LOWER CASE DISPLAY CODE 00259 M01S00034.tlrout1 +++| VFD 42/0LAS,6/0,12/0LUS ASCII8 (7/12) 00260 M01S00035.tlrout1 +++| VFD 42/0LASCII8,6/0,12/0LUS ASCII8 (7/12) 00261 M01S00036.tlrout1 +++| VFD 42/0LEB,6/0,12/0LUU EBCDIC (8/12) 00262 M01S00037.tlrout1 +++| VFD 42/0LEBCDIC,6/0,12/0LUU EBCDIC (8/12) 00263 M01S00038.tlrout1 +++| TCDDL EQU *-TCDD
Line S00220 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00264 M02S00220.ns2624 ---| TDCC SPACE 4,10
Line S00221 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00265 M02S00221.ns2624 ---|** TDCC - DISPOSITION CODE TYPE TABLE.
Line S00222 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00266 M02S00222.ns2624 ---|*
Line S00223 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00267 M02S00223.ns2624 ---|*T 12/ CODE,42/ ,3/ T,3/
Figure
Line S00224 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00268 M02S00224.ns2624 ---|*
Line S00225 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00269 M02S00225.ns2624 ---|* T - TYPE INDICATOR
Line S00226 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00270 M02S00226.ns2624 ---|* 0 = NO TYPE.
Line S00227 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00271 M02S00227.ns2624 ---|* 1 = PRINT TYPE.
Line S00228 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00272 M02S00228.ns2624 ---|* 2 = PUNCH TYPE.
Line S00229 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00273 M02S00229.ns2624 ---|* 3 = PLOT TYPE.
Line S00230 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00274 M02S00230.ns2624 ---|
Line S00231 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00275 M02S00231.ns2624 ---|
Line S00232 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00276 M02S00232.ns2624 ---| TDCC BSS 0
Line S00233 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00277 M02S00233.ns2624 ---| VFD 12/0LFL,42/,3/3,3/0
Line S00234 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00278 M02S00234.ns2624 ---| VFD 12/0LFR,42/,3/3,3/0
Line S00235 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00279 M02S00235.ns2624 ---| VFD 12/0LHL,42/,3/3,3/0
Line S00236 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00280 M02S00236.ns2624 ---| VFD 12/0LHR,42/,3/3,3/0
Line S00237 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00281 M02S00237.ns2624 ---| VFD 12/0LIN,42/,3/0,3/0
Line S00238 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00282 M02S00238.ns2624 ---| VFD 12/0LLP,42/,3/1,3/0
Line S00239 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00283 M02S00239.ns2624 ---| VFD 12/0LLQ,42/,3/1,3/0
Line S00240 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00284 M02S00240.ns2624 ---| VFD 12/0LLR,42/,3/1,3/0
Line S00241 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00285 M02S00241.ns2624 ---| VFD 12/0LLS,42/,3/1,3/0
Line S00242 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00286 M02S00242.ns2624 ---| VFD 12/0LLT,42/,3/1,3/0
Line S00243 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00287 M02S00243.ns2624 ---| VFD 12/0LLX,42/,3/1,3/0
Line S00244 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00288 M02S00244.ns2624 ---| VFD 12/0LLY,42/,3/1,3/0
Line S00245 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00289 M02S00245.ns2624 ---| VFD 12/0LNO,42/,3/0,3/0
Line S00246 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00290 M02S00246.ns2624 ---| VFD 12/0LPB,42/,3/2,3/0
Line S00247 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00291 M02S00247.ns2624 ---| VFD 12/0LPH,42/,3/2,3/0
Line S00248 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00292 M02S00248.ns2624 ---| VFD 12/0LPL,42/,3/3,3/0
Line S00249 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00293 M02S00249.ns2624 ---| VFD 12/0LPR,42/,3/1,3/0
Line S00250 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00294 M02S00250.ns2624 ---| VFD 12/0LPU,42/,3/2,3/0
Line S00251 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00295 M02S00251.ns2624 ---| VFD 12/0LP1,42/,3/1,3/0
Line S00252 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00296 M02S00252.ns2624 ---| VFD 12/0LP2,42/,3/1,3/0
Line S00253 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00297 M02S00253.ns2624 ---| VFD 12/0LP8,42/,3/2,3/0
Line S00254 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00298 M02S00254.ns2624 ---| VFD 12/0LSB,42/,3/2,3/0
Line S00255 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00299 M02S00255.ns2624 ---| VFD 12/0LSC,42/,3/0,3/0
Line S00256 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00300 M02S00256.ns2624 ---| VFD 12/0LTO,42/,3/0,3/0
Line S00257 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00301 M02S00257.ns2624 ---| VFD 12/0LTT,42/,3/0,3/0
Line S00258 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00302 M02S00258.ns2624 ---| VFD 12/0LWT,42/,3/0,3/0
Line S00259 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00303 M02S00259.ns2624 ---| CON 0 END OF TABLE
Line S00260 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00304 M02S00260.ns2624 ---| TECC SPACE 4,10
Line S00261 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00305 M02S00261.ns2624 ---|** TECC - EXTERNAL CHARACTERISTICS CONVERSION TABLE
Line S00262 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00306 M02S00262.ns2624 ---|*
Line S00263 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00307 M02S00263.ns2624 ---|*T 30/ CODE,24/ ,3/ T,3 EC
Figure
Bitfield Rendering Failure ======== ========= ======= The field description [ { "name": "", "bits": 3 EC, "type": 4 }, { "name": " T", "bits": 3, "type": 3 }, { "name": " ", "bits": 24, "type": 2 }, { "name": " CODE", "bits": 30, "type": 1 } ] is invalid. Please check your syntax and try again.
Line S00264 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00308 M02S00264.ns2624 ---|*
Line S00265 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00309 M02S00265.ns2624 ---|* T - TYPE INDICATOR
Line S00266 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00310 M02S00266.ns2624 ---|* 0 = NO TYPE.
Line S00267 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00311 M02S00267.ns2624 ---|* 1 = PRINT TYPE.
Line S00268 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00312 M02S00268.ns2624 ---|* 2 = PUNCH TYPE.
Line S00269 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00313 M02S00269.ns2624 ---|* 3 = PLOT TYPE.
Line S00270 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00314 M02S00270.ns2624 ---|* EC - INTERFACE CODE.
Line S00271 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00315 M02S00271.ns2624 ---|
Line S00272 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00316 M02S00272.ns2624 ---|
Line S00273 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00317 M02S00273.ns2624 ---| TECC BSS 0
Line S00274 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00318 M02S00274.ns2624 ---| VFD 30/0LA4,24/,3/1,3/A4EX
Line S00275 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00319 M02S00275.ns2624 ---| VFD 30/0LA6,24/,3/1,3/A6EX
Line S00276 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00320 M02S00276.ns2624 ---| VFD 30/0LA9,24/,3/1,3/A9EX
Line S00277 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00321 M02S00277.ns2624 ---| VFD 30/0LB4,24/,3/1,3/B4EX
Line S00278 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00322 M02S00278.ns2624 ---| VFD 30/0LB6,24/,3/1,3/B6EX
Line S00279 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00323 M02S00279.ns2624 ---| VFD 30/0LASCII,24/,3/2,3/ASFR
Line S00280 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00324 M02S00280.ns2624 ---| VFD 30/0LO26,24/,3/2,3/PHFR
Line S00281 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00325 M02S00281.ns2624 ---| VFD 30/0L026,24/,3/2,3/PHFR
Line S00282 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00326 M02S00282.ns2624 ---| VFD 30/0LO29,24/,3/2,3/P9FR
Line S00283 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00327 M02S00283.ns2624 ---| VFD 30/0L029,24/,3/2,3/P9FR
Line S00284 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00328 M02S00284.ns2624 ---| VFD 30/0LSB,24/,3/2,3/PBFR
Line S00285 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00329 M02S00285.ns2624 ---| VFD 30/0L80COL,24/,3/2,3/P8FR
Line S00286 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00330 M02S00286.ns2624 ---| VFD 30/0LT6,24/,3/3,3/T6EX
Line S00287 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00331 M02S00287.ns2624 ---| VFD 30/0LT8,24/,3/3,3/T8EX
Line S00288 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00332 M02S00288.ns2624 ---| CON 0 END OF TABLE
Line S00289 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00333 M02S00289.ns2624 ---| TICC SPACE 4,10
Line S00290 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00334 M02S00290.ns2624 ---|** TICC - INTERNAL CHARACTERISTICS CONVERSION TABLE
Line S00291 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00335 M02S00291.ns2624 ---|*
Line S00292 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00336 M02S00292.ns2624 ---|*T 30/ CODE,28/,2/ I
Figure
Line S00293 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00337 M02S00293.ns2624 ---|*
Line S00294 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00338 M02S00294.ns2624 ---|* I - INTERFACE CODE.
Line S00295 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00339 M02S00295.ns2624 ---|
Line S00296 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00340 M02S00296.ns2624 ---|
Line S00297 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00341 M02S00297.ns2624 ---| TICC BSS 0
Line S00298 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00342 M02S00298.ns2624 ---| VFD 30/0LDIS,28/,2/DCIC
Line S00299 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00343 M02S00299.ns2624 ---| VFD 30/0LASCII,28/,2/ASIC
Line S00300 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00344 M02S00300.ns2624 ---| VFD 30/0LBIN,28/,2/BNIC
Line S00301 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00345 M02S00301.ns2624 ---| CON 0 END OF TABLE
Line S00302 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00346 M02S00302.ns2624 ---| TKEY SPACE 4,10
Line S00303 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00347 M02S00303.ns2624 ---|** KEYWORD TABLE.
Line S00304 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00348 M02S00304.ns2624 ---|*
Line S00305 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00349 M02S00305.ns2624 ---|*T 36/ KEYWORD,6/ NEP,18/ PROCESSOR
Figure
Line S00306 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00350 M02S00306.ns2624 ---|* NEP = 1 IF NONEQUIVALENCED PARAMETER ALLOWED.
Line S00307 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00351 M02S00307.ns2624 ---|
Line S00308 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00352 M02S00308.ns2624 ---| TKEY BSS 0
Line S00309 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00353 M02S00309.ns2624 ---| VFD 36/0LDC,6/,18/KDC
Line S00310 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00354 M02S00310.ns2624 ---| VFD 36/0LDEF,6/1,18/KDE
Line S00311 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00355 M02S00311.ns2624 ---| VFD 36/0LDO,6/,18/KDO
Line S00312 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00356 M02S00312.ns2624 ---| VFD 36/0LEC,6/,18/KEC
Line S00313 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00357 M02S00313.ns2624 ---| VFD 36/0LFC,6/,18/KFC
Line S00314 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00358 M02S00314.ns2624 ---| VFD 36/0LFID,6/,18/KUJ
Line S00315 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00359 M02S00315.ns2624 ---| VFD 36/0LFM,6/1,18/KFM
Line S00316 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00360 M02S00316.ns2624 ---| VFD 36/0LIC,6/,18/KIC
Line S00317 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00361 M02S00317.ns2624 ---| VFD 36/0LID,6/1,18/KID
Line S00318 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00362 M02S00318.ns2624 ---| VFD 18/0LJSN,24/,18/KJS
Line S00319 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00363 M02S00319.ns2624 ---| VFD 36/0LOT,6/,18/KOT
Line S00320 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00364 M02S00320.ns2624 ---| VFD 36/0LPI,6/,18/KPI
Line S00321 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00365 M02S00321.ns2624 ---| VFD 36/0LPRI,6/1,18/KPR
Line S00322 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00366 M02S00322.ns2624 ---| VFD 36/0LREP,6/,18/KRE
Line S00323 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00367 M02S00323.ns2624 ---| VFD 36/0LSC,6/,18/KSC
Line S00324 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00368 M02S00324.ns2624 ---| VFD 36/0LST,6/,18/KST
Line S00325 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00369 M02S00325.ns2624 ---| VFD 36/0LSCL,6/,18/KSV
Line S00326 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00370 M02S00326.ns2624 ---| VFD 36/0LTID,6/1,18/KTD
Line S00327 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00371 M02S00327.ns2624 ---| VFD 36/0LUJN,6/,18/KUJ
Line S00328 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00372 M02S00328.ns2624 ---| VFD 36/0LUN,6/1,18/KUN
Line S00329 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00373 M02S00329.ns2624 ---| CON 0 END OF TABLE
Line S00330 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00374 M02S00330.ns2624 ---| TLOT SPACE 4,10
Line S00331 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00375 M02S00331.ns2624 ---|** TLOT - LEGAL ORIGIN TYPE TABLE.
Line S00332 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00376 M02S00332.ns2624 ---|*
Line S00333 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00377 M02S00333.ns2624 ---|* FOR USE WITH THE *OT* PARAMETER.
Line S00334 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00378 M02S00334.ns2624 ---|*
Line S00335 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00379 M02S00335.ns2624 ---|*T 24/ ORIGIN TYPE,29/ ,6/ VALUE,1/
Figure
Line S00336 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00380 M02S00336.ns2624 ---|
Line S00337 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00381 M02S00337.ns2624 ---|
Line S00338 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00382 M02S00338.ns2624 ---| TLOT BSS 0
Line S00339 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00383 M02S00339.ns2624 ---| VFD 24/0LBCOT,29/,6/BCOT,1/0
Line S00340 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00384 M02S00340.ns2624 ---| VFD 24/0LEIOT,29/,6/EIOT,1/0
Line S00341 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00385 M02S00341.ns2624 ---| VFD 24/0LRBOT,29/,6/RBOT,1/0
Line S00342 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00386 M02S00342.ns2624 ---| VFD 24/0LSYOT,29/,6/SYOT,1/0
Line S00343 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00387 M02S00343.ns2624 ---| CON 0 END OF TABLE
Line S00344 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00388 M02S00344.ns2624 ---| TPIN SPACE 4,10
Line S00345 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00389 M02S00345.ns2624 ---|** TPIN - TABLE OF PRINT IMAGE NAMES.
Line S00346 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00390 M02S00346.ns2624 ---|*
Line S00347 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00391 M02S00347.ns2624 ---|*T 42/ NAME,12/ MASK,6/ CODE
Figure
Line S00348 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00392 M02S00348.ns2624 ---|*
Line S00349 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00393 M02S00349.ns2624 ---|* NAME - PRINT IMAGE NAME.
Line S00350 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00394 M02S00350.ns2624 ---|* MASK - CHARACTER MASK SIZE - 1.
Line S00351 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00395 M02S00351.ns2624 ---|* CODE - PRINT IMAGE ORDINAL ( 0 - 7 ).
Line S00352 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00396 M02S00352.ns2624 ---|
Line S00353 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00397 M02S00353.ns2624 ---|
Line S00354 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00398 M02S00354.ns2624 ---| LIST G
Line S00355 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00399 M02S00355.ns2624 ---|
Line S00356 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00400 M02S00356.ns2624 ---| TPIN TPIN
Line S00357 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00401 M02S00357.ns2624 ---|
Line S00358 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00402 M02S00358.ns2624 ---| PISD EQU /BIO/PISD
Line S00359 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00403 M02S00359.ns2624 ---|
Line S00360 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00404 M02S00360.ns2624 ---| LIST *
Line S00361 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00405 M02S00361.ns2624 ---| TSCT SPACE 4,10
Line S00362 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00406 M02S00362.ns2624 ---|** TSCT - SERVICE CLASS TABLE.
Line S00363 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00407 M02S00363.ns2624 ---|*
Line S00364 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00408 M02S00364.ns2624 ---|*T 12/PARAM,48/
Figure
Line S00365 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00409 M02S00365.ns2624 ---|*
Line S00366 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00410 M02S00366.ns2624 ---|* PARAM - SERVICE CLASS MNEMONIC.
Line S00367 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00411 M02S00367.ns2624 ---|*
Line S00368 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00412 M02S00368.ns2624 ---|* NOTE - ONLY SERVICE CLASSES WITH JOB CONTROL BLOCKS RESIDE
Line S00369 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00413 M02S00369.ns2624 ---|* IN THIS TABLE. *TSCT* ENTRIES MUST BE CONTIGUOUS.
Line S00370 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00414 M02S00370.ns2624 ---|
Line S00371 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00415 M02S00371.ns2624 ---| TSCT BSS 0
Line S00372 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00416 M02S00372.ns2624 ---| LIST D
Line S00373 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00417 M02S00373.ns2624 ---| .SCL HERE
Line S00374 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00418 M02S00374.ns2624 ---| LIST *
Line S00375 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00419 M02S00375.ns2624 ---| VFD 12/0LDF,48/ SELECTS USER DEFAULT
Line S00376 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00420 M02S00376.ns2624 ---| CON 0
Line S00377 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00421 M02S00377.ns2624 ---| TSCTL EQU *-TSCT-2
Line S00378 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2624 |
Seq # *Modification Id* Act ----------------------------+ 00422 M02S00378.ns2624 ---| ERRNZ TSCTL-MXJC+1 ENSURE ALL SERVICE CLASSES PRESENT 00423 M01S00001.ns2624 +++| LIST X 00424 M01S00002.ns2624 +++|*CALL COMTDSP 00425 M01S00003.ns2624 +++| LIST -X 00426 M01S00379.route +++| ROUTE TITLE MAIN PROGRAM 00427 M01S00380.route +++|** ROUTE - PROCESS COMMAND. 00428 M01S00381.route +++| 00429 M01S00382.route +++| 00430 M01S00383.route +++| ROUTE BSS 0 ENTRY 00431 M01S00384.route +++| SB1 1 00432 M01S00385.route +++| SA1 ACTR 00433 M01S00386.route +++| R= A0,ARGR FIRST ARGUMENT ADDRESS 00434 M01S00387.route +++| SB6 X1 SET ARGUMENT COUNT 00435 M01S00388.route +++| MX0 -18 00436 M01S00389.route +++| SA1 A0 00437 M01S00390.route +++| ZR B6,ABT IF NOT AT LEAST ONE ARGUMENT 00438 M01S00391.route +++| 00439 M01S00392.route +++|* GET FILE NAME. 00440 M01S00393.route +++| 00441 M01S00394.route +++| BX6 -X0*X1 00442 M01S00395.route +++| AX6 1 00443 M01S00396.route +++| NZ X6,ABT IF FILE NAME NOT FIRST PARAMETER 00444 M01S00397.route +++| BX7 X0*X1 00445 M01S00398.route +++| SA7 TDSP STORE FILE NAME 00446 M01S00399.route +++| 00447 M01S00400.route +++|* PROCESS NEXT PARAMETER. 00448 M01S00401.route +++| 00449 M01S00402.route +++| EPRX BSS 0 END-OF-PROCESSING PARAMETER EXIT 00450 M01S00403.route +++| SB6 B6-B1 REDUCE REMAINING PARAMETER COUNT 00451 M01S00404.route +++| SA0 A0+B1 00452 M01S00405.route +++| LE B6,B0,DSP IF END OF PARAMETERS 00453 M01S00406.route +++| SA2 A0 GET NEXT ARGUMENT 00454 M01S00407.route +++| MX3 0 ZERO PARAMETER 00455 M01S00408.route +++| SX7 X2-1R= 00456 M01S00409.route +++| ZR X7,ROU1 IF *=* SEPARATOR 00457 M01S00410.route +++| SX7 X2-2 00458 M01S00411.route +++| NZ X7,ROU3 IF NOT *=* SEPARATOR (NOS/BE FORMAT) 00459 M01S00412.route +++| 00460 M01S00413.route +++|* PROCESS EQUIVALENCED PARAMETER, IF PRESENT. 00461 M01S00414.route +++| 00462 M01S00415.route +++| ROU1 SA0 A0+B1 00463 M01S00416.route +++| SB6 B6-B1 00464 M01S00417.route +++| SA3 A0 GET NEXT PARAMETER 00465 M01S00418.route +++| SB2 X3 00466 M01S00419.route +++| LE B2,B1,ROU2 IF 0 OR 1 TERMINATOR 00467 M01S00420.route +++| SB2 B2-17B 00468 M01S00421.route +++| ZR B2,ROU2 IF 17B TERMINATOR 00469 M01S00422.route +++| EQ ABT ABORT 00470 M01S00423.route +++| 00471 M01S00424.route +++| ROU2 MX0 42 CHECK FOR NULL PARAMETER 00472 M01S00425.route +++| BX3 X0*X3 00473 M01S00426.route +++| NZ X3,ROU3 IF NOT NULL PARAMETER 00474 M01S00427.route +++| SX3 -1 SET NULL PARAMETER FLAG 00475 M01S00428.route +++| 00476 M01S00429.route +++|* SEARCH FOR KEYWORD. 00477 M01S00430.route +++| 00478 M01S00431.route +++| ROU3 SA1 TKEY-1 00479 M01S00432.route +++| MX0 36 00480 M01S00433.route +++| ROU4 SA1 A1+B1 00481 M01S00434.route +++| BX7 X1-X2 COMPARE KEYWORD 00482 M01S00435.route +++| BX7 X0*X7 00483 M01S00436.route +++| SB2 X1 SET PROCESSOR ADDRESS 00484 M01S00437.route +++| ZR X1,ROU6 IF KEYWORD NOT FOUND IN TABLE 00485 M01S00438.route +++| NZ X7,ROU4 IF NOT THIS KEYWORD 00486 M01S00439.route +++| SX7 -B1 DELETE KEYWORD FROM TABLE 00487 M01S00440.route +++| SA7 A1 00488 M01S00441.route +++| MX0 42 00489 M01S00442.route +++| BX7 X3-X7 00490 M01S00443.route +++| ZR X7,EPRX IF NULL PARAMETER, IGNORE 00491 M01S00444.route +++| BX3 X0*X3 00492 M01S00445.route +++| LX1 59-18 00493 M01S00446.route +++| NG X1,ROU5 IF NONEQUIVALENCED PARAMETER ALLOWED 00494 M01S00447.route +++| ZR X3,ABT IF NONEQUIVALENCED PARAMETER 00495 M01S00448.route +++| ROU5 JP B2 EXECUTE KEYWORD PROCESSOR 00496 M01S00449.route +++| 00497 M01S00450.route +++| ROU6 MESSAGE (=C* ROUTE INCORRECT KEYWORD.*),0,RECALL 00498 M01S00451.route +++| EQ ABT1 ABORT 00499 M01S00452.route +++| 00500 M01S00453.route +++| ABT MESSAGE (=C* ROUTE COMMAND ERROR.*),0,RECALL 00501 M01S00454.route +++| ABT1 ABORT 00502 M01S00455.route +++| 00503 M01S00456.route +++|* MAKE *DSP* CALL. 00504 M01S00457.route +++| 00505 M01S00458.route +++| DSP SA1 TDSP+1 00506 M01S00459.route +++| MX0 -12 EXTRACT DISPOSITION CODE 00507 M01S00460.route +++| BX2 X1 00508 M01S00461.route +++| AX1 24 00509 M01S00462.route +++| BX7 -X0*X1 00510 M01S00463.route +++| SB3 B0 INITIALIZE POINTER 00511 M01S00464.route +++| AX1 12 00512 M01S00465.route +++| BX1 -X0*X1 00513 M01S00466.route +++| SX3 X7-2RSC 00514 M01S00467.route +++| NZ X3,DSP0 IF NOT *DC=SC* 00515 M01S00468.route +++| SA0 B1 SET * ROUTE COMPLETE.* MESSAGE 00516 M01S00469.route +++| EQ DSP1 CONTINUE 00517 M01S00470.route +++| 00518 M01S00471.route +++| DSP0 SA3 DSPB+B3 GET INPUT MNEMONIC 00519 M01S00472.route +++| ZR X3,DSP0.2 IF END OF TABLE 00520 M01S00473.route +++| IX3 X7-X3 00521 M01S00474.route +++| ZR X3,DSP0.1 IF MATCH 00522 M01S00475.route +++| SB3 B3+B1 GET NEXT MNEMONIC 00523 M01S00476.route +++| EQ DSP0 CONTINUE 00524 M01S00477.route +++| 00525 M01S00478.route +++| DSP0.1 NZ X1,ABT IF *FC=XX* ON INPUT DISPOSITION 00526 M01S00479.route +++| SA1 PDEF CHECK FOR *DEF* PARAMETER 00527 M01S00480.route +++| NZ X1,ABT IF DEFERRED INPUT FILE 00528 M01S00481.route +++| DSP0.2 SA0 0 SET *ROUTE COMPLETE. JSN IS XXXX.* 00529 M01S00482.route +++| DSP1 SA1 PFUN 00530 M01S00483.route +++| SA3 PTID 00531 M01S00484.route +++| SX4 FRTI 00532 M01S00485.route +++| BX6 X3+X1 00533 M01S00486.route +++| BX7 X4+X2 00534 M01S00487.route +++| ZR X6,DSP2 IF NOT REMOTE ROUTING 00535 M01S00488.route +++| SA7 TDSP+1 SET *TID* FLAG BIT 00536 M01S00489.route +++| SA1 TFUN 00537 M01S00490.route +++| SA2 A1+B1 00538 M01S00491.route +++| BX2 X2+X1 00539 M01S00492.route +++| ZR X2,DSP2 IF IMPLICIT REMOTE ROUTING 00540 M01S00493.route +++| SA2 TDSP+2 00541 M01S00494.route +++| SX3 A1 SET ADDRESS OF FAMILY/USERNUMBER BLOCK 00542 M01S00495.route +++| MX0 36 00543 M01S00496.route +++| BX3 -X3 00544 M01S00497.route +++| BX6 -X0*X3 00545 M01S00498.route +++| BX2 X0*X2 00546 M01S00499.route +++| BX6 X2+X6 00547 M01S00500.route +++| SA6 TDSP+2 00548 M01S00501.route +++| DSP2 MX0 -3 00549 M01S00502.route +++| SA1 PDCT 00550 M01S00503.route +++| LX0 3 00551 M01S00504.route +++| SA2 PECT 00552 M01S00505.route +++| BX1 -X0*X1 GET *DC* TYPE 00553 M01S00506.route +++| BX2 -X0*X2 GET *EC* TYPE 00554 M01S00507.route +++| ZR X1,DSP3 IF NO *DC* TYPE 00555 M01S00508.route +++| ZR X2,DSP3 IF NO *EC* TYPE 00556 M01S00509.route +++| BX1 X1-X2 00557 M01S00510.route +++| ZR X1,DSP3 IF TYPES COMPARE 00558 M01S00511.route +++| MESSAGE (=C/ ROUTE *DC* INCOMPATIBLE WITH *EC*./),3,RECALL 00559 M01S00512.route +++| EQ ABT1 ABORT 00560 M01S00513.route +++| 00561 M01S00514.route +++| DSP3 ROUTE TDSP,RECALL 00562 M01S00515.route +++| SX1 A0 00563 M01S00516.route +++| SA2 TDSP 00564 M01S00517.route +++| MX0 -1 00565 M01S00518.route +++| SA3 A2+B1 GET FLAGS FIELD 00566 M01S00519.route +++| BX3 -X0*X3 00567 M01S00520.route +++| NZ X3,DSP5 IF THIS WAS A DEFERRED ROUTE 00568 M01S00521.route +++| NZ X1,DSP5 IF JSN NOT TO BE RETURNED 00569 M01S00522.route +++| SA3 DSPA+2 POSITION JSN 00570 M01S00523.route +++| MX0 24 00571 M01S00524.route +++| BX6 X0*X2 00572 M01S00525.route +++| ZR X6,DSP5 IF NO JSN RETURNED 00573 M01S00526.route +++| LX0 30 00574 M01S00527.route +++| BX3 -X0*X3 00575 M01S00528.route +++| LX6 30 00576 M01S00529.route +++| BX6 X3+X6 00577 M01S00530.route +++| SA6 DSPA+2 STORE JSN IN MESSAGE 00578 M01S00531.route +++| MESSAGE DSPA,3,RECALL 00579 M01S00532.route +++| DSP4 ENDRUN 00580 M01S00533.route +++| 00581 M01S00534.route +++| DSP5 MESSAGE (=C* ROUTE COMPLETE.*),3,RECALL 00582 M01S00535.route +++| EQ DSP4 00583 M01S00536.route +++| 00584 M01S00537.route +++| DSPA DATA H/ ROUTE COMPLETE. JSN IS XXXX./ 00585 M01S00538.route +++| DSPB DATA 2RIN *DC=IN* 00586 M01S00539.route +++| DATA 2RNO *DC=NO* 00587 M01S00540.route +++| DATA 2RTO *DC=TO* 00588 M01S00541.route +++| DATA 0 00589 M01S00542.route +++| TITLE KEYWORD PROCESSORS. 00590 M01S00543.route +++|** ALL OF THE FOLLOWING ROUTINES HAVE COMMON ENTRY AND EXIT 00591 M01S00544.route +++|* CONDITIONS- 00592 M01S00545.route +++|* 00593 M01S00546.route +++|* ENTRY X3 = PARAMETER WHEN *KW=PP* IS THE FORMAT. 00594 M01S00547.route +++|* X3 = ZERO IF NO PARAMETER WITH KEYWORD. 00595 M01S00548.route +++|* 00596 M01S00549.route +++|* EXIT CORRECT ENTRIES MADE IN *TDSP*. 00597 M01S00550.route +++|* RETURN IN ALL NORMAL CASES TO *EPRX* 00598 M01S00551.route +++|* 00599 M01S00552.route +++|* USES ALL REGISTERS EXCEPT A0, B6.
Line S00553 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | tlrout1 |
Seq # *Modification Id* Act ----------------------------+ 00600 M02S00553.tlrout1 ---|
Line S00554 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | tlrout1 |
Seq # *Modification Id* Act ----------------------------+ 00601 M02S00554.tlrout1 ---| 00602 M01S00039.tlrout1 +++| KCM SPACE 4,10 00603 M01S00040.tlrout1 +++|** KCM - PROCESS *CM=XX* (CONVERSION MODE). 00604 M01S00041.tlrout1 +++|* 00605 M01S00042.tlrout1 +++|* EXIT DATA DECLARATION EQUIVALENCE STORED. 00606 M01S00043.tlrout1 +++| 00607 M01S00044.tlrout1 +++| 00608 M01S00045.tlrout1 +++| KCM BSS 00609 M01S00046.tlrout1 +++| SB2 TCDD SET EQUIVALENCE TABLE FWA 00610 M01S00047.tlrout1 +++| SB3 TCDD+TCDDL SET EQUIVALENCE TABLE LWA+1 00611 M01S00048.tlrout1 +++| SX0 7777B 00612 M01S00049.tlrout1 +++| SA5 TDSP+1 00613 M01S00050.tlrout1 +++| KCM1 GE B2,B3,KCM2 IF CONVERSION MODE NOT FOUND 00614 M01S00051.tlrout1 +++| SA1 B2 GET TABLE ENTRY 00615 M01S00052.tlrout1 +++| BX2 -X0*X1 00616 M01S00053.tlrout1 +++| SB2 B2+B1 ADVANCE TABLE ADDRESS 00617 M01S00054.tlrout1 +++| BX2 X2-X3 00618 M01S00055.tlrout1 +++| NZ X2,KCM1 IF NAMES DO NOT COMPARE 00619 M01S00056.tlrout1 +++| R= X3,FREB SET EXTENDED FLAG 00620 M01S00057.tlrout1 +++| BX6 X5+X3 00621 M01S00058.tlrout1 +++| SA6 A5 00622 M01S00059.tlrout1 +++| BX2 X0*X1 EXTRACT DATA DECLARATION 00623 M01S00060.tlrout1 +++| R= X3,EFDD SET DATA DECLARATION EXTENDED FLAG 00624 M01S00061.tlrout1 +++| SA5 TDSP+7 00625 M01S00062.tlrout1 +++| LX2 48 POSITION DATA DECLARATION 00626 M01S00063.tlrout1 +++| BX6 X5+X3 00627 M01S00064.tlrout1 +++| BX6 X6+X2 INSERT DATA DECLARATION 00628 M01S00065.tlrout1 +++| SA6 A5 00629 M01S00066.tlrout1 +++| EQ EPRX RETURN 00630 M01S00067.tlrout1 +++| 00631 M01S00068.tlrout1 +++| KCM2 MESSAGE (=C+ ROUTE INCORRECT *CM* PARAMETER.+),3,R 00632 M01S00069.tlrout1 +++| EQ ABT1 ABORT 00633 M01S00555.route +++| KDC SPACE 4,10 00634 M01S00556.route +++|** KDC - PROCESS DC=XX. DISPOSITION CODE. 00635 M01S00557.route +++|* 00636 M01S00558.route +++|* EXIT *DC* FIELD SET IN *TDSP+1* 00637 M01S00559.route +++|* *FLAGS* ENTERED WITH *FRDC* IN *TDSP+1*. 00638 M01S00560.route +++| 00639 M01S00561.route +++| 00640 M01S00562.route +++| KDC BSS 0 ENTRY 00641 M01S00563.route +++| SA1 TDCC-1 00642 M01S00564.route +++| MX0 12 00643 M01S00565.route +++| 00644 M01S00566.route +++|* FIND CODE IN TABLE. 00645 M01S00567.route +++| 00646 M01S00568.route +++| KDC1 SA1 A1+1 00647 M01S00569.route +++| BX7 X1-X3 COMPARE CODES 00648 M01S00570.route +++| BX7 X0*X7 00649 M01S00571.route +++| ZR X1,KDC2 IF END OF TABLE 00650 M01S00572.route +++| NZ X7,KDC1 IF NO MATCH 00651 M01S00573.route +++| KDC2 BX7 X1 00652 M01S00574.route +++| SA7 PDCT SET TYPE PROCESSED 00653 M01S00575.route +++| LX3 -24 POSITION PARAMETER 00654 M01S00576.route +++| SA1 TDSP+1 00655 M01S00577.route +++| SX7 FRDC 00656 M01S00578.route +++| LX0 -24 POSITION MASK 00657 M01S00579.route +++| BX3 X0*X3 00658 M01S00580.route +++| BX1 -X0*X1 00659 M01S00581.route +++| BX3 X1+X3 ENTER *DC* PARAMETER 00660 M01S00582.route +++| BX7 X3+X7 ENTER FLAG BIT 00661 M01S00583.route +++| SA7 A1 00662 M01S00584.route +++| EQ EPRX RETURN 00663 M01S00585.route +++| KDE SPACE 4,10 00664 M01S00586.route +++|** KDE - PROCESS *DEF*. DEFERRED ROUTE 00665 M01S00587.route +++|* 00666 M01S00588.route +++|* EXIT *FLAGS* IN *TDSP+1* ENTERED WITH *FRDR*. 00667 M01S00589.route +++| 00668 M01S00590.route +++| 00669 M01S00591.route +++| KDE BSS 0 ENTRY 00670 M01S00592.route +++| NZ X3,ABT IF EQUIVALENCED PARAMETER 00671 M01S00593.route +++| SA1 TDSP+1 00672 M01S00594.route +++| SX7 FRDR 00673 M01S00595.route +++| SA7 PDEF SET *DEF* PARAMETER ENTERED FLAG 00674 M01S00596.route +++| BX7 X1+X7 ENTER FLAG 00675 M01S00597.route +++| SA7 A1 00676 M01S00598.route +++| EQ EPRX RETURN 00677 M01S00599.route +++| KDO SPACE 4,10 00678 M01S00600.route +++|** KDO - PROCESS *DO=XXX*. DEFAULT OUTPUT MAINFRAME. 00679 M01S00601.route +++|* 00680 M01S00602.route +++|* EXIT SOURCE LOGICAL ID IS PLACED IN *TDSP+2*. 00681 M01S00603.route +++|* 00682 M01S00604.route +++|* ERROR IF INCORRECT *DO* PARAMETER OR *LID* IS 00683 M01S00605.route +++|* GREATER THAN THREE CHARACTERS. 00684 M01S00606.route +++| 00685 M01S00607.route +++| 00686 M01S00608.route +++| KDO BSS 0 ENTRY 00687 M01S00609.route +++| MX0 18 00688 M01S00610.route +++| BX2 -X0*X3 00689 M01S00611.route +++| AX2 18 00690 M01S00612.route +++| NZ X2,KDO2 IF *LID* GREATER THAN THREE CHARACTERS 00691 M01S00613.route +++| BX6 X0*X3 EXTRACT OUTPUT MAINFRAME *LID* 00692 M01S00614.route +++| SA5 =1L* CHECK FOR ASTERISK 00693 M01S00615.route +++| R= X4,LCPD SET SLID TO PID 00694 M01S00616.route +++| LX6 18 00695 M01S00617.route +++| IX3 X4-X6 00696 M01S00618.route +++| PL X3,KDO2 IF .LE. SPECIAL SLID VALUES 00697 M01S00619.route +++| LX5 18 00698 M01S00620.route +++| BX5 X5-X6 00699 M01S00621.route +++| NZ X5,KDO1 IF NOT ASTERISK 00700 M01S00622.route +++| BX6 X4 SET SLID=PID 00701 M01S00623.route +++| KDO1 SA2 TDSP+2 SET SLID IN TDSP 00702 M01S00624.route +++| BX2 -X0*X2 00703 M01S00625.route +++| LX6 42 00704 M01S00626.route +++| BX6 X2+X6 00705 M01S00627.route +++| SA6 A2 00706 M01S00628.route +++| SX6 FRLD 00707 M01S00629.route +++| SA1 A2-B1 SET SLID/DLID FLAG 00708 M01S00630.route +++| BX6 X1+X6 00709 M01S00631.route +++| SA6 A1+ STORE FLAG 00710 M01S00632.route +++| EQ EPRX RETURN 00711 M01S00633.route +++| 00712 M01S00634.route +++| KDO2 MESSAGE (=C+ ROUTE INCORRECT *DO* PARAMETER.+),3,RECALL 00713 M01S00635.route +++| EQ ABT1 ABORT 00714 M01S00636.route +++| KEC SPACE 4,10 00715 M01S00637.route +++|** KEC - PROCESS *EC=XX*. EXTERNAL CHARACTERISTICS. 00716 M01S00638.route +++|* 00717 M01S00639.route +++|* EXIT *EC* FIELD SET IN *TDSP+1*. 00718 M01S00640.route +++|* *FLAGS* FIELD IN *TDSP+1* ENTERED WITH *FREC*. 00719 M01S00641.route +++| 00720 M01S00642.route +++| 00721 M01S00643.route +++| KEC BSS 0 ENTRY 00722 M01S00644.route +++| SA1 TECC-1 00723 M01S00645.route +++| MX0 36 00724 M01S00646.route +++| SA2 TDSP+1 00725 M01S00647.route +++| MX7 -3 00726 M01S00648.route +++| 00727 M01S00649.route +++| KEC1 SA1 A1+B1 00728 M01S00650.route +++| ZR X1,KEC2 IF *EC* NOT FOUND 00729 M01S00651.route +++| BX6 X3-X1 00730 M01S00652.route +++| BX6 X0*X6 00731 M01S00653.route +++| NZ X6,KEC1 IF NOT CORRECT *EC* 00732 M01S00654.route +++| BX6 X1 00733 M01S00655.route +++| SA6 PECT SET TYPE PROCESSED 00734 M01S00656.route +++| LX7 23-2 POSITION MASK 00735 M01S00657.route +++| LX1 23-2 POSITION ENTRY FROM *EC* TABLE 00736 M01S00658.route +++| SX6 FREC 00737 M01S00659.route +++| BX2 X7*X2 00738 M01S00660.route +++| BX1 -X7*X1 00739 M01S00661.route +++| BX6 X2+X6 ENTER FLAG BIT 00740 M01S00662.route +++| BX6 X1+X6 ENTER *EC* CODE 00741 M01S00663.route +++| SA6 A2+ 00742 M01S00664.route +++| EQ EPRX RETURN 00743 M01S00665.route +++| 00744 M01S00666.route +++| KEC2 MESSAGE (=C+ ROUTE INCORRECT *EC* PARAMETER.+),3,RECALL 00745 M01S00667.route +++| EQ ABT1 ABORT 00746 M01S00668.route +++| KFC SPACE 4,10 00747 M01S00669.route +++|** KFC - PROCESS *FC=XX. FORMS CODE. 00748 M01S00670.route +++|* 00749 M01S00671.route +++|* EXIT *FC* FIELD SET IN *TDSP+1*. 00750 M01S00672.route +++|* *FLAGS* FIELD IN *TDSP+1* ENTERED WITH *FRFC*. 00751 M01S00673.route +++|* 00752 M01S00674.route +++|* ERROR TO *ABT1*. 00753 M01S00675.route +++|* 00754 M01S00676.route +++|* MACROS MESSAGE. 00755 M01S00677.route +++| 00756 M01S00678.route +++| 00757 M01S00679.route +++| KFC BSS 0 ENTRY 00758 M01S00680.route +++| SA1 TDSP+1 00759 M01S00681.route +++| MX0 -48 00760 M01S00682.route +++| SX6 FRFC 00761 M01S00683.route +++| BX2 -X0*X3 00762 M01S00684.route +++| LX3 -12 00763 M01S00685.route +++| NZ X2,KFC1 IF FORMS CODE GREATER THAN TWO CHARACTERS 00764 M01S00686.route +++| LX0 -12 00765 M01S00687.route +++| BX1 X1+X6 ENTER FLAG BIT 00766 M01S00688.route +++| BX3 X0*X3 00767 M01S00689.route +++| BX6 X1+X3 ENTER FORMS CODE 00768 M01S00690.route +++| SA6 A1 00769 M01S00691.route +++| EQ EPRX RETURN 00770 M01S00692.route +++| 00771 M01S00693.route +++| KFC1 MESSAGE (=C+ ROUTE INCORRECT *FC* PARAMETER.+),0,RECALL 00772 M01S00694.route +++| EQ ABT1 ABORT 00773 M01S00695.route +++| KFM SPACE 4,10 00774 M01S00696.route +++|** KFM - PROCESS *FM=XXXXXXX* PARAMETER. 00775 M01S00697.route +++|* 00776 M01S00698.route +++|* EXIT FAMILY NAME ENTERED IN *TFUN*. 00777 M01S00699.route +++|* FLAG SET IN *PFUN* IF *PTID* AND *PDID* ARE ZERO. 00778 M01S00700.route +++| 00779 M01S00701.route +++| 00780 M01S00702.route +++| KFM BSS 0 ENTRY 00781 M01S00703.route +++| SA1 PDID 00782 M01S00704.route +++| NZ X1,KFM2 IF *FM* AND *ID* CONFLICT 00783 M01S00705.route +++| SA1 PTID 00784 M01S00706.route +++| SX7 FRTI 00785 M01S00707.route +++| NZ X1,KFM1 IF *TID* PROCESSED 00786 M01S00708.route +++| SA7 PFUN SET *FM-UN* FLAG 00787 M01S00709.route +++| ZR X3,EPRX IF IMPLICIT REMOTE ROUTING 00788 M01S00710.route +++| MX0 42 00789 M01S00711.route +++| BX7 X0*X3 00790 M01S00712.route +++| SA7 TFUN STORE FAMILY NAME IN *TFUN* 00791 M01S00713.route +++| EQ EPRX RETURN 00792 M01S00714.route +++| 00793 M01S00715.route +++| KFM1 MESSAGE (=C+ ROUTE *TID* AND *FM/UN* CONFLICT.+),3,RECALL 00794 M01S00716.route +++| EQ ABT1 ABORT 00795 M01S00717.route +++| 00796 M01S00718.route +++| KFM2 MESSAGE (=C+ ROUTE *TID/FM/UN* AND *ID* CONFLICT.+),3,RECALL 00797 M01S00719.route +++| EQ ABT1 ABORT 00798 M01S00720.route +++| KIC SPACE 4,10 00799 M01S00721.route +++|** KIC - PROCESS *IC=XX* (INTERNAL CHARACTERISTICS) 00800 M01S00722.route +++|*
Line S00723 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2597 |
Seq # *Modification Id* Act ----------------------------+ 00801 M02S00723.ns2597 ---|* EXIT *EC* FIELD SET IN *TDSP+1*. 00802 M01S00001.ns2597 +++|* EXIT *IC* FIELD SET IN *TDSP+1*. 00803 M01S00724.route +++|* *FLAGS* FIELD IN *TDSP+1* ENTERED WITH *FRIC*. 00804 M01S00725.route +++| 00805 M01S00726.route +++| 00806 M01S00727.route +++| KIC BSS 0 ENTRY 00807 M01S00728.route +++| SA1 TDSP+1 00808 M01S00729.route +++| SA2 TICC-1 00809 M01S00730.route +++| SX6 FRIC 00810 M01S00731.route +++| MX7 -2 00811 M01S00732.route +++| MX0 36 00812 M01S00733.route +++| LX7 19-1 POSITION MASK 00813 M01S00734.route +++| BX6 X1+X6 ENTER FLAG BIT 00814 M01S00735.route +++| 00815 M01S00736.route +++| KIC1 SA2 A2+B1 00816 M01S00737.route +++| ZR X2,KIC2 IF UNKNOWN *IC* CODE 00817 M01S00738.route +++| BX1 X3-X2 00818 M01S00739.route +++| BX1 X0*X1 00819 M01S00740.route +++| NZ X1,KIC1 IF NOT FOUND 00820 M01S00741.route +++| LX2 19-1 00821 M01S00742.route +++| BX6 X7*X6 00822 M01S00743.route +++| BX2 -X7*X2 00823 M01S00744.route +++| BX6 X6+X2 ENTER IC CODE 00824 M01S00745.route +++| SA6 A1 00825 M01S00746.route +++| EQ EPRX RETURN 00826 M01S00747.route +++| 00827 M01S00748.route +++| KIC2 MESSAGE (=C+ ROUTE INCORRECT *IC* PARAMETER.+),3,RECALL 00828 M01S00749.route +++| EQ ABT1 ABORT 00829 M01S00750.route +++| KID SPACE 4,10 00830 M01S00751.route +++|** KID - PROCESS *ID=NN* (LOCAL DEVICE ID). 00831 M01S00752.route +++|* 00832 M01S00753.route +++|* EXIT DEVICE ID STORED IN *TDSP+2* (TID FIELD). 00833 M01S00754.route +++|* *FLAGS* FIELD IN *TDSP+1* ENTERED WITH *FRTI*. 00834 M01S00755.route +++|* *PDID* SET IF *PTID* AND *PFUN* ARE ZERO. 00835 M01S00756.route +++| 00836 M01S00757.route +++| 00837 M01S00758.route +++| KID BSS 0 ENTRY 00838 M01S00759.route +++| SA1 PTID 00839 M01S00760.route +++| SA2 PFUN 00840 M01S00761.route +++| SX7 B1 00841 M01S00762.route +++| BX1 X1+X2 00842 M01S00763.route +++| NZ X1,KFM2 IF *ID* - *TID*/*FM*/*UN* CONFLICT 00843 M01S00764.route +++| SA7 PDID 00844 M01S00765.route +++| ZR X3,KID1 IF NONEQUIVALENCED PARAMETER 00845 M01S00766.route +++| SB7 B0 SET OCTAL CONVERSION DEFAULT 00846 M01S00767.route +++| BX5 X3 00847 M01S00768.route +++| RJ =XDXB 00848 M01S00769.route +++| NZ X4,ABT IF CONVERSION ERROR 00849 M01S00770.route +++| SA1 TDSP+2 00850 M01S00771.route +++| MX0 36 00851 M01S00772.route +++| SX2 X6-IDLM 00852 M01S00773.route +++| BX7 X0*X1 00853 M01S00774.route +++| PL X2,ABT IF ID .GE. IDLM 00854 M01S00775.route +++| BX7 X7+X6 00855 M01S00776.route +++| SA7 A1 00856 M01S00777.route +++| SX3 FRTI 00857 M01S00778.route +++| 00858 M01S00779.route +++| KID1 SA2 TDSP+1 00859 M01S00780.route +++| SX6 FRCS 00860 M01S00781.route +++| BX6 X2+X6 SET CENTRAL SITE ROUTING FLAG 00861 M01S00782.route +++| BX6 X3+X6 OPTIONALLY SET *TID* FLAG 00862 M01S00783.route +++| SA6 A2+ 00863 M01S00784.route +++| EQ EPRX RETURN 00864 M01S00785.route +++| KJS SPACE 4,10 00865 M01S00786.route +++|** KJS - PROCESS *JSN=XXX* (UNIQUE JSN). 00866 M01S00787.route +++|*
Line S00788 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2556 |
Seq # *Modification Id* Act ----------------------------+ 00867 M02S00788.ns2556 ---|* EXIT SUBSYSTEM NAME FIELD SET IN *TDSP+6*. 00868 M01S00001.ns2556 +++|* EXIT FORCED JSN FIELD SET IN *TDSP+6*. 00869 M01S00789.route +++|* *FLAGS* FIELD IN *TDSP+1* ENTERED WITH *FRFJ*. 00870 M01S00790.route +++| 00871 M01S00791.route +++| 00872 M01S00792.route +++| KJS BSS 0 ENTRY 00873 M01S00793.route +++| ZR X3,ABT IF NULL PARAMETER
Line S00794 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2556 |
Seq # *Modification Id* Act ----------------------------+ 00874 M02S00794.ns2556 ---| SA1 PUJN
Line S00795 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2556 |
Seq # *Modification Id* Act ----------------------------+ 00875 M02S00795.ns2556 ---| NZ X1,ABT IF BOTH *JSN* AND *UJN* SPECIFIED 00876 M01S00796.route +++| SX6 B1+ 00877 M01S00797.route +++| SA6 PJSN 00878 M01S00798.route +++| SA1 JOPR CHECK JOB ORIGIN TYPE 00879 M01S00799.route +++| MX0 -12 00880 M01S00800.route +++| LX1 0-24 00881 M01S00801.route +++| BX1 -X0*X1 00882 M01S00802.route +++| MX0 42 00883 M01S00803.route +++| IFNE SYOT,0,1 00884 M01S00804.route +++| SX1 X1-SYOT 00885 M01S00805.route +++| ZR X1,KJS1 IF SYSTEM ORIGIN JOB 00886 M01S00806.route +++| MESSAGE (=C+ ROUTE *JSN* NOT ALLOWED.+),3 00887 M01S00807.route +++| EQ ABT1 ABORT 00888 M01S00808.route +++| 00889 M01S00809.route +++| KJS1 LX3 18 00890 M01S00810.route +++| BX1 X0*X3 00891 M01S00811.route +++| NZ X1,KJS2 IF JSN TOO LONG 00892 M01S00812.route +++| MX7 -6 00893 M01S00813.route +++| BX1 -X7*X3 00894 M01S00814.route +++| ZR X1,KJS2 IF JSN TOO SHORT 00895 M01S00815.route +++| SA1 TDSP+6 00896 M01S00816.route +++| SA2 TDSP+1 00897 M01S00817.route +++| BX6 X0*X1
Line S00818 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2556 |
Seq # *Modification Id* Act ----------------------------+ 00898 M02S00818.ns2556 ---| BX6 X6+X3 SET JSN IN UJN FIELD 00899 M01S00002.ns2556 +++| BX6 X6+X3 SET JSN IN FORCED JSN FIELD 00900 M01S00819.route +++| SX7 FRFJ 00901 M01S00820.route +++| BX7 X2+X7 SET FORCED JSN FLAG 00902 M01S00821.route +++| SA6 A1 00903 M01S00822.route +++| SA7 A2+ 00904 M01S00823.route +++| EQ EPRX RETURN 00905 M01S00824.route +++| 00906 M01S00825.route +++| KJS2 MESSAGE (=C+ ROUTE INCORRECT *JSN* PARAMETER.+),3 00907 M01S00826.route +++| EQ ABT1 ABORT 00908 M01S00827.route +++| KOT SPACE 4,10 00909 M01S00828.route +++|** KOT - PROCESS *OT=XXXX* (ORIGIN TYPE). 00910 M01S00829.route +++|* 00911 M01S00830.route +++|* EXIT *F* AND *OT* FIELDS SET IN *TDSP*. 00912 M01S00831.route +++| 00913 M01S00832.route +++| 00914 M01S00833.route +++| KOT BSS 0 ENTRY 00915 M01S00834.route +++| SA1 JOPR CHECK JOB ORIGIN TYPE 00916 M01S00835.route +++| MX0 -12 00917 M01S00836.route +++| LX1 11-35 00918 M01S00837.route +++| BX1 -X0*X1 00919 M01S00838.route +++| MX0 30 00920 M01S00839.route +++| SA2 TLOT-1 00921 M01S00840.route +++| SX1 X1-SYOT 00922 M01S00841.route +++| ZR X1,KOT1 IF *SYOT* JOB ORIGIN 00923 M01S00842.route +++| MESSAGE (=C/ ROUTE *OT* NOT ALLOWED./),3,RECALL 00924 M01S00843.route +++| EQ ABT1 ABORT 00925 M01S00844.route +++| 00926 M01S00845.route +++| KOT1 SA2 A2+1 00927 M01S00846.route +++| BX6 X3-X2 00928 M01S00847.route +++| BX6 X0*X6 00929 M01S00848.route +++| ZR X2,KOT2 IF END OF TABLE 00930 M01S00849.route +++| NZ X6,KOT1 IF NOT A MATCH 00931 M01S00850.route +++| MX0 -7 00932 M01S00851.route +++| SA1 TDSP 00933 M01S00852.route +++| BX2 -X0*X2 EXTRACT ORIGIN VALUE 00934 M01S00853.route +++| SX2 X2+4000B SET FLAG BIT 00935 M01S00854.route +++| BX1 X0*X1 00936 M01S00855.route +++| BX7 X1+X2 ENTER ORIGIN VALUE 00937 M01S00856.route +++| SA7 TDSP 00938 M01S00857.route +++| EQ EPRX RETURN 00939 M01S00858.route +++| 00940 M01S00859.route +++| KOT2 MESSAGE (=C+ ROUTE INCORRECT *OT* PARAMETER.+),3,RECALL 00941 M01S00860.route +++| EQ ABT1 ABORT 00942 M01S00861.route +++| KPI SPACE 4,10 00943 M01S00862.route +++|** KPI - PROCESS *PI=NNNNNNN* (PRINT IMAGE). 00944 M01S00863.route +++|* 00945 M01S00864.route +++|* EXIT- *P* FLAG AND *PI* FIELD SET IN *TDSP+4* 00946 M01S00865.route +++|* 00947 M01S00866.route +++| 00948 M01S00867.route +++| 00949 M01S00868.route +++| KPI BSS 0 ENTRY 00950 M01S00869.route +++| ZR X3,EPRX IF NULL PARAMETER 00951 M01S00870.route +++| SA1 TPIN-1 00952 M01S00871.route +++| MX0 1 00953 M01S00872.route +++| 00954 M01S00873.route +++|* CHECK FOR VALID PRINT IMAGE NAME. 00955 M01S00874.route +++| 00956 M01S00875.route +++| KPI1 SA1 A1+B1 CHECK NEXT ENTRY 00957 M01S00876.route +++| ZR X1,KPI2 IF END OF TABLE 00958 M01S00877.route +++| SX6 X1 ISOLATE MASK SIZE 00959 M01S00878.route +++| BX7 X1-X3 00960 M01S00879.route +++| AX6 6 00961 M01S00880.route +++| SB4 X6 00962 M01S00881.route +++| AX6 X0,B4 FORM MASK 00963 M01S00882.route +++| BX2 X6*X7 00964 M01S00883.route +++| NZ X2,KPI1 IF NO MATCH 00965 M01S00884.route +++| SA2 TDSP+4B 00966 M01S00885.route +++| MX0 -6 ISOLATE PRINT IMAGE ORDINAL 00967 M01S00886.route +++| LX2 6 00968 M01S00887.route +++| BX6 -X0*X1 00969 M01S00888.route +++| BX7 X0*X2
Line S00889 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | route9 |
Seq # *Modification Id* Act ----------------------------+ 00970 M02S00889.route9 ---| SX6 X6+40B SET PRINT IMAGE FLAG 00971 M01S00001.route9 +++| SX6 X6+10B SET PRINT IMAGE FLAG 00972 M01S00890.route +++| BX7 X6+X7 SET PRINT IMAGE CODE INTO PARAMETER BLOCK 00973 M01S00891.route +++| LX7 -6 00974 M01S00892.route +++| SA7 A2 00975 M01S00893.route +++| EQ EPRX RETURN 00976 M01S00894.route +++| 00977 M01S00895.route +++| KPI2 MESSAGE (=C/ ROUTE UNKNOWN *PI* PARAMETER./),3,R 00978 M01S00896.route +++| EQ ABT1 ABORT 00979 M01S00897.route +++| KPR SPACE 4,10 00980 M01S00898.route +++|** KPR - PROCESS *PRI=NNNN* (PRIORITY) 00981 M01S00899.route +++|* 00982 M01S00900.route +++|* EXIT MESSAGE ISSUED, PARAMETER IGNORED. 00983 M01S00901.route +++| 00984 M01S00902.route +++| 00985 M01S00903.route +++| KPR BSS 0 ENTRY 00986 M01S00904.route +++| MESSAGE (=C/ ROUTE *PRI* IGNORED./),3,RECALL 00987 M01S00905.route +++| EQ EPRX RETURN 00988 M01S00906.route +++| KRE SPACE 4,10 00989 M01S00907.route +++|** KRE - PROCESS *REP=NN* (REPEAT COUNT) 00990 M01S00908.route +++|* 00991 M01S00909.route +++|* EXIT REPEAT COUNT SET IN *TDSP+4* - *RC* FIELD. 00992 M01S00910.route +++|* *FLAGS* IN *TDSP+1* ENTERED WITH *FRRC*. 00993 M01S00911.route +++| 00994 M01S00912.route +++| 00995 M01S00913.route +++| KRE BSS 0 ENTRY 00996 M01S00914.route +++| SB7 B1 SET DECIMAL CONVERSION 00997 M01S00915.route +++| BX5 X3 00998 M01S00916.route +++| RJ =XDXB CONVERT VALUE 00999 M01S00917.route +++| NZ X4,ABT IF CONVERSION ERROR 01000 M01S00918.route +++| SA1 TDSP+1
Line S00919 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2591 |
Seq # *Modification Id* Act ----------------------------+ 01001 M02S00919.ns2591 ---| MX0 -5 01002 M01S00004.ns2591 +++| MX0 -6 01003 M01S00920.route +++| BX2 X0*X6
Line S00921 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2591 |
Seq # *Modification Id* Act ----------------------------+ 01004 M02S00921.ns2591 ---| NZ X2,KRE1 IF VALUE GT 31D (37B) 01005 M01S00005.ns2591 +++| NZ X2,KRE1 IF VALUE .GT. 63D (77B) 01006 M01S00922.route +++| SA2 TDSP+4 01007 M01S00923.route +++| SX7 FRRC
Line S00924 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2591 |
Seq # *Modification Id* Act ----------------------------+ 01008 M02S00924.ns2591 ---| LX0 16-4 POSITION MASK
Line S00925 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2591 |
Seq # *Modification Id* Act ----------------------------+ 01009 M02S00925.ns2591 ---| LX6 16-4 POSITION VALUE 01010 M01S00006.ns2591 +++| LX0 12 POSITION MASK 01011 M01S00007.ns2591 +++| LX6 12 POSITION VALUE 01012 M01S00926.route +++| BX2 X0*X2 01013 M01S00927.route +++| BX7 X1+X7 SET FLAG BIT 01014 M01S00928.route +++| SA7 A1 01015 M01S00929.route +++| BX6 X6+X2 ENTER REPEAT COUNT 01016 M01S00930.route +++| SA6 A2+ 01017 M01S00931.route +++| EQ EPRX RETURN 01018 M01S00932.route +++|
Line S00933 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2591 |
Seq # *Modification Id* Act ----------------------------+ 01019 M02S00933.ns2591 ---| KRE1 MESSAGE (=C/ ROUTE *REP* GT 31. DEFAULT USED./),3,RECALL 01020 M01S00008.ns2591 +++| KRE1 MESSAGE (=C/ ROUTE *REP* GT 63. DEFAULT USED./),3,RECALL 01021 M01S00934.route +++| EQ EPRX RETURN 01022 M01S00935.route +++| KSC SPACE 4,10 01023 M01S00936.route +++|** KSC - PROCESS *SC=XX* (SPACING CODE). 01024 M01S00937.route +++|* 01025 M01S00938.route +++|* EXIT SPACING CODE ENTERED IN *TDSP+4*. 01026 M01S00939.route +++| 01027 M01S00940.route +++| 01028 M01S00941.route +++| KSC BSS 0 ENTRY 01029 M01S00942.route +++| SB7 B0 SET OCTAL CONVERSION 01030 M01S00943.route +++| BX5 X3 01031 M01S00944.route +++| RJ =XDXB CONVERT VALUE 01032 M01S00945.route +++| NZ X4,ABT IF CONVERSION ERROR 01033 M01S00946.route +++| MX0 -6 ENTER SPACING CODE 01034 M01S00947.route +++| BX3 -X0*X6 01035 M01S00948.route +++| BX1 X0*X6 01036 M01S00949.route +++| ZR X1,KSC1 IF SC .LE. 77B 01037 M01S00950.route +++| MESSAGE (=C* ROUTE INCORRECT SPACING CODE.*),3,R 01038 M01S00951.route +++| EQ ABT1 ABORT 01039 M01S00952.route +++| 01040 M01S00953.route +++| KSC1 SA1 TDSP+4 01041 M01S00954.route +++| LX0 48 01042 M01S00955.route +++| BX1 X0*X1 01043 M01S00956.route +++| LX3 48 01044 M01S00957.route +++| BX6 X1+X3 01045 M01S00958.route +++| SA6 A1+ 01046 M01S00959.route +++| SA1 TDSP+1 SET SPACING CODE FLAG 01047 M01S00960.route +++| SX6 FRSC 01048 M01S00961.route +++| BX6 X6+X1 01049 M01S00962.route +++| SA6 A1 01050 M01S00963.route +++| EQ EPRX RETURN 01051 M01S00964.route +++| KST SPACE 4,10 01052 M01S00965.route +++|** KST - PROCESS *ST=XXX*. DESTINATION LID. 01053 M01S00966.route +++|* 01054 M01S00967.route +++|* EXIT THE LOGICAL ID IS PLACED IN *TDSP+2*. 01055 M01S00968.route +++|* 01056 M01S00969.route +++|* ERROR IF INCORRECT *ST* PARAMETER OR *LID* IS 01057 M01S00970.route +++|* GREATER THAN THREE CHARACTERS. 01058 M01S00971.route +++| 01059 M01S00972.route +++| 01060 M01S00973.route +++| KST BSS 0 ENTRY 01061 M01S00974.route +++| MX0 18 01062 M01S00975.route +++| BX2 -X0*X3 01063 M01S00976.route +++| AX2 18 01064 M01S00977.route +++| NZ X2,KST2 IF *LID* GREATER THAN THREE CHARACTERS 01065 M01S00978.route +++| BX6 X0*X3 01066 M01S00979.route +++| SA5 =1L* CHECK FOR ASTERISK 01067 M01S00980.route +++| R= X4,LCPD SET DLID TO PID 01068 M01S00981.route +++| LX6 18 01069 M01S00982.route +++| IX3 X4-X6 01070 M01S00983.route +++| PL X3,KST2 IF .LE. SPECIAL DLID VALUES 01071 M01S00984.route +++| LX5 18 01072 M01S00985.route +++| BX5 X5-X6 01073 M01S00986.route +++| NZ X5,KST1 IF NOT ASTERISK 01074 M01S00987.route +++| BX6 X4 SET DLID=PID 01075 M01S00988.route +++| KST1 LX6 24 01076 M01S00989.route +++| SA2 TDSP+2 SET DLID IN TDSP 01077 M01S00990.route +++| LX0 -18 01078 M01S00991.route +++| BX2 -X0*X2 01079 M01S00992.route +++| BX6 X6+X2 01080 M01S00993.route +++| SX1 FRLD SET SLID/DLID FLAG 01081 M01S00994.route +++| SA6 A2 01082 M01S00995.route +++| SA2 A2-B1 01083 M01S00996.route +++| BX6 X2+X1 01084 M01S00997.route +++| SA6 A2 STORE FLAG 01085 M01S00998.route +++| EQ EPRX RETURN 01086 M01S00999.route +++| 01087 M01S01000.route +++| KST2 MESSAGE (=C+ ROUTE INCORRECT *ST* PARAMETER.+),3,RECALL 01088 M01S01001.route +++| EQ ABT1 ABORT 01089 M01S01002.route +++| KSV SPACE 4,10 01090 M01S01003.route +++|** KSV - PROCESS *SCL=XX* (SERVICE CLASS). 01091 M01S01004.route +++|* 01092 M01S01005.route +++|* EXIT SERVICE CLASS ENTERED IN *TDSP+4*. 01093 M01S01006.route +++| 01094 M01S01007.route +++| 01095 M01S01008.route +++| KSV BSS 0 ENTRY 01096 M01S01009.route +++| SA1 TSCT-1 01097 M01S01010.route +++| 01098 M01S01011.route +++|* CHECK FOR VALID SERVICE CLASS. 01099 M01S01012.route +++| 01100 M01S01013.route +++| KSV1 SA1 A1+B1 01101 M01S01014.route +++| ZR X1,KSV2 IF END OF TABLE 01102 M01S01015.route +++| BX7 X1-X3 01103 M01S01016.route +++| NZ X7,KSV1 IF NO MATCH 01104 M01S01017.route +++| SA1 TDSP+4 01105 M01S01018.route +++| MX0 12 01106 M01S01019.route +++| BX7 X0*X3 SET SERVICE CLASS INTO PARAMETER BLOCK 01107 M01S01020.route +++| LX7 -12 01108 M01S01021.route +++| BX7 X7+X1 01109 M01S01022.route +++| SA7 A1 01110 M01S01023.route +++| SA1 TDSP+1 SET FORCED SERVICE CLASS FLAG 01111 M01S01024.route +++| MX0 -1 01112 M01S01025.route +++| LX0 20 01113 M01S01026.route +++| BX7 -X0+X1 01114 M01S01027.route +++| SA7 A1+ 01115 M01S01028.route +++| EQ EPRX RETURN 01116 M01S01029.route +++| 01117 M01S01030.route +++| KSV2 MESSAGE (=C+ ROUTE UNDEFINED SERVICE CLASS.+),3,RECALL 01118 M01S01031.route +++| EQ ABT1 ABORT 01119 M01S01032.route +++| KTD SPACE 4,10 01120 M01S01033.route +++|** KTD - PROCESS *TID=XX* (TERMINAL ID). 01121 M01S01034.route +++|* 01122 M01S01035.route +++|* EXIT *PTID* SET NON-ZERO IF *PFUN* AND *PDID* EQUAL ZERO. 01123 M01S01036.route +++|* *TID=C* PROCESSED AS *ID*. 01124 M01S01037.route +++|* *TID=XX* PROCESSED AS *UN*. 01125 M01S01038.route +++| 01126 M01S01039.route +++| 01127 M01S01040.route +++| KTD BSS 0 ENTRY 01128 M01S01041.route +++| SX6 1RC 01129 M01S01042.route +++| LX6 59-5 01130 M01S01043.route +++| BX6 X6-X3 01131 M01S01044.route +++| ZR X6,KTD1 IF *TID=C* - ROUTE TO CENTRAL SITE 01132 M01S01045.route +++| SA1 PDID 01133 M01S01046.route +++| NZ X1,KFM2 IF *TID* - *ID* CONFLICT 01134 M01S01047.route +++| SA1 PFUN 01135 M01S01048.route +++| NZ X1,KFM1 IF TID - FM/UN CONFLICT 01136 M01S01049.route +++| PL X3,KUN IF *TID=XX* 01137 M01S01050.route +++| SX7 FRTI 01138 M01S01051.route +++| SA7 PTID 01139 M01S01052.route +++| EQ EPRX RETURN 01140 M01S01053.route +++| 01141 M01S01054.route +++| KTD1 SX3 0 01142 M01S01055.route +++| EQ KID PROCESS AS *ID* 01143 M01S01056.route +++| KUJ SPACE 4,10 01144 M01S01057.route +++|** KUJ - PROCESS *UJN=XXXXXXX* (USER JOB NAME). 01145 M01S01058.route +++|* 01146 M01S01059.route +++|* EXIT *UJN* FIELD SET IN *TDSP+3*. 01147 M01S01060.route +++|* *FLAGS* IN *TDSP+1* ENTERED WITH *FRUJ*. 01148 M01S01061.route +++| 01149 M01S01062.route +++| 01150 M01S01063.route +++| KUJ BSS 0 ENTRY
Line S01064 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2556 |
Seq # *Modification Id* Act ----------------------------+ 01151 M02S01064.ns2556 ---| SA1 PJSN
Line S01065 Modification History | |
---|---|
M01 (Added by) | route |
M02 (Updated by) | ns2556 |
Seq # *Modification Id* Act ----------------------------+ 01152 M02S01065.ns2556 ---| NZ X1,ABT IF BOTH *JSN* AND *UJN* SPECIFIED 01153 M01S01066.route +++| SX6 B1+ 01154 M01S01067.route +++| SA6 PUJN 01155 M01S01068.route +++| SA1 TDSP+1 ENTER FLAG BIT 01156 M01S01069.route +++| SX7 FRUJ 01157 M01S01070.route +++| BX7 X1+X7 01158 M01S01071.route +++| SA7 A1 01159 M01S01072.route +++| SA1 TDSP+3 ENTER *UJN* PARAMETER 01160 M01S01073.route +++| BX1 -X0*X1 01161 M01S01074.route +++| BX6 X1+X3 01162 M01S01075.route +++| SA6 A1 01163 M01S01076.route +++| EQ EPRX RETURN 01164 M01S01077.route +++| KUN SPACE 4,10 01165 M01S01078.route +++|** KUN - PROCESS *UN=XXXXXXX* (USER NAME). 01166 M01S01079.route +++|* 01167 M01S01080.route +++|* EXIT USER NAME ENTERED IN *TFUN+1*. 01168 M01S01081.route +++|* FLAG SET IN *PFUN* IF *PTID* AND *PDID* ARE ZERO. 01169 M01S01082.route +++| 01170 M01S01083.route +++| 01171 M01S01084.route +++| KUN BSS 0 ENTRY 01172 M01S01085.route +++| SA1 PDID 01173 M01S01086.route +++| NZ X1,KFM2 IF *UN* - *ID* CONFLICT 01174 M01S01087.route +++| SA1 PTID 01175 M01S01088.route +++| SX7 FRTI 01176 M01S01089.route +++| NZ X1,KFM1 IF FM/UN - TID CONFLICT 01177 M01S01090.route +++| SA7 PFUN 01178 M01S01091.route +++| ZR X3,EPRX IF IMPLICIT REMOTE ROUTING 01179 M01S01092.route +++| MX0 42 01180 M01S01093.route +++| BX6 X0*X3 01181 M01S01094.route +++| SA6 TFUN+1 STORE USER NAME 01182 M01S01095.route +++| EQ EPRX RETURN 01183 M01S01096.route +++| SPACE 4,10 01184 M01S01097.route +++| USE LITERALS 01185 M01S01098.route +++| 01186 M01S01099.route +++|** COMMON DECKS. 01187 M01S01100.route +++| 01188 M01S01101.route +++|*CALL COMCDXB 01189 M01S01102.route +++|*CALL COMCSYS 01190 M01S01103.route +++| 01191 M01S01104.route +++| BSS 0 01192 M01S01105.route +++| RFL= EQU *+8 01193 M01S01106.route +++| 01194 M01S01107.route +++| END
cdc/nos2.source/opl.opl871/deck/route.txt ยท Last modified: by 127.0.0.1