Seq # *Modification Id* Act
----------------------------+
00001 M00S00001.qftlist +++| IDENT QFTLST1,FWA,QFTLIST,01,00
00002 M00S00002.qftlist +++| ABS
00003 M00S00003.qftlist +++| SST
00004 M00S00004.qftlist +++| SYSCOM B1
00005 M00S00005.qftlist +++|*COMMENT QFTLIST - LIST ACTIVE QUEUED FILES.
Line S00006 Modification History
M01 (Removed by) 281l803
Seq # *Modification Id* Act
----------------------------+
00006 M01S00006.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORTATION. 1981.
Line S00001 Modification History
M01 (Added by) 281l803
Seq # *Modification Id* Act
----------------------------+
00007 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
00008 M00S00007.qftlist +++| TITLE QFTLIST - LIST ACTIVE QUEUED FILES.
00009 M00S00008.qftlist +++| SPACE 4
00010 M00S00009.qftlist +++|***** QFTLIST - LIST ACTIVE QUEUED FILES.
00011 M00S00010.qftlist +++|* R. A. JAPS 78/01/27.
00012 M00S00011.qftlist +++|* B. M. SLIWINSKI. 81/10/15. (MODIFIED)
00013 M00S00012.qftlist +++| SPACE 4
00014 M00S00013.qftlist +++|*** *QFTLIST* IS A QUEUE UTILITY PROGRAM THAT PROVIDES A LIST
00015 M00S00014.qftlist +++|* OF INFORMATION PERTAINING TO ACTIVE QUEUED FILES.
00016 M00S00015.qftlist +++| SPACE 4
00017 M00S00016.qftlist +++|*** *QALTER* IS A QUEUE UTILITY PROGRAM THAT ALLOWS AN OPERATOR
00018 M00S00017.qftlist +++|* TO ALTER OUTPUT FILE CHARACTERISTICS.
00019 M00S00018.qftlist +++| SPACE 4
00020 M00S00019.qftlist +++|*** *QFTLIST* IS CALLED BY THE QUEUED FILE SUPERVISOR PROGRAM
00021 M00S00020.qftlist +++|* *QFSP* OR BY CONTROL STATEMENT. THE FOLLOWING PARAMETERS
00022 M00S00021.qftlist +++|* ARE VALID FOR *QFTLIST*.
00023 M00S00022.qftlist +++|*
00024 M00S00023.qftlist +++|* FM = FAMILY NAME FOR DEVICES.
00025 M00S00024.qftlist +++|* DN = DEVICE NUMBER
00026 M00S00025.qftlist +++|* JSN = JSN OF FILE.
00027 M00S00026.qftlist +++|* UJN = USER JOBNAME.
00028 M00S00027.qftlist +++|* FC = FORMS CODE.
00029 M00S00028.qftlist +++|* ID = IDENTIFIER NUMBER.
Line S00001 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
00030 M01S00001.ns22000 +++|* LA = LOWER SECURITY ACCESS LEVEL.
00031 M01S00002.ns22000 +++|* UA = UPPER SECURITY ACCESS LEVEL.
00032 M00S00029.qftlist +++|* DF = DESTINATION FAMILY NAME.
00033 M00S00030.qftlist +++|* UN = DESTINATION USER NUMBER.
00034 M00S00031.qftlist +++|* L = FILE TO RECEIVE OUTPUT.
00035 M00S00032.qftlist +++|* LO = LIST OPTION.
Line S00001 Modification History
M01 (Added by) ns21000
Seq # *Modification Id* Act
----------------------------+
00036 M01S00001.ns21000 +++|* LD = DESTINATION LOGICAL IDENTIFIER (LID).
Line S00033 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
00037 M01S00033.ns22000 ---|* OT = DT. SELECT ORIGIN TYPE BY DISPOSITION TYPE.
00038 M01S00034.ns22000 ---|* BC - SELECT BATCH/SYSTEM ORIGIN FILES BY FILE TYPE.
00039 M01S00035.ns22000 ---|* RB - SELECT REMOTE BATCH ORIGIN FILES BY FILE TYPE.
00040 M01S00036.ns22000 ---|* TT - SELECT TERMINAL ORIGIN FILES BY FILE TYPE.
Line S00003 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
00041 M01S00003.ns22000 +++|* DS = DT. SELECT FILE DESTINATION BY DISPOSITION TYPE.
00042 M01S00004.ns22000 +++|* BC - SELECT FILES ROUTED TO LOCAL BATCH BY FILE TYPE.
00043 M01S00005.ns22000 +++|* RB - SELECT FILES ROUTED TO REMOTE BATCH TERMINAL
00044 M01S00006.ns22000 +++|* BY FILE TYPE.
00045 M00S00037.qftlist +++|* I = ALTERNATE DIRECTIVE INPUT FILE. THIS IS A CONTROL
00046 M00S00038.qftlist +++|* STATEMENT PARAMETER SPECIFYING WHAT FILE SHOULD
00047 M00S00039.qftlist +++|* BE READ FOR INPUT DIRECTIVES. THESE DIRECTIVES
00048 M00S00040.qftlist +++|* CONSIST OF ANY VALID K-DISPLAY INPUT OR COMMANDS.
00049 M00S00041.qftlist +++|* THESE DIRECTIVES WILL BE PROCESSED AFTER THE
00050 M00S00042.qftlist +++|* CONTROL STATEMENT DIRECTIVES BUT BEFORE ANY
00051 M00S00043.qftlist +++|* K-DISPLAY INPUT IS ACCEPTED.
00052 M00S00044.qftlist +++|*
00053 M00S00045.qftlist +++|* THE FOLLOWING DIRECTIVES ARE ALSO VALID FOR *QALTER*.
00054 M00S00046.qftlist +++|*
Line S00007 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
00055 M01S00007.ns22000 +++|* NAL = NEW SECURITY ACCESS LEVEL.
00056 M00S00047.qftlist +++|* NDF = NEW DESTINATION FAMILY NAME.
00057 M00S00048.qftlist +++|* NUN = NEW DESTINATION USER NUMBER.
00058 M00S00049.qftlist +++|* NID = NEW FILE ID.
00059 M00S00050.qftlist +++|* NPR = NEW PRIORITY FOR OUTPUT.
00060 M00S00051.qftlist +++|* NFC = NEW FORMS CODE FOR OUTPUT.
00061 M00S00052.qftlist +++|* NRC = NEW REPEAT COUNT FOR OUTPUT.
00062 M00S00053.qftlist +++|* NDC = NEW DISPOSITION CODE.
00063 M00S00054.qftlist +++|* NEC = NEW EXTERNAL CHARACTERISTICS FOR OUTPUT FILES.
Line S00002 Modification History
M01 (Added by) ns21000
Seq # *Modification Id* Act
----------------------------+
00064 M01S00002.ns21000 +++|* NLD = NEW DESTINATION LOGICAL IDENTIFIER (LID).
00065 M00S00055.qftlist +++|* OP = ALTER OPTION.
00066 M00S00056.qftlist +++|*
00067 M00S00057.qftlist +++|* SEE *QFSP* FOR A MORE DETAILED DESCRIPTION OF PARAMETERS.
00068 M00S00058.qftlist +++| SPACE 4
00069 M00S00059.qftlist +++|*** DAYFILE MESSAGES.
00070 M00S00060.qftlist +++|*
00071 M00S00061.qftlist +++|*
00072 M00S00062.qftlist +++|* * NO QUEUED FILES FOUND.*
00073 M00S00063.qftlist +++|* *QFTLIST* OR *QALTER* WAS NOT ABLE TO FIND ANY
00074 M00S00064.qftlist +++|* QUEUED FILES THAT SATISFY THE SELECTION
00075 M00S00065.qftlist +++|* CRITERIA.
00076 M00S00066.qftlist +++|*
00077 M00S00067.qftlist +++|* * QFTLIST/QALTER ABORTED.*
00078 M00S00068.qftlist +++|* *QFTLIST* OR *QALTER* HAS BEEN ABORTED BY THE
00079 M00S00069.qftlist +++|* SYSTEM. CONTACT THE SITE ANALYST.
00080 M00S00070.qftlist +++|*
00081 M00S00071.qftlist +++|* * QAC ERROR ENCOUNTERED.*
00082 M00S00072.qftlist +++|* THIS MESSAGE IS AN EXPLANATORY MESSAGE STATING
00083 M00S00073.qftlist +++|* THAT *QFTLIST* OR *QALTER* WAS ABORTED. AN
00084 M00S00074.qftlist +++|* UNEXPECTED ERROR CODE WAS RETURNED BY *QAC*.
00085 M00S00075.qftlist +++| SPACE 4
00086 M00S00076.qftlist +++|*** K-DISPLAY MESSAGES.
00087 M00S00077.qftlist +++|*
00088 M00S00078.qftlist +++|*
00089 M00S00079.qftlist +++|* * INVALID PAGING ATTEMPT.*
00090 M00S00080.qftlist +++|* AN ATTEMPT WAS MADE TO PAGE THE K-DISPLAY BEFORE
00091 M00S00081.qftlist +++|* THE *LIST* COMMAND WAS ENTERED.
00092 M00S00082.qftlist +++|*
00093 M00S00083.qftlist +++|* * NO QUEUED FILES FOUND.*
00094 M00S00084.qftlist +++|* *QFTLIST* OR *QALTER* DID NOT FIND ANY QUEUED
00095 M00S00085.qftlist +++|* FILES THAT MET THE SELECTION CRITERIA.
00096 M00S00086.qftlist +++|*
00097 M00S00087.qftlist +++|* * QALTER COMPLETE.*
00098 M00S00088.qftlist +++|* AN INFORMATIVE MESSAGE INDICATING THE *QALTER*
00099 M00S00089.qftlist +++|* OPERATION IS COMPLETE.
00100 M00S00090.qftlist +++|*
00101 M00S00091.qftlist +++|* * LIST COMPLETE.*
00102 M00S00092.qftlist +++|* AN INFORMATIVE MESSAGE INDICATING THE *LIST*
00103 M00S00093.qftlist +++|* OPERATION IS COMPLETE.
00104 M00S00094.qftlist +++|*
00105 M00S00095.qftlist +++|* * OUTPUT FILE RELEASED.*
00106 M00S00096.qftlist +++|* AN INFORMATIVE MESSAGE INDICATING THE *OUT*
00107 M00S00097.qftlist +++|* OPERATION IS COMPLETE.
00108 M00S00098.qftlist +++|*
00109 M00S00099.qftlist +++|* * NEW DESTINATION FAMILY/USER INVALID.*
00110 M00S00100.qftlist +++|* THIS MESSAGE IS RETURNED BY *QALTER* TO INDICATE THAT
00111 M00S00101.qftlist +++|* EITHER THE NEW DESTINATION FAMILY (*NDF*) OR THE
00112 M00S00102.qftlist +++|* NEW DESTINATION USER NUMBER (*NUN*) IS NOT VALID.
00113 M00S00103.qftlist +++|*
00114 M00S00104.qftlist +++|* * INCOMPLETE DESTINATION FAMILY/USER.*
00115 M00S00105.qftlist +++|* IF EITHER *DF* OR *UN* IS SPECIFIED,
00116 M00S00106.qftlist +++|* THE OTHER MUST ALSO BE SPECIFIED,
00117 M00S00107.qftlist +++|* IN ORDER TO COMPLETELY IDENTIFY
00118 M00S00108.qftlist +++|* THE SELECTED REMOTE TERMINAL.
Line S00008 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
00119 M01S00008.ns22000 +++|*
00120 M01S00009.ns22000 +++|* * NOT VALIDATED TO CHANGE ACCESS LEVEL.*
00121 M01S00010.ns22000 +++|* THE USER MUST HAVE SECURITY ADMINISTRATOR PRIVILEGES
00122 M01S00011.ns22000 +++|* IN ORDER TO BE ALLOWED TO CHANGE THE ACCESS LEVEL
00123 M01S00012.ns22000 +++|* OF A QUEUED FILE.
00124 M00S00109.qftlist +++| SPACE 4
00125 M00S00110.qftlist +++|*** ENTRY CONDITONS.
00126 M00S00111.qftlist +++|*
00127 M00S00112.qftlist +++|* *TARA* = FWA OF ARGUMENT TABLE.
00128 M00S00113.qftlist +++|* *QFTA* = *QFTP* WORD FROM CENTRAL MEMORY RESIDENT.
00129 M00S00114.qftlist +++|* *TEQA* = FWA OF MASS STORAGE EQUIPMENT TABLE.
00130 M00S00115.qftlist +++| SPACE 4
00131 M00S00116.qftlist +++|* COMMON DECKS.
00132 M00S00117.qftlist +++|
00133 M00S00118.qftlist +++|
00134 M00S00119.qftlist +++|*CALL COMCMAC
Line S00001 Modification History
M01 (Added by) v23l617
Seq # *Modification Id* Act
----------------------------+
00135 M01S00001.v23l617 +++|*CALL COMCDCM
Line S00001 Modification History
M01 (Added by) 241l630
Seq # *Modification Id* Act
----------------------------+
00136 M01S00001.241l630 +++|*CALL COMCDCP
00137 M00S00120.qftlist +++|*CALL COMSJIO
Line S00013 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
00138 M01S00013.ns22000 +++|*CALL COMSMLS
00139 M00S00121.qftlist +++|*CALL COMSQAC
00140 M00S00122.qftlist +++| LIST X
00141 M00S00123.qftlist +++|*CALL COMSQFS
00142 M00S00124.qftlist +++| LIST -X
Line S00014 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2217
Seq # *Modification Id* Act
----------------------------+
00143 M02S00014.ns2217 ---|*CALL COMSSCD
00144 M00S00125.qftlist +++| TITLE MACRO DEFINTIONS.
00145 M00S00126.qftlist +++| LINE SPACE 4,10
00146 M00S00127.qftlist +++|** LINE - GENERATE LINE.
00147 M00S00128.qftlist +++|*
00148 M00S00129.qftlist +++|* LINE CHAR
00149 M00S00130.qftlist +++|* CHAR CHARACTER STRING. IF NULL, END OF LINE.
00150 M00S00131.qftlist +++|
00151 M00S00132.qftlist +++|
00152 M00S00133.qftlist +++| PURGMAC LINE
00153 M00S00134.qftlist +++|
00154 M00S00135.qftlist +++| LINE MACRO C
00155 M00S00136.qftlist +++| .1 MICRO 1,,$C$
00156 M00S00137.qftlist +++| IFC NE,$C$$
00157 M00S00138.qftlist +++| DATA H$".1"$
00158 M00S00139.qftlist +++| ELSE
00159 M00S00140.qftlist +++| DATA L* *
00160 M00S00141.qftlist +++| ENDIF
00161 M00S00142.qftlist +++| ENDM
Line S00001 Modification History
M01 (Added by) ns2217
Seq # *Modification Id* Act
----------------------------+
00162 M01S00001.ns2217 +++| SCLASS SPACE 4,15
00163 M01S00002.ns2217 +++|** SCLASS - DEFINE SERVICE CLASS TABLE.
00164 M01S00003.ns2217 +++|*
00165 M01S00004.ns2217 +++|* SCLASS NM,MN,DF,ST,TX
00166 M01S00005.ns2217 +++|*
00167 M01S00006.ns2217 +++|* ENTRY *NM* = SERVICE CLASS NAME.
00168 M01S00007.ns2217 +++|* *MN* = TWO CHARACTER MNEMONIC.
00169 M01S00008.ns2217 +++|* *DF* = DAYFILE MESSAGE CHARACTER.
00170 M01S00009.ns2217 +++|* *ST* = SHORT TEXT FOR *QFTLIST*.
00171 M01S00010.ns2217 +++|* *TX* = TEXT OF SERVICE CLASS NAME FOR BANNER PAGE.
00172 M01S00011.ns2217 +++|*
00173 M01S00012.ns2217 +++|* NOTE - THE CALL TO *COMSSCD* MUST FOLLOW THE DEFINITION OF
00174 M01S00013.ns2217 +++|* THIS MACRO.
00175 M01S00014.ns2217 +++|
00176 M01S00015.ns2217 +++|
00177 M01S00016.ns2217 +++| PURGMAC SCLASS
00178 M01S00017.ns2217 +++|
00179 M01S00018.ns2217 +++| SCLASS MACRO NM,MN,DF,ST,TX
00180 M01S00019.ns2217 +++| .SCL RMT
Line S00020 Modification History
M01 (Added by) ns2217
M02 (Removed by) 241l630
Seq # *Modification Id* Act
----------------------------+
00181 M02S00020.241l630 ---| TABLE NM,DF_. TX
Line S00002 Modification History
M01 (Added by) 241l630
Seq # *Modification Id* Act
----------------------------+
00182 M01S00002.241l630 +++| TABLE NM,DF TX
Line S00021 Modification History
M01 (Added by) ns2217
Seq # *Modification Id* Act
----------------------------+
00183 M01S00021.ns2217 +++| .SCL RMT
00184 M01S00022.ns2217 +++| .SCL1 RMT
00185 M01S00023.ns2217 +++| TABLE NM,ST TX
00186 M01S00024.ns2217 +++| .SCL1 RMT
00187 M01S00025.ns2217 +++| SCLASS ENDM
00188 M01S00026.ns2217 +++|
00189 M01S00027.ns2217 +++|
00190 M01S00028.ns2217 +++| SCL$ EQU 1 PROCESS ALL CLASSES
00191 M01S00029.ns2217 +++|*CALL COMSSCD
00192 M00S00143.qftlist +++| TABLE SPACE 4,10
00193 M00S00144.qftlist +++|** TABLE - GENERATE TABLE ENTRY.
00194 M00S00145.qftlist +++|*
00195 M00S00146.qftlist +++|* TABLE A,B
00196 M00S00147.qftlist +++|*
00197 M00S00148.qftlist +++|* A = NUMERIC VALUE.
00198 M00S00149.qftlist +++|* B = CHARACTER VALUE.
00199 M00S00150.qftlist +++|*
00200 M00S00151.qftlist +++|* A ONE WORD TABLE ENTRY IS GENERATED.
00201 M00S00152.qftlist +++|*T, 18/ A, 42/ B
00202 M00S00153.qftlist +++|
00203 M00S00154.qftlist +++|
00204 M00S00155.qftlist +++| PURGMAC TABLE
00205 M00S00156.qftlist +++|
00206 M00S00157.qftlist +++| TABLE MACRO A,B
00207 M00S00158.qftlist +++| .1 MICRO 1,7,$B$
00208 M00S00159.qftlist +++| VFD 18/A,42/0H".1"
00209 M00S00160.qftlist +++| ENDM
00210 M00S00161.qftlist +++| TABLEN SPACE 4,10
00211 M00S00162.qftlist +++|** TABLEN - GENERATE NUMERIC TABLE ENTRY.
00212 M00S00163.qftlist +++|*
00213 M00S00164.qftlist +++|* TABLEN A,B
00214 M00S00165.qftlist +++|*
00215 M00S00166.qftlist +++|* A = NUMERIC VALUE.
00216 M00S00167.qftlist +++|* B = NUMERIC VALUE.
00217 M00S00168.qftlist +++|*
00218 M00S00169.qftlist +++|* A ONE WORD TABLE ENTRY IS GENERATED.
00219 M00S00170.qftlist +++|*T, 18/ A, 42/ B
00220 M00S00171.qftlist +++|
00221 M00S00172.qftlist +++|
00222 M00S00173.qftlist +++| PURGMAC TABLEN
00223 M00S00174.qftlist +++|
00224 M00S00175.qftlist +++| TABLEN MACRO A,B
00225 M00S00176.qftlist +++| VFD 18/A,42/B
00226 M00S00177.qftlist +++| ENDM
00227 M00S00178.qftlist +++| TSDI SPACE 4
00228 M00S00179.qftlist +++|** TSDI - *SDI* TABLE ENTRY MACRO.
00229 M00S00180.qftlist +++|*
00230 M00S00181.qftlist +++|* TSDI PA,BA,FW,RI,ADDR1,ADDR2,TADDR
00231 M00S00182.qftlist +++|*
00232 M00S00183.qftlist +++|*T, 24/ , 18/ PR , 6/BA , 6/ FW , 6/ RI
Figure
0 5 6 11 12 17 18 29 RI FW BA PR 30 35 36 59 PR
00233 M00S00184.qftlist +++|*T, 6/ , 18/ ADDR1 , 18/ ADDR2 , 18/ TADDR
Figure
0 17 18 29 TADDR ADDR2 30 35 36 53 54 59 ADDR2 ADDR1
00234 M00S00185.qftlist +++|*
00235 M00S00186.qftlist +++|* PR = PROCESSOR ADDRESS.
00236 M00S00187.qftlist +++|* BA = FIRST BIT ADDRESS OF FIELD TO EXTRACT.
00237 M00S00188.qftlist +++|* FW = FIELD WIDTH OF FIELD TO EXTRACT.
00238 M00S00189.qftlist +++|* RI = INDEX INTO REPLY ENTRY.
00239 M00S00190.qftlist +++|* ADDR1 = K-DISPLAY ADDRESS FOR PROCESSED INFORMATION.
00240 M00S00191.qftlist +++|* ADDR2 = OUTPUT BUFFER ADDRESS FOR PROCESSED
00241 M00S00192.qftlist +++|* INFORMATION.
00242 M00S00193.qftlist +++|* TADDR = TABLE ADDRESS.
00243 M00S00194.qftlist +++|
00244 M00S00195.qftlist +++|
00245 M00S00196.qftlist +++| PURGMAC TSDI
00246 M00S00197.qftlist +++|
00247 M00S00198.qftlist +++| TSDI MACRO P,B,F,R,A1,A2,TA
00248 M00S00199.qftlist +++| VFD 24/0,18/P,6/B,6/F,6/R
00249 M00S00200.qftlist +++| VFD 6/0,18/A1,18/A2,18/TA
00250 M00S00201.qftlist +++| ENDM
00251 M00S00202.qftlist +++|
00252 M00S00203.qftlist +++| TITLE ASSEMBLY CONSTANTS.
00253 M00S00204.qftlist +++|**** ASSEMBLY CONSTANTS.
00254 M00S00205.qftlist +++|
00255 M00S00206.qftlist +++|
Line S00207 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
00256 M01S00207.ns22000 ---| LPRP EQU LINP-10 LINES PER PAGE
Line S00208 Modification History
M01 (Removed by) ns21000
Seq # *Modification Id* Act
----------------------------+
00257 M01S00208.ns21000 ---| LRPY EQU 14B LENGTH OF REPLY ENTRY
Line S00003 Modification History
M01 (Added by) ns21000
M02 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
00258 M02S00003.ns22000 ---| LRPY EQU 15B LENGTH OF *QAC* REPLY BLOCK
Line S00015 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
00259 M01S00015.ns22000 +++| LRPY EQU 16B LENGTH OF *QAC* REPLY BLOCK
00260 M00S00209.qftlist +++| BQACL MAX ALLB,PKLB LENGTH OF PARAMETER BLOCK BUFFER
00261 M00S00210.qftlist +++| TARG EQU TARA FWA OF *QFSP* ARGUMENT TABLE
Line S00016 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
00262 M01S00016.ns22000 +++| LINE EQU TPPA+PPLN LINE NUMBER
00263 M01S00017.ns22000 +++| PDFE EQU TPPA+PPPD PRINT DENSITY FORMAT EFFECTOR
00264 M00S00211.qftlist +++| TEQP EQU TEQA FWA OF *QFSP* EQUIPMENT TABLE
00265 M00S00212.qftlist +++| DSPBL EQU 7 *DSP* PARAMETER BLOCK LENGTH
00266 M00S00213.qftlist +++| KBUFL EQU KMLL*7 K-DISPLAY BUFFER LENGTH
00267 M00S00214.qftlist +++| OBUFL EQU 1001B OUTPUT BUFFER SIZE
00268 M00S00215.qftlist +++| SBUFL EQU 80 STRING BUFFER SIZE
00269 M00S00216.qftlist +++|****
00270 M00S00217.qftlist +++|
00271 M00S00218.qftlist +++| SPACE 4,10
00272 M00S00219.qftlist +++|* *DSP* FLAG BIT EQUIVALENCES.
00273 M00S00220.qftlist +++|
00274 M00S00221.qftlist +++|
00275 M00S00222.qftlist +++| FRDC EQU 20B DISPOSITION CODE
00276 M00S00223.qftlist +++| TITLE TABLES.
00277 M00S00224.qftlist +++| ORG OVLA
00278 M00S00225.qftlist +++| FWA BSS 0 FIRST WORD ADDRESS OF BINARY
00279 M00S00226.qftlist +++| TDCM SPACE 4,10
00280 M00S00227.qftlist +++|** TDCM - TABLE OF DISPOSITION CODE MAPPINGS.
00281 M00S00228.qftlist +++|
00282 M00S00229.qftlist +++|
00283 M00S00230.qftlist +++| TDCM BSS 0
Line S00231 Modification History
M01 (Removed by) 241l630
Seq # *Modification Id* Act
----------------------------+
00284 M01S00231.241l630 ---| VFD 18/2LTT,42/4 TERMINAL OUTPUT
Line S00003 Modification History
M01 (Added by) 241l630
Seq # *Modification Id* Act
----------------------------+
00285 M01S00003.241l630 +++| VFD 18/2LTT,42/1 TERMINAL OUTPUT
00286 M01S00004.241l630 +++| VFD 18/2LLY,42/2 5970 PRINTER
00287 M01S00005.241l630 +++| VFD 18/2LLX,42/4 5870 PRINTER
00288 M00S00232.qftlist +++| VFD 18/2LLT,42/10B 580-20 PRINTER
00289 M00S00233.qftlist +++| VFD 18/2LLS,42/20B 580-16 PRINTER
00290 M00S00234.qftlist +++| VFD 18/2LLR,42/40B 580-12 PRINTER
00291 M00S00235.qftlist +++| VFD 18/2LP2,42/100B 512 PRINTER
00292 M00S00236.qftlist +++| VFD 18/2LLP,42/200B ANY PRINTER
00293 M00S00237.qftlist +++| VFD 18/2LPL,42/400B PLOT
00294 M00S00238.qftlist +++| VFD 18/2LPU,42/1000B PUNCH
00295 M00S00239.qftlist +++| VFD 18/2LIN,42/2000B INPUT
00296 M00S00240.qftlist +++| VFD 18/2LNO,42/2000B INPUT - NO OUTPUT
00297 M00S00241.qftlist +++| VFD 18/2LTO,42/2000B INPUT - TERMINAL OUTPUT
00298 M00S00242.qftlist +++| VFD 18/2LSF,42/4000B INSTALLATION DISPOSITION CODE
00299 M00S00243.qftlist +++| CON 0 END OF TABLE
00300 M00S00244.qftlist +++| TECH SPACE 4,10
00301 M00S00245.qftlist +++|** TECH - TABLE OF EXTERNAL CHARACTERISTICS FOR PUNCH FILES.
00302 M00S00246.qftlist +++|
00303 M00S00247.qftlist +++|
00304 M00S00248.qftlist +++| TECH BSS 0
00305 M00S00249.qftlist +++| TABLE DFFR,PU DEFAULT PUNCH
00306 M00S00250.qftlist +++| TABLE PBFR,SB SYSTEM BINARY
00307 M00S00251.qftlist +++| TABLE P8FR,80COL 80 COLUMN BINARY
00308 M00S00252.qftlist +++| TABLE PHFR,O26 O26 PUNCH
00309 M00S00253.qftlist +++| TABLE P9FR,O29 O29 PUNCH
00310 M00S00254.qftlist +++| TABLE ASFR,ASCII ASCII PUNCH
00311 M00S00255.qftlist +++| CON 0 END OF TABLE
00312 M00S00256.qftlist +++| TECL SPACE 4,10
00313 M00S00257.qftlist +++|** TECL - TABLE OF EXTERNAL CHARACTERISTICS FOR PLOT FILES.
00314 M00S00258.qftlist +++|
00315 M00S00259.qftlist +++|
00316 M00S00260.qftlist +++| TECL BSS 0
00317 M00S00261.qftlist +++| TABLE DFEX,PL DEFAULT
00318 M00S00262.qftlist +++| TABLE T6EX,T6 TRANSPARENT 6-BIT PLOTTER
00319 M00S00263.qftlist +++| TABLE T8EX,T8 TRANSPARENT 8-BIT PLOTTER
00320 M00S00264.qftlist +++| TABLE A4EX,A4 ASCII 48 CHARACTER
00321 M00S00265.qftlist +++| CON 0
00322 M00S00266.qftlist +++| TECP SPACE 4
00323 M00S00267.qftlist +++|** TECP - TABLE OF EXTERNAL CHARACTERISTICS FOR PRINT FILES.
00324 M00S00268.qftlist +++|
00325 M00S00269.qftlist +++|
00326 M00S00270.qftlist +++| TECP BSS 0
00327 M00S00271.qftlist +++| TABLE DFEX,LP DEFAULT
00328 M00S00272.qftlist +++| TABLE A4EX,A4 ASCII 48 CHARACTER
00329 M00S00273.qftlist +++| TABLE B4EX,B4 BCD 48 CHARACTER
00330 M00S00274.qftlist +++| TABLE B6EX,B6 BCD 64 CHARACTER
00331 M00S00275.qftlist +++| TABLE A6EX,A6 ASCII 64 CHARACTER
00332 M00S00276.qftlist +++| TABLE A9EX,A9 ASCII 96 CHARACTER
00333 M00S00277.qftlist +++| CON 0
00334 M00S00278.qftlist +++| TICC SPACE 4,10
00335 M00S00279.qftlist +++|** TICC - TABLE OF INTERNAL CHARACTERISTICS CODES.
00336 M00S00280.qftlist +++|
00337 M00S00281.qftlist +++|
00338 M00S00282.qftlist +++| TICC BSS 0
00339 M00S00283.qftlist +++| TABLE DCIC,DIS DISPLAY CODE
00340 M00S00284.qftlist +++| TABLE ASIC,ASCII ASCII
00341 M00S00285.qftlist +++| TABLE BNIC,BIN BINARY
Line S00001 Modification History
M01 (Added by) ns2597
Seq # *Modification Id* Act
----------------------------+
00342 M01S00001.ns2597 +++| TABLE A6IC,ASCII6 6/12 ASCII
00343 M00S00286.qftlist +++| CON 0 END OF TABLE
00344 M00S00287.qftlist +++| TINT SPACE 4
00345 M00S00288.qftlist +++|** TINT - TABLE OF INTERRUPT STATUSES.
00346 M00S00289.qftlist +++|
00347 M00S00290.qftlist +++|
00348 M00S00291.qftlist +++| TINT BSS 0
00349 M00S00292.qftlist +++| TABLE 0,NO
00350 M00S00293.qftlist +++| TABLE 1,YES
00351 M00S00294.qftlist +++| CON 0 END OF TABLE
Line S00018 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
00352 M01S00018.ns22000 +++| TLVM SPACE 4,10
00353 M01S00019.ns22000 +++|** TLVM - TABLE OF SECURITY ACCESS LEVEL MAPPINGS.
00354 M01S00020.ns22000 +++|
00355 M01S00021.ns22000 +++|
00356 M01S00022.ns22000 +++| TLVM BSS 0
00357 M01S00023.ns22000 +++| TABLE 0,"ALM0" ACCESS LEVEL 0
00358 M01S00024.ns22000 +++| TABLE 1,"ALM1" ACCESS LEVEL 1
00359 M01S00025.ns22000 +++| TABLE 2,"ALM2" ACCESS LEVEL 2
00360 M01S00026.ns22000 +++| TABLE 3,"ALM3" ACCESS LEVEL 3
00361 M01S00027.ns22000 +++| TABLE 4,"ALM4" ACCESS LEVEL 4
00362 M01S00028.ns22000 +++| TABLE 5,"ALM5" ACCESS LEVEL 5
00363 M01S00029.ns22000 +++| TABLE 6,"ALM6" ACCESS LEVEL 6
00364 M01S00030.ns22000 +++| TABLE 7,"ALM7" ACCESS LEVEL 7
00365 M01S00031.ns22000 +++| CON 0 END OF TABLE
00366 M00S00295.qftlist +++| TNDC SPACE 4,10
00367 M00S00296.qftlist +++|** TNDC - TABLE OF NEW DISPOSITION CODES.
00368 M00S00297.qftlist +++|
00369 M00S00298.qftlist +++|
00370 M00S00299.qftlist +++| TNDC BSS 0
00371 M00S00300.qftlist +++| TABLE LPQF,LP ANY PRINTER
00372 M00S00301.qftlist +++| TABLE P2QF,P2 512 PRINTER
00373 M00S00302.qftlist +++| TABLE LRQF,LR 580-12 PRINTER
00374 M00S00303.qftlist +++| TABLE LSQF,LS 580-16 PRINTER
00375 M00S00304.qftlist +++| TABLE LTQF,LT 580-20 PRINTER
Line S00006 Modification History
M01 (Added by) 241l630
Seq # *Modification Id* Act
----------------------------+
00376 M01S00006.241l630 +++| TABLE LXQF,LX 5870 NIP
00377 M01S00007.241l630 +++| TABLE LYQF,LY 5970 NIP
00378 M00S00305.qftlist +++| CON 0 END OF TABLE
00379 M00S00306.qftlist +++| TNEC SPACE 4,10
00380 M00S00307.qftlist +++|** TNEC - TABLE OF SHIFT COUNTS FOR NEW EXTERNAL
00381 M00S00308.qftlist +++|* CHARACTERISTICS.
00382 M00S00309.qftlist +++|
00383 M00S00310.qftlist +++|
00384 M00S00311.qftlist +++| TNEC BSS 0
00385 M00S00312.qftlist +++| CON 12 PRINT
00386 M00S00313.qftlist +++| CON 24 PUNCH
00387 M00S00314.qftlist +++| CON 0 PLOT
Line S00001 Modification History
M01 (Added by) qftli5
Seq # *Modification Id* Act
----------------------------+
00388 M01S00001.qftli5 +++| TNUL SPACE 4,10
00389 M01S00002.qftli5 +++|** TNUL - NULL TABLE.
00390 M01S00003.qftli5 +++|
00391 M01S00004.qftli5 +++|
00392 M01S00005.qftli5 +++| TNUL CON 0 END OF TABLE
00393 M00S00315.qftlist +++| TOOP SPACE 4
00394 M00S00316.qftlist +++|** TOOP - TABLE OF ALTER OPTIONS.
00395 M00S00317.qftlist +++|
00396 M00S00318.qftlist +++|
00397 M00S00319.qftlist +++| TOOP BSS 0
00398 M00S00320.qftlist +++| TABLE BCOP,BC
00399 M00S00321.qftlist +++| TABLE RBOP,RB
00400 M00S00322.qftlist +++| TABLE NCOP,NC
00401 M00S00323.qftlist +++| TABLE PROP,PR
00402 M00S00324.qftlist +++| CON 0 END OF TABLE
Line S00325 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
00403 M01S00325.ns22000 ---| TOTC SPACE 4,10
00404 M01S00326.ns22000 ---|** TOTC - TABLE OF ORIGIN TYPE CODES.
00405 M01S00327.ns22000 ---|
00406 M01S00328.ns22000 ---|
00407 M01S00329.ns22000 ---| TOTC BSS 0
00408 M01S00330.ns22000 ---| TABLE SYOR,S. SYSTEM
00409 M01S00331.ns22000 ---| TABLE BCOR,B. BATCH
00410 M01S00332.ns22000 ---| TABLE RBOR,R. REMOTE BATCH
00411 M01S00333.ns22000 ---| TABLE TXOR,T. TIMESHARING
00412 M01S00334.ns22000 ---| CON 0 END OF TABLE
00413 M01S00335.ns22000 ---| TOTN SPACE 4,10
00414 M01S00336.ns22000 ---|** TOTN - TABLE OF ORIGIN TYPE NAMES.
00415 M01S00337.ns22000 ---|
00416 M01S00338.ns22000 ---|
00417 M01S00339.ns22000 ---| TOTN BSS 0
00418 M01S00340.ns22000 ---| TABLE SYOR,SYSTEM
00419 M01S00341.ns22000 ---| TABLE BCOR,BATCH
00420 M01S00342.ns22000 ---| TABLE RBOR,REMOTE
00421 M01S00343.ns22000 ---| TABLE TXOR,TIMESHR
00422 M01S00344.ns22000 ---| CON 0 END OF TABLE
00423 M00S00345.qftlist +++| TQTC SPACE 4,10
00424 M00S00346.qftlist +++|** TQTC - TABLE OF QUEUE TYPES.
00425 M00S00347.qftlist +++|
00426 M00S00348.qftlist +++|
00427 M00S00349.qftlist +++| TQTC BSS 0
00428 M00S00350.qftlist +++| TABLE INQQ,IN INPUT
00429 M00S00351.qftlist +++| TABLE PRQQ,PR PRINT
00430 M00S00352.qftlist +++| TABLE PHQQ,PH PUNCH
00431 M00S00353.qftlist +++| TABLE PLQQ,PL PLOT
00432 M00S00354.qftlist +++| TABLE WTQQ,WT WAIT
00433 M00S00355.qftlist +++| CON 0 END OF TABLE
00434 M00S00356.qftlist +++| TQTN SPACE 4
00435 M00S00357.qftlist +++|** TQTN - TABLE OF QUEUE TYPE NAMES.
00436 M00S00358.qftlist +++|
00437 M00S00359.qftlist +++|
00438 M00S00360.qftlist +++| TQTN BSS 0
00439 M00S00361.qftlist +++| TABLE INQQ,INPUT
00440 M00S00362.qftlist +++| TABLE PRQQ,PRINT
00441 M00S00363.qftlist +++| TABLE PHQQ,PUNCH
00442 M00S00364.qftlist +++| TABLE PLQQ,PLOT
00443 M00S00365.qftlist +++| TABLE WTQQ,WAIT
00444 M00S00366.qftlist +++| CON 0 END OF TABLE
Line S00032 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
00445 M01S00032.ns22000 +++| TSCC SPACE 4,10
00446 M01S00033.ns22000 +++|** TSCC - TABLE OF SERVICE CLASS CODES.
00447 M01S00034.ns22000 +++|
00448 M01S00035.ns22000 +++|
00449 M01S00036.ns22000 +++| TSCC BSS 0
Line S00037 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2217
Seq # *Modification Id* Act
----------------------------+
00450 M02S00037.ns2217 ---| TABLE SYSC,S.
00451 M02S00038.ns2217 ---| TABLE BCSC,B.
00452 M02S00039.ns2217 ---| TABLE RBSC,R.
00453 M02S00040.ns2217 ---| TABLE TSSC,T.
00454 M02S00041.ns2217 ---| TABLE DISC,D.
00455 M02S00042.ns2217 ---| TABLE NSSC,N.
00456 M02S00043.ns2217 ---| TABLE SSSC,X.
00457 M02S00044.ns2217 ---| TABLE MASC,M.
00458 M02S00045.ns2217 ---| TABLE CTSC,C.
00459 M02S00046.ns2217 ---| TABLE I0SC,0.
00460 M02S00047.ns2217 ---| TABLE I1SC,1.
00461 M02S00048.ns2217 ---| TABLE I2SC,2.
00462 M02S00049.ns2217 ---| TABLE I3SC,3.
00463 M02S00050.ns2217 ---| TABLE DSSC,A.
Line S00030 Modification History
M01 (Added by) ns2217
Seq # *Modification Id* Act
----------------------------+
00464 M01S00030.ns2217 +++| LIST D
00465 M01S00031.ns2217 +++| .SCL HERE
00466 M01S00032.ns2217 +++| LIST *
Line S00051 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
00467 M01S00051.ns22000 +++| CON 0 END OF TABLE
00468 M01S00052.ns22000 +++| TSCN SPACE 4,10
00469 M01S00053.ns22000 +++|** TSCN - TABLE OF SERVICE CLASS NAMES.
00470 M01S00054.ns22000 +++|
00471 M01S00055.ns22000 +++|
00472 M01S00056.ns22000 +++| TSCN BSS 0
Line S00057 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2217
Seq # *Modification Id* Act
----------------------------+
00473 M02S00057.ns2217 ---| TABLE SYSC,SYSTEM
00474 M02S00058.ns2217 ---| TABLE BCSC,BATCH
00475 M02S00059.ns2217 ---| TABLE RBSC,REMOTE
00476 M02S00060.ns2217 ---| TABLE TSSC,TIMESHR
00477 M02S00061.ns2217 ---| TABLE DISC,DETACH
00478 M02S00062.ns2217 ---| TABLE NSSC,NETWORK
00479 M02S00063.ns2217 ---| TABLE SSSC,SUBSYS
00480 M02S00064.ns2217 ---| TABLE MASC,MAINTEN
00481 M02S00065.ns2217 ---| TABLE CTSC,COMTASK
00482 M02S00066.ns2217 ---| TABLE I0SC,ICLASS0
00483 M02S00067.ns2217 ---| TABLE I1SC,ICLASS1
00484 M02S00068.ns2217 ---| TABLE I2SC,ICLASS2
00485 M02S00069.ns2217 ---| TABLE I3SC,ICLASS3
00486 M02S00070.ns2217 ---| TABLE DSSC,DEADST
Line S00033 Modification History
M01 (Added by) ns2217
Seq # *Modification Id* Act
----------------------------+
00487 M01S00033.ns2217 +++| LIST D
00488 M01S00034.ns2217 +++| .SCL1 HERE
00489 M01S00035.ns2217 +++| LIST *
Line S00071 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
00490 M01S00071.ns22000 +++| CON 0 END OF TABLE
00491 M00S00367.qftlist +++| TITLE WORKING STORAGE.
00492 M00S00368.qftlist +++|* WORKING STORAGE.
00493 M00S00369.qftlist +++|
00494 M00S00370.qftlist +++|
00495 M00S00371.qftlist +++| NRPY CON 0 NUMBER OF ENTRIES IN REPLY BUFFER
00496 M00S00372.qftlist +++| MRPY CON 0 MAXIMUM NUMBER OF ENTRIES FOR REPLY BUFFER
00497 M00S00373.qftlist +++| BLKS DATA H* * WORD OF BLANKS
00498 M00S00374.qftlist +++| CHCT CON 0 CHARACTER COUNT PER LINE
00499 M00S00375.qftlist +++| CIND CON 0 CURRENT INDEX INTO REPLY BUFFER
00500 M00S00376.qftlist +++| INDX CON 0 INDEX INTO K-DISPLAY BUFFER
00501 M00S00377.qftlist +++| ENPG CON 0 ENTRY PER PAGE
00502 M00S00378.qftlist +++| NMPG CON 0 NUMBER OF ENTRIES PER PAGE
00503 M00S00379.qftlist +++| FUNC CON 0 FUNCTION CODE
Line S00380 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
00504 M01S00380.ns22000 ---| LINE CON 0 LINE NUMBER
00505 M00S00381.qftlist +++| PAGE CON 0 PAGE NUMBER
00506 M00S00382.qftlist +++| SPACE 4
00507 M00S00383.qftlist +++|* FETS AND PARAMETER BLOCKS.
00508 M00S00384.qftlist +++|
00509 M00S00385.qftlist +++|
00510 M00S00386.qftlist +++| BQAC BSS BQACL *QAC* PARAMETER BLOCK BUFFER
00511 M00S00387.qftlist +++|
00512 M00S00388.qftlist +++| BQACA BSS 2 CURRENT DESTINATION FAMILY/USER/UI
00513 M00S00389.qftlist +++| BQACB BSS 2 NEW DESTINATION FAMILY/USER
00514 M00S00390.qftlist +++|
00515 M00S00391.qftlist +++| O BSS 0 OUTPUT FILE FET
00516 M00S00392.qftlist +++| OUTPUT FILEB OBUF,OBUFL,(FET=7)
00517 M00S00393.qftlist +++| TITLE MAIN ROUTINE.
00518 M00S00394.qftlist +++|* QFTLIST - MAIN ROUTINE.
00519 M00S00395.qftlist +++|
00520 M00S00396.qftlist +++|
00521 M00S00397.qftlist +++| QFTLIST SUBR ENTRY/EXIT
00522 M00S00398.qftlist +++| SA1 MRPY
00523 M00S00399.qftlist +++| NZ X1,QFT1 IF REPLY BUFFER SET UP
00524 M00S00400.qftlist +++| RJ PRS PRESET
00525 M00S00401.qftlist +++| QFT1 SA1 TARG+ARFC SET FUNCTION CODE
00526 M00S00402.qftlist +++| MX0 -12
00527 M00S00403.qftlist +++| BX7 -X0*X1
00528 M00S00404.qftlist +++| LX1 48
00529 M00S00405.qftlist +++| SA7 FUNC
00530 M00S00406.qftlist +++| BX6 -X0*X1 EXTRACT LIST ORDINAL
00531 M00S00407.qftlist +++| SB5 X7-FUN1
00532 M00S00408.qftlist +++| SB6 X7-FUN2
00533 M00S00409.qftlist +++| ZR B5,QFT3 IF *PAGE* FUNCTION
00534 M00S00410.qftlist +++| NZ B6,QFT2 IF NOT *LIST* OPTION
00535 M00S00411.qftlist +++| ZR X6,QFT2 IF NO *LIST* ORDINAL
00536 M00S00412.qftlist +++| SX7 FUN4 SET *DETAILED LIST* OPTION
00537 M00S00413.qftlist +++| SA7 FUNC
00538 M00S00414.qftlist +++| SA6 DLTA SAVE ORDINAL
00539 M00S00415.qftlist +++| QFT2 RJ CIP CHECK INCOMPLETE PARAMETERS
00540 M00S00416.qftlist +++| NZ X5,QFT4 IF ERROR
00541 M00S00417.qftlist +++| RJ FRB FILL REPLY BUFFER
00542 M00S00418.qftlist +++| RJ SRB SORT REPLY BUFFER
00543 M00S00419.qftlist +++| RJ ERB EDIT REPLY BUFFER
00544 M00S00420.qftlist +++| QFT3 SA1 FUNC SET PROCESSOR ADDRESS
00545 M00S00421.qftlist +++| SA1 TFAD+X1
00546 M00S00422.qftlist +++| SX5 =C* INVALID PAGING ATTEMPT. *
00547 M00S00423.qftlist +++| NZ X1,QFT5 IF NOT *PAGE* PROCESSOR
00548 M00S00424.qftlist +++| QFT4 SX2 -1 INDICATE NOT TO CHANGE K-DISPLAY
00549 M00S00425.qftlist +++| EQ QFTLISTX RETURN
00550 M00S00426.qftlist +++|
00551 M00S00427.qftlist +++| QFT5 SB7 X1+
00552 M00S00428.qftlist +++| RJ ICE
00553 M00S00429.qftlist +++| EQ QFTLISTX RETURN
00554 M00S00430.qftlist +++| TFAD SPACE 4,10
00555 M00S00431.qftlist +++|** TFAD - TABLE OF FUNCTION PROCESSOR ADDRESSES.
00556 M00S00432.qftlist +++|*
00557 M00S00433.qftlist +++|* 42/ , 18/ FWA OF PROCESSOR
00558 M00S00434.qftlist +++|
00559 M00S00435.qftlist +++|
00560 M00S00436.qftlist +++| TFAD BSS 0
00561 M00S00437.qftlist +++| LOC 0
00562 M00S00438.qftlist +++| FUN0 CON ALT *GO* PROCESSOR
00563 M00S00439.qftlist +++| FUN1 CON 0 *PAGE* PROCESSOR
00564 M00S00440.qftlist +++| FUN2 CON LST *LIST* PROCESSOR
00565 M00S00441.qftlist +++| FUN3 CON OUT *OUT* PROCESSOR
00566 M00S00442.qftlist +++| FUN4 CON DLT *DETAILED LIST* PROCESSOR
00567 M00S00443.qftlist +++| LOC *O
00568 M00S00444.qftlist +++| TITLE FUNCTION PROCESSORS.
00569 M00S00445.qftlist +++| ALT SPACE 4,20
00570 M00S00446.qftlist +++|** ALT - ALTER QUEUED FILES.
00571 M00S00447.qftlist +++|*
00572 M00S00448.qftlist +++|* ENTRY (NRPY) = NUMBER OF ENTRIES IN *RBUF*.
00573 M00S00449.qftlist +++|*
00574 M00S00450.qftlist +++|* EXIT (X2) = 0.
00575 M00S00451.qftlist +++|* (X5) = FWA OF K-DISPLAY MESSAGE.
00576 M00S00452.qftlist +++|*
00577 M00S00453.qftlist +++|* USES A - 0, 1, 2, 5, 6, 7.
00578 M00S00454.qftlist +++|* X - 0, 1, 2, 5, 6, 7.
00579 M00S00455.qftlist +++|*
00580 M00S00456.qftlist +++|* CALLS AQF, CDD, CFS, SDI.
00581 M00S00457.qftlist +++|*
00582 M00S00458.qftlist +++|* MACROS CLOCK, DATE, MESSAGE, SETFS, WRITER, WRITEW.
00583 M00S00459.qftlist +++|
00584 M00S00460.qftlist +++|
00585 M00S00461.qftlist +++| ALT SUBR ENTRY/EXIT
00586 M00S00462.qftlist +++| SA2 NRPY
00587 M00S00463.qftlist +++| ZR X2,ALT4 IF REPLY ENTRY EMPTY
00588 M00S00464.qftlist +++| SA1 TARG+ARLL SET OUTPUT FILE NAME
00589 M00S00465.qftlist +++| MX0 42
00590 M00S00466.qftlist +++| BX1 X0*X1
00591 M00S00467.qftlist +++| SX7 B1
00592 M00S00468.qftlist +++| BX6 X1+X7
00593 M00S00469.qftlist +++| SA6 O
00594 M00S00470.qftlist +++| SA7 PAGE SET PAGE COUNT
00595 M00S00471.qftlist +++| SX6 B0+ SET REPLY BUFFER INDEX
00596 M00S00472.qftlist +++| SA6 CIND
00597 M00S00473.qftlist +++| SA7 LINE SET LINE COUNT
Line S00474 Modification History
M01 (Removed by) qftli3
Seq # *Modification Id* Act
----------------------------+
00598 M01S00474.qftli3 ---| SX7 9 SET ENTRIES PER PAGE
Line S00001 Modification History
M01 (Added by) qftli3
Seq # *Modification Id* Act
----------------------------+
00599 M01S00001.qftli3 +++| SA1 LINE+1 NUMBER OF LINES PER PAGE
00600 M01S00002.qftli3 +++| SX7 X1-13
00601 M01S00003.qftli3 +++| SX6 6
00602 M01S00004.qftli3 +++| IX7 X7/X6 NUMBER OF ENTRIES PER PAGE
00603 M00S00475.qftlist +++| SA7 NMPG
00604 M00S00476.qftlist +++| SA2 TARG+ARNU SET NEW DESTINATION USER
00605 M00S00477.qftlist +++| SA1 TARG+ARND SET NEW DESTINATION FAMILY
00606 M00S00478.qftlist +++| SX7 X7+B1
00607 M00S00479.qftlist +++| SA7 ENPG
00608 M00S00480.qftlist +++| BX6 X1
00609 M00S00481.qftlist +++| BX7 X2
00610 M00S00482.qftlist +++| SA6 BQACB
00611 M00S00483.qftlist +++| SA7 A6+B1
00612 M00S00484.qftlist +++| DATE GBUFA+1 SET DATE AND TIME IN PAGE HEADER
00613 M00S00485.qftlist +++| CLOCK GBUFA+2
Line S00072 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
00614 M01S00072.ns22000 +++| SX6 1 SET PRINT DENSITY FORMAT CONTROL FLAG
00615 M01S00073.ns22000 +++| SA6 PDFE+1
00616 M00S00486.qftlist +++|
00617 M00S00487.qftlist +++|* SET NEW DESTINATION INFORMATION IN HEADER.
00618 M00S00488.qftlist +++|
00619 M00S00489.qftlist +++| SA5 TOAI-1
00620 M00S00490.qftlist +++| SA0 TARG
00621 M00S00491.qftlist +++| RJ SDI SET DETAILED INFORMATION
00622 M00S00492.qftlist +++|
00623 M00S00493.qftlist +++|* ALTER SELECTED QUEUED FILES.
00624 M00S00494.qftlist +++|
00625 M00S00495.qftlist +++| ALT1 SA1 CIND SET FWA OF REPLY ENTRY
00626 M00S00496.qftlist +++| SX2 LRPY
00627 M00S00497.qftlist +++| IX2 X2*X1
00628 M00S00498.qftlist +++| SA0 X2+RBUF
00629 M00S00499.qftlist +++| RJ CFS CHECK FILE STATUS
00630 M00S00500.qftlist +++| NZ X1,ALT3 IF FILE NOT SELECTED
00631 M00S00501.qftlist +++| RJ AQF ALTER QUEUED FILE
00632 M00S00502.qftlist +++| MI X2,ALTX IF ERROR IN FAMILY/USER
Line S00074 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
00633 M01S00074.ns22000 +++| SX1 X2-2
00634 M01S00075.ns22000 +++| ZR X1,ALT4.1 IF ERROR ON ALTERING ACCESS LEVEL
00635 M00S00503.qftlist +++| NZ X2,ALT3 IF FILE NOT ALTERED
00636 M00S00504.qftlist +++| SA1 NMPG
00637 M00S00505.qftlist +++| SA2 ENPG
00638 M00S00506.qftlist +++| SX6 X1+B1
00639 M00S00507.qftlist +++| SA6 A1+
00640 M00S00508.qftlist +++| IX6 X6-X2
00641 M00S00509.qftlist +++| NZ X6,ALT2 IF NOT BOTTOM OF PAGE
00642 M00S00510.qftlist +++| SA6 A1+
00643 M00S00511.qftlist +++| SA1 PAGE INCREMENT PAGE COUNT
00644 M00S00512.qftlist +++| SX6 X1+B1
00645 M00S00513.qftlist +++| SA6 A1
00646 M00S00514.qftlist +++| RJ CDD CONVERT TO DECIMAL DISPLAY CODE
00647 M00S00515.qftlist +++| SA6 GBUFA+4
Line S00076 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
00648 M01S00076.ns22000 +++| SA1 PDFE+1 GET PRINT DENSITY FORMAT CONTROL FLAG
00649 M01S00077.ns22000 +++| BX7 X7-X7
00650 M01S00078.ns22000 +++| SA7 A1
00651 M01S00079.ns22000 +++| WRITEW O,A1-B1,X1 CONDITIONALLY WRITE FORMAT EFFECTOR
00652 M00S00516.qftlist +++| WRITEW O,GBUF,GBUFL
00653 M00S00517.qftlist +++| WRITEW O,IBUF,IBUFL
00654 M00S00518.qftlist +++|
00655 M00S00519.qftlist +++| ALT2 SA1 LINE ADVANCE LINE NUMBER
00656 M00S00520.qftlist +++| SX6 X1+B1
00657 M00S00521.qftlist +++| SA6 A1
00658 M00S00522.qftlist +++| RJ CDD CONVERT TO DECIMAL DISPLAY CODE
00659 M00S00523.qftlist +++| SX1 2R. -1R INSERT PERIOD
00660 M00S00524.qftlist +++| LX6 12
00661 M00S00525.qftlist +++| BX6 X6+X1
00662 M00S00526.qftlist +++| SA6 DLNM
00663 M00S00527.qftlist +++| SA5 TORI-1
00664 M00S00528.qftlist +++| RJ SDI SET DETAILED INFORMATION
00665 M00S00529.qftlist +++| WRITEW O,DBUF,DBUFL
00666 M00S00530.qftlist +++|
00667 M00S00531.qftlist +++| ALT3 SA1 CIND ADVANCE REPLY BUFFER INDEX
00668 M00S00532.qftlist +++| SA2 NRPY
00669 M00S00533.qftlist +++| SX6 X1+B1
00670 M00S00534.qftlist +++| SA6 A1
00671 M00S00535.qftlist +++| BX7 X6-X2
00672 M00S00536.qftlist +++| NZ X7,ALT1 IF NOT END OF BUFFER
00673 M00S00537.qftlist +++| SA1 LINE
00674 M00S00538.qftlist +++| SX1 X1-1
00675 M00S00539.qftlist +++| NZ X1,ALT5 IF FILE WRITTEN
00676 M00S00540.qftlist +++| ALT4 SX5 =C* NO QUEUED FILES FOUND. *
Line S00541 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
00677 M01S00541.ns22000 ---| MESSAGE X5,3
Line S00080 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
00678 M01S00080.ns22000 +++| ALT4.1 MESSAGE X5,3
00679 M00S00542.qftlist +++| BX2 X2-X2
00680 M00S00543.qftlist +++| EQ ALTX RETURN
00681 M00S00544.qftlist +++|
00682 M00S00545.qftlist +++| ALT5 WRITER O,R
00683 M00S00546.qftlist +++| SETFS O,0
00684 M00S00547.qftlist +++| SX5 =C* QALTER COMPLETE. *
00685 M00S00548.qftlist +++| BX2 X2-X2
00686 M00S00549.qftlist +++| EQ ALTX RETURN
00687 M00S00550.qftlist +++| DLT SPACE 4,10
00688 M00S00551.qftlist +++|** DLT - DETAILED LIST PROCESSOR.
00689 M00S00552.qftlist +++|*
00690 M00S00553.qftlist +++|* ENTRY (CIND) = CURRENT INDEX INTO REPLY BUFFER.
00691 M00S00554.qftlist +++|* (DLTA) = 0, IF PAGE FUNCTION.
00692 M00S00555.qftlist +++|* = QFT ORDINAL TO DISPLAY.
00693 M00S00556.qftlist +++|*
00694 M00S00557.qftlist +++|* EXIT (CIND) = CURRENT INDEX INTO REPLY BUFFER.
00695 M00S00558.qftlist +++|* (X2) = FWA OF K-DISPLAY BUFFER.
00696 M00S00559.qftlist +++|* (X5) = FWA OF K-DISPLAY MESSAGE.
00697 M00S00560.qftlist +++|*
00698 M00S00561.qftlist +++|* USES A - 0, 1, 3, 4, 5, 6, 7.
00699 M00S00562.qftlist +++|* X - ALL.
00700 M00S00563.qftlist +++|*
00701 M00S00564.qftlist +++|* CALLS SDI.
00702 M00S00565.qftlist +++|
00703 M00S00566.qftlist +++|
00704 M00S00567.qftlist +++| DLT4 BX2 X2-X2 CLEAR RIGHT SCREEN K-DISPLAY
00705 M00S00568.qftlist +++| SX5 =C* NO QUEUED FILES FOUND. *
00706 M00S00569.qftlist +++|
00707 M00S00570.qftlist +++| DLT SUBR ENTRY/EXIT
00708 M00S00571.qftlist +++|
00709 M00S00572.qftlist +++|* CONVERT QFT ORDINAL TO BUFFER INDEX.
00710 M00S00573.qftlist +++|
00711 M00S00574.qftlist +++| SX2 LRPY
00712 M00S00575.qftlist +++| SA3 NRPY
00713 M00S00576.qftlist +++| SA1 DLTA
00714 M00S00577.qftlist +++| ZR X1,DLT2 IF ORDINAL NOT SPECIFIED
00715 M00S00578.qftlist +++| MX0 -12
00716 M00S00579.qftlist +++| SX6 -B1 PRESET BUFFER INDEX
00717 M00S00580.qftlist +++| DLT1 SX6 X6+B1
00718 M00S00581.qftlist +++| BX4 X6-X3
00719 M00S00582.qftlist +++| ZR X4,DLT4 IF FILE NOT FOUND
00720 M00S00583.qftlist +++| IX5 X6*X2
00721 M00S00584.qftlist +++| SA4 X5+RBUF CHECK QFT ORDINAL
00722 M00S00585.qftlist +++| LX4 -24
00723 M00S00586.qftlist +++| BX4 X4-X1
00724 M00S00587.qftlist +++| BX4 -X0*X4
00725 M00S00588.qftlist +++| NZ X4,DLT1 IF NO MATCH
00726 M00S00589.qftlist +++| SA6 CIND SET BUFFER INDEX
00727 M00S00590.qftlist +++|
00728 M00S00591.qftlist +++|* DISPLAY FILE INFORMATION.
00729 M00S00592.qftlist +++|
00730 M00S00593.qftlist +++| DLT2 SA1 CIND DETERMINE FWA OF REPLY ENTRY
00731 M00S00594.qftlist +++| IX2 X1*X2
00732 M00S00595.qftlist +++| SX6 X1+B1 UPDATE INDEX TO NEXT REPLY ENTRY
00733 M00S00596.qftlist +++| SA0 RBUF+X2
00734 M00S00597.qftlist +++| SA6 A1+
00735 M00S00598.qftlist +++| BX7 X6-X3
00736 M00S00599.qftlist +++| NZ X7,DLT3 IF NOT END OF REPLY BUFFER
00737 M00S00600.qftlist +++| SA7 A1 SET INDEX TO FIRST ENTRY
00738 M00S00601.qftlist +++| DLT3 SA5 TORI-1
00739 M00S00602.qftlist +++| RJ SDI SET DETAILED INFORMATION
00740 M00S00603.qftlist +++| SX5 =C* LIST COMPLETE. *
00741 M00S00604.qftlist +++| SX2 LBUF SET FWA OF K-DISPLAY
00742 M00S00605.qftlist +++| SX6 DLT SET PAGE PROCESSOR
00743 M00S00606.qftlist +++| SA6 TFAD+FUN1
00744 M00S00607.qftlist +++| SX6 B0+ CLEAR QFT ORDINAL
00745 M00S00608.qftlist +++| SA6 DLTA
00746 M00S00609.qftlist +++| EQ DLTX RETURN
00747 M00S00610.qftlist +++|
00748 M00S00611.qftlist +++| DLTA CON 0 QFT ORDINAL
00749 M00S00612.qftlist +++| LST SPACE 4,10
00750 M00S00613.qftlist +++|** LST - FULL K-DISPLAY LIST PROCESSOR.
00751 M00S00614.qftlist +++|*
00752 M00S00615.qftlist +++|* ENTRY (CIND) = CURRENT INDEX INTO REPLY BUFFER.
00753 M00S00616.qftlist +++|*
00754 M00S00617.qftlist +++|* EXIT (CIND) = CURRENT INDEX INTO REPLY BUFFER.
00755 M00S00618.qftlist +++|* (X5) = FWA OF K-DISPLAY MESSAGE.
00756 M00S00619.qftlist +++|* (X2) = FWA OF K-DISPLAY BUFFER.
00757 M00S00620.qftlist +++|*
00758 M00S00621.qftlist +++|* USES A - 0, 1, 2, 5, 6, 7.
00759 M00S00622.qftlist +++|* X - 1, 2, 3, 5, 6, 7.
00760 M00S00623.qftlist +++|*
00761 M00S00624.qftlist +++|* CALLS BDL, CFS, SLB.
00762 M00S00625.qftlist +++|*
00763 M00S00626.qftlist +++|* MACROS MESSAGE, MOVE.
00764 M00S00627.qftlist +++|
00765 M00S00628.qftlist +++|
00766 M00S00629.qftlist +++| LST6 SX5 =C* LIST COMPLETE. *
00767 M00S00630.qftlist +++| SX2 KBUF SET K-DISPLAY BUFFER
00768 M00S00631.qftlist +++| SX6 LST SET PAGE PROCESSOR
00769 M00S00632.qftlist +++| SA6 TFAD+FUN1
00770 M00S00633.qftlist +++|
00771 M00S00634.qftlist +++| LST SUBR ENTRY/EXIT
00772 M00S00635.qftlist +++| MOVE LSTCL,LSTC,KBUF+1 SET DISPLAY HEADER
Line S00636 Modification History
M01 (Removed by) 241l630
Seq # *Modification Id* Act
----------------------------+
00773 M01S00636.241l630 ---| SX6 KMLL-14 PRESET LINE COUNT
Line S00008 Modification History
M01 (Added by) 241l630
Seq # *Modification Id* Act
----------------------------+
00774 M01S00008.241l630 +++| SX6 KMLL-6 PRESET LINE COUNT
00775 M00S00637.qftlist +++| SA6 LINE
00776 M00S00638.qftlist +++| SX6 KBUF+1+LSTCL PRESET WORD ADDRESS INTO *KBUF*
00777 M00S00639.qftlist +++| SA6 INDX
00778 M00S00640.qftlist +++| SX7 B0+ CLEAR WRAP AROUND FLAG
00779 M00S00641.qftlist +++| SA7 LSTD
00780 M00S00642.qftlist +++| SA2 NRPY
00781 M00S00643.qftlist +++| ZR X2,LST5 IF NO REPLY ENTRIES IN BUFFER
00782 M00S00644.qftlist +++|
00783 M00S00645.qftlist +++|* CHECK NEXT REPLY ENTRY IN BUFFER.
00784 M00S00646.qftlist +++|
00785 M00S00647.qftlist +++| LST1 SA1 CIND DETERMINE FWA OF REPLY ENTRY
00786 M00S00648.qftlist +++| SX2 LRPY
00787 M00S00649.qftlist +++| IX2 X1*X2
00788 M00S00650.qftlist +++| SA0 RBUF+X2
00789 M00S00651.qftlist +++| RJ CFS CHECK FILE STATUS
00790 M00S00652.qftlist +++| NZ X1,LST3 IF FILE NOT SELECTED
00791 M00S00653.qftlist +++| SA1 LINE DECREMENT LINE COUNT
00792 M00S00654.qftlist +++| SX6 X1-1
00793 M00S00655.qftlist +++| SA6 A1+
00794 M00S00656.qftlist +++| NZ X6,LST2 IF NOT END OF DISPLAY
00795 M00S00657.qftlist +++| SA5 INDX
00796 M00S00658.qftlist +++| MOVE LSTAL,LSTA,X5
00797 M00S00659.qftlist +++| EQ LST6 SET EXIT CONDITIONS
00798 M00S00660.qftlist +++|
00799 M00S00661.qftlist +++|* SET NEXT LINE IN DISPLAY.
00800 M00S00662.qftlist +++|
00801 M00S00663.qftlist +++| LST2 RJ BDL BUILD K-DISPLAY LINE
00802 M00S00664.qftlist +++| RJ SLB SET LINE IN BUFFER
00803 M00S00665.qftlist +++|
00804 M00S00666.qftlist +++|* UPDATE CURRENT INDEX INTO REPLY BUFFER.
00805 M00S00667.qftlist +++|
00806 M00S00668.qftlist +++| LST3 SA1 CIND UPDATE CURRENT INDEX
00807 M00S00669.qftlist +++| SA2 NRPY
00808 M00S00670.qftlist +++| SX6 X1+B1
00809 M00S00671.qftlist +++| BX7 X6-X2
00810 M00S00672.qftlist +++| SA6 A1+
00811 M00S00673.qftlist +++| NZ X7,LST1 IF NOT END OF REPLY BUFFER
00812 M00S00674.qftlist +++| SA7 A1+ SET INDEX TO FIRST ENTRY
00813 M00S00675.qftlist +++| SA1 LINE
Line S00676 Modification History
M01 (Removed by) 241l630
Seq # *Modification Id* Act
----------------------------+
00814 M01S00676.241l630 ---| SX3 X1-KMLL+14
Line S00009 Modification History
M01 (Added by) 241l630
Seq # *Modification Id* Act
----------------------------+
00815 M01S00009.241l630 +++| SX3 X1-KMLL+6
00816 M00S00677.qftlist +++| ZR X3,LST4 IF NO FILE FOUND
00817 M00S00678.qftlist +++| SA5 INDX
00818 M00S00679.qftlist +++| MOVE LSTBL,LSTB,X5
00819 M00S00680.qftlist +++| EQ LST6 SET EXIT CONDITIONS
00820 M00S00681.qftlist +++|
00821 M00S00682.qftlist +++| LST4 SA1 FUNC
00822 M00S00683.qftlist +++| SX2 X1-FUN1
00823 M00S00684.qftlist +++| NZ X2,LST5 IF NOT *PAGE* FUNCTION
00824 M00S00685.qftlist +++| SA1 LSTD
00825 M00S00686.qftlist +++| NZ X1,LST5 IF DISPLAY WRAP AROUND NOT POSSIBLE
00826 M00S00687.qftlist +++| SX6 B1
00827 M00S00688.qftlist +++| SA6 A1
00828 M00S00689.qftlist +++| EQ LST1 CHECK BEGINNING REPLY BUFFER
00829 M00S00690.qftlist +++|
Line S00691 Modification History
M01 (Removed by) qftli1
Seq # *Modification Id* Act
----------------------------+
00830 M01S00691.qftli1 ---| LST5 SX5 =C* NO QUEUED FILE FOUND. *
Line S00001 Modification History
M01 (Added by) qftli1
Seq # *Modification Id* Act
----------------------------+
00831 M01S00001.qftli1 +++| LST5 SX5 =C* NO QUEUED FILES FOUND. *
00832 M00S00692.qftlist +++| MESSAGE X5,3
00833 M00S00693.qftlist +++| BX2 X2-X2 CLEAR RIGHT SCREEN K-DISPLAY
00834 M00S00694.qftlist +++| EQ LSTX RETURN
00835 M00S00695.qftlist +++|
00836 M00S00696.qftlist +++| LSTA LINE
Line S00697 Modification History
M01 (Removed by) 241l630
Seq # *Modification Id* Act
----------------------------+
00837 M01S00697.241l630 ---| LINE ( MORE LINES FOLLOW.)
Line S00010 Modification History
M01 (Added by) 241l630
Seq # *Modification Id* Act
----------------------------+
00838 M01S00010.241l630 +++| LINE ( MORE )
Line S00698 Modification History
M01 (Removed by) 241l630
Seq # *Modification Id* Act
----------------------------+
00839 M01S00698.241l630 ---| LINE
00840 M01S00699.241l630 ---| CON 0 TERMINATE DISPLAY
Line S00011 Modification History
M01 (Added by) 241l630
Seq # *Modification Id* Act
----------------------------+
00841 M01S00011.241l630 +++| BSSZ 2 TERMINATE DISPLAY
00842 M00S00700.qftlist +++| LSTAL EQU *-LSTA
00843 M00S00701.qftlist +++|
00844 M00S00702.qftlist +++| LSTB LINE
00845 M00S00703.qftlist +++| LINE ( END OF DISPLAY.)
00846 M00S00704.qftlist +++| LINE
Line S00705 Modification History
M01 (Removed by) 241l630
Seq # *Modification Id* Act
----------------------------+
00847 M01S00705.241l630 ---| CON 0 TERMINATE DISPLAY
Line S00012 Modification History
M01 (Added by) 241l630
Seq # *Modification Id* Act
----------------------------+
00848 M01S00012.241l630 +++| BSSZ 2 TERMINATE DISPLAY
00849 M00S00706.qftlist +++| LSTBL EQU *-LSTB
00850 M00S00707.qftlist +++|
00851 M00S00708.qftlist +++| LSTC LINE
Line S00709 Modification History
M01 (Removed by) 241l630
Seq # *Modification Id* Act
----------------------------+
00852 M01S00709.241l630 ---| LINE ( *** ACTIVE QUEUE FILE LIST ***)
Line S00013 Modification History
M01 (Added by) 241l630
Seq # *Modification Id* Act
----------------------------+
00853 M01S00013.241l630 +++| LINE ( ACTIVE QUEUE FILE LIST )
00854 M00S00710.qftlist +++| LINE
00855 M00S00711.qftlist +++| LINE
00856 M00S00712.qftlist +++|
00857 M00S00713.qftlist +++| LSTE BSS 0
Line S00714 Modification History
M01 (Removed by) ns21000
Seq # *Modification Id* Act
----------------------------+
00858 M01S00714.ns21000 ---| LINE ( ORD. JSNO. DT FAMILY USERNAM TUI/ID FC EXTCH )
00859 M01S00715.ns21000 ---| LINE (REP LENGTH)
Line S00004 Modification History
M01 (Added by) ns21000
M02 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
00860 M02S00004.ns22000 ---| LINE ( ORD. JSNO. DT LID FAMILY USERNAM TUI/ID FC EX)
Line S00081 Modification History
M01 (Added by) ns22000
M02 (Removed by) 241l630
Seq # *Modification Id* Act
----------------------------+
00861 M02S00081.241l630 ---| LINE ( ORD. JSNS. DT LID FAMILY USERNAM TUI/ID FC EX)
Line S00005 Modification History
M01 (Added by) ns21000
M02 (Removed by) 241l630
Seq # *Modification Id* Act
----------------------------+
00862 M02S00005.241l630 ---| LINE (TCH LENGTH )
Line S00014 Modification History
M01 (Added by) 241l630
Seq # *Modification Id* Act
----------------------------+
00863 M01S00014.241l630 +++| LINE ( ORD JSNS DT LID FAMILY USERNAM TUI/ID FC )
00864 M01S00015.241l630 +++| LINE (EC LENGTH )
00865 M00S00716.qftlist +++| LINE
00866 M00S00717.qftlist +++|
00867 M00S00718.qftlist +++| LINE
00868 M00S00719.qftlist +++|
00869 M00S00720.qftlist +++| LSTCL EQU *-LSTC
00870 M00S00721.qftlist +++| LSTEL EQU *-LSTE
00871 M00S00722.qftlist +++|
00872 M00S00723.qftlist +++| LSTD CON 0 WRAP AROUND FLAG
00873 M00S00724.qftlist +++| OUT SPACE 4,10
00874 M00S00725.qftlist +++|** OUT - HARD COPY LIST PROCESSOR.
00875 M00S00726.qftlist +++|*
00876 M00S00727.qftlist +++|* ENTRY (CIND) = CURRENT INDEX INTO REPLY BUFFER.
00877 M00S00728.qftlist +++|* (NRPY) = NUMBER OF ENTRIES IN REPLY BUFFER.
00878 M00S00729.qftlist +++|*
00879 M00S00730.qftlist +++|* EXIT OUTPUT FILE WRITTEN.
00880 M00S00731.qftlist +++|* OUTPUT FILE ROUTED TO PRINTER IF NOT CONTROL
00881 M00S00732.qftlist +++|* STATEMENT CALL.
00882 M00S00733.qftlist +++|* (X5) = FWA OF K-DISPLAY MESSAGE.
00883 M00S00734.qftlist +++|* (X2) = 0.
00884 M00S00735.qftlist +++|*
00885 M00S00736.qftlist +++|* USES A - 0, 1, 2, 5, 6, 7.
00886 M00S00737.qftlist +++|* X - 0, 1, 2, 5, 6, 7.
00887 M00S00738.qftlist +++|* B - 6.
00888 M00S00739.qftlist +++|*
00889 M00S00740.qftlist +++|* CALLS BDL, CDD, CFS, SDI.
00890 M00S00741.qftlist +++|*
00891 M00S00742.qftlist +++|* MACROS CLOCK, DATE, MESSAGE, ROUTE, SETFS,
00892 M00S00743.qftlist +++|* WRITEO, WRITER, WRITES, WRITEW.
00893 M00S00744.qftlist +++|
00894 M00S00745.qftlist +++|
00895 M00S00746.qftlist +++| OUT SUBR ENTRY/EXIT
00896 M00S00747.qftlist +++| SA2 NRPY
00897 M00S00748.qftlist +++| ZR X2,OUT7 IF NO REPLY ENTRIES IN BUFFER
00898 M00S00749.qftlist +++| SA1 TARG+ARLL SET FILE NAME IN FET
00899 M00S00750.qftlist +++| MX0 42
00900 M00S00751.qftlist +++| SX7 B1
00901 M00S00752.qftlist +++| BX6 X0*X1
00902 M00S00753.qftlist +++| BX6 X6+X7
00903 M00S00754.qftlist +++| SA6 O
00904 M00S00755.qftlist +++| SA7 PAGE SET PAGE COUNT
Line S00756 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
00905 M01S00756.ns22000 ---| SX6 B0+ SET REPLY BUFFER ORDINAL
Line S00082 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
00906 M01S00082.ns22000 +++| SA7 PDFE+1 SET PRINT DENSITY FORMAT CONTROL FLAG
00907 M01S00083.ns22000 +++| SX6 B0+ SET REPLY BUFFER ORDINAL
00908 M00S00757.qftlist +++| SA6 OUTA
00909 M00S00758.qftlist +++| SA6 LINE SET LINE COUNT
Line S00759 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
00910 M01S00759.ns22000 ---| SX7 LPRP/5 SET ENTRIES PER PAGE
Line S00084 Modification History
M01 (Added by) ns22000
M02 (Removed by) qftli2
Seq # *Modification Id* Act
----------------------------+
00911 M02S00084.qftli2 ---| SX1 6
00912 M02S00085.qftli2 ---| SA5 A6+B1 SET NUMBER OF ENTRIES PER PAGE
00913 M02S00086.qftli2 ---| IX7 X5/X1
Line S00760 Modification History
M01 (Removed by) qftli2
Seq # *Modification Id* Act
----------------------------+
00914 M01S00760.qftli2 ---| SA2 OUTB
Line S00001 Modification History
M01 (Added by) qftli2
Seq # *Modification Id* Act
----------------------------+
00915 M01S00001.qftli2 +++| SA5 LINE+1 SET NUMBER OF ENTRIES PER PAGE
00916 M01S00002.qftli2 +++| SX7 X5-7
00917 M01S00003.qftli2 +++| SA2 OUTC
00918 M00S00761.qftlist +++| SA1 TARG+ARLO
Line S00762 Modification History
M01 (Removed by) qftli2
Seq # *Modification Id* Act
----------------------------+
00919 M01S00762.qftli2 ---| NZ X1,OUT1 IF FULL LIST
00920 M01S00763.qftli2 ---| SA2 OUTC
Line S00764 Modification History
M01 (Removed by) ns22000
M02 (Removed by) qftli2
Seq # *Modification Id* Act
----------------------------+
00921 M02S00764.qftli2 ---| SX7 LINP-7 ENTRIES PER PAGE
Line S00087 Modification History
M01 (Added by) ns22000
M02 (Removed by) qftli2
Seq # *Modification Id* Act
----------------------------+
00922 M02S00087.qftli2 ---| SX7 X5-7 ENTRIES PER PAGE
Line S00004 Modification History
M01 (Added by) qftli2
Seq # *Modification Id* Act
----------------------------+
00923 M01S00004.qftli2 +++| ZR X1,OUT1 IF NOT FULL LIST
00924 M01S00005.qftli2 +++| SA2 OUTB
00925 M01S00006.qftli2 +++| SX6 6 LINES PER ENTRY
00926 M01S00007.qftli2 +++| IX7 X7/X6 ENTRIES PER PAGE
00927 M00S00765.qftlist +++| OUT1 SA7 NMPG
00928 M00S00766.qftlist +++| SX7 X7+B1
00929 M00S00767.qftlist +++| BX6 X2
00930 M00S00768.qftlist +++| SA7 ENPG
00931 M00S00769.qftlist +++| SA6 HBUFC+1
00932 M00S00770.qftlist +++| DATE HBUFA+1 SET DATE AND TIME IN PAGE HEADER
00933 M00S00771.qftlist +++| CLOCK HBUFA+2
00934 M00S00772.qftlist +++|
00935 M00S00773.qftlist +++|* CHECK NEXT REPLY ENTRY.
00936 M00S00774.qftlist +++|
00937 M00S00775.qftlist +++| OUT2 SA1 OUTA SET FWA OF REPLY ENTRY
00938 M00S00776.qftlist +++| SX2 LRPY
00939 M00S00777.qftlist +++| IX2 X2*X1
00940 M00S00778.qftlist +++| SA0 X2+RBUF
00941 M00S00779.qftlist +++| RJ CFS CHECK FILE STATUS
00942 M00S00780.qftlist +++| NZ X1,OUT6 IF FILE NOT SELECTED
00943 M00S00781.qftlist +++| SA1 NMPG
00944 M00S00782.qftlist +++| SA2 ENPG
00945 M00S00783.qftlist +++| SX6 X1+B1
00946 M00S00784.qftlist +++| SA6 A1
00947 M00S00785.qftlist +++| IX6 X6-X2
00948 M00S00786.qftlist +++| NZ X6,OUT4 IF NOT BOTTOM OF PAGE
00949 M00S00787.qftlist +++| SA6 A1 RESET ENTRY/PAGE COUNT
00950 M00S00788.qftlist +++| SA1 PAGE INCREMENT PAGE COUNT
00951 M00S00789.qftlist +++| SX6 X1+B1
00952 M00S00790.qftlist +++| SA6 A1
00953 M00S00791.qftlist +++| RJ CDD CONVERT DECIMAL DISPLAY CODE
00954 M00S00792.qftlist +++| SA6 HBUFA+4
Line S00088 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
00955 M01S00088.ns22000 +++| SA1 PDFE+1 GET PRINT DENSITY FORMAT CONTROL FLAG
00956 M01S00089.ns22000 +++| BX7 X7-X7
00957 M01S00090.ns22000 +++| SA7 A1
00958 M01S00091.ns22000 +++| WRITEW O,A1-B1,X1 CONDITIONALLY WRITE FORMAT EFFECTOR
00959 M00S00793.qftlist +++| WRITEW O,HBUF,HBUFL
00960 M00S00794.qftlist +++| SA1 TARG+ARLO
00961 M00S00795.qftlist +++| NZ X1,OUT3 IF FULL LIST
00962 M00S00796.qftlist +++| SA1 BLKS
00963 M00S00797.qftlist +++| BX6 X1
00964 M00S00798.qftlist +++| WRITEO O
00965 M00S00799.qftlist +++| WRITEW O,LSTE,LSTEL
00966 M00S00800.qftlist +++| EQ OUT4 BUILD OUTPUT FILE ENTRY
00967 M00S00801.qftlist +++|
00968 M00S00802.qftlist +++| OUT3 WRITEW O,IBUF,IBUFL
00969 M00S00803.qftlist +++|
00970 M00S00804.qftlist +++|* BUILD OUTPUT FILE ENTRY.
00971 M00S00805.qftlist +++|
00972 M00S00806.qftlist +++| OUT4 SA1 LINE ADVANCE LINE NUMBER
00973 M00S00807.qftlist +++| SX6 X1+B1
00974 M00S00808.qftlist +++| SA6 A1
00975 M00S00809.qftlist +++| SA1 TARG+ARLO
00976 M00S00810.qftlist +++| NZ X1,OUT5 IF FULL LIST
00977 M00S00811.qftlist +++| SA1 BLKS
00978 M00S00812.qftlist +++| BX6 X1
00979 M00S00813.qftlist +++| WRITEO O
00980 M00S00814.qftlist +++| RJ BDL BUILD OUTPUT LINE
00981 M00S00815.qftlist +++| SA5 CHCT
00982 M00S00816.qftlist +++| SX5 X5-2
00983 M00S00817.qftlist +++| WRITES O,SBUF,X5
00984 M00S00818.qftlist +++| EQ OUT6 PROCESS NEXT REPLY ENTRY
00985 M00S00819.qftlist +++|
00986 M00S00820.qftlist +++| OUT5 SA5 TORI-1
00987 M00S00821.qftlist +++| RJ SDI SET DETAILED INFORMATION
00988 M00S00822.qftlist +++| SA1 LINE SET LINE NUMBER
00989 M00S00823.qftlist +++| RJ CDD CONVERT DECIMAL DISPLAY CODE
00990 M00S00824.qftlist +++| SX1 2R. -1R
00991 M00S00825.qftlist +++| LX6 12
00992 M00S00826.qftlist +++| BX6 X6+X1
00993 M00S00827.qftlist +++| SA6 DLNM
00994 M00S00828.qftlist +++| WRITEW O,DBUF,DBUFL
00995 M00S00829.qftlist +++|
00996 M00S00830.qftlist +++|* ADVANCE REPLY BUFFER INDEX.
00997 M00S00831.qftlist +++|
00998 M00S00832.qftlist +++| OUT6 SA1 OUTA ADVANCE CURRENT INDEX
00999 M00S00833.qftlist +++| SA2 NRPY
01000 M00S00834.qftlist +++| SX6 X1+1
01001 M00S00835.qftlist +++| SA6 A1
01002 M00S00836.qftlist +++| BX7 X6-X2
01003 M00S00837.qftlist +++| NZ X7,OUT2 IF MORE ENTRIES IN BUFFER
01004 M00S00838.qftlist +++|
01005 M00S00839.qftlist +++|* COMPLETE OUTPUT FILE.
01006 M00S00840.qftlist +++|
01007 M00S00841.qftlist +++| SA1 LINE
01008 M00S00842.qftlist +++| NZ X1,OUT8 IF FILE WRITTEN
Line S00843 Modification History
M01 (Removed by) qftli1
Seq # *Modification Id* Act
----------------------------+
01009 M01S00843.qftli1 ---| OUT7 SX5 =C* NO QUEUED FILE FOUND. *
Line S00002 Modification History
M01 (Added by) qftli1
Seq # *Modification Id* Act
----------------------------+
01010 M01S00002.qftli1 +++| OUT7 SX5 =C* NO QUEUED FILES FOUND. *
01011 M00S00844.qftlist +++| MESSAGE X5,3
01012 M00S00845.qftlist +++| BX2 X2-X2
01013 M00S00846.qftlist +++| EQ OUTX RETURN
01014 M00S00847.qftlist +++|
01015 M00S00848.qftlist +++| OUT8 WRITER O,R
01016 M00S00849.qftlist +++| SETFS O,0
01017 M00S00850.qftlist +++| SA1 TARG+ARFC
01018 M00S00851.qftlist +++| PL X1,OUT9 IF NOT CONTROL STATEMENT CALL
01019 M00S00852.qftlist +++| SX5 B0 NO K-DISPLAY MESSAGE
01020 M00S00853.qftlist +++| BX2 X2-X2
01021 M00S00854.qftlist +++| EQ OUTX RETURN
01022 M00S00855.qftlist +++|
01023 M00S00856.qftlist +++| OUT9 SX6 B0+ CLEAR *DSP* PARAMETER BLOCK
01024 M00S00857.qftlist +++| SB5 DSPBL-1
01025 M00S00858.qftlist +++| OUT10 SA6 DSPB+B5
01026 M00S00859.qftlist +++| SB5 B5-1
01027 M00S00860.qftlist +++| PL B5,OUT10 IF NOT END OF TABLE
01028 M00S00861.qftlist +++| SA2 O SET UP *DSP* PARAMETER BLOCK
01029 M00S00862.qftlist +++| MX0 42
01030 M00S00863.qftlist +++| BX6 X0*X2
01031 M00S00864.qftlist +++| SA6 DSPB
01032 M00S00865.qftlist +++| SA2 OUTD SET FLAG BITS
01033 M00S00866.qftlist +++| BX6 X2
01034 M00S00867.qftlist +++| SA6 A6+B1
01035 M00S00868.qftlist +++| ROUTE DSPB,RECALL
01036 M00S00869.qftlist +++| SX5 =C* OUTPUT FILE RELEASED. *
01037 M00S00870.qftlist +++| SX2 B0+ SET PRIMARY RIGHT SCREEN DISPLAY
01038 M00S00871.qftlist +++| EQ OUTX RETURN
01039 M00S00872.qftlist +++|
01040 M00S00873.qftlist +++| OUTA CON 0 REPLY BUFFER INDEX
01041 M00S00874.qftlist +++| OUTB DATA 10HFULL.
01042 M00S00875.qftlist +++| OUTC DATA 10HSHORT.
01043 M00S00876.qftlist +++| OUTD VFD 24/0,12/2HPR,6/0,18/FRDC
01044 M00S00877.qftlist +++| TITLE REPLY BUFFER PROCESSING ROUTINES.
01045 M00S00878.qftlist +++| ERB SPACE 4,10
01046 M00S00879.qftlist +++|** ERB - EDIT REPLY BUFFER.
01047 M00S00880.qftlist +++|*
01048 M00S00881.qftlist +++|* ENTRY (NRPY) = NUMBER OF ENTRIES IN REPLY BUFFER.
01049 M00S00882.qftlist +++|*
01050 M00S00883.qftlist +++|* EXIT ALL REPLY ENTRIES EDITED.
01051 M00S00884.qftlist +++|*
01052 M00S00885.qftlist +++|* USES A - 1, 5, 6.
01053 M00S00886.qftlist +++|* X - 0, 1, 2, 3, 5, 6.
01054 M00S00887.qftlist +++|* B - 4, 6, 7.
01055 M00S00888.qftlist +++|*
01056 M00S00889.qftlist +++|* MACROS MOVE.
01057 M00S00890.qftlist +++|
01058 M00S00891.qftlist +++|
01059 M00S00892.qftlist +++| ERB SUBR ENTRY/EXIT
01060 M00S00893.qftlist +++| SA1 NRPY
01061 M00S00894.qftlist +++| SB2 RBUF-LRPY
01062 M00S00895.qftlist +++| SB4 X1+
01063 M00S00896.qftlist +++|
01064 M00S00897.qftlist +++|* ADVANCE TO NEXT REPLY ENTRY.
01065 M00S00898.qftlist +++|
01066 M00S00899.qftlist +++| ERB1 SB4 B4-B1 DECREMENT NUMBER OF ENTRIES
01067 M00S00900.qftlist +++| SB2 B2+LRPY
01068 M00S00901.qftlist +++| MX0 -12
01069 M00S00902.qftlist +++| LT B4,B0,ERBX IF END OF REPLY BUFFER
01070 M00S00903.qftlist +++| SA5 TERB-1
01071 M00S00904.qftlist +++| ERB2 SA5 A5+1
01072 M00S00905.qftlist +++| NZ X5,ERB3 IF MORE INFORMATION TO EDIT
01073 M00S00906.qftlist +++| MOVE LRPY,OBUF,B2
01074 M00S00907.qftlist +++| EQ ERB1 EDIT NEXT REPLY ENTRY
01075 M00S00908.qftlist +++|
01076 M00S00909.qftlist +++|* SET EDIT INFORMATION.
01077 M00S00910.qftlist +++|
01078 M00S00911.qftlist +++| ERB3 BX1 -X0*X5 FIELD WIDTH
01079 M00S00912.qftlist +++| LX5 48
01080 M00S00913.qftlist +++| SB6 LRPY-1 SET LENGTH OF BLOCK TO EDIT
01081 M00S00914.qftlist +++| SB7 X1-1
01082 M00S00915.qftlist +++| BX2 -X0*X5 BLOCK INDEX
01083 M00S00916.qftlist +++| LX5 48 POSITION INFORMATION NUMBER
01084 M00S00917.qftlist +++|
01085 M00S00918.qftlist +++|* SEARCH REPLY ENTRY FOR INFORMATION.
01086 M00S00919.qftlist +++|
01087 M00S00920.qftlist +++| MX3 -6 COMPARE INFORMATION NUMBER
01088 M00S00921.qftlist +++| ERB4 BX6 X6-X6
01089 M00S00922.qftlist +++| LT B6,ERB5 IF NO MORE TO SEARCH
01090 M00S00923.qftlist +++| SA1 B2+B6
01091 M00S00924.qftlist +++| BX6 X1-X5
01092 M00S00925.qftlist +++| BX6 -X3*X6
01093 M00S00926.qftlist +++| SB6 B6-1
01094 M00S00927.qftlist +++| NZ X6,ERB4 IF NO COMPARE
01095 M00S00928.qftlist +++| MX5 1 EDIT INFORMATION
01096 M00S00929.qftlist +++| AX5 B7
01097 M00S00930.qftlist +++| BX6 X5*X1
01098 M00S00931.qftlist +++| ERB5 SA6 OBUF+X2 SET EDITED DATA
01099 M00S00932.qftlist +++| EQ ERB2 LOOP FOR NEXT INFORMATION WORD
01100 M00S00933.qftlist +++| TERB SPACE 4,10
01101 M00S00934.qftlist +++|** TERB - TABLE OF EDIT INFORMATION.
01102 M00S00935.qftlist +++|*
01103 M00S00936.qftlist +++|*T, 30/ , 6/ IN , 12/ INDEX , 12/ WIDTH
Figure
0 11 12 23 24 29 WIDTH INDEX IN 30 59
01104 M00S00937.qftlist +++|*
01105 M00S00938.qftlist +++|* IN = INFORMATION NUMBER
01106 M00S00939.qftlist +++|* INDEX = INDEX INTO REPLY BUFFER
01107 M00S00940.qftlist +++|* WIDTH = FIELD WIDTH OF INFORMATION
01108 M00S00941.qftlist +++|*
01109 M00S00942.qftlist +++|* TABLE IS TERMINATED BY A ZERO WORD.
01110 M00S00943.qftlist +++|
01111 M00S00944.qftlist +++|
01112 M00S00945.qftlist +++| TERB BSS 0
01113 M00S00946.qftlist +++| LOC 0
01114 M00S00947.qftlist +++| VFD 30/0,6/JSPI,12/0,12/48D JSN, ORDINAL, QUEUE
01115 M00S00948.qftlist +++| VFD 30/0,6/OTPI,12/1,12/42D OUTPUT CHARACTERISTICS
01116 M00S00949.qftlist +++| VFD 30/0,6/PRPI,12/2,12/12D PRIORITY
01117 M00S00950.qftlist +++| VFD 30/0,6/FMPI,12/3,12/42D DESTINATION FAMILY
01118 M00S00951.qftlist +++| VFD 30/0,6/UNPI,12/4,12/48D DEST. UN, BATCH ID
Line S00952 Modification History
M01 (Removed by) ns2430
Seq # *Modification Id* Act
----------------------------+
01119 M01S00952.ns2430 ---| VFD 30/0,6/CFPI,12/5,12/42D CREATION FAMILY
01120 M01S00953.ns2430 ---| VFD 30/0,6/CUPI,12/6,12/48D CREATION UN, BATCH ID
01121 M01S00954.ns2430 ---| VFD 30/0,6/FUPI,12/7,12/48D DEST. UI, CREATION UI
Line S00001 Modification History
M01 (Added by) ns2430
Seq # *Modification Id* Act
----------------------------+
01122 M01S00001.ns2430 +++| VFD 30/0,6/OFPI,12/5,12/42D OWNER FAMILY
01123 M01S00002.ns2430 +++| VFD 30/0,6/OUPI,12/6,12/48D OWNER UN, BATCH ID
01124 M01S00003.ns2430 +++| VFD 30/0,6/FUPI,12/7,12/48D DEST. UI, OWNER UI
01125 M00S00955.qftlist +++| VFD 30/0,6/UJPI,12/8,12/42D USER JOBNAME
01126 M00S00956.qftlist +++| VFD 30/0,6/SCPI,12/9,12/48D OUTPUT CHARACTERISTICS
01127 M00S00957.qftlist +++| VFD 30/0,6/DTPI,12/10,12/48D EQ. NO., CREATION DATE
01128 M00S00958.qftlist +++| VFD 30/0,6/FLPI,12/11,12/24D FILE LENGTH
Line S00006 Modification History
M01 (Added by) ns21000
Seq # *Modification Id* Act
----------------------------+
01129 M01S00006.ns21000 +++| VFD 30/0,6/LDPI,12/12,12/48D LOGICAL IDENTIFIER
Line S00092 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01130 M01S00092.ns22000 +++| VFD 30/0,6/ALPI,12/13,12/48D ACCESS LEVEL
01131 M00S00959.qftlist +++| CON 0 END OF TABLE
01132 M00S00960.qftlist +++| LOC *O
01133 M00S00961.qftlist +++| FRB SPACE 4,10
01134 M00S00962.qftlist +++|** FRB - FILL REPLY BUFFER.
01135 M00S00963.qftlist +++|*
01136 M00S00964.qftlist +++|* ENTRY MEMORY FOR *RBUF* ALLOCATED.
01137 M00S00965.qftlist +++|* (MRPY) = MAXIMUM ENTRIES ALLOWED IN *RBUF*.
01138 M00S00966.qftlist +++|*
01139 M00S00967.qftlist +++|* EXIT *RBUF* CONTAINS REPLY ENTRIES.
01140 M00S00968.qftlist +++|* (NRPY) = NUMBER OF REPLY ENTRIES IN *RBUF*.
01141 M00S00969.qftlist +++|* (CIND) = 0.
01142 M00S00970.qftlist +++|*
01143 M00S00971.qftlist +++|* ERROR TO *PSE*, IF ERROR ENCOUNTERED.
01144 M00S00972.qftlist +++|*
01145 M00S00973.qftlist +++|* USES X - ALL.
01146 M00S00974.qftlist +++|* A - 1, 3, 4, 5, 6.
01147 M00S00975.qftlist +++|* B - 2, 7.
01148 M00S00976.qftlist +++|*
01149 M00S00977.qftlist +++|* CALLS CQP.
01150 M00S00978.qftlist +++|*
01151 M00S00979.qftlist +++|* MACROS SYSTEM.
01152 M00S00980.qftlist +++|
01153 M00S00981.qftlist +++|
01154 M00S00982.qftlist +++| FRB SUBR ENTRY/EXIT
01155 M00S00983.qftlist +++| SX6 B0+ PRESET NUMBER OF REPLY ENTRIES
01156 M00S00984.qftlist +++| SA6 NRPY
Line S00985 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01157 M01S00985.ns22000 ---| SA5 TFRB SET INDEX TO ORIGIN TYPE TABLE
01158 M01S00986.ns22000 ---| SB7 X5+
01159 M00S00987.qftlist +++| SA6 CIND SET CURRENT INDEX TO BEGINNING OF BUFFER
01160 M00S00988.qftlist +++|
01161 M00S00989.qftlist +++|* BUILD *QAC* PARAMETER BLOCK.
01162 M00S00990.qftlist +++|
01163 M00S00991.qftlist +++| SB2 PKLB-1 SET PARAMETER BLOCK LENGTH
01164 M00S00992.qftlist +++| RJ CQP CLEAR *QAC* PARAMETER BLOCK BUFFER
01165 M00S00993.qftlist +++| SX6 PKFC*2 SET FUNCTION CODE
01166 M00S00994.qftlist +++| SX7 RBUF
01167 M00S00995.qftlist +++| SA6 BQAC+FCNQ
01168 M00S00996.qftlist +++| SA7 BQAC+INAQ SET *IN*
01169 M00S00997.qftlist +++| SA7 BQAC+OUTQ SET *OUT*
01170 M00S00998.qftlist +++| SX6 PKLB-5 SET LENGTH OF BLOCK
01171 M00S00999.qftlist +++| LX6 18
01172 M00S01000.qftlist +++| BX6 X6+X7
01173 M00S01001.qftlist +++| SA6 BQAC+FIRQ SET *FIRST*
01174 M00S01002.qftlist +++| SA3 MRPY SET *LIMIT*
01175 M00S01003.qftlist +++| SX4 LRPY
01176 M00S01004.qftlist +++| IX6 X3*X4
01177 M00S01005.qftlist +++| IX6 X6+X7
01178 M00S01006.qftlist +++| SX7 INQQ+PRQQ+PHQQ+PLQQ+WTQQ SET QUEUE TYPES
01179 M00S01007.qftlist +++| LX7 48
01180 M00S01008.qftlist +++| SA6 BQAC+LIMQ
01181 M00S01009.qftlist +++| SA7 BQAC+LNKQ
Line S01010 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01182 M01S01010.ns22000 ---| SX6 ZPSF+OTSF SET ZERO PRIORITY AND ORIGIN FLAGS
Line S00093 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2564
Seq # *Modification Id* Act
----------------------------+
01183 M02S00093.ns2564 ---| SX6 ZPSF SET ZERO PRIORITY SELECTION FLAG
Line S00001 Modification History
M01 (Added by) ns2564
Seq # *Modification Id* Act
----------------------------+
01184 M01S00001.ns2564 +++| SX6 ZPSF+DLSF*10000B SELECT ZERO PRIORITY AND DLID
01185 M00S01011.qftlist +++| SA6 BQAC+SELQ
01186 M00S01012.qftlist +++| MX6 12 SET INFORMATION BITS 13 - 1
01187 M00S01013.qftlist +++| LX6 13
Line S00007 Modification History
M01 (Added by) ns21000
M02 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01188 M02S00007.ns22000 ---| SX7 LDPB SET LID INFORMATION BIT
Line S00094 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01189 M01S00094.ns22000 +++| SX7 LDPB SET LID INFORMATION BIT
01190 M01S00095.ns22000 +++| SX5 ALPB SET ACCESS LEVEL INFORMATION BIT
Line S00008 Modification History
M01 (Added by) ns21000
Seq # *Modification Id* Act
----------------------------+
01191 M01S00008.ns21000 +++| LX7 12
01192 M01S00009.ns21000 +++| BX6 X6+X7
Line S00096 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01193 M01S00096.ns22000 +++| LX5 24
01194 M01S00097.ns22000 +++| BX6 X6+X5
01195 M00S01014.qftlist +++| SA6 BQAC+PIBQ
Line S01015 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01196 M01S01015.ns22000 ---| FRB1 SX7 B7 SET ORIGIN TYPE
01197 M00S01016.qftlist +++| MX6 12 SET COUNT FIELDS
Line S01017 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01198 M01S01017.ns22000 ---| SA7 BQAC+FAMQ
01199 M00S01018.qftlist +++| SA6 BQAC+ENLQ
01200 M00S01019.qftlist +++| MX7 60
01201 M00S01020.qftlist +++| SA7 BQAC+CNTQ
Line S00002 Modification History
M01 (Added by) ns2564
Seq # *Modification Id* Act
----------------------------+
01202 M01S00002.ns2564 +++| SX7 3R*** SET ALL LID SELECTION
01203 M01S00003.ns2564 +++| LX7 24
01204 M01S00004.ns2564 +++| SA7 BQAC+LIDQ
01205 M00S01021.qftlist +++|
01206 M00S01022.qftlist +++|* CALL *QAC*.
01207 M00S01023.qftlist +++|
01208 M00S01024.qftlist +++| SYSTEM QAC,R,BQAC
01209 M00S01025.qftlist +++| SA1 BQAC+FCNQ CHECK FOR ERROR
01210 M00S01026.qftlist +++| MX0 -8
01211 M00S01027.qftlist +++| AX1 10
01212 M00S01028.qftlist +++| BX1 -X0*X1
01213 M00S01029.qftlist +++| SX2 X1-ER07
01214 M00S01030.qftlist +++| ZR X1,FRB2 IF NO ERROR
Line S01031 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01215 M01S01031.ns22000 ---| ZR X2,FRB3 IF NO FILE FOUND
Line S00098 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01216 M01S00098.ns22000 +++| ZR X2,FRBX IF NO FILE FOUND
01217 M00S01032.qftlist +++| SX1 EMQC * QAC ERROR ENCOUNTERED.*
01218 M00S01033.qftlist +++| RJ PSE PROCESS SYSTEM ERROR
01219 M00S01034.qftlist +++|
01220 M00S01035.qftlist +++|* COUNT NUMBER OF ENTRIES RETURNED.
01221 M00S01036.qftlist +++|
01222 M00S01037.qftlist +++| FRB2 MX0 -12
01223 M00S01038.qftlist +++| SA3 NRPY
01224 M00S01039.qftlist +++| SA4 BQAC+CNTQ
01225 M00S01040.qftlist +++| BX1 -X0*X4 PLOT FILE COUNT
01226 M00S01041.qftlist +++| IX3 X1+X3
01227 M00S01042.qftlist +++| LX4 48
01228 M00S01043.qftlist +++| BX1 -X0*X4 PUNCH FILE COUNT
01229 M00S01044.qftlist +++| LX4 48
01230 M00S01045.qftlist +++| IX3 X1+X3
01231 M00S01046.qftlist +++| BX1 -X0*X4 PRINT FILE COUNT
01232 M00S01047.qftlist +++| LX4 36
01233 M00S01048.qftlist +++| IX3 X1+X3
01234 M00S01049.qftlist +++| BX1 -X0*X4 INPUT FILE COUNT
01235 M00S01050.qftlist +++| IX3 X1+X3
01236 M00S01051.qftlist +++| SA4 BQAC+ENLQ TERMINAL OUTPUT FILE COUNT
01237 M00S01052.qftlist +++| LX4 12
01238 M00S01053.qftlist +++| BX4 -X0*X4
01239 M00S01054.qftlist +++| IX6 X3+X4
01240 M00S01055.qftlist +++| SA6 A3+
Line S01056 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01241 M01S01056.ns22000 ---|
01242 M01S01057.ns22000 ---|* PROCESS NEXT ORIGIN TYPE.
01243 M01S01058.ns22000 ---|
01244 M01S01059.ns22000 ---| FRB3 SA5 A5+B1
01245 M01S01060.ns22000 ---| ZR X5,FRBX IF END OF ORIGIN TYPES
01246 M01S01061.ns22000 ---| SB7 X5
01247 M01S01062.ns22000 ---| SA1 BQAC+FCNQ CLEAR COMPLETE BIT
01248 M01S01063.ns22000 ---| MX0 -1
01249 M01S01064.ns22000 ---| BX6 X0*X1
01250 M01S01065.ns22000 ---| SA6 A1
01251 M01S01066.ns22000 ---| EQ FRB1 PROCESS NEXT ORIGIN TYPE
01252 M01S01067.ns22000 ---| TFRB SPACE 4
01253 M01S01068.ns22000 ---|** TFRB - TABLE OF ORIGIN TYPES FOR *FRB* PROCESSING.
01254 M01S01069.ns22000 ---|
01255 M01S01070.ns22000 ---|
01256 M01S01071.ns22000 ---| TFRB BSS 0
01257 M01S01072.ns22000 ---| LOC 0
01258 M01S01073.ns22000 ---| CON BCOR LOCAL BATCH
01259 M01S01074.ns22000 ---| CON RBOR REMOTE BATCH
01260 M01S01075.ns22000 ---| CON 0 END OF TABLE
01261 M01S01076.ns22000 ---| LOC *O
Line S00099 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01262 M01S00099.ns22000 +++| EQ FRBX RETURN
01263 M00S01077.qftlist +++| SRB SPACE 4,10
01264 M00S01078.qftlist +++|** SRB - SORT REPLY BUFFER.
01265 M00S01079.qftlist +++|*
01266 M00S01080.qftlist +++|* ENTRY *RBUF* CONTAINS REPLY ENTRIES.
01267 M00S01081.qftlist +++|* (NRPY) = NUMBER OF ENTRIES IN REPLY BUFFER.
01268 M00S01082.qftlist +++|*
01269 M00S01083.qftlist +++|* EXIT REPLY ENTRIES SORTED BY QFT ORDINAL.
01270 M00S01084.qftlist +++|*
01271 M00S01085.qftlist +++|* USES A - 1, 2.
01272 M00S01086.qftlist +++|* X - 0, 1, 2.
01273 M00S01087.qftlist +++|* B - 2, 3, 4, 5.
01274 M00S01088.qftlist +++|*
01275 M00S01089.qftlist +++|* MACROS MOVE.
01276 M00S01090.qftlist +++|
01277 M00S01091.qftlist +++|
01278 M00S01092.qftlist +++| SRB SUBR ENTRY/EXIT
01279 M00S01093.qftlist +++| MX0 -12
01280 M00S01094.qftlist +++| LX0 24
01281 M00S01095.qftlist +++| SB2 RBUF-LRPY FWA OF FIRST ENTRY IN BUFFER
01282 M00S01096.qftlist +++| SA1 NRPY SET LWA+1 OF LAST REPLY ENTRY
01283 M00S01097.qftlist +++| SX1 X1-1
01284 M00S01098.qftlist +++| SX2 LRPY
01285 M00S01099.qftlist +++| IX2 X1*X2
01286 M00S01100.qftlist +++| SB4 B1 SORT FLAG
01287 M00S01101.qftlist +++| SB3 X2+RBUF
01288 M00S01102.qftlist +++| SRB1 ZR B4,SRBX IF REPLY BUFFER SORTED
01289 M00S01103.qftlist +++| SB4 B0
01290 M00S01104.qftlist +++| SB5 B2
01291 M00S01105.qftlist +++| SRB2 SB5 B5+LRPY
01292 M00S01106.qftlist +++| LE B3,B5,SRB1 IF END OF REPLY BUFFER
01293 M00S01107.qftlist +++| SA1 B5 COMPARE QFT ORDINALS
01294 M00S01108.qftlist +++| SA2 A1+LRPY
01295 M00S01109.qftlist +++| BX1 -X0*X1
01296 M00S01110.qftlist +++| BX2 -X0*X2
01297 M00S01111.qftlist +++| IX1 X2-X1
01298 M00S01112.qftlist +++| PL X1,SRB2 IF SWITCH NOT NECESSARY
01299 M00S01113.qftlist +++| MOVE LRPY,B5,OBUF MAKE SWITCH
01300 M00S01114.qftlist +++| MOVE LRPY,B5+LRPY,B5
01301 M00S01115.qftlist +++| MOVE LRPY,OBUF,LRPY+B5
01302 M00S01116.qftlist +++| SB4 B1 SET SORT FLAG
01303 M00S01117.qftlist +++| EQ SRB2 CONTINUE SORT
01304 M00S01118.qftlist +++| TITLE SUBROUTINES.
01305 M00S01119.qftlist +++| AQF SPACE 4,20
01306 M00S01120.qftlist +++|** AQF - ALTER QUEUED FILE.
01307 M00S01121.qftlist +++|*
01308 M00S01122.qftlist +++|* ENTRY (A0) = FWA OF *PEEK* REPLY ENTRY.
01309 M00S01123.qftlist +++|*
01310 M00S01124.qftlist +++|* EXIT (X2) = 0, IF FILE ALTERED.
01311 M00S01125.qftlist +++|* (X2) = -1, INVALID FAMILY/USER SPECIFIED.
01312 M00S01126.qftlist +++|*
01313 M00S01127.qftlist +++|* ERROR TO *PSE*, IF ERROR.
01314 M00S01128.qftlist +++|*
01315 M00S01129.qftlist +++|* USES X - ALL.
01316 M00S01130.qftlist +++|* A - 1, 2, 3, 4, 5, 6, 7.
01317 M00S01131.qftlist +++|* B - 2, 4, 5, 7.
01318 M00S01132.qftlist +++|*
01319 M00S01133.qftlist +++|* CALLS CQP.
01320 M00S01134.qftlist +++|*
Line S01135 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01321 M01S01135.ns22000 ---|* MACROS SYSTEM.
Line S00100 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01322 M01S00100.ns22000 +++|* MACROS GETUSV, SYSTEM.
01323 M00S01136.qftlist +++|
01324 M00S01137.qftlist +++|
01325 M00S01138.qftlist +++| AQF SUBR ENTRY/EXIT
01326 M00S01139.qftlist +++| SB2 ALLB-1 SET BLOCK LENGTH
01327 M00S01140.qftlist +++| RJ CQP CLEAR CONTENTS OF PARAMETER BLOCK
01328 M00S01141.qftlist +++|
01329 M00S01142.qftlist +++|* SET SELECTION CRITERIA FOR FILE.
01330 M00S01143.qftlist +++|
01331 M00S01144.qftlist +++| SX6 ALFC*2 SET FUNCTION CODE
01332 M00S01145.qftlist +++| SX7 ALLB-5 SET PARAMETER BLOCK LENGTH
01333 M00S01146.qftlist +++| LX7 18
Line S00101 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01334 M01S00101.ns22000 +++| SB4 B0 SET DESTINATION *FM,UN* SPECIFIED
01335 M00S01147.qftlist +++| SA6 BQAC+FCNQ
01336 M00S01148.qftlist +++| SA7 BQAC+FIRQ
01337 M00S01149.qftlist +++| MX0 -15
01338 M00S01150.qftlist +++| LX0 21
01339 M00S01151.qftlist +++| SA5 A0+B1 SET ORIGIN TYPE
01340 M00S01152.qftlist +++| BX1 -X0*X5 SAVE DISPOSITION CODE AND EC
01341 M00S01153.qftlist +++| MX0 6
01342 M00S01154.qftlist +++| LX0 54
01343 M00S01155.qftlist +++| SA3 A0+4 GET DEST. UN, BATCH ID
01344 M00S01156.qftlist +++| BX5 X0*X5
01345 M00S01157.qftlist +++| AX5 48
Line S01158 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01346 M01S01158.ns22000 ---| SB4 X5-RBOR
01347 M01S01159.ns22000 ---| ZR B4,AQF1 IF REMOTE BATCH FILE
Line S00102 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01348 M01S00102.ns22000 +++| MX2 42
01349 M01S00103.ns22000 +++| BX2 X2*X3
01350 M01S00104.ns22000 +++| NZ X2,AQF1 IF DESTINATION *FM,UN* SPECIFIED
01351 M01S00105.ns22000 +++| SB4 B1+ INDICATE BATCH ID SPECIFIED
01352 M00S01160.qftlist +++| SB5 IDSF SET BATCH ID SELECTION FLAG
01353 M00S01161.qftlist +++| LX0 -36
01354 M00S01162.qftlist +++| BX2 X2-X2 CLEAR USER NUMBER
01355 M00S01163.qftlist +++| EQ AQF2 SET INFORMATION INTO PARAMETER BLOCK
01356 M00S01164.qftlist +++|
01357 M00S01165.qftlist +++| AQF1 SB5 FMSF SET DEST. *FM,UN* SELECTION FLAG
01358 M00S01166.qftlist +++| SA3 A0+3 GET FAMILY NAME
01359 M00S01167.qftlist +++| MX0 -18
01360 M00S01168.qftlist +++| SA2 A0+4 GET USER NUMBER
01361 M00S01169.qftlist +++| BX2 X0*X2
01362 M00S01170.qftlist +++| AQF2 BX3 X0*X3
01363 M00S01171.qftlist +++| BX6 X3+X5 SET FAMILY NAME, BATCH ID, ORIGIN
01364 M00S01172.qftlist +++| SA6 BQAC+FAMQ
01365 M00S01173.qftlist +++| BX7 X2 SET USER NUMBER
01366 M00S01174.qftlist +++| SA7 A6+DUNQ-FAMQ
01367 M00S01175.qftlist +++| SA4 A0 GET JSN, ORDINAL, QUEUE TYPE
01368 M00S01176.qftlist +++| SA5 AQFB SET JSN, SELECTION FLAGS
01369 M00S01177.qftlist +++| MX0 24
01370 M00S01178.qftlist +++| SX7 B5
01371 M00S01179.qftlist +++| BX7 X5+X7
01372 M00S01180.qftlist +++| BX3 X0*X4
01373 M00S01181.qftlist +++| BX7 X7+X3
Line S00005 Modification History
M01 (Added by) ns2564
Seq # *Modification Id* Act
----------------------------+
01374 M01S00005.ns2564 +++| SX0 DLSF*10000B SET LID SELECTION
01375 M01S00006.ns2564 +++| BX7 X7+X0
01376 M00S01182.qftlist +++| MX0 12 SET QFT ORDINAL
01377 M00S01183.qftlist +++| SA7 BQAC+SELQ
Line S00007 Modification History
M01 (Added by) ns2564
Seq # *Modification Id* Act
----------------------------+
01378 M01S00007.ns2564 +++| SX7 3R*** SET ALL LIDS SELECTED
01379 M01S00008.ns2564 +++| LX7 24
01380 M01S00009.ns2564 +++| SA7 BQAC+LIDQ
01381 M00S01184.qftlist +++| LX0 36
01382 M00S01185.qftlist +++| BX6 X0*X4
01383 M00S01186.qftlist +++| LX6 12
01384 M00S01187.qftlist +++| LX0 48 SET QUEUE TYPE
01385 M00S01188.qftlist +++| SA6 BQAC+LIMQ
01386 M00S01189.qftlist +++| BX7 X0*X4
01387 M00S01190.qftlist +++| LX7 36
01388 M00S01191.qftlist +++| BX7 X7+X1 SET DISPOSITION CODE AND EC
01389 M00S01192.qftlist +++| SA7 BQAC+LNKQ
01390 M00S01193.qftlist +++| LX7 9 SAVE QUEUE TYPE
01391 M00S01194.qftlist +++| SB7 X7
01392 M00S01195.qftlist +++|
01393 M00S01196.qftlist +++|* SET INFORMATION TO BE ALTERED.
01394 M00S01197.qftlist +++|
01395 M00S01198.qftlist +++| SA4 TARG+AROP
01396 M00S01199.qftlist +++| SX7 B1 PRESET ROUTING INFORMATION REQUIRED
01397 M00S01200.qftlist +++| BX5 X5-X5 CLEAR *ALTER* FLAGS
01398 M00S01201.qftlist +++| SX3 X4-BCOP
01399 M00S01202.qftlist +++| ZR X3,AQF4 IF ALTER TO LOCAL BATCH
01400 M00S01203.qftlist +++| SX3 X4-RBOP
01401 M00S01204.qftlist +++| ZR X3,AQF6 IF ALTER TO REMOTE BATCH
01402 M00S01205.qftlist +++| SX7 B0+ SET ROUTING INFORMATION NOT REQUIRED
01403 M00S01206.qftlist +++| SX3 X4-NCOP
Line S01207 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01404 M01S01207.ns22000 ---| ZR X3,AQF3 IF NO CHANGE IN ORIGIN
Line S00106 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01405 M01S00106.ns22000 +++| ZR X3,AQF3 IF NO CHANGE IN FILE DESTINATION
01406 M00S01208.qftlist +++| SX5 AJAF SET EVICT FLAG
01407 M00S01209.qftlist +++| EQ AQF9 FINISH PARAMETER BLOCK
01408 M00S01210.qftlist +++|
01409 M00S01211.qftlist +++| AQF3 ZR B4,AQF6 IF REMOTE BATCH FILE
01410 M00S01212.qftlist +++| AQF4 SX2 B0+ CLEAR FAMILY NAME
01411 M00S01213.qftlist +++| SA2 TARG+ARNI
01412 M00S01214.qftlist +++| NG X2,AQF5 IF NEW ID SPECIFIED
01413 M00S01215.qftlist +++| ZR X7,AQF7 IF NEW ID NOT REQUIRED
01414 M00S01216.qftlist +++| AQF5 MX0 -6 SET NEW ID
01415 M00S01217.qftlist +++| SX5 X5+IDAF SET LOCAL BATCH ID *ALTER* FLAG
01416 M00S01218.qftlist +++| BX3 -X0*X2
01417 M00S01219.qftlist +++| EQ AQF7 SET IN PARAMETER BLOCK
01418 M00S01220.qftlist +++|
01419 M00S01221.qftlist +++| AQF6 SA2 TARG+ARND
01420 M00S01222.qftlist +++| SA3 TARG+ARNU
01421 M00S01223.qftlist +++| BX4 X2+X3
01422 M00S01224.qftlist +++| BX4 X4+X7
01423 M00S01225.qftlist +++| ZR X4,AQF8 IF NEW FAMILY AND USER NUMBER NOT REQUIRED
01424 M00S01226.qftlist +++| SX5 FMAF SET *ALTER* FLAG
01425 M00S01227.qftlist +++| AQF7 BX6 X2 ENTER ROUTING INFORMATION INTO BLOCK
01426 M00S01228.qftlist +++| BX7 X3
01427 M00S01229.qftlist +++| SA6 BQAC+NDFQ
01428 M00S01230.qftlist +++| SA7 A6+NUNQ-NDFQ
Line S01231 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01429 M01S01231.ns22000 ---| AQF8 SX6 B0+ CLEAR NEW FILE CHARACTERISTICS
01430 M01S01232.ns22000 ---| SA2 TARG+ARNP
Line S00107 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01431 M01S00107.ns22000 +++| AQF8 SA2 TARG+ARAL
01432 M01S00108.ns22000 +++| SX6 B0+ PRESET NEW FILE CHARACTERISTICS
01433 M01S00109.ns22000 +++| NG X2,AQF8.2 IF NEW ACCESS LEVEL NOT SPECIFIED
01434 M01S00110.ns22000 +++| GETUSV AQFC GET SECURITY VALIDATIONS
01435 M01S00111.ns22000 +++| SA3 AQFC
01436 M01S00112.ns22000 +++| NG X3,AQF8.1 IF SECURITY ADMINISTRATOR PRIVILEGES
01437 M01S00113.ns22000 +++| SX5 =C* NOT VALIDATED TO CHANGE ACCESS LEVEL. *
01438 M01S00114.ns22000 +++| SX2 2 SET ERROR ENCOUNTERED
01439 M01S00115.ns22000 +++| EQ AQFX RETURN
01440 M01S00116.ns22000 +++|
01441 M01S00117.ns22000 +++| AQF8.1 SA2 TARG+ARAL
01442 M01S00118.ns22000 +++| MX0 -3
01443 M01S00119.ns22000 +++| BX6 -X0*X2
01444 M01S00120.ns22000 +++| LX6 18
01445 M01S00121.ns22000 +++| SX5 X5+LVAF SET *ALTER* FLAG
01446 M01S00122.ns22000 +++| AQF8.2 SA2 TARG+ARNP
01447 M00S01233.qftlist +++| PL X2,AQF9 IF NEW PRIORITY NOT SPECIFIED
01448 M00S01234.qftlist +++| MX0 -12
Line S01235 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01449 M01S01235.ns22000 ---| BX6 -X0*X2
01450 M01S01236.ns22000 ---| LX6 48
Line S00123 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01451 M01S00123.ns22000 +++| BX2 -X0*X2
01452 M01S00124.ns22000 +++| LX2 48
01453 M01S00125.ns22000 +++| BX6 X6+X2
01454 M00S01237.qftlist +++| SX5 X5+PRAF SET *ALTER* FLAG
01455 M00S01238.qftlist +++| AQF9 SA1 TARG+ARNC
01456 M00S01239.qftlist +++| ZR X1,AQF11 IF NEW FORMS CODE NOT SPECIFIED
01457 M00S01240.qftlist +++| SX0 2R**
01458 M00S01241.qftlist +++| LX0 59-11
01459 M00S01242.qftlist +++| BX2 X0-X1
01460 M00S01243.qftlist +++| NZ X2,AQF10 IF NOT NULL FORMS CODE
01461 M00S01244.qftlist +++| SX1 B0+
01462 M00S01245.qftlist +++| AQF10 LX1 48
01463 M00S01246.qftlist +++| BX6 X1+X6
01464 M00S01247.qftlist +++| SX5 X5+FCAF SET *ALTER* FLAG
01465 M00S01248.qftlist +++| AQF11 SA1 TARG+ARNR
01466 M00S01249.qftlist +++| PL X1,AQF12 IF NO REPEAT COUNT
01467 M00S01250.qftlist +++| SX1 X1
01468 M00S01251.qftlist +++| BX6 X1+X6
01469 M00S01252.qftlist +++| SX5 X5+RCAF SET *ALTER* FLAG
01470 M00S01253.qftlist +++| AQF12 SA1 TARG+ARDC
01471 M00S01254.qftlist +++| ZR X1,AQF13 IF NEW DISPOSITION CODE NOT SPECIFIED
01472 M00S01255.qftlist +++| LX1 42
01473 M00S01256.qftlist +++| SA2 TNDC-1
01474 M00S01257.qftlist +++| RJ STE SEARCH FOR TABLE ENTRY
01475 M00S01258.qftlist +++| ZR X2,AQF13 IF INVALID CHANGE
01476 M00S01259.qftlist +++| AX3 6
01477 M00S01260.qftlist +++| MX0 -12
01478 M00S01261.qftlist +++| LX0 24
01479 M00S01262.qftlist +++| BX3 -X0*X3
01480 M00S01263.qftlist +++| BX6 X3+X6
01481 M00S01264.qftlist +++| SX5 X5+DSAF SET *ALTER* FLAG
01482 M00S01265.qftlist +++| AQF13 SA1 TARG+ARNE CHECK FOR NEW EXTERNAL CHARACTERISTICS
01483 M00S01266.qftlist +++| SA2 B7+TNEC GET SHIFT COUNT
01484 M00S01267.qftlist +++| SB4 X2
01485 M00S01268.qftlist +++| LX1 B4,X1
01486 M00S01269.qftlist +++| PL X1,AQF14 IF NEW EC NOT SPECIFIED
01487 M00S01270.qftlist +++| MX0 -3 SET NEW EC INTO PARAMETER BLOCK
01488 M00S01271.qftlist +++| LX1 12
01489 M00S01272.qftlist +++| BX1 -X0*X1
01490 M00S01273.qftlist +++| LX1 21
01491 M00S01274.qftlist +++| BX6 X1+X6
01492 M00S01275.qftlist +++| SX5 X5+ECAF SET *ALTER* FLAG
Line S01276 Modification History
M01 (Removed by) ns21000
Seq # *Modification Id* Act
----------------------------+
01493 M01S01276.ns21000 ---| AQF14 BX7 X5 SET *ALTER* FLAGS INTO PARAMETER BLOCK
Line S00010 Modification History
M01 (Added by) ns21000
Seq # *Modification Id* Act
----------------------------+
01494 M01S00010.ns21000 +++| AQF14 SA1 TARA+ARNL CHECK *NLD*
01495 M01S00011.ns21000 +++| LX1 18
01496 M01S00012.ns21000 +++| MX3 -18
01497 M01S00013.ns21000 +++| BX1 -X3*X1
01498 M01S00014.ns21000 +++| SX7 1L0
01499 M01S00015.ns21000 +++| BX7 X7-X1
01500 M01S00016.ns21000 +++| ZR X1,AQF16 IF NO *NLD* SPECIFIED
01501 M01S00017.ns21000 +++| ZR X7,AQF15 IF *NLD* OF *0* SPECIFIED
01502 M01S00018.ns21000 +++| SA2 BQAC+NDFQ MASK NEW LID INTO *QAC* BLOCK
01503 M01S00019.ns21000 +++| BX7 X3*X2
01504 M01S00020.ns21000 +++| BX7 X1+X7
01505 M01S00021.ns21000 +++| SA7 A2+
01506 M01S00022.ns21000 +++| AQF15 SX7 DLAF SET *ALTER* FLAG
01507 M01S00023.ns21000 +++| LX7 12
01508 M01S00024.ns21000 +++| BX5 X5+X7
01509 M01S00025.ns21000 +++| AQF16 BX7 X5 SET *ALTER FLAGS* INTO PARAMETER BLOCK
Line S01277 Modification History
M01 (Removed by) ns21000
Seq # *Modification Id* Act
----------------------------+
01510 M01S01277.ns21000 ---| ZR X7,AQF15 IF NO *ALTER* FLAGS SET
Line S00026 Modification History
M01 (Added by) ns21000
Seq # *Modification Id* Act
----------------------------+
01511 M01S00026.ns21000 +++| ZR X7,AQF18 IF NO *ALTER* FLAGS SET
01512 M00S01278.qftlist +++| SA6 BQAC+NFCQ SET NEW FILE CHARACTERISTICS
01513 M00S01279.qftlist +++| SA7 A6+SSWQ-NFCQ
01514 M00S01280.qftlist +++| CX1 X7
01515 M00S01281.qftlist +++| SX1 X1-1
Line S01282 Modification History
M01 (Removed by) ns21000
Seq # *Modification Id* Act
----------------------------+
01516 M01S01282.ns21000 ---| NZ X1,AQF14.1 IF MORE THAN ONE *ALTER* FLAG SELECTED
Line S00027 Modification History
M01 (Added by) ns21000
Seq # *Modification Id* Act
----------------------------+
01517 M01S00027.ns21000 +++| NZ X1,AQF17 IF MORE THAN ONE *ALTER FLAG* SET
01518 M00S01283.qftlist +++| SX2 DSAF CHECK FOR *NDC*
01519 M00S01284.qftlist +++| BX1 X2*X7
Line S01285 Modification History
M01 (Removed by) ns21000
Seq # *Modification Id* Act
----------------------------+
01520 M01S01285.ns21000 ---| ZR X1,AQF14.1 IF NOT DISPOSITION CODE TO BE ALTERED
Line S00028 Modification History
M01 (Added by) ns21000
Seq # *Modification Id* Act
----------------------------+
01521 M01S00028.ns21000 +++| ZR X1,AQF17 IF NOT DISPOSITION CODE TO BE ALTERED
01522 M00S01286.qftlist +++| SA1 BQAC+LNKQ CHECK FOR PRINT FILE
01523 M00S01287.qftlist +++| AX1 48
01524 M00S01288.qftlist +++| SX1 X1-PRQQ
Line S01289 Modification History
M01 (Removed by) ns21000
Seq # *Modification Id* Act
----------------------------+
01525 M01S01289.ns21000 ---| NZ X1,AQF15 IF NOT PRINT FILE
Line S00029 Modification History
M01 (Added by) ns21000
Seq # *Modification Id* Act
----------------------------+
01526 M01S00029.ns21000 +++| NZ X1,AQF18 IF NOT PRINT FILE
01527 M00S01290.qftlist +++|
01528 M00S01291.qftlist +++|* CALL *QAC* TO ALTER FILE.
01529 M00S01292.qftlist +++|
Line S01293 Modification History
M01 (Removed by) ns21000
Seq # *Modification Id* Act
----------------------------+
01530 M01S01293.ns21000 ---| AQF14.1 SYSTEM QAC,R,BQAC
Line S00030 Modification History
M01 (Added by) ns21000
Seq # *Modification Id* Act
----------------------------+
01531 M01S00030.ns21000 +++| AQF17 SYSTEM QAC,R,BQAC
01532 M00S01294.qftlist +++| MX0 -8 CHECK ERROR CODE
01533 M00S01295.qftlist +++| SA1 BQAC+FCNQ
01534 M00S01296.qftlist +++| AX1 10
01535 M00S01297.qftlist +++| BX2 -X0*X1
01536 M00S01298.qftlist +++| SX3 X2-ER07
01537 M00S01299.qftlist +++| SX4 X2-ER02
01538 M00S01300.qftlist +++| ZR X2,AQFX IF NO ERROR
Line S00126 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01539 M01S00126.ns22000 +++| SX1 X2-ER21
01540 M00S01301.qftlist +++| SX2 B1+ SET FILE NOT ALTERED
01541 M00S01302.qftlist +++| ZR X3,AQFX IF FILE NOT FOUND
Line S00127 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01542 M01S00127.ns22000 +++| ZR X1,AQFX IF INVALID ACCESS LEVEL
01543 M00S01303.qftlist +++| SX5 -AQFA * NEW DESTINATION FAMILY/USER INVALID.*
01544 M00S01304.qftlist +++| SX2 -1
01545 M00S01305.qftlist +++| ZR X4,AQFX IF INVALID ROUTING INFORMATION
01546 M00S01306.qftlist +++| SX1 EMQC * QAC ERROR RETURNED.*
01547 M00S01307.qftlist +++| RJ PSE PROCESS SYSTEM ERROR
01548 M00S01308.qftlist +++|
Line S01309 Modification History
M01 (Removed by) ns21000
Seq # *Modification Id* Act
----------------------------+
01549 M01S01309.ns21000 ---| AQF15 SX2 B1+ SET FILE NOT ALTERED
Line S00031 Modification History
M01 (Added by) ns21000
Seq # *Modification Id* Act
----------------------------+
01550 M01S00031.ns21000 +++| AQF18 SX2 B1 CLEAR FILE ALTERED
01551 M00S01310.qftlist +++| EQ AQFX RETURN
01552 M00S01311.qftlist +++|
01553 M00S01312.qftlist +++| AQFA DATA C* NEW DESTINATION FAMILY/USER INVALID.*
01554 M00S01313.qftlist +++|
01555 M00S01314.qftlist +++|* SET SPECIFIC ORDINAL, ZERO PRIORITY, ORIGIN, JSN,
01556 M00S01315.qftlist +++|* DISPOSITION CODE AND EXPLICIT EXTERNAL CHARACTERISTICS
01557 M00S01316.qftlist +++|* SELECTION FLAGS.
01558 M00S01317.qftlist +++|
01559 M00S01318.qftlist +++| AQFB VFD 24/0,36/SOSF+ZPSF+OTSF+JSSF+DSSF+ECSF
Line S00128 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01560 M01S00128.ns22000 +++|
01561 M01S00129.ns22000 +++| AQFC CON 0 *GETUSV* REPLY WORD
01562 M01S00130.ns22000 +++| AQFD DATA C* NOT VALIDATED TO CHANGE ACCESS LEVEL.*
01563 M00S01319.qftlist +++| BDL SPACE 4,10
01564 M00S01320.qftlist +++|** BDL - BUILD K-DISPLAY LINE.
01565 M00S01321.qftlist +++|*
01566 M00S01322.qftlist +++|* ENTRY (A0) = FWA OF REPLY ENTRY.
01567 M00S01323.qftlist +++|*
01568 M00S01324.qftlist +++|* EXIT STRING BUFFER SET.
01569 M00S01325.qftlist +++|*
01570 M00S01326.qftlist +++|* USES X - 0, 1, 2, 3, 4, 5, 6.
01571 M00S01327.qftlist +++|* A - 1, 2, 4, 5.
01572 M00S01328.qftlist +++|* B - 3, 4, 5, 6, 7.
01573 M00S01329.qftlist +++|*
01574 M00S01330.qftlist +++|* CALLS COD, ESB, SFN, STE.
01575 M00S01331.qftlist +++|
01576 M00S01332.qftlist +++|
01577 M00S01333.qftlist +++| BDL SUBR ENTRY/EXIT
01578 M00S01334.qftlist +++| SB6 B0 CLEAR BUFFER INDEX
01579 M00S01335.qftlist +++| SX6 B0 CLEAR CHARACTER COUNT
01580 M00S01336.qftlist +++| SA6 CHCT
01581 M00S01337.qftlist +++|
01582 M00S01338.qftlist +++|* SET QFT ORDINAL.
01583 M00S01339.qftlist +++|
01584 M00S01340.qftlist +++| MX0 -12
01585 M00S01341.qftlist +++| SA5 A0 GET QFT ORDINAL
01586 M00S01342.qftlist +++| LX5 36
01587 M00S01343.qftlist +++| BX1 -X0*X5
01588 M00S01344.qftlist +++| RJ COD CONVERT TO DISPLAY CODE
Line S01345 Modification History
M01 (Removed by) 241l630
Seq # *Modification Id* Act
----------------------------+
01589 M01S01345.241l630 ---| SB7 4
Line S00016 Modification History
M01 (Added by) 241l630
Seq # *Modification Id* Act
----------------------------+
01590 M01S00016.241l630 +++| SB7 6
01591 M00S01346.qftlist +++| LX6 36
01592 M00S01347.qftlist +++| LX5 12
01593 M00S01348.qftlist +++| RJ ESB ENTER STRING BUFFER
Line S00006 Modification History
M01 (Added by) qftli5
Seq # *Modification Id* Act
----------------------------+
01594 M01S00006.qftli5 +++| MX0 -12
Line S01349 Modification History
M01 (Removed by) 241l630
Seq # *Modification Id* Act
----------------------------+
01595 M01S01349.241l630 ---| SX6 2R. SET PERIOD
01596 M01S01350.241l630 ---| SB7 2
01597 M01S01351.241l630 ---| LX6 48
01598 M01S01352.241l630 ---| RJ ESB ENTER STRING BUFFER
01599 M00S01353.qftlist +++| BX6 -X0*X5 SAVE QUEUE TYPE
01600 M00S01354.qftlist +++| LX5 12
01601 M00S01355.qftlist +++| SB5 X6
01602 M00S01356.qftlist +++|
Line S01357 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01603 M01S01357.ns22000 ---|* SET JSN AND ORIGIN TYPE.
Line S00131 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01604 M01S00131.ns22000 +++|* SET JSN AND SERVICE CLASS.
01605 M00S01358.qftlist +++|
01606 M00S01359.qftlist +++| MX0 24 SET JSN
01607 M00S01360.qftlist +++| BX6 X0*X5
01608 M00S01361.qftlist +++| SB7 4
01609 M00S01362.qftlist +++| RJ ESB ENTER STRING BUFFER
Line S01363 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01610 M01S01363.ns22000 ---| SA4 A0+B1 SET ORIGIN TYPE, PERIOD, SPACE
01611 M01S01364.ns22000 ---| LX4 12
Line S00132 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01612 M01S00132.ns22000 +++| SA4 A0+B1 SET SERVICE CLASS, PERIOD, SPACE
01613 M01S00133.ns22000 +++| LX4 6
01614 M00S01365.qftlist +++| MX0 -6
01615 M00S01366.qftlist +++| BX1 -X0*X4
Line S01367 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01616 M01S01367.ns22000 ---| SB4 X1 SAVE ORIGIN TYPE
01617 M00S01368.qftlist +++| LX1 42
Line S01369 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01618 M01S01369.ns22000 ---| SA2 TOTC-1
Line S00134 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01619 M01S00134.ns22000 +++| SA2 TSCC-1
01620 M00S01370.qftlist +++| RJ STE SEARCH FOR TABLE ENTRY
01621 M00S01371.qftlist +++| BX6 X3
01622 M00S01372.qftlist +++| LX6 18
01623 M00S01373.qftlist +++| SB7 3
01624 M00S01374.qftlist +++| RJ ESB ENTER STRING BUFFER
01625 M00S01375.qftlist +++| MX0 12
01626 M00S01376.qftlist +++|
01627 M00S01377.qftlist +++|* SET DISPOSITION CODE.
01628 M00S01378.qftlist +++|
01629 M00S01379.qftlist +++| SA5 A0+B1
01630 M00S01380.qftlist +++| LX5 24
01631 M00S01381.qftlist +++| BX1 X0*X5
01632 M00S01382.qftlist +++| RJ SFN SPACE FILL NAME
01633 M00S01383.qftlist +++| SB7 3
01634 M00S01384.qftlist +++| RJ ESB ENTER STRING BUFFER
Line S00032 Modification History
M01 (Added by) ns21000
Seq # *Modification Id* Act
----------------------------+
01635 M01S00032.ns21000 +++|
01636 M01S00033.ns21000 +++|* SET DESTINATION LOGICAL IDENTIFIER.
01637 M01S00034.ns21000 +++|
01638 M01S00035.ns21000 +++| SA1 A0+12
01639 M01S00036.ns21000 +++| LX1 6
01640 M01S00037.ns21000 +++| MX0 18
01641 M01S00038.ns21000 +++| BX1 X0*X1
01642 M01S00039.ns21000 +++| RJ SFN SPACE FILL LID
01643 M01S00040.ns21000 +++| SB7 4
01644 M01S00041.ns21000 +++| RJ ESB ENTER STRING BUFFER
01645 M00S01385.qftlist +++|
01646 M00S01386.qftlist +++|* SET DESTINATION FAMILY, USER NUMBER AND UI/ID.
01647 M00S01387.qftlist +++|
01648 M00S01388.qftlist +++| SA1 A0+3
01649 M00S01389.qftlist +++| RJ SFN SPACE FILL FAMILY NAME
01650 M00S01390.qftlist +++| SB7 8