cdc:nos2.source:opl.opl871:deck:qdsplay
Deck QDSPLAY
9 Modifications
Listing Sections
- Deck QDSPLAY Start
- Deck QDSPLAY Part 1 (Line 1331)
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.qdsplay +++| IDENT QDSPLAY,FWA,QDSPLAY 00002 M01S00002.qdsplay +++| ABS 00003 M01S00003.qdsplay +++| ENTRY QDSPLAY 00004 M01S00004.qdsplay +++| ENTRY RFL= 00005 M01S00005.qdsplay +++| ENTRY SSJ= 00006 M01S00006.qdsplay +++| SYSCOM B1 DEFINE (B1) = 1 00007 M01S00007.qdsplay +++| SST 00008 M01S00008.qdsplay +++| TITLE QDSPLAY - QUEUED FILE DISPLAY. 00009 M01S00009.qdsplay +++| SPACE 4,10 00010 M01S00010.qdsplay +++|*COMMENT QDSPLAY - QUEUED FILE DISPLAY.
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00011 M02S00011.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1980. 00012 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00013 M01S00012.qdsplay +++| SPACE 4,10 00014 M01S00013.qdsplay +++|***** QDSPLAY - DISPLAY QUEUED FILE. 00015 M01S00014.qdsplay +++|* 00016 M01S00015.qdsplay +++|* C. P. GERR. 81/12/01. 00017 M01S00016.qdsplay +++| SPACE 4,10 00018 M01S00017.qdsplay +++|*** *QDSPLAY* IS AN *L* DISPLAY UTILITY INITIATED 00019 M01S00018.qdsplay +++|* BY A CONSOLE OPERATOR (VIA *DSD*) WHICH DISPLAYS 00020 M01S00019.qdsplay +++|* PORTIONS OF A QUEUED FILE. 00021 M01S00020.qdsplay +++| SPACE 4,10
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00022 M02S00021.v23l617 ---|*** CONTROL STATEMENT CALL. 00023 M01S00001.v23l617 +++|*** COMMAND FORMAT. 00024 M01S00022.qdsplay +++|* 00025 M01S00023.qdsplay +++|* 00026 M01S00024.qdsplay +++|* QDSPLAY(JSN) 00027 M01S00025.qdsplay +++|* 00028 M01S00026.qdsplay +++|* JSN = JOB SEQUENCE NUMBER OF QUEUED FILE. 00029 M01S00027.qdsplay +++|* 00030 M01S00028.qdsplay +++|* ONLY INPUT, PRINT, TERMINAL WAIT, PUNCH AND PLOT TYPE FILES 00031 M01S00029.qdsplay +++|* ARE DISPLAYED. 00032 M01S00030.qdsplay +++| SPACE 4,10 00033 M01S00031.qdsplay +++|*** DAYFILE MESSAGES. 00034 M01S00032.qdsplay +++|* 00035 M01S00033.qdsplay +++|* THESE MESSAGES ARE ISSUED TO THE JOB AND SYSTEM DAYFILES. 00036 M01S00034.qdsplay +++|*
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00037 M02S00035.v23l617 ---|* * INVALID USER ACCESS.* 00038 M01S00002.v23l617 +++|* * USER ACCESS NOT VALID.* 00039 M01S00036.qdsplay +++|* CALLING JOB WAS NOT SYSTEM ORIGIN. 00040 M01S00037.qdsplay +++|*
| Line S00038 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00041 M02S00038.v23l617 ---|* * INVALID JSN.* 00042 M01S00003.v23l617 +++|* * INCORRECT JSN.* 00043 M01S00039.qdsplay +++|* JSN WAS GREATER THAN 4 CHARACTERS OR LESS THAN 3 00044 M01S00040.qdsplay +++|* CHARACTERS. 00045 M01S00041.qdsplay +++|* 00046 M01S00042.qdsplay +++|* * ARGUMENT ERROR.*
| Line S00043 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00047 M02S00043.v23l617 ---|* JSN WAS NOT ENTERED IN THE CONTROL STATEMENT CALL OR 00048 M01S00004.v23l617 +++|* JSN WAS NOT ENTERED IN THE COMMAND CALL OR 00049 M01S00044.qdsplay +++|* MORE THAN ONE PARAMETER WAS ENTERED. 00050 M01S00045.qdsplay +++|* 00051 M01S00046.qdsplay +++|* * JSN XXXX NOT FOUND.* 00052 M01S00047.qdsplay +++|* JSN XXXX WAS NOT FOUND IN INPUT, PRINT, PLOT, TERMINAL 00053 M01S00048.qdsplay +++|* WAIT OR PUNCH QUEUE. *XXXX* IS REPLACED BY JSN. 00054 M01S00049.qdsplay +++|* 00055 M01S00050.qdsplay +++|* * CANNOT ACCESS L-DISPLAY.* 00056 M01S00051.qdsplay +++|* *DSD* DETECTED AN ERROR CONDITION WHEN INPUT WAS 00057 M01S00052.qdsplay +++|* ENTERED VIA THE *L* DISPLAY. 00058 M01S00053.qdsplay +++|* 00059 M01S00054.qdsplay +++| SPACE 4,10 00060 M01S00055.qdsplay +++|*** *L* DISPLAY ERROR MESSAGES. 00061 M01S00056.qdsplay +++|* 00062 M01S00057.qdsplay +++|* THESE MESSAGES ARE ISSUED THROUGH THE *L* DISPLAY. 00063 M01S00058.qdsplay +++|* 00064 M01S00059.qdsplay +++|* *NO DAYFILE FOUND.* 00065 M01S00060.qdsplay +++|* DAYFILE FOR JOB DOES NOT EXIST. 00066 M01S00061.qdsplay +++|* 00067 M01S00062.qdsplay +++|* *UNRECOGNIZABLE DIRECTIVE.*
| Line S00063 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00068 M02S00063.v23l617 ---|* INVALID COMMAND WAS ENTERED VIA *L* DISPLAY. 00069 M01S00005.v23l617 +++|* INCORRECT COMMAND WAS ENTERED VIA *L* DISPLAY. 00070 M01S00064.qdsplay +++|* 00071 M01S00065.qdsplay +++|* *DIRECTIVE NOT ALLOWED.* 00072 M01S00066.qdsplay +++|* A SKIP COMMAND WAS ENTERED WHEN *SS* OR *HELP* DATA 00073 M01S00067.qdsplay +++|* WAS DISPLAYED OR *L* DISPLAY FORMAT WAS IN OCTAL 00074 M01S00068.qdsplay +++|* MODE. 00075 M01S00069.qdsplay +++|*
| Line S00070 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00076 M02S00070.v23l617 ---|* *INVALID SKIP COUNT.* 00077 M01S00006.v23l617 +++|* *INCORRECT SKIP COUNT.* 00078 M01S00071.qdsplay +++|* AN ASTERISK WAS PRESENT ON A SKIP LINE, SKIP PAGE, OR 00079 M01S00072.qdsplay +++|* SKIP RECORD BACKWARD COMMAND OR THE SKIP COUNT WAS 00080 M01S00073.qdsplay +++|* GREATER THAN 377777B OR THE SKIP COUNT WAS NOT 00081 M01S00074.qdsplay +++|* NUMERIC. 00082 M01S00075.qdsplay +++|* 00083 M01S00076.qdsplay +++|* *EXCESS PARAMETERS.* 00084 M01S00077.qdsplay +++|* A SECOND PARAMETER WAS SPECIFIED ON A COMMAND WHICH 00085 M01S00078.qdsplay +++|* WAS NOT A SKIP COMMAND. 00086 M01S00079.qdsplay +++|* 00087 M01S00080.qdsplay +++|* *SYSTEM ABORT.* 00088 M01S00081.qdsplay +++|* A SYSTEM ERROR WAS ENCOUNTERED. 00089 M01S00082.qdsplay +++| SPACE 4,10 00090 M01S00083.qdsplay +++|*** *L* DISPLAY INFORMATIVE MESSAGES. 00091 M01S00084.qdsplay +++|* 00092 M01S00085.qdsplay +++|* THESE MESSAGES ARE ISSUED THROUGH THE *L* DISPLAY. 00093 M01S00086.qdsplay +++|* 00094 M01S00087.qdsplay +++|* *DROP PROCESSED.* 00095 M01S00088.qdsplay +++|* A DROP COMMAND WAS ENTERED VIA *L* DISPLAY. 00096 M01S00089.qdsplay +++|* THE FILE HAS BEEN REMOVED FROM THE QUEUE AND THE 00097 M01S00090.qdsplay +++|* UTILITY HAS TERMINATED. 00098 M01S00091.qdsplay +++|* 00099 M01S00092.qdsplay +++|* *END PROCESSED.* 00100 M01S00093.qdsplay +++|* AN END COMMAND WAS ENTERED VIA *L* DISPLAY. 00101 M01S00094.qdsplay +++|* THE FILE HAS BEEN RETURNED TO THE QUEUE AND THE 00102 M01S00095.qdsplay +++|* UTILITY HAS TERMINATED. 00103 M01S00096.qdsplay +++| SPACE 4,10 00104 M01S00097.qdsplay +++|*** *L* DISPLAY COMMANDS. 00105 M01S00098.qdsplay +++|* 00106 M01S00099.qdsplay +++|* THE FOLLOWING ARE LEGAL COMMANDS TO BE ENTERED BY THE 00107 M01S00100.qdsplay +++|* OPERATOR THROUGH THE *L* DISPLAY. 00108 M01S00101.qdsplay +++|* 00109 M01S00102.qdsplay +++|* L.HELP. LIST *L* DISPLAY DIRECTIVES FOR *QDSPLAY* 00110 M01S00103.qdsplay +++|* UTILITY. 00111 M01S00104.qdsplay +++|* 00112 M01S00105.qdsplay +++|* L.DROP. DROP THE FILE FROM THE QUEUE AND TERMINATE 00113 M01S00106.qdsplay +++|* UTILITY. 00114 M01S00107.qdsplay +++|* 00115 M01S00108.qdsplay +++|* L.END. RETURN THE FILE TO THE QUEUE AND TERMINATE 00116 M01S00109.qdsplay +++|* UTILITY. 00117 M01S00110.qdsplay +++|* 00118 M01S00111.qdsplay +++|* L.LINE. SET FILE DISPLAY MODE TO LINE FORMAT. 00119 M01S00112.qdsplay +++|* (MODE DOES NOT APPLY TO SYSTEM SECTOR 00120 M01S00113.qdsplay +++|* DISPLAY WHICH IS ALWAYS IN OCTAL DISPLAY 00121 M01S00114.qdsplay +++|* FORMAT.) 00122 M01S00115.qdsplay +++|* 00123 M01S00116.qdsplay +++|* L.OCTAL. SET FILE DISPLAY MODE TO OCTAL FORMAT. 00124 M01S00117.qdsplay +++|* 00125 M01S00118.qdsplay +++|* L.SS. DISPLAY FROM BEGINNING OF SYSTEM SECTOR 00126 M01S00119.qdsplay +++|* IN OCTAL FORMAT. 00127 M01S00120.qdsplay +++|* 00128 M01S00121.qdsplay +++|* L.*. RETURN FROM *HELP* OR *SS* DISPLAY TO 00129 M01S00122.qdsplay +++|* DISPLAY FILE AT PREVIOUS POSITION 00130 M01S00123.qdsplay +++|* (IGNORED IF ALREADY DISPLAYING FILE). 00131 M01S00001.241l630 +++|* 00132 M01S00002.241l630 +++|* L.BACK. RETURN FROM *HELP* OR *SS* DISPLAY TO 00133 M01S00003.241l630 +++|* DISPLAY FILE AT PREVIOUS POSITION 00134 M01S00004.241l630 +++|* (IGNORED IF ALREADY DISPLAYING FILE). 00135 M01S00124.qdsplay +++|* 00136 M01S00125.qdsplay +++|* L.+. ADVANCE DISPLAY FORWARD TO NEXT SCREEN 00137 M01S00126.qdsplay +++|* OF DATA. CIRCULAR ADVANCE IS DONE FOR
| Line S00127 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00138 M02S00127.241l630 ---|* SYSTEM SECTOR DISPLAY. COMMAND IS NOT
| Line S00128 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00139 M02S00128.241l630 ---|* MEANINGFUL FOR *HELP* DISPLAY (ALL
| Line S00129 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00140 M02S00129.241l630 ---|* INFORMATION IS DISPLAYED ON 1 SCREEN). 00141 M01S00005.241l630 +++|* SYSTEM SECTOR DISPLAY. 00142 M01S00006.241l630 +++|* 00143 M01S00007.241l630 +++|* L.-. PAGE BACKWARD TO PREVIOUS SCREEN OF DATA. 00144 M01S00008.241l630 +++|* COMMAND IS VALID ONLY FOR HELP DISPLAY. 00145 M01S00130.qdsplay +++|* 00146 M01S00131.qdsplay +++|* L.BOI. POSITION FILE TO BEGINNING OF INFORMATION 00147 M01S00132.qdsplay +++|* AND DISPLAY DATA. 00148 M01S00133.qdsplay +++|* 00149 M01S00134.qdsplay +++|* L.DAY. POSITION FILE TO DAYFILE RECORD AND 00150 M01S00135.qdsplay +++|* DISPLAY DATA (MEANINGFUL FOR SOME PRINT 00151 M01S00136.qdsplay +++|* FILES). 00152 M01S00137.qdsplay +++|* 00153 M01S00138.qdsplay +++|* L.SL. SKIP 1 OR N LINES FORWARD IN FILE AND 00154 M01S00139.qdsplay +++|* L.SL,N. DISPLAY DATA. A LINE IS BASED ON 14D WORD 00155 M01S00140.qdsplay +++|* MAXIMUM PRINT LINE SIZE. SKIP PREMATURELY 00156 M01S00141.qdsplay +++|* STOPS ON EOR/EOF/EOI. COMMAND IS ALLOWED 00157 M01S00142.qdsplay +++|* ONLY WHEN DISPLAYING DATA IN LINE FORMAT. 00158 M01S00143.qdsplay +++|* COMMAND IS NOT ALLOWED UNDER *HELP* OR 00159 M01S00144.qdsplay +++|* *SS* DISPLAY. 00160 M01S00145.qdsplay +++|* 00161 M01S00146.qdsplay +++|* L.SP. SKIP 1 OR N PAGES FORWARD IN FILE AND 00162 M01S00147.qdsplay +++|* L.SP,N. DISPLAY DATA. A PAGE IS BASED ON 00163 M01S00148.qdsplay +++|* CARRIAGE CONTROL 1 AS FIRST CHARACTER 00164 M01S00149.qdsplay +++|* OF LINE. SKIP PREMATURELY STOPS ON 00165 M01S00150.qdsplay +++|* EOR/EOF/EOI. COMMAND IS ALLOWED ONLY 00166 M01S00151.qdsplay +++|* WHEN DISPLAYING DATA IN LINE FORMAT. 00167 M01S00152.qdsplay +++|* COMMAND IS NOT ALLOWED UNDER *HELP* OR 00168 M01S00153.qdsplay +++|* *SS* DISPLAY. 00169 M01S00154.qdsplay +++|* 00170 M01S00155.qdsplay +++|* L.SR. SKIP 1 OR N RECORDS OR TO END OF 00171 M01S00156.qdsplay +++|* L.SR,N. INFORMATION (N=* OPTION) IN FILE AND 00172 M01S00157.qdsplay +++|* L.SR,*. DISPLAY DATA. SKIP PREMATURELY STOPS AT 00173 M01S00158.qdsplay +++|* EOI. COMMAND IS NOT ALLOWED UNDER *HELP* 00174 M01S00159.qdsplay +++|* OR *SS* DISPLAY. 00175 M01S00160.qdsplay +++|* 00176 M01S00161.qdsplay +++|* L.BR. SKIP 1 OR N RECORDS BACKWARD IN FILE AND
| Line S00162 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00177 M02S00162.241l630 ---|* L.BR,N.. DISPLAY DATA. SKIP PREMATURELY STOPS 00178 M01S00009.241l630 +++|* L.BR,N. DISPLAY DATA. SKIP PREMATURELY STOPS 00179 M01S00163.qdsplay +++|* AT BOI. COMMAND IS NOT ALLOWED UNDER 00180 M01S00164.qdsplay +++|* *HELP* OR *SS* DISPLAY. 00181 M01S00165.qdsplay +++|* 00182 M01S00166.qdsplay +++|* SKIP LINE/PAGE/RECORD COUNTS ARE ASSUMED DECIMAL BUT 00183 M01S00167.qdsplay +++|* POST-RADIX B OR D CAN BE SPECIFIED. MAXIMUM SKIP COUNT 00184 M01S00168.qdsplay +++|* ACCEPTED IS 377777B. 00185 M01S00169.qdsplay +++| TITLE ASSEMBLY CONSTANTS. 00186 M01S00170.qdsplay +++| SPACE 4,10 00187 M01S00171.qdsplay +++|**** ASSEMBLY CONSTANTS. 00188 M01S00172.qdsplay +++| 00189 M01S00173.qdsplay +++| CNCI EQU 4 NO COMMAND INPUT (*DSD* RETURN STATUS) 00190 M01S00174.qdsplay +++| DLSZ EQU 6 NUMBER OF WORDS PER LINE ON *L* DISPLAY
| Line S00175 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00191 M02S00175.241l630 ---| MLLD EQU 35 MAXIMUM NUMBER OF LINES ON *L* DISPLAY 00192 M01S00010.241l630 +++| ERML EQU 3 ERROR MESSAGE LENGTH 00193 M01S00011.241l630 +++| MLLD EQU 18 MAXIMUM NUMBER OF LINES ON *L* DISPLAY
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 00194 M02S00012.qdsp3 ---| NWIS EQU 100B NUMBER OF WORDS IN SECTOR 00195 M01S00176.qdsplay +++| PLSZ EQU 14 PRINTER LINE SIZE
| Line S00177 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00196 M02S00177.241l630 ---| LBHRL EQU 11B *L* DISPLAY HEADER LENGTH
| Line S00178 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00197 M02S00178.241l630 ---| LBUFL EQU LDSY-LBHRL-1 LENGTH OF *L* DISPLAY BUFFER 00198 M01S00013.241l630 +++| LBHRL EQU 6 *L* DISPLAY HEADER LENGTH 00199 M01S00014.241l630 +++| LBUFL EQU LDSY-LBHRL LENGTH OF *L* DISPLAY BUFFER 00200 M01S00179.qdsplay +++| QBUFL EQU 701B QUEUED BUFFER SIZE 00201 M01S00180.qdsplay +++| ERRNG 1000B-QBUFL PREVENT BUFFER AHEAD 00202 M01S00181.qdsplay +++| SBUFL EQU 100B LENGTH OF SYSTEM SECTOR BUFFER 00203 M01S00182.qdsplay +++| WBUFL EQU LBUFL LENGTH OF WORKING BUFFER 00204 M01S00015.241l630 +++| XCDT EQU 1 X - COORDINATE FOR *L* DISPLAY 00205 M01S00016.241l630 +++| YCDT EQU 2 Y - COORDINATE FOR *L* DISPLAY 00206 M01S00183.qdsplay +++| LCOMU SET LCOM/2+1 INPUT BUFFER PACKED 00207 M01S00184.qdsplay +++| LLBF EQU LBUFL/5 *L* DISPLAY BUFFER FOR OCTAL MODE 00208 M01S00185.qdsplay +++| MLLB MIN LLBF,MLLD *L* DISPLAY BUFFER FOR OCTAL MODE 00209 M01S00186.qdsplay +++|**** 00210 M01S00187.qdsplay +++| SPACE 4,10 00211 M01S00188.qdsplay +++|** COMMON DECKS. 00212 M01S00189.qdsplay +++| 00213 M01S00190.qdsplay +++| 00214 M01S00191.qdsplay +++|*CALL COMCMAC 00215 M01S00192.qdsplay +++|*CALL COMCCMD 00216 M01S00007.v23l617 +++|*CALL COMCDCM 00217 M01S00017.241l630 +++|*CALL COMCDCP 00218 M01S00001.ns2156 +++|*CALL COMSDSP 00219 M01S00193.qdsplay +++|*CALL COMSEVT 00220 M01S00194.qdsplay +++|*CALL COMSIOQ 00221 M01S00001.qdsp3 +++|*CALL COMSJIO 00222 M01S00195.qdsplay +++|*CALL COMSQAC 00223 M01S00196.qdsplay +++|*CALL COMSSSD 00224 M01S00002.qdsp3 +++|*CALL COMSSSE 00225 M01S00003.qdsp3 +++| IOSS. EQU IOSS-BFMS-2 00226 M01S00197.qdsplay +++|*CALL COMSSSJ 00227 M01S00198.qdsplay +++| TITLE DATA STORAGE. 00228 M01S00199.qdsplay +++| ORG 111B 00229 M01S00200.qdsplay +++| FWA BSS 0 00230 M01S00201.qdsplay +++| SPACE 4,10 00231 M01S00202.qdsplay +++|** DATA STORAGE. 00232 M01S00203.qdsplay +++| 00233 M01S00204.qdsplay +++| 00234 M01S00018.241l630 +++| BLNS DATA 8C BLANK LINES 00235 M01S00019.241l630 +++| DATA 8C 00236 M01S00020.241l630 +++| DATA 8C 00237 M01S00021.241l630 +++| DATA 8C 00238 M01S00022.241l630 +++| DATA 8C 00239 M01S00023.241l630 +++| DATA 8C 00240 M01S00024.241l630 +++| DATA 8C 00241 M01S00025.241l630 +++| DATA 8C 00242 M01S00026.241l630 +++| DATA 8C 00243 M01S00027.241l630 +++| DATA 8C 00244 M01S00028.241l630 +++| DATA 8C 00245 M01S00029.241l630 +++| DATA 8C 00246 M01S00030.241l630 +++| DATA 8C 00247 M01S00031.241l630 +++| DATA 8C 00248 M01S00032.241l630 +++| DATA 8C 00249 M01S00033.241l630 +++| DATA 8C 00250 M01S00034.241l630 +++| DATA 8C 00251 M01S00035.241l630 +++| DATA 8C 00252 M01S00036.241l630 +++| DATA 8C 00253 M01S00037.241l630 +++| DATA 8C 00254 M01S00038.241l630 +++| CLDF CON HLPA CURRENT *L* DISPLAY FWA
| Line S00039 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 00255 M02S00039.qdsp3 ---| CMRO BSS 1 COMMAND RESPONSE OFFSET 00256 M01S00205.qdsplay +++| DFLG CON 0 RANDOM ADDRESS OF DAYFILE 00257 M01S00206.qdsplay +++| ERIB CON 0 ENTIRE RECORD IN BUFFER FLAG 00258 M01S00207.qdsplay +++| FETA CON 0 FET ADDRESS
| Line S00040 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 00259 M02S00040.qdsp3 ---| LCTR CON 0 LINE COUNTER
| Line S00041 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 00260 M02S00041.qdsp3 ---| NEJC DATA 10H NO PAGE EJECT
| Line S00042 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 00261 M02S00042.qdsp3 ---| PEJC DATA 10H1 PAGE EJECT 00262 M01S00208.qdsplay +++| SCNT CON 0 SKIP COUNT 00263 M01S00209.qdsplay +++| STAT CON SHLP FILE STATUS 00264 M01S00210.qdsplay +++| PSTT CON SBOI PREVIOUS FILE STATUS 00265 M01S00211.qdsplay +++| MODE CON 0 FILE DISPLAY MODE (O=LINE, 1=OCTAL)
| Line S00043 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 00266 M02S00043.qdsp3 ---| YBEG CON 7756B BEGINNING Y COORDINATE
| Line S00044 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 00267 M02S00044.qdsp3 ---| YINC CON 10 LINE INCREMENT 00268 M01S00212.qdsplay +++| SPACE 4,10 00269 M01S00213.qdsplay +++|** TMLD - TABLE OF MESSAGES TO *L* DISPLAY. 00270 M01S00214.qdsplay +++| 00271 M01S00215.qdsplay +++| 00272 M01S00216.qdsplay +++| TMLD BSS 0 00273 M01S00217.qdsplay +++| LOC 0 00274 M01S00218.qdsplay +++| DATA C* *
| Line S00219 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00275 M02S00219.241l630 ---| DRPM DATA C*DROP PROCESSED.*
| Line S00220 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00276 M02S00220.241l630 ---| CON 0 TERMINATE *L* DISPLAY
| Line S00221 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00277 M02S00221.241l630 ---| EABT DATA C*SYSTEM ABORT.*
| Line S00222 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00278 M02S00222.241l630 ---| CON 0 TERMINATE *L* DISPLAY 00279 M01S00045.241l630 +++| DRPM DATA C*DROP PROCESSED. * 00280 M01S00046.241l630 +++| EABT DATA C*SYSTEM ABORT. * 00281 M01S00223.qdsplay +++| EDNA DATA C*DIRECTIVE NOT ALLOWED. * 00282 M01S00224.qdsplay +++| EEPS DATA C*EXCESS PARAMETERS. *
| Line S00225 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00283 M02S00225.v23l617 ---| EISC DATA C*INVALID SKIP COUNT. * 00284 M01S00008.v23l617 +++| EISC DATA C*INCORRECT SKIP COUNT. * 00285 M01S00226.qdsplay +++| ENDF DATA C*NO DAYFILE FOUND. *
| Line S00227 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00286 M02S00227.241l630 ---| ENDM DATA C*END PROCESSED.*
| Line S00228 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00287 M02S00228.241l630 ---| CON 0 TERMINATE *L* DISPLAY 00288 M01S00047.241l630 +++| ENDM DATA C*END PROCESSED. * 00289 M01S00229.qdsplay +++| EUND DATA C*UNRECOGNIZABLE DIRECTIVE. * 00290 M01S00001.qdsp2 +++| EVOH DATA C*VALID ONLY FOR HELP DISPLAY.* 00291 M01S00230.qdsplay +++| LOC *O 00292 M01S00231.qdsplay +++| TVST SPACE 4,10 00293 M01S00232.qdsplay +++|** TVST - TABLE OF VALID STATUSES. 00294 M01S00233.qdsplay +++|* 00295 M01S00234.qdsplay +++|* THIS TABLE CONSISTS OF A VALUE TO BE DISPLAYED 00296 M01S00235.qdsplay +++|* IN THE HEADER FOR FILE STATUS. 00297 M01S00236.qdsplay +++|* DUE TO CODE REQUIREMENTS, THIS TABLE MUST BE MAINTAINED 00298 M01S00237.qdsplay +++|* IN THE FOLLOWING ORDER AND LOCATION POSITIONS. 00299 M01S00238.qdsplay +++| 00300 M01S00239.qdsplay +++| 00301 M01S00240.qdsplay +++| TVST BSS 0 00302 M01S00241.qdsplay +++| LOC 0
| Line S00242 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 00303 M02S00242.qdsp3 ---| SHLP DATA L*S = .* *HELP* STATUS 00304 M01S00004.qdsp3 +++| SHLP DATA L* = .* *HELP* STATUS 00305 M01S00048.241l630 +++| ERRNZ SHLP CODE DEPENDS UPON VALUE BEING 0
| Line S00243 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 00306 M02S00243.qdsp3 ---| SSYS DATA L*S = SS. * SYSTEM SECTOR STATUS 00307 M01S00005.qdsp3 +++| SSYS DATA L* = SS. * SYSTEM SECTOR STATUS 00308 M01S00049.241l630 +++| ERRNZ SSYS-1 CODE DEPENDS UPON VALUE BEING 1
| Line S00244 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 00309 M02S00244.qdsp3 ---| SBOI DATA L*S = BOI.* BEGINNING OF INFORMATION STATUS
| Line S00245 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 00310 M02S00245.qdsp3 ---| SBOR DATA L*S = BOR.* BEGINNING OF RECORD STATUS
| Line S00246 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 00311 M02S00246.qdsp3 ---| SMID DATA L*S = .* MIDDLE OF RECORD STATUS
| Line S00247 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 00312 M02S00247.qdsp3 ---| SEOI DATA L*S = EOI.* END OF INFORMATION STATUS
| Line S00248 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 00313 M02S00248.qdsp3 ---| SEOF DATA L*S = EOF.* END OF FILE STATUS
| Line S00249 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 00314 M02S00249.qdsp3 ---| SEOR DATA L*S = EOR.* END OF RECORD STATUS 00315 M01S00006.qdsp3 +++| SBOI DATA L* = BOI.* BEGINNING OF INFORMATION STATUS 00316 M01S00007.qdsp3 +++| SBOR DATA L* = BOR.* BEGINNING OF RECORD STATUS 00317 M01S00008.qdsp3 +++| SMID DATA L* = .* MIDDLE OF RECORD STATUS 00318 M01S00009.qdsp3 +++| SEOI DATA L* = EOI.* END OF INFORMATION STATUS 00319 M01S00010.qdsp3 +++| SEOF DATA L* = EOF.* END OF FILE STATUS 00320 M01S00011.qdsp3 +++| SEOR DATA L* = EOR.* END OF RECORD STATUS 00321 M01S00250.qdsplay +++| LOC *O 00322 M01S00251.qdsplay +++| SPACE 4,10 00323 M01S00252.qdsplay +++|** *QAC* PARAMETER BLOCK. 00324 M01S00253.qdsplay +++| 00325 M01S00254.qdsplay +++| 00326 M01S00255.qdsplay +++| QACPB BSS 0 00327 M01S00256.qdsplay +++| QACR VFD 50/0,9/GTFC,1/0 REQUEST PREFIX PORTION 00328 M01S00257.qdsplay +++| VFD 36/0,6/GTLB-5,18/0 00329 M01S00258.qdsplay +++| VFD 60/0 00330 M01S00259.qdsplay +++| VFD 60/0 00331 M01S00260.qdsplay +++| VFD 60/0 00332 M01S00261.qdsplay +++| QACS VFD 60/0 SELECTION CRITERIA PORTION 00333 M01S00262.qdsplay +++| VFD 60/0
| Line S00263 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00334 M02S00263.ns21000 ---| VFD 24/0,36/JSSF
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Updated by) | qdsp1 |
Seq # *Modification Id* Act ----------------------------+ 00335 M02S00001.qdsp1 ---| VFD 36/0,12/DLSF,12/JSSF 00336 M01S00001.qdsp1 +++| VFD 36/0,12/DLSF,12/JSSF+ZPSF 00337 M01S00264.qdsplay +++| VFD 12/INQQ,48/0
| Line S00265 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00338 M02S00265.ns21000 ---| VFD 60/0 00339 M01S00002.ns21000 +++| VFD 18/0,18/3H***,24/0 00340 M01S00266.qdsplay +++| VFD 60/0 00341 M01S00267.qdsplay +++| VFD 60/0 00342 M01S00268.qdsplay +++| QACF VFD 60/0 *GET* FUNCTION PORTION 00343 M01S00269.qdsplay +++| VFD 60/0 00344 M01S00270.qdsplay +++| VFD 60/0 00345 M01S00271.qdsplay +++| VFD 60/0 00346 M01S00272.qdsplay +++| SPACE 4,10 00347 M01S00273.qdsplay +++|** *ROUTE* PARAMETER BLOCK. 00348 M01S00274.qdsplay +++| 00349 M01S00275.qdsplay +++|
| Line S00276 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | ns2156 |
Seq # *Modification Id* Act ----------------------------+ 00350 M02S00276.ns2156 ---| ROPB BSSZ 7 00351 M01S00002.ns2156 +++| ROPB BSSZ EPBL 00352 M01S00003.ns2156 +++| .R BSS 0 00353 M01S00004.ns2156 +++| ORG ROPB+1 00354 M01S00005.ns2156 +++| VFD 42/0,18/FREB EXTENDED BLOCK PRESENT 00355 M01S00006.ns2156 +++| ORG ROPB+7 00356 M01S00007.ns2156 +++| VFD 42/0,18/EFRQ SPECIAL REQUEUE OPERATION FLAG 00357 M01S00008.ns2156 +++| ORG .R 00358 M01S00277.qdsplay +++| SPACE 4,10 00359 M01S00278.qdsplay +++|** *ROLLOUT* PARAMETER BLOCK. 00360 M01S00279.qdsplay +++| 00361 M01S00280.qdsplay +++| 00362 M01S00281.qdsplay +++| ROLB VFD 30/0,18/LINE,12/0 00363 M01S00282.qdsplay +++| SPACE 4,10 00364 M01S00283.qdsplay +++|** *REPRIEVE* PARAMETER BLOCK. 00365 M01S00284.qdsplay +++| 00366 M01S00285.qdsplay +++| 00367 M01S00286.qdsplay +++| RPB BSS 0 00368 M01S00287.qdsplay +++| VFD 36/0,12/RPBL,12/0 00369 M01S00288.qdsplay +++| VFD 30/0,30/RPV 00370 M01S00289.qdsplay +++| BSSZ 27B 00371 M01S00290.qdsplay +++| RPBL EQU *-RPB 00372 M01S00291.qdsplay +++| SPACE 4,10 00373 M01S00292.qdsplay +++|** *SSJ=* PARAMETER BLOCK. 00374 M01S00293.qdsplay +++| 00375 M01S00294.qdsplay +++| 00376 M01S00295.qdsplay +++| SSJ= BSS 0 00377 M01S00296.qdsplay +++| VFD 48/0,12/IRSI 00378 M01S00297.qdsplay +++| BSSZ SSJL-1 00379 M01S00050.241l630 +++| SPACE 4,5 00380 M01S00051.241l630 +++|** *L* DISPLAY BUFFER HEADER. 00381 M01S00052.241l630 +++| 00382 M01S00053.241l630 +++|
| Line S00054 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 00383 M02S00054.qdsp3 ---| LBHR DATA C* QDSPLAY. JSN = $$$$. QFT = ++++. STATUS = .*
| Line S00055 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 00384 M02S00055.qdsp3 ---| DATA C* * 00385 M01S00012.qdsp3 +++| LBHR DATA C* QDSPLAY. JSN = $$$$. QFT = ++++. IC = --. STATUS = 00386 M01S00013.qdsp3 +++|, .* 00387 M01S00056.241l630 +++| .LBHRL EQU *-LBHR *L* DISPLAY HEADER LENGTH 00388 M01S00057.241l630 +++| ERRNZ .LBHRL-LBHRL *LBHRL* NEEDS TO BE REDEFINED 00389 M01S00298.qdsplay +++| SPACE 4,10 00390 M01S00299.qdsplay +++|** FET DEFINITIONS. 00391 M01S00300.qdsplay +++| 00392 M01S00301.qdsplay +++| 00393 M01S00302.qdsplay +++| CON 0 SAVE PREVIOUS *IN* FOR QUEUED FILE 00394 M01S00303.qdsplay +++| CON 0 SAVE PREVIOUS *OUT* FOR QUEUED FILE 00395 M01S00304.qdsplay +++| Q RFILEB QBUF,QBUFL,(FET=9) QUEUED FILE FET 00396 M01S00305.qdsplay +++| 00397 M01S00306.qdsplay +++| 00398 M01S00307.qdsplay +++| CON 0 SAVE PREVIOUS *IN* FOR SYSTEM SECTOR FILE 00399 M01S00308.qdsplay +++| CON 0 SAVE PREVIOUS *OUT* FOR SYSTEM SECTOR FILE 00400 M01S00309.qdsplay +++| S FILEB SBUF,SBUFL+1,(FET=7) SYSTEM SECTOR FET 00401 M01S00310.qdsplay +++| TITLE MAIN PROGRAM. 00402 M01S00311.qdsplay +++| QDSPLAY SPACE 4,10 00403 M01S00312.qdsplay +++|** QDSPLAY - MAIN PROGRAM LOOP. 00404 M01S00313.qdsplay +++|*
| Line S00314 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00405 M02S00314.241l630 ---|* CALLS BLD, CMP, EFP, ILD, OLD, PRS. 00406 M01S00058.241l630 +++|* CALLS BLD, CMP, EFP, ILD, OLD, PRS, SEM. 00407 M01S00315.qdsplay +++| 00408 M01S00316.qdsplay +++| 00409 M01S00317.qdsplay +++| QDSPLAY BSS 0 ENTRY 00410 M01S00318.qdsplay +++| RJ PRS EXECUTE PRESET 00411 M01S00319.qdsplay +++| 00412 M01S00320.qdsplay +++|* EXECUTE LOOP TO PROCESS COMMAND. 00413 M01S00321.qdsplay +++| 00414 M01S00322.qdsplay +++| QDS1 RJ EFP EXECUTE FUNCTION PROCESSOR 00415 M01S00323.qdsplay +++| ZR X2,QDS2 IF DISPLAY NOT TO BE REBUILT 00416 M01S00324.qdsplay +++| RJ BLD BUILD *L* DISPLAY
| Line S00325 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00417 M02S00325.241l630 ---| SB2 B0 NO ERROR MESSAGE 00418 M01S00326.qdsplay +++| QDS2 RJ OLD OUTPUT *L* DISPLAY DATA. 00419 M01S00327.qdsplay +++| RJ ILD INPUT *L* DISPLAY DATA. 00420 M01S00328.qdsplay +++| RJ CMP COMMAND PROCESSOR
| Line S00329 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00421 M02S00329.241l630 ---| NZ B2,QDS2 IF ERROR IN COMMAND
| Line S00330 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00422 M02S00330.241l630 ---| EQ QDS1 EXECUTE COMMAND 00423 M01S00059.241l630 +++| ZR B2,QDS1 IF NO ERROR IN COMMAND 00424 M01S00060.241l630 +++| RJ SEM PROCESS ERROR 00425 M01S00061.241l630 +++| EQ QDS2 UPDATE *L* DISPLAY 00426 M01S00331.qdsplay +++| TITLE FUNCTION PROCESSORS. 00427 M01S00332.qdsplay +++| ADV SPACE 4,20 00428 M01S00333.qdsplay +++|** ADV - ADVANCE DISPLAY FORWARD. 00429 M01S00334.qdsplay +++|* 00430 M01S00335.qdsplay +++|* *ADV* ADVANCES THE *L* DISPLAY TO DISPLAY NEXT PORTION OF 00431 M01S00336.qdsplay +++|* DATA. ADVANCE IS CIRCULAR FOR SYSTEM SECTOR. 00432 M01S00337.qdsplay +++|*
| Line S00338 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00433 M02S00338.241l630 ---|* EXIT (X2) = 0, IF *HELP* DISPLAY STATUS.
| Line S00339 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00434 M02S00339.241l630 ---|* (X2) = FET ADDRESS OF QUEUED FILE IF FILE STATUS IS 00435 M01S00062.241l630 +++|* EXIT (X2) = FET ADDRESS OF QUEUED FILE IF FILE STATUS IS 00436 M01S00340.qdsplay +++|* NOT *SS*. 00437 M01S00341.qdsplay +++|* (X2) = FET ADDRESS OF SYSTEM SECTOR IF FILE STATUS 00438 M01S00342.qdsplay +++|* IS *SS*. 00439 M01S00343.qdsplay +++|* (B2) = 0 (NO ERROR), IF *HELP* DISPLAY STATUS. 00440 M01S00344.qdsplay +++|* 00441 M01S00345.qdsplay +++|* USES X - 2, 3, 4, 6, 7.
| Line S00346 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00442 M02S00346.241l630 ---|* A - 2, 3, 4, 6, 7. 00443 M01S00063.241l630 +++|* A - 2, 3, 4, 6, 7. 00444 M01S00347.qdsplay +++|* B - 2, 3, 5. 00445 M01S00348.qdsplay +++|* 00446 M01S00349.qdsplay +++|* CALLS RNR. 00447 M01S00350.qdsplay +++| 00448 M01S00351.qdsplay +++| 00449 M01S00352.qdsplay +++| ADV2 SB5 SEOI 00450 M01S00353.qdsplay +++| LT B3,B5,ADVX IF NOT EOR/EOF/EOI 00451 M01S00354.qdsplay +++| SX6 SBOR BEGINNING OF RECORD STATUS 00452 M01S00355.qdsplay +++| RJ RNR READ NEW RECORD 00453 M01S00356.qdsplay +++| 00454 M01S00357.qdsplay +++| ADV SUBR ENTRY/EXIT 00455 M01S00358.qdsplay +++| SA2 STAT GET FILE STATUS 00456 M01S00359.qdsplay +++| SB2 B0 NO ERROR 00457 M01S00360.qdsplay +++| SB3 X2
| Line S00361 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00458 M02S00361.241l630 ---| ZR X2,ADVX IF *HELP* STATUS 00459 M01S00362.qdsplay +++| SX2 S SET SYSTEM SECTOR FET 00460 M01S00363.qdsplay +++| EQ B3,B1,ADV1 IF *SS* STATUS PRESENT 00461 M01S00364.qdsplay +++| SX2 Q SET QUEUED FILE FET 00462 M01S00365.qdsplay +++| SX6 SMID SET FILE STATUS 00463 M01S00366.qdsplay +++| SA6 STAT 00464 M01S00367.qdsplay +++| ADV1 SA3 X2-2 GET PREVIOUS *IN* 00465 M01S00368.qdsplay +++| SA4 A3+B1 GET PREVIOUS *OUT* 00466 M01S00369.qdsplay +++| BX6 X3 00467 M01S00370.qdsplay +++| LX7 X4 00468 M01S00371.qdsplay +++| SA6 X2+2 RESET TO ADVANCED FET POINTERS 00469 M01S00372.qdsplay +++| IX3 X3-X4 COMPARE *IN* AND *OUT* 00470 M01S00373.qdsplay +++| SA7 A6+1 00471 M01S00374.qdsplay +++| NZ X3,ADVX IF *IN* .NE. *OUT* 00472 M01S00375.qdsplay +++| NE B3,B1,ADV2 IF NOT *SS* DISPLAY 00473 M01S00376.qdsplay +++| SX7 SBUF SET *OUT* 00474 M01S00377.qdsplay +++| SA7 A7 00475 M01S00378.qdsplay +++| SX6 SBUF+77B SET *IN* 00476 M01S00379.qdsplay +++| SA6 A6 00477 M01S00380.qdsplay +++| EQ ADVX RETURN 00478 M01S00381.qdsplay +++| BOI SPACE 4,15 00479 M01S00382.qdsplay +++|** BOI - BEGINNING OF FILE FUNCTION PROCESSOR. 00480 M01S00383.qdsplay +++|* 00481 M01S00384.qdsplay +++|* *BOI* DISPLAYS THE BEGINNING OF THE QUEUED FILE ON THE *L* 00482 M01S00385.qdsplay +++|* DISPLAY. 00483 M01S00386.qdsplay +++|* 00484 M01S00387.qdsplay +++|* EXIT (X2) = FET ADDRESS OF QUEUED FILE. 00485 M01S00388.qdsplay +++|* 00486 M01S00389.qdsplay +++|* USES X - 1, 2, 6, 7. 00487 M01S00390.qdsplay +++|* A - 1, 7. 00488 M01S00391.qdsplay +++|* 00489 M01S00392.qdsplay +++|* CALLS RNR. 00490 M01S00393.qdsplay +++| 00491 M01S00394.qdsplay +++| 00492 M01S00395.qdsplay +++| BOI SUBR ENTRY/EXIT 00493 M01S00396.qdsplay +++| SA1 STAT GET FILE STATUS 00494 M01S00397.qdsplay +++| SX2 Q 00495 M01S00398.qdsplay +++| SX6 SBOI SET BEGINNING OF INFORMATION STATUS 00496 M01S00399.qdsplay +++| SX7 B1 SET RANDOM READ IN FET TO BOI 00497 M01S00400.qdsplay +++| BX1 X1-X6 00498 M01S00401.qdsplay +++| ZR X1,BOIX IF AT BOI 00499 M01S00402.qdsplay +++| SA7 Q+6 00500 M01S00403.qdsplay +++| RJ RNR READ NEXT RECORD 00501 M01S00404.qdsplay +++| EQ BOIX RETURN 00502 M01S00405.qdsplay +++| DAY SPACE 4,15 00503 M01S00406.qdsplay +++|** DAY - *DAYFILE* FUNCTION PROCESSOR. 00504 M01S00407.qdsplay +++|* 00505 M01S00408.qdsplay +++|* *DAY* DISPLAYS THE DAYFILE PORTION OF THE FILE IF THE 00506 M01S00409.qdsplay +++|* DAYFILE EXISTS. 00507 M01S00410.qdsplay +++|*
| Line S00411 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00508 M02S00411.241l630 ---|* EXIT (X2) = FET ADDRESS OF QUEUED FILE IF *L* DISPLAY
| Line S00412 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00509 M02S00412.241l630 ---|* NEEDS TO BE REBUILT. 00510 M01S00064.241l630 +++|* EXIT (X2) = 0, IF DAYFILE NOT FOUND AND HELP STATUS. 00511 M01S00065.241l630 +++|* (X2) = FET ADDRESS OF QUEUED FILE OR SYSTEM SECTOR, 00512 M01S00066.241l630 +++|* IF DAYFILE NOT FOUND AND NOT HELP STATUS. 00513 M01S00067.241l630 +++|* (X2) = FET ADDRESS OF QUEUED FILE IF DAYFILE FOUND. 00514 M01S00413.qdsplay +++|* (B2) = ERROR MESSAGE ADDRESS, IF NO DAYFILE FOUND.
| Line S00414 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00515 M02S00414.241l630 ---|* (X2) = 0, IF NO DAYFILE FOUND. 00516 M01S00415.qdsplay +++|*
| Line S00416 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00517 M02S00416.241l630 ---|* USES X - 2, 6, 7.
| Line S00417 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00518 M02S00417.241l630 ---|* A - 2, 7. 00519 M01S00068.241l630 +++|* USES X - 1, 2, 6, 7. 00520 M01S00069.241l630 +++|* A - 1, 2, 7. 00521 M01S00418.qdsplay +++|* B - 2. 00522 M01S00419.qdsplay +++|*
| Line S00420 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00523 M02S00420.241l630 ---|* CALLS RNR. 00524 M01S00070.241l630 +++|* CALLS HLP, RNR. 00525 M01S00421.qdsplay +++| 00526 M01S00422.qdsplay +++| 00527 M01S00423.qdsplay +++| DAY SUBR ENTRY/EXIT 00528 M01S00424.qdsplay +++| SA2 DFLG GET DAYFILE ADDRESS 00529 M01S00425.qdsplay +++| SB2 ENDF *NO DAYFILE FOUND.*
| Line S00426 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00530 M02S00426.241l630 ---| ZR X2,DAYX IF NO DAYFILE FOUND 00531 M01S00071.241l630 +++| ZR X2,DAY1 IF NO DAYFILE FOUND 00532 M01S00427.qdsplay +++| BX7 X2 SET RANDOM ADDRESS OF DAYFILE IN FET 00533 M01S00428.qdsplay +++| SA7 Q+6 00534 M01S00429.qdsplay +++| SX6 SBOR SET BEGINNING OF RECORD STATUS 00535 M01S00430.qdsplay +++| RJ RNR READ NEW RECORD 00536 M01S00072.241l630 +++| SB2 B0+ INDICATE NO ERROR 00537 M01S00431.qdsplay +++| EQ DAYX RETURN 00538 M01S00073.241l630 +++| 00539 M01S00074.241l630 +++|* REBUILD PROPER DISPLAY WITH ERROR MESSAGE. 00540 M01S00075.241l630 +++| 00541 M01S00076.241l630 +++| DAY1 SA1 STAT GET FILE STATUS 00542 M01S00077.241l630 +++| SX6 SHLP CHECK IF HELP STATUS 00543 M01S00078.241l630 +++| BX6 X1-X6 00544 M01S00079.241l630 +++| NZ X6,DAY2 IF NOT HELP STATUS 00545 M01S00080.241l630 +++| RJ HLP FORMAT HELP DISPLAY 00546 M01S00081.241l630 +++| EQ DAYX RETURN 00547 M01S00082.241l630 +++| 00548 M01S00083.241l630 +++| DAY2 SX6 SSYS CHECK IF SYSTEM SECTOR STATUS 00549 M01S00084.241l630 +++| SX2 S SET SYSTEM SECTOR FET 00550 M01S00085.241l630 +++| BX6 X1-X6 00551 M01S00086.241l630 +++| ZR X6,DAYX IF SYSTEM SECTOR STATUS 00552 M01S00087.241l630 +++| SX2 Q SET QUEUED FILE STATUS 00553 M01S00088.241l630 +++| EQ DAYX RETURN 00554 M01S00432.qdsplay +++| DRP SPACE 4,10 00555 M01S00433.qdsplay +++|** DRP - *DROP* FUNCTION PROCESSOR. 00556 M01S00434.qdsplay +++|* 00557 M01S00435.qdsplay +++|* *DRP* DROPS THE FILE FROM THE QUEUE AND TERMINATES UTILITY. 00558 M01S00436.qdsplay +++|* 00559 M01S00437.qdsplay +++|* USES B - 2. 00560 M01S00438.qdsplay +++|* 00561 M01S00439.qdsplay +++|* CALLS DLD. 00562 M01S00440.qdsplay +++|* 00563 M01S00441.qdsplay +++|* MACROS ENDRUN, RETURN. 00564 M01S00442.qdsplay +++| 00565 M01S00443.qdsplay +++| 00566 M01S00444.qdsplay +++| DRP SUBR ENTRY/EXIT 00567 M01S00445.qdsplay +++| SB2 DRPM DISPLAY *DROP PROCESSED.* MESSAGE 00568 M01S00446.qdsplay +++| RJ DLD DROP *L* DISPLAY 00569 M01S00447.qdsplay +++| RETURN Q,R 00570 M01S00448.qdsplay +++| ENDRUN 00571 M01S00449.qdsplay +++| END SPACE 4,10 00572 M01S00450.qdsplay +++|** END - *END* FUNCTION PROCESSOR. 00573 M01S00451.qdsplay +++|* 00574 M01S00452.qdsplay +++|* *END* RETURNS THE FILE TO THE QUEUE AND TERMINATES THE 00575 M01S00453.qdsplay +++|* UTILITY. 00576 M01S00454.qdsplay +++|* 00577 M01S00455.qdsplay +++|* USES B - 2. 00578 M01S00456.qdsplay +++|* 00579 M01S00457.qdsplay +++|* CALLS DLD. 00580 M01S00458.qdsplay +++|* 00581 M01S00459.qdsplay +++|* MACROS ENDRUN, ROUTE. 00582 M01S00460.qdsplay +++| 00583 M01S00461.qdsplay +++| 00584 M01S00462.qdsplay +++| END SUBR ENTRY/EXIT 00585 M01S00463.qdsplay +++| SB2 ENDM DISPLAY *END PROCESSED.* MESSAGE 00586 M01S00464.qdsplay +++| RJ DLD DROP *L* DISPLAY 00587 M01S00465.qdsplay +++| ROUTE ROPB,R RETURN FILE TO QUEUE 00588 M01S00466.qdsplay +++| ENDRUN 00589 M01S00467.qdsplay +++| HLP SPACE 4,15 00590 M01S00468.qdsplay +++|** HLP - *HELP* FUNCTION PROCESSOR. 00591 M01S00469.qdsplay +++|* 00592 M01S00470.qdsplay +++|* *HLP* MOVES *HELP* DISPLAY DATA TO *L* DISPLAY. 00593 M01S00089.241l630 +++|* 00594 M01S00090.241l630 +++|* ENTRY (CMPB) = FWA OF PAGE TO DISPLAY. 00595 M01S00091.241l630 +++|* (B2) = MESSAGE ORDINAL FOR TABLE OF MESSAGES. 00596 M01S00471.qdsplay +++|* 00597 M01S00472.qdsplay +++|* EXIT (B2) = 0 (NO ERR0R). 00598 M01S00473.qdsplay +++|* (X2) = 0 (*L* DISPLAY DATA NEED NOT BE REBUILT). 00599 M01S00474.qdsplay +++|*
| Line S00475 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00600 M02S00475.241l630 ---|* USES X - 1, 2, 6, 7.
| Line S00476 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00601 M02S00476.241l630 ---|* A - 1, 6, 7.
| Line S00477 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00602 M02S00477.241l630 ---|* B - 2, 3.
| Line S00092 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 00603 M02S00092.qdsp3 ---|* USES X - 0, 1, 2, 3, 5, 6, 7. 00604 M01S00014.qdsp3 +++|* USES X - 1, 2, 3, 5, 6, 7. 00605 M01S00093.241l630 +++|* A - 1, 5, 6, 7. 00606 M01S00094.241l630 +++|* B - 2, 3, 4, 6. 00607 M01S00095.241l630 +++|* 00608 M01S00096.241l630 +++|* CALLS COI, FLB. 00609 M01S00478.qdsplay +++|* 00610 M01S00479.qdsplay +++|* MACROS MOVE. 00611 M01S00480.qdsplay +++| 00612 M01S00481.qdsplay +++| 00613 M01S00482.qdsplay +++| HLP SUBR ENTRY/EXIT
| Line S00483 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00614 M02S00483.241l630 ---| MOVE HLPL,HLPA,LBUF MOVE DATA INTO *L* DISPLAY BUFFER 00615 M01S00097.241l630 +++| SA5 CLDF GET CURRENT SCREEN FWA 00616 M01S00098.241l630 +++| SX2 TMLD+B2 SET MESSAGE 00617 M01S00099.241l630 +++| MOVE ERML,X2,X5+HLMA-HLPA 00618 M01S00100.241l630 +++| RJ COI CONVERT OPERATOR INPUT 00619 M01S00101.241l630 +++| SX2 IBUF SET INPUT LINE 00620 M01S00102.241l630 +++| MOVE LCOMU,X2,X5+HLIA-HLPA SET INPUT LINE 00621 M01S00103.241l630 +++| SX1 X5 FWA DATA TO FORMAT 00622 M01S00104.241l630 +++| SX6 X1+HLPAL-1 LWA DATA TO FORMAT 00623 M01S00105.241l630 +++| MX2 0 INDICATE *L* DISPLAY 00624 M01S00106.241l630 +++| SX3 B1+ INDICATE LINE MODE 00625 M01S00107.241l630 +++| SB2 LBUF FWA *L* DISPLAY BUFFER 00626 M01S00108.241l630 +++| SB3 XCDT X - COORDINATE OF DISPLAY 00627 M01S00109.241l630 +++| SB4 YCDT Y - COORDINATE OF DISPLAY 00628 M01S00110.241l630 +++| SB6 LBUF+LBUFL LWA *L* DISPLAY BUFFER 00629 M01S00111.241l630 +++| RJ FLB FORMAT DATA FOR *L* DISPLAY 00630 M01S00484.qdsplay +++| SA1 STAT GET FILE STATUS 00631 M01S00485.qdsplay +++| SX6 SHLP SET *HELP* STATUS 00632 M01S00486.qdsplay +++| SA6 A1 00633 M01S00487.qdsplay +++| SB3 X1
| Line S00488 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00634 M02S00488.241l630 ---| SB2 B0 NO ERROR
| Line S00489 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00635 M02S00489.241l630 ---| SX2 B0 PREVENT *L* DISPLAY BUILD FROM FILE 00636 M01S00112.241l630 +++| SX2 B0 PREVENT *L* DISPLAY BUILD FROM FILE 00637 M01S00113.241l630 +++| SB2 B0 SET NO ERROR 00638 M01S00490.qdsplay +++| LE B3,B1,HLPX IF *SS* OR *HELP* STATUS 00639 M01S00491.qdsplay +++| SX7 X1+ SAVE PREVIOUS FILE STATUS 00640 M01S00492.qdsplay +++| SA7 PSTT 00641 M01S00493.qdsplay +++| EQ HLPX RETURN 00642 M01S00494.qdsplay +++| 00643 M01S00495.qdsplay +++|
| Line S00496 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00644 M02S00496.241l630 ---| HLPA BSS 0 *L* DISPLAY *HELP* SCREEN
| Line S00497 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00645 M02S00497.241l630 ---| DATA C*THE FOLLOWING ARE VALID QUEUE DISPLAY COMMANDS -*
| Line S00498 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00646 M02S00498.241l630 ---| DATA C* *
| Line S00499 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00647 M02S00499.241l630 ---| DATA C*COMMAND FUNCTION*
| Line S00500 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00648 M02S00500.241l630 ---| DATA C* *
| Line S00501 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00649 M02S00501.241l630 ---| DATA C*L.HELP. LIST L DISPLAY COMMANDS FOR QDSPLAY UTILITY.*
| Line S00502 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00650 M02S00502.241l630 ---| DATA C*L.DROP. DROP FILE FROM QUEUE AND TERMINATE.*
| Line S00503 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00651 M02S00503.241l630 ---| DATA C*L.END. RETURN FILE TO QUEUE AND TERMINATE.*
| Line S00504 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00652 M02S00504.241l630 ---| DATA C*L.LINE. SET FILE DISPLAY MODE TO LINE FORMAT.*
| Line S00505 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00653 M02S00505.241l630 ---| DATA C*L.OCTAL. SET FILE DISPLAY MODE TO OCTAL FORMAT.*
| Line S00506 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00654 M02S00506.241l630 ---| DATA C*L.SS. DISPLAY IN OCTAL FROM BEGINNING OF SYSTEM SECTOR.*
| Line S00507 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00655 M02S00507.241l630 ---| DATA C+L.*. RETURN FROM HELP/SS TO PREVIOUS FILE DISPLAY.+
| Line S00508 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00656 M02S00508.241l630 ---| DATA C*L.+. ADVANCE DISPLAY FORWARD (CIRCULAR FOR SS).*
| Line S00509 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00657 M02S00509.241l630 ---| DATA C*L.BOI. POSITION FILE TO BOI AND DISPLAY DATA.*
| Line S00510 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00658 M02S00510.241l630 ---| DATA C*L.DAY. POSITION PRINT FILE TO DAYFILE AND DISPLAY DATA.*
| Line S00511 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00659 M02S00511.241l630 ---| DATA C*L.SL. SKIP 1 LINE FORWARD IN FILE AND DISPLAY DATA.*
| Line S00512 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00660 M02S00512.241l630 ---| DATA C*L.SL,N. SKIP N LINES FORWARD IN FILE AND DISPLAY DATA.*
| Line S00513 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00661 M02S00513.241l630 ---| DATA C*L.SP. SKIP 1 PAGE FORWARD IN FILE AND DISPLAY DATA.*
| Line S00514 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00662 M02S00514.241l630 ---| DATA C*L.SP,N. SKIP N PAGES FORWARD IN FILE AND DISPLAY DATA.*
| Line S00515 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00663 M02S00515.241l630 ---| DATA C*L.SR. SKIP 1 RECORD FORWARD IN FILE AND DISPLAY DATA.*
| Line S00516 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00664 M02S00516.241l630 ---| DATA C*L.SR,N. SKIP N RECORDS FORWARD IN FILE AND DISPLAY DATA.*
| Line S00517 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00665 M02S00517.241l630 ---| DATA C+L.SR,*. SKIP TO EOI IN FILE.+
| Line S00518 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00666 M02S00518.241l630 ---| DATA C*L.BR. SKIP 1 RECORD BACKWARD IN FILE AND DISPLAY DATA.*
| Line S00519 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00667 M02S00519.241l630 ---| DATA C*L.BR,N. SKIP N RECORDS BACKWARD IN FILE AND DISPLAY DATA.*
| Line S00520 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00668 M02S00520.241l630 ---| DATA C* *
| Line S00521 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00669 M02S00521.241l630 ---| DATA C*SKIP COMMANDS ARE NOT ALLOWED UNDER HELP/SS DISPLAY.*
| Line S00522 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00670 M02S00522.241l630 ---| DATA C*SKIP LINE/PAGE COMMANDS NOT ALLOWED FROM OCTAL DISPLAY.*
| Line S00523 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00671 M02S00523.241l630 ---| CON 0 END OF HELP DISPLAY
| Line S00524 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00672 M02S00524.241l630 ---| HLPL EQU *-HLPA LENGTH OF *HELP* DISPLAY 00673 M01S00114.241l630 +++| HLPA BSS 0 *L* DISPLAY HELP PAGE 1 00674 M01S00115.241l630 +++| DATA 50HQDSPLAY COMMANDS PAGE 00675 M01S00116.241l630 +++| DATA 10H 1 OF 2 00676 M01S00117.241l630 +++| DATA C* * 00677 M01S00118.241l630 +++| DATA 34C COMMAND DESCRIPTION 00678 M01S00119.241l630 +++| DATA C* * 00679 M01S00120.241l630 +++| DATA 50H BACK RETURN FROM HELP/SS TO PREVIOUS FILE DI 00680 M01S00121.241l630 +++| DATA 10HSPLAY. 00681 M01S00122.241l630 +++| DATA 49C BOI POSITION FILE TO BOI AND DISPLAY DATA. 00682 M01S00123.241l630 +++| DATA 50H DAY POSITION PRINT FILE TO DAYFILE AND DISP 00683 M01S00124.241l630 +++| DATA 10HLAY DATA. 00684 M01S00125.241l630 +++| DATA 46C DROP DROP FILE FROM QUEUE AND TERMINATE. 00685 M01S00126.241l630 +++| DATA C* * 00686 M01S00127.241l630 +++| DATA 46C END RETURN FILE TO QUEUE AND TERMINATE. 00687 M01S00128.241l630 +++| DATA 50H HELP LIST L DISPLAY COMMANDS FOR QDSPLAY UTI 00688 M01S00129.241l630 +++| DATA 10HLITY. 00689 M01S00130.241l630 +++| DATA 48C LINE SET FILE DISPLAY MODE TO LINE FORMAT. 00690 M01S00131.241l630 +++| DATA 49C OCTAL SET FILE DISPLAY MODE TO OCTAL FORMAT. 00691 M01S00132.241l630 +++| DATA C* * 00692 M01S00133.241l630 +++| DATA 50H SS DISPLAY IN OCTAL FROM BEGINNING OF SYST 00693 M01S00134.241l630 +++| DATA 10HEM SECTOR. 00694 M01S00135.241l630 +++| DATA 50C + PAGE DISPLAY FORWARD (CIRCULAR FOR SS). 00695 M01S00136.241l630 +++| DATA 48C - PAGE DISPLAY BACKWARD. 00696 M01S00137.241l630 +++| DATA C* * 00697 M01S00138.241l630 +++| HLMA DATA C* * 00698 M01S00139.241l630 +++| HLIA DATA C* * 00699 M01S00140.241l630 +++| CON 0 END OF HELP PAGE 1 DISPLAY 00700 M01S00141.241l630 +++| HLPAL EQU *-HLPA LENGTH OF PAGE 1 DISPLAY 00701 M01S00142.241l630 +++| HLPB BSS 0 *L* DISPLAY HELP PAGE 2 00702 M01S00143.241l630 +++| DATA 50HQDSPLAY COMMANDS PAGE 00703 M01S00144.241l630 +++| DATA 10H 2 OF 2 00704 M01S00145.241l630 +++| DATA C* * 00705 M01S00146.241l630 +++| DATA 34C COMMAND DESCRIPTION 00706 M01S00147.241l630 +++| DATA C* * 00707 M01S00148.241l630 +++| DATA 50H SL SKIP 1 LINE FORWARD IN FILE AND DISPLAY 00708 M01S00149.241l630 +++| DATA 10H DATA. 00709 M01S00150.241l630 +++| DATA 50H SL,N SKIP N LINES FORWARD IN FILE AND DISPLA 00710 M01S00151.241l630 +++| DATA 10HY DATA. 00711 M01S00152.241l630 +++| DATA 50H SP SKIP 1 PAGE FORWARD IN FILE AND DISPLAY 00712 M01S00153.241l630 +++| DATA 10H DATA. 00713 M01S00154.241l630 +++| DATA 50H SP,N SKIP N PAGES FORWARD IN FILE AND DISPLA 00714 M01S00155.241l630 +++| DATA 10HY DATA. 00715 M01S00156.241l630 +++| DATA 50H SR SKIP 1 RECORD FORWARD IN FILE AND DISPL 00716 M01S00157.241l630 +++| DATA 10HAY DATA. 00717 M01S00158.241l630 +++| DATA C* * 00718 M01S00159.241l630 +++| DATA 50H SR,N SKIP N RECORDS FORWARD IN FILE AND DISP 00719 M01S00160.241l630 +++| DATA 10HLAY DATA. 00720 M01S00161.241l630 +++| DATA 31C SR,* SKIP TO EOI IN FILE. 00721 M01S00162.241l630 +++| DATA 50H BR SKIP 1 RECORD BACKWARD IN FILE AND DISP 00722 M01S00163.241l630 +++| DATA 10HLAY DATA. 00723 M01S00164.241l630 +++| DATA 50H BR,N SKIP N RECORDS BACKWARD IN FILE AND DIS 00724 M01S00165.241l630 +++| DATA 10HPLAY DATA. 00725 M01S00166.241l630 +++| DATA 20C 00726 M01S00167.241l630 +++| DATA 20C 00727 M01S00168.241l630 +++| DATA 20C 00728 M01S00169.241l630 +++| DATA 20C 00729 M01S00170.241l630 +++| HLMB DATA C* * 00730 M01S00171.241l630 +++| HLIB DATA C* * 00731 M01S00172.241l630 +++| CON 0 END OF HELP PAGE 2 DISPLAY 00732 M01S00173.241l630 +++| HLPBL EQU *-HLPB LENGTH OF PAGE 2 DISPLAY 00733 M01S00174.241l630 +++| ERRNZ HLPAL-HLPBL PAGE LENGTHS MUST BE EQUAL 00734 M01S00175.241l630 +++| ERRNZ HLMA-HLPA-HLMB+HLPB MESSAGE OFFSETS MUST BE THE SAME 00735 M01S00176.241l630 +++| ERRNZ HLIA-HLPA-HLIB+HLPB INPUT OFFSETS MUST BE THE SAME 00736 M01S00525.qdsplay +++| LNE SPACE 4,15 00737 M01S00526.qdsplay +++|** LNE - SET *L* DISPLAY FORMAT TO LINE MODE. 00738 M01S00527.qdsplay +++|* 00739 M01S00528.qdsplay +++|* *LNE* SETS LINE MODE FORMAT FOR THE *L* DISPLAY. 00740 M01S00529.qdsplay +++|* 00741 M01S00530.qdsplay +++|* EXIT (B2) = 0 (NO ERROR).
| Line S00531 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00742 M02S00531.241l630 ---|* (X2) = 0, IF *HELP* OR *SS* STATUS.
| Line S00532 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00743 M02S00532.241l630 ---|* (X2) = FET ADDRESS OF QUEUED FILE,
| Line S00533 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00744 M02S00533.241l630 ---|* IF NOT *HELP* OR *SS* STATUS. 00745 M01S00177.241l630 +++|* (X2) = 0, IF *HELP* STATUS. 00746 M01S00178.241l630 +++|* (X2) = SYSTEM SECTOR FET, IF *SS* STATUS. 00747 M01S00179.241l630 +++|* (X2) = QUEUED FET, IF NOT *HELP* OR *SS* STATUS. 00748 M01S00534.qdsplay +++|* 00749 M01S00535.qdsplay +++|* USES X - 2, 6. 00750 M01S00536.qdsplay +++|* A - 2, 6. 00751 M01S00537.qdsplay +++|* B - 2, 3. 00752 M01S00180.241l630 +++|* 00753 M01S00181.241l630 +++|* CALLS HLP. 00754 M01S00538.qdsplay +++| 00755 M01S00539.qdsplay +++| 00756 M01S00540.qdsplay +++| LNE SUBR ENTRY/EXIT 00757 M01S00541.qdsplay +++| SA2 STAT GET FILE STATUS 00758 M01S00542.qdsplay +++| SB2 B0 NO ERROR 00759 M01S00543.qdsplay +++| SX6 B0 SET *L* DISPLAY FORMAT TO LINE MODE 00760 M01S00544.qdsplay +++| SA6 MODE 00761 M01S00545.qdsplay +++| SB3 X2 00762 M01S00546.qdsplay +++| SX2 B0 DO NOT REBUILD *L* DISPLAY
| Line S00547 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00763 M02S00547.241l630 ---| LE B3,B1,LNEX IF *SS* OR *HELP* STATUS
| Line S00548 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00764 M02S00548.241l630 ---| SX2 Q 00765 M01S00182.241l630 +++| NE B3,B0,LNE1 IF NOT HELP STATUS 00766 M01S00183.241l630 +++| RJ HLP REBUILD HELP DISPLAY WITH *LINE* ECHOED 00767 M01S00184.241l630 +++| EQ LNEX RETURN 00768 M01S00185.241l630 +++| 00769 M01S00186.241l630 +++| LNE1 NE B3,B1,LNE2 IF NOT *SS* STATUS 00770 M01S00187.241l630 +++| SX2 S SET SYSTEM SECTOR FET 00771 M01S00188.241l630 +++| EQ LNEX RETURN 00772 M01S00189.241l630 +++| 00773 M01S00190.241l630 +++| LNE2 SX2 Q SET QUEUED FILE FET 00774 M01S00549.qdsplay +++| EQ LNEX RETURN 00775 M01S00550.qdsplay +++| OCT SPACE 4,15 00776 M01S00551.qdsplay +++|** OCT - SETS THE *L* DISPLAY FORMAT TO OCTAL MODE. 00777 M01S00552.qdsplay +++|* 00778 M01S00553.qdsplay +++|* *OCT* SETS OCTAL MODE FORMAT FOR THE *L* DISPLAY. 00779 M01S00554.qdsplay +++|* 00780 M01S00555.qdsplay +++|* EXIT (B2) = 0 (NO ERROR).
| Line S00556 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00781 M02S00556.241l630 ---|* (X2) = 0, IF *HELP* OR *SS* STATUS.
| Line S00557 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00782 M02S00557.241l630 ---|* (X2) = FET ADDRESS OF QUEUED FILE, IF NOT *HELP*
| Line S00558 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00783 M02S00558.241l630 ---|* OR *SS* STATUS. 00784 M01S00191.241l630 +++|* (X2) = 0, IF *HELP* STATUS. 00785 M01S00192.241l630 +++|* (X2) = SYSTEM SECTOR FET, IF *SS* STATUS. 00786 M01S00193.241l630 +++|* (X2) = QUEUED FET, IF NOT *HELP* OR *SS* STATUS. 00787 M01S00559.qdsplay +++|* 00788 M01S00560.qdsplay +++|* USES X - 2, 6. 00789 M01S00561.qdsplay +++|* A - 2, 6. 00790 M01S00562.qdsplay +++|* B - 2, 3. 00791 M01S00194.241l630 +++|* 00792 M01S00195.241l630 +++|* CALLS HLP. 00793 M01S00563.qdsplay +++| 00794 M01S00564.qdsplay +++| 00795 M01S00565.qdsplay +++| OCT SUBR ENTRY/EXIT 00796 M01S00566.qdsplay +++| SX6 B1 SET *L* DISPLAY FORMAT TO OCTAL MODE 00797 M01S00567.qdsplay +++| SA6 MODE 00798 M01S00568.qdsplay +++| SB2 B0 NO ERROR 00799 M01S00569.qdsplay +++| SA2 STAT GET FILE STATUS 00800 M01S00570.qdsplay +++| SB3 X2 00801 M01S00571.qdsplay +++| SX2 B0 DO NOT REBUILD *L* DISPLAY
| Line S00572 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00802 M02S00572.241l630 ---| LE B3,B1,OCTX IF *SS* OR *HELP* STATUS
| Line S00573 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00803 M02S00573.241l630 ---| SX2 Q 00804 M01S00196.241l630 +++| NE B3,B0,OCT1 IF NOT HELP STATUS 00805 M01S00197.241l630 +++| RJ HLP REBUILD HELP DISPLAY WITH *OCTAL* ECHOED 00806 M01S00198.241l630 +++| EQ OCTX RETURN 00807 M01S00199.241l630 +++| 00808 M01S00200.241l630 +++| OCT1 NE B3,B1,OCT2 IF NOT *SS* STATUS 00809 M01S00201.241l630 +++| SX2 S SET SYSTEM SECTOR FET 00810 M01S00202.241l630 +++| EQ OCTX RETURN 00811 M01S00203.241l630 +++| 00812 M01S00204.241l630 +++| OCT2 SX2 Q SET QUEUED FILE FET 00813 M01S00574.qdsplay +++| EQ OCTX RETURN 00814 M01S00575.qdsplay +++| SLF SPACE 4,10 00815 M01S00576.qdsplay +++|** SLF - SKIP LINES FORWARD. 00816 M01S00577.qdsplay +++|* 00817 M01S00578.qdsplay +++|* *SLF* SKIPS LINES FORWARD. 00818 M01S00579.qdsplay +++|* 00819 M01S00580.qdsplay +++|* EXIT (X2) = FET ADDRESS OF QUEUED FILE. 00820 M01S00205.241l630 +++|* (B2) = 0 (NO ERROR). 00821 M01S00581.qdsplay +++|*
| Line S00582 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00822 M02S00582.241l630 ---|* USES X - 1, 2, 5, 6. 00823 M01S00206.241l630 +++|* USES X - 1, 5, 6. 00824 M01S00583.qdsplay +++|* A - 5, 6. 00825 M01S00207.241l630 +++|* B - 2. 00826 M01S00584.qdsplay +++|* 00827 M01S00585.qdsplay +++|* MACROS READC. 00828 M01S00586.qdsplay +++| 00829 M01S00587.qdsplay +++| 00830 M01S00588.qdsplay +++| SLF SUBR ENTRY/EXIT 00831 M01S00589.qdsplay +++| SA5 SCNT GET SKIP COUNT 00832 M01S00590.qdsplay +++| SX6 SMID SET FILE STATUS TO MIDDLE OF RECORD 00833 M01S00591.qdsplay +++| SA6 STAT 00834 M01S00592.qdsplay +++| SLF1 READC Q,WBUF,PLSZ 00835 M01S00208.241l630 +++| SB2 B0+ INDICATE NO ERROR 00836 M01S00593.qdsplay +++| NG X1,SLFX IF EOF/EOI 00837 M01S00594.qdsplay +++| SX1 X1-WBUF 00838 M01S00595.qdsplay +++| ZR X1,SLFX IF EOR (NO DATA) 00839 M01S00596.qdsplay +++| SX5 X5-1 DECREMENT SKIP COUNT 00840 M01S00597.qdsplay +++| NZ X5,SLF1 IF MORE LINES TO SKIP 00841 M01S00598.qdsplay +++| EQ SLFX RETURN 00842 M01S00599.qdsplay +++| SPF SPACE 4,10 00843 M01S00600.qdsplay +++|** SPF - SKIP PAGES FORWARD. 00844 M01S00601.qdsplay +++|* 00845 M01S00602.qdsplay +++|* *SPF* SKIPS PAGES FORWARD. 00846 M01S00603.qdsplay +++|* 00847 M01S00604.qdsplay +++|* EXIT (X2) = FET ADDRESS OF QUEUED FILE. 00848 M01S00209.241l630 +++|* (B2) = 0 (NO ERROR). 00849 M01S00605.qdsplay +++|* 00850 M01S00606.qdsplay +++|* USES X - 0, 1, 3, 4, 5, 6, 7. 00851 M01S00607.qdsplay +++|* A - 1, 3, 4, 5, 6, 7. 00852 M01S00210.241l630 +++|* B - 2. 00853 M01S00608.qdsplay +++|* 00854 M01S00609.qdsplay +++|* MACROS READC. 00855 M01S00610.qdsplay +++| 00856 M01S00611.qdsplay +++| 00857 M01S00612.qdsplay +++| SPF SUBR ENTRY/EXIT 00858 M01S00613.qdsplay +++| SA5 SCNT GET SKIP COUNT 00859 M01S00614.qdsplay +++| SX6 SMID SET MIDDLE OF RECORD FILE STATUS 00860 M01S00615.qdsplay +++| SA6 STAT 00861 M01S00616.qdsplay +++| SX0 B1+ INDICATE TOP OF FIRST PAGE 00862 M01S00617.qdsplay +++| SPF1 SA3 Q+2 GET *IN* 00863 M01S00618.qdsplay +++| BX6 X3 00864 M01S00619.qdsplay +++| SA4 A3+B1 GET *OUT* 00865 M01S00620.qdsplay +++| BX7 X4 00866 M01S00621.qdsplay +++| SA6 Q-2 SAVE PREVIOUS *IN* 00867 M01S00622.qdsplay +++| SA7 A6+B1 SAVE PREVIOUS *OUT* 00868 M01S00623.qdsplay +++| READC Q,WBUF,PLSZ 00869 M01S00211.241l630 +++| SB2 B0+ INDICATE NO ERROR 00870 M01S00624.qdsplay +++| NG X1,SPFX IF EOF/EOI 00871 M01S00625.qdsplay +++| SX1 X1-WBUF 00872 M01S00626.qdsplay +++| ZR X1,SPFX IF EOR (WITH NO DATA) 00873 M01S00627.qdsplay +++| MX3 6 CHECK LINE FOR CARRIAGE CONTROL 00874 M01S00628.qdsplay +++| SA1 WBUF 00875 M01S00629.qdsplay +++| BX1 X3*X1 00876 M01S00630.qdsplay +++| LX1 6 00877 M01S00631.qdsplay +++| SX1 X1-1R1 00878 M01S00632.qdsplay +++| BX1 X1+X0
| Line S00633 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00879 M02S00633.241l630 ---| SX0 B0 INDICATE NOT TOP OF FIRST PAGE 00880 M01S00212.241l630 +++| SX0 B0+ INDICATE NOT TOP OF FIRST PAGE 00881 M01S00634.qdsplay +++| NZ X1,SPF1 IF TOP OF FIRST PAGE OR NOT PAGE EJECT 1 00882 M01S00635.qdsplay +++| SX5 X5-1 DECREMENT SKIP COUNT 00883 M01S00636.qdsplay +++| NZ X5,SPF1 IF MORE PAGES TO SKIP 00884 M01S00637.qdsplay +++| SA1 Q-2 GET PREVIOUS *IN* 00885 M01S00638.qdsplay +++| SA3 A1+B1 GET PREVIOUS *OUT* 00886 M01S00639.qdsplay +++| BX6 X1 00887 M01S00640.qdsplay +++| SA6 Q+2 SET *IN* AND *OUT* IN FET 00888 M01S00641.qdsplay +++| BX7 X3 00889 M01S00642.qdsplay +++| SA7 A6+B1 00890 M01S00643.qdsplay +++| EQ SPFX RETURN 00891 M01S00644.qdsplay +++| SRB SPACE 4,15 00892 M01S00645.qdsplay +++|** SRB - SKIP RECORDS BACKWARD. 00893 M01S00646.qdsplay +++|* 00894 M01S00647.qdsplay +++|* *SRB* SKIP RECORDS BACKWARD. 00895 M01S00648.qdsplay +++|* 00896 M01S00649.qdsplay +++|* EXIT (X2) = FET ADDRESS OF QUEUED FILE, IF FILE STATUS IS 00897 M01S00650.qdsplay +++|* NOT BOI. 00898 M01S00651.qdsplay +++|* (X2) = 0, IF FILE STATUS IS BOI. 00899 M01S00652.qdsplay +++|* 00900 M01S00653.qdsplay +++|* USES X - 0, 1, 2, 3, 4, 6. 00901 M01S00654.qdsplay +++|* A - 1, 3, 6. 00902 M01S00655.qdsplay +++|* B - 2. 00903 M01S00656.qdsplay +++|* 00904 M01S00657.qdsplay +++|* CALLS RNR. 00905 M01S00658.qdsplay +++|* 00906 M01S00659.qdsplay +++|* MACROS SKIPB. 00907 M01S00660.qdsplay +++| 00908 M01S00661.qdsplay +++| 00909 M01S00662.qdsplay +++| SRB SUBR ENTRY/EXIT 00910 M01S00663.qdsplay +++| SA3 STAT GET FILE STATUS 00911 M01S00664.qdsplay +++| SB2 B0+ NO ERROR 00912 M01S00665.qdsplay +++| SX2 X3-SBOI 00913 M01S00666.qdsplay +++| ZR X2,SRBX IF FILE DISPLAY IS AT BOI 00914 M01S00667.qdsplay +++| SX6 QBUF SET *IN* = *OUT* = *FIRST* (EMPTY BUFFER) 00915 M01S00668.qdsplay +++| SA6 Q+2 00916 M01S00669.qdsplay +++| SA1 SCNT GET SKIP COUNT 00917 M01S00670.qdsplay +++| SA6 Q+3 00918 M01S00671.qdsplay +++| SX4 X3-SEOF 00919 M01S00672.qdsplay +++| SX2 X3-SBOR 00920 M01S00673.qdsplay +++| ZR X4,SRB1 IF FILE DISPLAY AT EOF 00921 M01S00674.qdsplay +++| NZ X2,SRB2 IF FILE DISPLAY NOT AT BOR 00922 M01S00675.qdsplay +++| SRB1 SX4 X1+B1 00923 M01S00676.qdsplay +++| NG X4,SRB2 IF FILE COUNT ALREADY AT MAXIMUM 00924 M01S00677.qdsplay +++| SX1 X1+B1 SKIP EXTRA RECORD 00925 M01S00678.qdsplay +++| SRB2 SKIPB Q,X1,R 00926 M01S00679.qdsplay +++| SA3 X2 00927 M01S00680.qdsplay +++| MX0 -6 00928 M01S00681.qdsplay +++| AX3 3 00929 M01S00682.qdsplay +++| BX1 -X0*X3 00930 M01S00683.qdsplay +++| SX1 X1-5 00931 M01S00684.qdsplay +++| SX6 SBOI 00932 M01S00685.qdsplay +++| ZR X1,SRB3 IF FILE IS AT BOI 00933 M01S00686.qdsplay +++| SX6 SBOR BEGINNING RECORD STATUS 00934 M01S00687.qdsplay +++| SRB3 RJ RNR READ NEW RECORD 00935 M01S00688.qdsplay +++| EQ SRBX RETURN 00936 M01S00689.qdsplay +++| SRF SPACE 4,15 00937 M01S00690.qdsplay +++|** SRF - SKIP RECORDS FORWARD. 00938 M01S00691.qdsplay +++|* 00939 M01S00692.qdsplay +++|* *SRF* SKIPS RECORDS FORWARD. 00940 M01S00693.qdsplay +++|* 00941 M01S00694.qdsplay +++|* EXIT (X2) = 0, IF STATUS = EOI. 00942 M01S00695.qdsplay +++|* (B2) = 0, IF STATUS = EOI. 00943 M01S00696.qdsplay +++|* (X2) = FET ADDRESS OF QUEUED FILE, IF STATUS NOT EOI. 00944 M01S00697.qdsplay +++|* 00945 M01S00698.qdsplay +++|* USES X - 1, 2, 3, 4, 6. 00946 M01S00699.qdsplay +++|* A - 1, 3, 4, 6. 00947 M01S00700.qdsplay +++|* B - 2, 3. 00948 M01S00701.qdsplay +++|* 00949 M01S00702.qdsplay +++|* CALLS RNR. 00950 M01S00703.qdsplay +++|* 00951 M01S00704.qdsplay +++|* MACROS SKIPF. 00952 M01S00705.qdsplay +++| 00953 M01S00706.qdsplay +++| 00954 M01S00707.qdsplay +++| SRF SUBR ENTRY/EXIT 00955 M01S00708.qdsplay +++| SA3 STAT GET STATUS 00956 M01S00709.qdsplay +++| SX2 B0 DISPLAY WILL NOT BE REBUILT 00957 M01S00710.qdsplay +++| SB2 B0 NO ERROR 00958 M01S00711.qdsplay +++| SB3 X3-SEOI 00959 M01S00712.qdsplay +++| ZR B3,SRFX IF STATUS IS EOI 00960 M01S00713.qdsplay +++| SX6 QBUF SET *IN* = *OUT* = *FIRST* (EMPTY BUFFER) 00961 M01S00714.qdsplay +++| SA6 Q+2 00962 M01S00715.qdsplay +++| SA6 A6+B1 00963 M01S00716.qdsplay +++| SA1 SCNT GET SKIP COUNT 00964 M01S00717.qdsplay +++| BX3 X1 00965 M01S00718.qdsplay +++| LX3 59-17 00966 M01S00719.qdsplay +++| SA4 Q 00967 M01S00720.qdsplay +++| LX4 59-4 00968 M01S00721.qdsplay +++| NG X3,SRF1 IF SKIP COUNT = 777777B (* OPTION) 00969 M01S00722.qdsplay +++| PL X4,SRF1 IF NOT EOR/EOF/EOI IN FET 00970 M01S00723.qdsplay +++| SX1 X1-1 DECREMENT SKIP COUNT 00971 M01S00724.qdsplay +++| ZR X1,SRF2 IF SKIP COUNT = 0 00972 M01S00725.qdsplay +++| SRF1 SKIPF Q,X1,R SKIP RECORDS 00973 M01S00726.qdsplay +++| SRF2 SX6 SBOR BEGINNING OF RECORD STATUS 00974 M01S00727.qdsplay +++| RJ RNR READ NEW RECORD 00975 M01S00728.qdsplay +++| EQ SRFX RETURN 00976 M01S00729.qdsplay +++| SSP SPACE 4,10 00977 M01S00730.qdsplay +++|** SSP - *SYSTEM SECTOR* FUNCTION PROCESSOR. 00978 M01S00731.qdsplay +++|* 00979 M01S00732.qdsplay +++|* *SSP* DISPLAYS THE SYSTEM SECTOR PORTION OF THE QUEUED FILE. 00980 M01S00733.qdsplay +++|* 00981 M01S00734.qdsplay +++|* EXIT (X2) = FET ADDRESS FOR SYSTEM SECTOR BUFFER. 00982 M01S00735.qdsplay +++|* 00983 M01S00736.qdsplay +++|* USES X - 1, 2, 6, 7. 00984 M01S00737.qdsplay +++|* A - 1, 6, 7. 00985 M01S00738.qdsplay +++|* B - 3. 00986 M01S00739.qdsplay +++| 00987 M01S00740.qdsplay +++| 00988 M01S00741.qdsplay +++| SSP SUBR ENTRY/EXIT. 00989 M01S00742.qdsplay +++| SX6 SBUF 00990 M01S00743.qdsplay +++| SA6 S+3 SET *OUT* = *FIRST* 00991 M01S00744.qdsplay +++| SX7 SBUF+77B 00992 M01S00745.qdsplay +++| SA1 STAT GET FILE STATUS 00993 M01S00746.qdsplay +++| SA7 A6-B1 SET *IN* 00994 M01S00747.qdsplay +++| SB3 X1 00995 M01S00748.qdsplay +++| SX7 SSYS SET *SS* FILE STATUS 00996 M01S00749.qdsplay +++| BX6 X1 SET PREVIOUS FILE STATUS 00997 M01S00750.qdsplay +++| SA7 A1 00998 M01S00751.qdsplay +++| SX2 S 00999 M01S00752.qdsplay +++| LE B3,B1,SSPX IF *SS* OR *HELP* STATUS 01000 M01S00753.qdsplay +++| SA6 PSTT 01001 M01S00754.qdsplay +++| EQ SSPX RETURN 01002 M01S00755.qdsplay +++| TOG SPACE 4,15 01003 M01S00756.qdsplay +++|** TOG - TOGGLE BACK TO FILE DISPLAY. 01004 M01S00757.qdsplay +++|* 01005 M01S00758.qdsplay +++|* *TOG* - TOGGLES THE DISPLAY TO THE PREVIOUS FILE DISPLAY 01006 M01S00759.qdsplay +++|* IF *HELP* OR *SYSTEM SECTOR* IS CURRENTLY BEING DISPLAYED. 01007 M01S00760.qdsplay +++|* 01008 M01S00761.qdsplay +++|* EXIT (B2) = 0 (NO ERROR). 01009 M01S00762.qdsplay +++|* (X2) = 0, IF FILE STATUS IS NOT *SS* OR *HELP*. 01010 M01S00763.qdsplay +++|* (X2) = FET ADDRESS OF QUEUED FILE IF FILE STATUS IS 01011 M01S00764.qdsplay +++|* *SS* OR *HELP*. 01012 M01S00765.qdsplay +++|* 01013 M01S00766.qdsplay +++|* USES X - 1, 2, 3, 6. 01014 M01S00767.qdsplay +++|* A - 1, 3, 6. 01015 M01S00768.qdsplay +++|* B - 2, 3. 01016 M01S00769.qdsplay +++| 01017 M01S00770.qdsplay +++| 01018 M01S00771.qdsplay +++| TOG SUBR ENTRY/EXIT 01019 M01S00772.qdsplay +++| SA1 STAT GET FILE STATUS 01020 M01S00773.qdsplay +++| SB3 X1 01021 M01S00774.qdsplay +++| SB2 B0 NO ERROR 01022 M01S00775.qdsplay +++| SA3 PSTT GET PREVIOUS STATUS 01023 M01S00776.qdsplay +++| SX2 B0 DISPLAY WILL NOT BE REBUILT 01024 M01S00777.qdsplay +++| BX6 X3 SET PREVIOUS FILE STATUS 01025 M01S00778.qdsplay +++| GT B3,B1,TOGX IF NOT *SS* OR *HELP* STATUS 01026 M01S00779.qdsplay +++| SX2 Q
| Line S00780 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01027 M02S00780.241l630 ---| SA6 A1 01028 M01S00213.241l630 +++| SA6 A1+ 01029 M01S00781.qdsplay +++| EQ TOGX RETURN 01030 M01S00782.qdsplay +++| TITLE SUBROUTINES. 01031 M01S00783.qdsplay +++| BLD SPACE 4,15 01032 M01S00784.qdsplay +++|** BLD - BUILD *L* DISPLAY DATA. 01033 M01S00785.qdsplay +++|* 01034 M01S00786.qdsplay +++|* *BLD* BUILDS THE *L* DISPLAY FOR QUEUED FILE OR 01035 M01S00787.qdsplay +++|* SYSTEM SECTOR DATA. 01036 M01S00788.qdsplay +++|* 01037 M01S00789.qdsplay +++|* ENTRY (X2) = FET ADDRESS. 01038 M01S00214.241l630 +++|* (B2) = MESSAGE ADDRESS. 01039 M01S00790.qdsplay +++|*
| Line S00791 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01040 M02S00791.241l630 ---|* USES X - 1, 2, 3, 4, 6, 7. 01041 M01S00215.241l630 +++|* USES X - 1, 2, 3, 4, 5, 6, 7. 01042 M01S00792.qdsplay +++|* A - 1, 2, 3, 4, 6, 7.
| Line S00793 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01043 M02S00793.241l630 ---|* B - 3, 4, 5.
| Line S00794 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01044 M02S00794.241l630 ---|*
| Line S00795 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01045 M02S00795.241l630 ---|* CALLS EFP, FLD, FOD, RQF, TLD, TOD. 01046 M01S00216.241l630 +++|* B - 2, 3, 4, 6. 01047 M01S00217.241l630 +++|*
| Line S00218 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 01048 M02S00218.qdsp3 ---|* CALLS COI, FLB, FOD, RQF, TLD, TOD. 01049 M01S00015.qdsp3 +++|* CALLS COI, FLB, FOD, RQF, TLD. 01050 M01S00219.241l630 +++|* 01051 M01S00220.241l630 +++|* MACROS MOVE. 01052 M01S00796.qdsplay +++| 01053 M01S00797.qdsplay +++|
| Line S00798 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 01054 M02S00798.qdsp3 ---| BLD1 RJ TOD TRANSFER OCTAL DATA
| Line S00799 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
M03 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 01055 M03S00799.qdsp3 ---| SB5 FOD FORMAT OCTAL DATA
| Line S00800 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
M03 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 01056 M03S00800.qdsp3 ---| BLD2 SA1 STAT
| Line S00221 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 01057 M02S00221.qdsp3 ---| RJ FOD FORMAT OCTAL DATA 01058 M01S00016.qdsp3 +++| BLD1 RJ FOD FORMAT OCTAL DATA 01059 M01S00222.241l630 +++| BLD2 BX5 X6 SAVE FILE STATUS 01060 M01S00223.241l630 +++| SA2 BLDA GET MESSAGE ORDINAL 01061 M01S00224.241l630 +++| SX2 TMLD+X2 SET MESSAGE ADDRESS 01062 M01S00225.241l630 +++| MOVE ERML,X2,B6 SET MESSAGE IN MESSAGE LINE 01063 M01S00226.241l630 +++| RJ COI CONVERT OPERATOR INPUT 01064 M01S00227.241l630 +++| SX2 IBUF ECHO INPUT 01065 M01S00228.241l630 +++| MOVE LCOMU,X2,B6+ERML 01066 M01S00229.241l630 +++| SB6 B6+ERML+LCOMU RESET LWA OF WORKING BUFFER 01067 M01S00230.241l630 +++| BX6 X5 RESTORE FILE STATUS 01068 M01S00231.241l630 +++| SA1 STAT GET LAST FILE STATUS 01069 M01S00801.qdsplay +++| SB4 X6-SEOI 01070 M01S00802.qdsplay +++| SB3 X1+ 01071 M01S00803.qdsplay +++| EQ B3,B1,BLD4 IF *SS* STATUS 01072 M01S00804.qdsplay +++| NG B4,BLD4 IF NOT EOR/EOF/EOI ENCOUNTERED 01073 M01S00805.qdsplay +++| LE B4,B1,BLD3 IF EOF/EOI ENCOUNTERED 01074 M01S00806.qdsplay +++| SB4 SBOR 01075 M01S00807.qdsplay +++| GT B3,B4,BLD3 IF NOT AT BOI/BOR 01076 M01S00808.qdsplay +++| SA1 ERIB 01077 M01S00809.qdsplay +++| NZ X1,BLD4 IF ENTIRE RECORD IN BUFFER 01078 M01S00810.qdsplay +++| BLD3 SA6 STAT SAVE FILE STATUS
| Line S00811 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01079 M02S00811.241l630 ---| BLD4 RJ EFP FORMAT OCTAL/LINE DATA 01080 M01S00232.241l630 +++| BLD4 SA1 STAT GET FILE STATUS 01081 M01S00233.241l630 +++| SA1 TVST+X1 SET STATUS IN HEADER 01082 M01S00234.241l630 +++| BX6 X1
| Line S00235 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 01083 M02S00235.qdsp3 ---| SA6 WBHR+4 01084 M01S00017.qdsp3 +++| SA6 WBHR+5 01085 M01S00236.241l630 +++| SX1 WBHR FWA OF DATA TO FORMAT 01086 M01S00237.241l630 +++| SX6 B6-B1 LWA DATA TO FORMAT 01087 M01S00238.241l630 +++| MX2 0 INDICATE *L* DISPLAY 01088 M01S00239.241l630 +++| SX3 B1+ SET MODE FOR *FLB* 01089 M01S00240.241l630 +++| SB2 LBUF FWA *L* DISPLAY BUFFER 01090 M01S00241.241l630 +++| SB3 XCDT X - COORDINATE OF DISPLAY 01091 M01S00242.241l630 +++| SB4 YCDT Y - COORDINATE OF DISPLAY 01092 M01S00243.241l630 +++| SB6 LBUF+LBUFL LWA+1 *L* DISPLAY BUFFER 01093 M01S00244.241l630 +++| RJ FLB FORMAT DATA FOR *L* DISPLAY 01094 M01S00812.qdsplay +++| SA2 FETA GET FET ADDRESS 01095 M01S00813.qdsplay +++| SA1 X2-2 GET PREVIOUS *IN* 01096 M01S00814.qdsplay +++| SA3 X2+2 GET CURRENT *IN* 01097 M01S00815.qdsplay +++| BX6 X1 01098 M01S00816.qdsplay +++| LX7 X3 01099 M01S00817.qdsplay +++| SA6 A3 SWITCH *IN* POINTERS 01100 M01S00818.qdsplay +++| SA7 A1 01101 M01S00819.qdsplay +++| SA1 A1+B1 GET PREVIOUS *OUT* 01102 M01S00820.qdsplay +++| SA3 A3+B1 GET CURRENT *OUT* 01103 M01S00821.qdsplay +++| BX6 X1 01104 M01S00822.qdsplay +++| LX7 X3 01105 M01S00823.qdsplay +++| SA6 A3 SWITCH *OUT* POINTERS 01106 M01S00824.qdsplay +++| SA7 A1 01107 M01S00825.qdsplay +++| 01108 M01S00826.qdsplay +++| BLD SUBR ENTRY/EXIT 01109 M01S00245.241l630 +++| SX6 B2+ SAVE MESSAGE ORDINAL 01110 M01S00246.241l630 +++| SA6 BLDA 01111 M01S00827.qdsplay +++| RJ RQF READ QUEUED FILE TO BUFFER AHEAD 01112 M01S00828.qdsplay +++| BX7 X2 SAVE FET ADDRESS 01113 M01S00829.qdsplay +++| SA3 X2+2 GET *IN* 01114 M01S00830.qdsplay +++| BX6 X3 01115 M01S00831.qdsplay +++| SA7 FETA 01116 M01S00832.qdsplay +++| SA4 A3+B1 GET *OUT* 01117 M01S00833.qdsplay +++| BX7 X4 01118 M01S00834.qdsplay +++| SA6 X2-2 SAVE PREVIOUS *IN* 01119 M01S00835.qdsplay +++| SA1 STAT GET FILE STATUS 01120 M01S00836.qdsplay +++| SA7 A6+B1 SAVE PREVIOUS *OUT* 01121 M01S00837.qdsplay +++| SB3 X1 01122 M01S00838.qdsplay +++| EQ B3,B1,BLD1 IF STATUS IS *SS* 01123 M01S00839.qdsplay +++| SA3 MODE 01124 M01S00840.qdsplay +++| NZ X3,BLD1 IF IN OCTAL MODE 01125 M01S00841.qdsplay +++| RJ TLD TRANSFER LINES OF DATA
| Line S00842 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01126 M02S00842.241l630 ---| SB5 FLD FORMAT LINE DATA 01127 M01S00843.qdsplay +++| EQ BLD2 UPDATE FILE STATUS 01128 M01S00247.241l630 +++| 01129 M01S00248.241l630 +++| 01130 M01S00249.241l630 +++| BLDA BSS 1 MESSAGE ORDINAL IN TABLE 01131 M01S00844.qdsplay +++| CMP SPACE 4,15 01132 M01S00845.qdsplay +++|** CMP - COMMAND FUNCTION PROCESSOR. 01133 M01S00846.qdsplay +++|* 01134 M01S00847.qdsplay +++|* *CMP* PROCESSES EACH INPUT DIRECTIVE AND SETS SKIP COUNTS. 01135 M01S00848.qdsplay +++|* 01136 M01S00849.qdsplay +++|* EXIT (B5) = ADDRESS OF FUNCTION PROCESSOR, IF NO ERROR. 01137 M01S00850.qdsplay +++|* (B2) = 0, IF NO ERROR IN DIRECTIVE INPUT. 01138 M01S00851.qdsplay +++|* (B2) = ERROR MESSAGE ADDRESS, IF ERROR. 01139 M01S00852.qdsplay +++|*
| Line S00853 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01140 M02S00853.241l630 ---|* USES X - ALL.
| Line S00854 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01141 M02S00854.241l630 ---|* A - 1, 2, 3, 4, 5, 6.
| Line S00855 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01142 M02S00855.241l630 ---|* B - 2, 4, 5, 6, 7.
| Line S00856 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01143 M02S00856.241l630 ---|*
| Line S00857 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01144 M02S00857.241l630 ---|* CALLS DXB, UPC. 01145 M01S00250.241l630 +++|* USES X - 0, 1, 2, 3, 4, 5, 6. 01146 M01S00251.241l630 +++|* A - 1, 3, 4, 6. 01147 M01S00252.241l630 +++|* B - 2, 3, 4, 5, 6, 7. 01148 M01S00253.241l630 +++|* 01149 M01S00254.241l630 +++|* CALLS DXB, PGD, POP, USB. 01150 M01S00858.qdsplay +++| 01151 M01S00859.qdsplay +++|
| Line S00860 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01152 M02S00860.241l630 ---| CMP3 AX5 6
| Line S00861 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01153 M02S00861.241l630 ---| NZ X5,CMPX IF EXCESS PARAMETER AFTER *+*
| Line S00862 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01154 M02S00862.241l630 ---| SB2 B0
| Line S00863 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01155 M02S00863.241l630 ---| 01156 M01S00255.241l630 +++| CMP6 SB5 B4+ SET PROCESSOR ADDRESS 01157 M01S00256.241l630 +++| 01158 M01S00864.qdsplay +++| CMP SUBR ENTRY/EXIT
| Line S00865 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01159 M02S00865.241l630 ---| SA5 IBUF GET INPUT DIRECTIVE
| Line S00866 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01160 M02S00866.241l630 ---| SB7 CBUF ADDRESS OF FIRST PARAMETER
| Line S00867 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01161 M02S00867.241l630 ---| RJ UPC UNPACK CONTROL CARD
| Line S00868 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01162 M02S00868.241l630 ---| SB2 EEPS *EXCESS PARAMETERS ON DIRECTIVE.*
| Line S00869 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01163 M02S00869.241l630 ---| SB5 B1+B1
| Line S00870 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01164 M02S00870.241l630 ---| MX0 36 CHECK COMMAND NAME
| Line S00871 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01165 M02S00871.241l630 ---| GT B6,B5,CMPX IF MORE THAN 2 PARAMETERS
| Line S00872 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01166 M02S00872.241l630 ---| SA1 TCOM READ TABLE OF COMMANDS
| Line S00873 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01167 M02S00873.241l630 ---| SA2 CBUF FIRST PARAMETER
| Line S00874 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01168 M02S00874.241l630 ---| SX3 1R+
| Line S00875 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01169 M02S00875.241l630 ---| IX3 X2-X3
| Line S00876 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01170 M02S00876.241l630 ---| SA5 A2+B1 GET NEXT PARAMETER
| Line S00877 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01171 M02S00877.241l630 ---| SB5 X1 SAVE ADDRESS OF ROUTINE
| Line S00878 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01172 M02S00878.241l630 ---| SX6 B1 SAVE SKIP COUNT
| Line S00879 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01173 M02S00879.241l630 ---| ZR X3,CMP3 IF DIRECTIVE IS A *+*
| Line S00880 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01174 M02S00880.241l630 ---| SB2 EUND *UNRECOGNIZABLE DIRECTIVE.*
| Line S00881 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01175 M02S00881.241l630 ---| CMP1 SA1 A1+B1 READ NEXT ENTRY IN COMMAND TABLE 01176 M01S00257.241l630 +++| SA1 STAT CHECK IF HELP STATUS 01177 M01S00258.241l630 +++| SB2 SHLP 01178 M01S00259.241l630 +++| SB4 X1+ 01179 M01S00260.241l630 +++| NE B2,B4,CMP1 IF NOT HELP STATUS 01180 M01S00261.241l630 +++| 01181 M01S00262.241l630 +++|* CHECK FOR PAGING COMMAND. 01182 M01S00263.241l630 +++| 01183 M01S00264.241l630 +++| SX1 CLDF POINTER TO FWA *L* DISPLAY 01184 M01S00265.241l630 +++| SX2 CMPA PAGE TABLE 01185 M01S00266.241l630 +++| MX0 6 MASK FOR PAGING CHARACTER 01186 M01S00267.241l630 +++| SA3 IBUF COMMAND BUFFER 01187 M01S00268.241l630 +++| BX3 X0*X3 GET PAGING CHARACTER 01188 M01S00269.241l630 +++| SX4 B1+ INDICATE *L* DISPLAY 01189 M01S00270.241l630 +++| RJ PGD PAGE *L* DISPLAY 01190 M01S00271.241l630 +++| NZ X4,CMP1 IF ILLEGAL PAGING 01191 M01S00272.241l630 +++| SB2 B0+ INDICATE NO ERROR 01192 M01S00273.241l630 +++| SB5 HLP PAGE HELP DISPLAY 01193 M01S00274.241l630 +++| EQ CMPX RETURN 01194 M01S00275.241l630 +++| 01195 M01S00276.241l630 +++|* CHECK FOR NON HELP PAGING COMMAND. 01196 M01S00277.241l630 +++| 01197 M01S00278.241l630 +++| CMP1 SB2 IBUF *L* DISPLAY INPUT DIRECTIVE 01198 M01S00279.241l630 +++| SB3 B0+ SET DISPLAY CODE FOR *USB* 01199 M01S00280.241l630 +++| RJ USB UNPACK STRING BUFFER 01200 M01S00281.241l630 +++| RJ POP GET FIRST PARAMETER 01201 M01S00282.241l630 +++| BX2 X1 SEPARATOR 01202 M01S00283.241l630 +++| SB2 EUND *UNRECOGNIZABLE DIRECTIVE.* 01203 M01S00284.241l630 +++| MX0 36 COMMAND MASK 01204 M01S00285.241l630 +++| SA1 TCOM TABLE OF COMMANDS 01205 M01S00286.241l630 +++| NZ X6,CMP2 IF PARAMETER - NOT PAGING COMMAND 01206 M01S00002.qdsp2 +++| SB2 EVOH 01207 M01S00003.qdsp2 +++| SX3 1R- 01208 M01S00004.qdsp2 +++| IX3 X3-X2 01209 M01S00005.qdsp2 +++| ZR X3,CMPX IF MINUS SIGN ENTERED 01210 M01S00006.qdsp2 +++| SB2 EUND RESET ERROR MESSAGE 01211 M01S00287.241l630 +++| SX3 1R+ CHECK FOR PAGING COMMAND 01212 M01S00288.241l630 +++| IX3 X3-X2 01213 M01S00289.241l630 +++| NZ X3,CMPX IF NOT *+* 01214 M01S00290.241l630 +++| SB5 X1 SET PROCESSOR ADDRESS 01215 M01S00291.241l630 +++| SB2 B0 INDICATE NO ERROR 01216 M01S00292.241l630 +++| EQ CMPX RETURN 01217 M01S00293.241l630 +++| 01218 M01S00294.241l630 +++|* CHECK FOR REMAINING COMMANDS. 01219 M01S00295.241l630 +++| 01220 M01S00296.241l630 +++| CMP2 SA1 A1+B1 READ NEXT ENTRY IN COMMAND TABLE
| Line S00882 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01221 M02S00882.v23l617 ---| ZR X1,CMPX IF END OF TABLE (ILLEGAL COMMAND) 01222 M01S00009.v23l617 +++| ZR X1,CMPX IF END OF TABLE (INCORRECT COMMAND)
| Line S00883 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01223 M02S00883.241l630 ---| BX3 X1-X2 01224 M01S00297.241l630 +++| BX3 X1-X6 01225 M01S00884.qdsplay +++| BX3 X0*X3
| Line S00885 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01226 M02S00885.241l630 ---| NZ X3,CMP1 IF MATCH NOT FOUND 01227 M01S00298.241l630 +++| NZ X3,CMP2 IF MATCH NOT FOUND 01228 M01S00299.241l630 +++| BX6 X1 SAVE TABLE ENTRY 01229 M01S00300.241l630 +++| SA6 CMPB 01230 M01S00886.qdsplay +++| SB2 B0 NO ERROR
| Line S00887 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01231 M02S00887.241l630 ---| SB5 X1+ SAVE ADDRESS OF ROUTINE FROM TABLE 01232 M01S00301.241l630 +++| SB4 X1 SAVE ADDRESS OF ROUTINE FROM TABLE 01233 M01S00888.qdsplay +++| LX1 0-18 01234 M01S00302.241l630 +++| SX6 B1+ SAVE SKIP COUNT 01235 M01S00889.qdsplay +++| BX6 X6*X1 01236 M01S00890.qdsplay +++| SA6 SCNT
| Line S00891 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01237 M02S00891.241l630 ---| SX7 B6-B1
| Line S00892 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01238 M02S00892.241l630 ---| IX2 X6+X7 01239 M01S00303.241l630 +++| ZR B6,CMP6 IF NO MORE PARAMETERS 01240 M01S00304.241l630 +++| LT B5,CMP6 IF PARAMETER BUFFER NOT EXHAUSTED 01241 M01S00305.241l630 +++| 01242 M01S00306.241l630 +++|* CHECK FOR SECOND PARAMETER. 01243 M01S00307.241l630 +++|
| Line S00308 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
M02 (Updated by) | qdsp3 |
Seq # *Modification Id* Act ----------------------------+ 01244 M02S00308.qdsp3 ---| CMP3 SX5 B4+ SAVE ADDRESS OF ROUTINE FROM TABLE 01245 M01S00018.qdsp3 +++| SX5 B4+ SAVE ADDRESS OF ROUTINE FROM TABLE 01246 M01S00309.241l630 +++| RJ POP GET SECOND PARAMETER 01247 M01S00310.241l630 +++| SB5 X5 RESTORE ADDRESS OF ROUTINE FROM TABLE 01248 M01S00311.241l630 +++| SA1 SCNT GET SKIP COUNT 01249 M01S00312.241l630 +++| IX2 X6+X1 01250 M01S00893.qdsplay +++| ZR X2,CMPX IF NO SECOND PARAMETER AND NOT SKIP 01251 M01S00894.qdsplay +++| 01252 M01S00895.qdsplay +++|* PROCESS SECOND PARAMETER. 01253 M01S00896.qdsplay +++| 01254 M01S00897.qdsplay +++| SB2 EEPS *EXCESS PARAMETER ON DIRECTIVE.*
| Line S00898 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01255 M02S00898.241l630 ---| ZR X6,CMPX IF SECOND PARAMETER BUT NOT SKIP COMMAND
| Line S00899 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01256 M02S00899.241l630 ---| SB2 EDNA *DIRECTIVE NOT ALLOWED.* 01257 M01S00313.241l630 +++| NZ X1,CMP4 IF SKIP COMMAND 01258 M01S00314.241l630 +++| NZ X6,CMPX IF SECOND PARAMETER AND NOT SKIP COMMAND 01259 M01S00315.241l630 +++| CMP4 SB2 EDNA *DIRECTIVE NOT ALLOWED.* 01260 M01S00900.qdsplay +++| SA4 STAT 01261 M01S00901.qdsplay +++| SA3 MODE 01262 M01S00902.qdsplay +++| SX2 1R* 01263 M01S00903.qdsplay +++| SB4 X4 01264 M01S00904.qdsplay +++| LX2 -6 01265 M01S00905.qdsplay +++| LE B4,B1,CMPX IF *SS* OR *HELP* STATUS 01266 M01S00906.qdsplay +++| NZ X3,CMPX IF OCTAL MODE 01267 M01S00907.qdsplay +++| SB2 B0
| Line S00908 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01268 M02S00908.241l630 ---| ZR X7,CMPX IF NO SECOND PARAMETER ON SKIP
| Line S00909 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01269 M02S00909.241l630 ---| BX2 X5-X2 01270 M01S00316.241l630 +++| MX0 36 MASK FOR PARAMETER 01271 M01S00317.241l630 +++| ZR X6,CMPX IF NO SECOND PARAMETER ON SKIP 01272 M01S00318.241l630 +++| BX2 X6-X2 01273 M01S00910.qdsplay +++| BX2 X0*X2
| Line S00911 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01274 M02S00911.241l630 ---| ZR X2,CMP2 IF ASTERISK IN SKIP COUNT 01275 M01S00319.241l630 +++| ZR X2,CMP5 IF ASTERISK IN SKIP COUNT 01276 M01S00912.qdsplay +++| SB6 B5 SAVE FUNCTION ROUTINE ADDRESS
| Line S00913 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01277 M02S00913.241l630 ---| SB7 B1 01278 M01S00320.241l630 +++| SB7 B1 01279 M01S00321.241l630 +++| BX5 X6 SET WORD TO CONVERT 01280 M01S00914.qdsplay +++| RJ DXB CONVERT TO BINARY 01281 M01S00915.qdsplay +++| SB5 B6 RESTORE FUNCTION ROUTINE ADDRESS
| Line S00916 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01282 M02S00916.v23l617 ---| SB2 EISC *INVALID SKIP COUNT.* 01283 M01S00010.v23l617 +++| SB2 EISC *INCORRECT SKIP COUNT.* 01284 M01S00917.qdsplay +++| MX0 43 01285 M01S00918.qdsplay +++| NZ X4,CMPX IF ERROR 01286 M01S00919.qdsplay +++| ZR X6,CMPX IF ZERO SKIP COUNT 01287 M01S00920.qdsplay +++| BX3 X0*X6 01288 M01S00921.qdsplay +++| NZ X3,CMPX IF SKIP COUNT EXCEEDS 377777B 01289 M01S00922.qdsplay +++| SB2 B0 NO ERROR 01290 M01S00923.qdsplay +++| SA6 SCNT SAVE SKIP COUNT 01291 M01S00924.qdsplay +++| EQ CMPX EXIT 01292 M01S00925.qdsplay +++|
| Line S00926 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01293 M02S00926.241l630 ---| CMP2 LX1 59-19-0+18 01294 M01S00322.241l630 +++| CMP5 SA1 CMPB GET COMMAND TABLE ENTRY BACK 01295 M01S00323.241l630 +++| LX1 59-19 01296 M01S00927.qdsplay +++| MX6 18 01297 M01S00928.qdsplay +++| LX6 18 01298 M01S00929.qdsplay +++| SA6 SCNT 01299 M01S00930.qdsplay +++| NG X1,CMPX IF SKIP DIRECTIVE ALLOWS ASTERISK
| Line S00931 Modification History | |
|---|---|
M01 (Added by) | qdsplay |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01300 M02S00931.v23l617 ---| SB2 EISC *INVALID SKIP COUNT.* 01301 M01S00011.v23l617 +++| SB2 EISC *INCORRECT SKIP COUNT.* 01302 M01S00932.qdsplay +++| EQ CMPX EXIT 01303 M01S00324.241l630 +++| CMPA SPACE 4,5 01304 M01S00325.241l630 +++|** CMPA - PAGE TABLE. 01305 M01S00326.241l630 +++| 01306 M01S00327.241l630 +++| 01307 M01S00328.241l630 +++| CMPA PAGT HLPA,HLMA,HLIA LEFT SCREEN PAGE 1 01308 M01S00329.241l630 +++| PAGT HLPB,HLMB,HLIB LEFT SCREEN PAGE 2 01309 M01S00330.241l630 +++| PAGT * 01310 M01S00331.241l630 +++| 01311 M01S00332.241l630 +++| PGD HERE REMOTE BLOCK FROM *COMCDCP* 01312 M01S00333.241l630 +++| CMPB BSS 1 COMMAND TABLE ENTRY 01313 M01S00933.qdsplay +++| TCOM SPACE 4,10 01314 M01S00934.qdsplay +++|** TCOM - TABLE OF COMMANDS. 01315 M01S00935.qdsplay +++|* 01316 M01S00936.qdsplay +++|*T, 36/ COMMAND,4/0,1/A,1/SK,18/ADDR
Figure
01317 M01S00937.qdsplay +++|* 01318 M01S00938.qdsplay +++|* (A) = 1, IF ASTERISK ALLOWED AS SECOND PARAMETER. 01319 M01S00939.qdsplay +++|* 01320 M01S00940.qdsplay +++|* (SK) = 1, IF SKIP COUNT ALLOWED. 01321 M01S00941.qdsplay +++|* 01322 M01S00942.qdsplay +++|* ADDR = ADDRESS OF ROUTINE FOR COMMAND. 01323 M01S00943.qdsplay +++| 01324 M01S00944.qdsplay +++| 01325 M01S00945.qdsplay +++| TCOM BSS 0 01326 M01S00946.qdsplay +++| VFD 36/1L+,6/0,18/ADV 01327 M01S00334.241l630 +++| VFD 36/0LBACK,6/0,18/TOG 01328 M01S00947.qdsplay +++| VFD 36/0LBOI,6/0,18/BOI 01329 M01S00948.qdsplay +++| VFD 36/0LDAY,6/0,18/DAY 01330 M01S00949.qdsplay +++| VFD 36/0LDROP,6/0,18/DRP
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/qdsplay.txt · Last modified: by 127.0.0.1