cdc:nos2.source:opl.opl871:deck:crmtask
Deck CRMTASK
Library Member Format: MODIFY
Listing Sections
- Deck CRMTASK Start
- Deck CRMTASK Part 1 (Line 1322)
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M00S00001.crmtask +++| IDENT CRMTASK 00002 M00S00002.crmtask +++| ENTRY CRMTASK 00003 M00S00003.crmtask +++| LCC OVERLAY(CRMTASK,0,0)
| Line S00004 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00004 M01S00004.253l688 ---| SST BEGN
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00005 M01S00001.253l688 +++| SST BEGN,CMBL 00006 M00S00005.crmtask +++| SYSCOM B1 00007 M00S00006.crmtask +++|*COMMENT CRMTASK - TAF/CRM STATUS AND DISPLAY TASK.
| Line S00007 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00008 M01S00007.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1980.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00009 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00010 M00S00008.crmtask +++|*IFCALL NAM,COMKTAF 00011 M00S00009.crmtask +++|*NIFCALL NAM,COMKTRN 00012 M00S00010.crmtask +++| SPACE 4,10 00013 M00S00011.crmtask +++|*** CRMTASK - TAF/CRM STATUS COMMAND AND DISPLAY TASK. 00014 M00S00012.crmtask +++|* 00015 M00S00013.crmtask +++|* R. G. PARKHOUSE. 80/05/23. 00016 M00S00014.crmtask +++|* A. SROKA. 80/07/25.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00017 M01S00001.241l630 +++|* T. E. SCHULL. 84/11/02. 00018 M00S00015.crmtask +++| SPACE 4,90 00019 M00S00016.crmtask +++|*** *CRMTASK* PERFORMS FUNCTIONS FOR *TAF/CRM* AND FORMATS *CRM* 00020 M00S00017.crmtask +++|* STATUS DISPLAYS FOR THE OPERATOR OR AN ANALYST. 00021 M00S00018.crmtask +++|* *CRMTASK* IS INITIALLY SCHEDULED WHEN - 00022 M00S00019.crmtask +++|* 00023 M00S00020.crmtask +++|* 1) ONE OF THE FOLLOWING *K-DISPLAY* COMMANDS IS ENTERED. 00024 M00S00021.crmtask +++|* 00025 M00S00022.crmtask +++|* CRMSTAT. DISPLAY GENERAL *CRM* STATUS. 00026 M00S00023.crmtask +++|* CRMSTAT,DB. DISPLAY STATUS OF DATA BASE. 00027 M00S00024.crmtask +++|* CRMSTAT,DBPFNXX. DISPLAY STATUS OF DATA BASE FILE. 00028 M00S00025.crmtask +++|* DBUP,DB. UP THE DATA BASE. 00029 M00S00026.crmtask +++|* DBUP,DBPFNXX. UP THE DATA BASE FILE. 00030 M00S00027.crmtask +++|* DBDOWN,DB. DOWN THE DATA BASE. 00031 M00S00028.crmtask +++|* DBDOWN,DBPFNXX. DOWN THE DATA BASE FILE. 00032 M00S00029.crmtask +++|* MENU. DISPLAY COMMAND REPERTOIRE. 00033 M00S00030.crmtask +++|* 00034 M00S00031.crmtask +++|* IF *CRMTASK* IS INVOKED FROM THE *K-DISPLAY* AND 00035 M00S00032.crmtask +++|* NO COMMAND IS ENTERED, THEN THE MENU OF VALID 00036 M00S00033.crmtask +++|* COMMANDS IS DISPLAYED. 00037 M00S00034.crmtask +++|* 00038 M00S00035.crmtask +++|* 2) *TAF* RECEIVES A *SIC* REQUEST FROM THE *CRM* BATCH 00039 M00S00036.crmtask +++|* RECOVERY PROGRAM. *CRMTASK* FORMATS A PARAMETER BLOCK 00040 M00S00037.crmtask +++|* AND ISSUES A *CRMSIC* REQUEST TO *AAMI*. 00041 M00S00038.crmtask +++|* 00042 M00S00039.crmtask +++|* 3) A TERMINAL OPERATOR INVOKES *CRMTASK* DIRECTLY OR VIA 00043 M00S00040.crmtask +++|* *CALLTSK* REQUEST. IN EITHER CASE THE COMMUNICATION 00044 M00S00041.crmtask +++|* BLOCK MUST BE FORMATTED EXACTLY THE SAME WAY - AS IF 00045 M00S00042.crmtask +++|* THE MESSAGE CAME DIRECTLY FROM THE TERMINAL. 00046 M00S00043.crmtask +++|* 00047 M00S00044.crmtask +++|* TERMINAL OPERATOR CANNOT REQUEST ANY FUNCTIONS OTHER 00048 M00S00045.crmtask +++|* THAN *CRMSTAT*, AND THAT IS RESTRICTED TO HIS/HER OWN 00049 M00S00046.crmtask +++|* DATA BASE. 00050 M00S00047.crmtask +++|* THE HOOKS HAVE BEEN LEFT IN THE CODE TO ENLARGE 00051 M00S00048.crmtask +++|* THE TERMINAL OPERATOR-S COMMAND REPERTOIRE. 00052 M00S00049.crmtask +++|* 00053 M00S00050.crmtask +++|* VALID COMMANDS FROM THE TERMINAL ARE - 00054 M00S00051.crmtask +++|* 00055 M00S00052.crmtask +++|* CRMSTAT,DB. 00056 M00S00053.crmtask +++|* CRMSTAT,DBPFN. 00057 M00S00054.crmtask +++|* 00058 M00S00055.crmtask +++|* 00059 M00S00056.crmtask +++|* IF *CRMTASK* IS INITIATED FROM THE OPERATOR CONSOLE TO 00060 M00S00057.crmtask +++|* PROCESS ANY ONE OF THE *CRMSTAT* REQUESTS, SUBSEQUENT 00061 M00S00058.crmtask +++|* *K-DISPLAY* COMMANDS ARE PASSED TO *CRMTASK* RATHER THAN
| Line S00059 Modification History | |
|---|---|
M01 (Removed by) | crmta1 |
Seq # *Modification Id* Act ----------------------------+ 00062 M01S00059.crmta1 ---|* BEING PROCESSED BY *TAF*. IN THIS CASE, ADDITIONAL 00063 M01S00060.crmta1 ---|* VALID COMMANDS ARE -
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | crmta1 |
Seq # *Modification Id* Act ----------------------------+ 00064 M01S00001.crmta1 +++|* BEING PROCESSED BY *TAF*. SIMILARLY, WHEN *CRMTASK* IS 00065 M01S00002.crmta1 +++|* INITIATED FROM A TERMINAL TO PROCESS ANY OF THE *CRMSTAT* 00066 M01S00003.crmta1 +++|* REQUESTS, THE DISPLAY IS SENT TO THE TERMINAL AND SUBSEQUENT 00067 M01S00004.crmta1 +++|* REQUESTS WILL BE ACCEPTED FROM THE TERMINAL. IN EITHER CASE, 00068 M01S00005.crmta1 +++|* ADDITIONAL VALID COMMANDS ARE - 00069 M00S00061.crmtask +++|* 00070 M00S00062.crmtask +++|* END. END DISPLAY AND CEASE. 00071 M00S00063.crmtask +++|* +. DISPLAY NEXT SCREEN IF MORE. 00072 M00S00064.crmtask +++|* -. DISPLAY FIRST SCREEN. 00073 M00S00065.crmtask +++|*
| Line S00066 Modification History | |
|---|---|
M01 (Removed by) | crmta1 |
Seq # *Modification Id* Act ----------------------------+ 00074 M01S00066.crmta1 ---|* SIMILARLY, WHEN *CRMTASK* IS INITIATED FROM A TERMINAL 00075 M01S00067.crmta1 ---|* TO PROCESS ANY OF THE *CRMSTAT* REQUESTS, THE DISPLAY 00076 M01S00068.crmta1 ---|* IS SENT TO THE TERMINAL AND SUBSEQUENT REQUESTS WILL BE 00077 M01S00069.crmta1 ---|* ACCEPTED FROM THE TERMINAL. 00078 M01S00070.crmta1 ---|* 00079 M01S00071.crmta1 ---|* ALL OTHER COMMANDS WILL RESULT IN AN ERROR MESSAGE. 00080 M01S00072.crmta1 ---|* 00081 M00S00073.crmtask +++|* IN CASE OF *SIC* REQUEST ERRORS, THE FOLLOWING MESSAGES, 00082 M00S00074.crmtask +++|* ALONG WITH THE FIRST 4 WORDS OF MESSAGE IN THE COMMUNICA- 00083 M00S00075.crmtask +++|* TION BLOCK, WILL BE WRITTEN IN *JOUR0* - 00084 M00S00076.crmtask +++|*
| Line S00077 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00085 M01S00077.v23l617 ---|* CRMTASK- INVALID REQUEST.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00086 M01S00001.v23l617 +++|* CRMTASK- INCORRECT REQUEST. 00087 M00S00078.crmtask +++|* CRMTASK- DATA BASE/FILE NAME UNKNOWN.
| Line S00079 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00088 M01S00079.v23l617 ---|* CRMTASK- INVALID TT SEQUENCE NUMBER.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00089 M01S00002.v23l617 +++|* CRMTASK- INCORRECT TT SEQUENCE NUMBER. 00090 M00S00080.crmtask +++|* CRMTASK- DATA BASE DOWNED BY OPERATOR. 00091 M00S00081.crmtask +++|* CRMTASK- NOT ALL DATA BASE FILES UPPED. 00092 M00S00082.crmtask +++|* CRMTASK- DATA BASE/FILE CANNOT BE UPPED. 00093 M00S00083.crmtask +++|* CRMTASK- DATA BASE/FILE BEING IDLED.
| Line S00084 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00094 M01S00084.v23l617 ---|* CRMTASK- INVALID REQUEST FORMAT.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00095 M01S00003.v23l617 +++|* CRMTASK- INCORRECT REQUEST FORMAT. 00096 M00S00085.crmtask +++|* 00097 M00S00086.crmtask +++|* THE FOLLOWING INFORMATIVE OR ERROR MESSAGES WILL APPEAR 00098 M00S00087.crmtask +++|* ON A *K-DISPLAY* AS A RESULT OF OPERATOR COMMANDS - 00099 M00S00088.crmtask +++|* 00100 M00S00089.crmtask +++|* DATA BASE/FILE NAME UNKNOWN. 00101 M00S00090.crmtask +++|* DATA BASE/FILE CANNOT BE UPPED. 00102 M00S00091.crmtask +++|* DATA BASE/FILE ALREADY DOWN OR IDLE. 00103 M00S00092.crmtask +++|* INCORRECT PAGING COMMAND. 00104 M00S00093.crmtask +++|* INSUFFICIENT FIELD LENGTH FOR THIS COMMAND.
| Line S00094 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00105 M01S00094.v23l617 ---|* INVALID COMMAND.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00106 M01S00004.v23l617 +++|* INCORRECT COMMAND. 00107 M00S00095.crmtask +++|* NOT ALL DATA BASE FILES UPPED. 00108 M00S00096.crmtask +++|* REQUEST COMPLETE. 00109 M00S00097.crmtask +++|* 00110 M00S00098.crmtask +++|* THE TERMINAL WILL ALSO RECEIVE ALL OF THE ABOVE MESSAGES 00111 M00S00099.crmtask +++|* AND, IN ADDITION MAY RECEIVE THE FOLLOWING - 00112 M00S00100.crmtask +++|* 00113 M00S00101.crmtask +++|* ENTER NEXT COMMAND... 00114 M00S00102.crmtask +++|* CRMTASK TIMEOUT. 00115 M00S00103.crmtask +++|* CRMTASK COMPLETE. 00116 M00S00104.crmtask +++|* 00117 M00S00105.crmtask +++| SPACE 4,10 00118 M00S00106.crmtask +++|*** COMMON DECKS. 00119 M00S00107.crmtask +++| 00120 M00S00108.crmtask +++| 00121 M00S00109.crmtask +++| BEGN BSS 0 00122 M00S00110.crmtask +++|*CALL COMCMAC
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00123 M01S00005.v23l617 +++|*CALL COMCDCM
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00124 M01S00002.241l630 +++|*CALL COMCDCP 00125 M00S00111.crmtask +++|*CALL COMKIPR
| Line S00112 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00126 M01S00112.241l630 ---| CMAXNF EQU 20 TEMPORARY 00127 M00S00113.crmtask +++|*CALL COMKMAC 00128 M00S00114.crmtask +++|*CALL COMKFLD 00129 M00S00115.crmtask +++|*CALL COMKTDM 00130 M00S00116.crmtask +++|*CALL COMKCRM 00131 M00S00117.crmtask +++|*CALL COMKCBD 00132 M00S00118.crmtask +++|*CALL COMKTER 00133 M00S00119.crmtask +++| ORG BEGN
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00134 M01S00006.v23l617 +++| SPACE 4,10 00135 M01S00007.v23l617 +++|**** ASSEMBLY CONSTANTS. 00136 M01S00008.v23l617 +++| 00137 M01S00009.v23l617 +++|
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00138 M01S00003.241l630 +++| CMAXNF EQU 100D MAXIMUM NUMBER OF DISPLAYABLE DBPFNS
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00139 M02S00010.241l630 ---| KFNL EQU 21 NUMBER OF FILE NAME LINES IN K-DISPLAY
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00140 M01S00004.241l630 +++| KFNL EQU 20 NUMBER OF LINES BEFORE *MORE* LINE
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00141 M01S00011.v23l617 +++|**** 00142 M00S00120.crmtask +++| CMB SPACE 4,10 00143 M00S00121.crmtask +++|* COMMUNICATION BLOCK. 00144 M00S00122.crmtask +++| 00145 M00S00123.crmtask +++| CMBK BSS CMBL 00146 M00S00124.crmtask +++| VFD 60/0L. MESSAGE TERMINATOR 00147 M00S00125.crmtask +++| SPACE 4,10 00148 M00S00126.crmtask +++|* GLOBAL VARIABLES. 00149 M00S00127.crmtask +++| 00150 M00S00128.crmtask +++| DBNM CON 0 DATA BASE NAME 00151 M00S00129.crmtask +++| ORIG CON 0 TASK ORIGIN (0=TAF, 1=TERMINAL)
| Line S00130 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00152 M01S00130.241l630 ---| MORE DATA 8L- MORE -
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00153 M01S00005.241l630 +++| MORE DATA 10HMORE
| Line S00131 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00154 M01S00131.241l630 ---| PAGE CON 0 PROCESSOR RE-ENTRY ADDRESS 00155 M01S00132.241l630 ---| FPAG CON 0 PROCESSOR ENTRY ADDRESS
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00156 M01S00006.241l630 +++| PAGE CON DMU PROCESSOR RE-ENTRY ADDRESS 00157 M01S00007.241l630 +++| FPAG CON DMU PROCESSOR ENTRY ADDRESS 00158 M00S00133.crmtask +++| NPAG CON 0 BUFFER ADDRESS FOR NEXT PAGE OF DATA 00159 M00S00134.crmtask +++| BLNK DATA 10H
| Line S00135 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00160 M01S00135.241l630 ---| CWKD CON KDD *K-DISPLAY* CONTROL WORD
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00161 M01S00008.241l630 +++| CWKD CON KDE *K-DISPLAY* CONTROL WORD
| Line S00136 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00162 M01S00136.241l630 ---| EAKD CON 0 *K-DISPLAY* ERROR MESSAGE ADDRESS
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00163 M01S00009.241l630 +++| EAKD CON KDEA *K-DISPLAY* ERROR MESSAGE ADDRESS 00164 M01S00010.241l630 +++| IAKD CON 0 *K-DISPLAY* INPUT MESSAGE ADDRESS 00165 M00S00137.crmtask +++| DSTP CON 0 *K-DISPLAY* (0=FORMATTED , 1=-C- FORMAT) 00166 M00S00138.crmtask +++| RFRS CON 0 REFRESH *K-DISPLAY* SWITCH 00167 M00S00139.crmtask +++| CPAR CON 0 *CRMSTAT* PARAMETER FOR SCREEN REFRESH
| Line S00140 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00168 M01S00140.v23l617 ---| IOLN CON 377777B RA+1 CALL LIMIT
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00169 M01S00012.v23l617 +++| IOLN CON 377777B SYSTEM REQUEST CALL LIMIT 00170 M00S00141.crmtask +++| TILN CON 7777B TASK TIME LIMIT 00171 M00S00142.crmtask +++| PADR BSSZ 5 PARAMETER BLOCK FOR *AAMI* REQUEST 00172 M00S00143.crmtask +++| 00173 M00S00144.crmtask +++|* *AAMI* CALLING SEUQUENCE FOR *CRMSTAT*. 00174 M00S00145.crmtask +++| 00175 M00S00146.crmtask +++| CSQ1 CON PADR 00176 M00S00147.crmtask +++| CON PADR+1 00177 M00S00148.crmtask +++| CON 0 00178 M00S00149.crmtask +++| CON PADR+2 00179 M00S00150.crmtask +++| CON 0 00180 M00S00151.crmtask +++| 00181 M00S00152.crmtask +++|* *AAMI* CALLING SEQUENCE FOR *DBUP* AND *DBDOWN*. 00182 M00S00153.crmtask +++| 00183 M00S00154.crmtask +++| CSQ2 CON PADR 00184 M00S00155.crmtask +++| CON PADR+1 00185 M00S00156.crmtask +++| CON 0 00186 M00S00157.crmtask +++| 00187 M00S00158.crmtask +++|* *AAMI* CALLING SEQUENCE FOR *CRMSIC*. 00188 M00S00159.crmtask +++| 00189 M00S00160.crmtask +++| CSQ3 CON PADR 00190 M00S00161.crmtask +++| CON PADR+1 00191 M00S00162.crmtask +++| CON PADR+2 00192 M00S00163.crmtask +++| CON PADR+3 00193 M00S00164.crmtask +++| CON 0 00194 M00S00165.crmtask +++| CRMTASK SPACE 4,25 00195 M00S00166.crmtask +++|** CRMTASK - INITIALIZATION. 00196 M00S00167.crmtask +++|* 00197 M00S00168.crmtask +++|* THIS SUBROUTINE DETERMINES THE TRANSACTION ORIGIN. 00198 M00S00169.crmtask +++|* THEN, IF *SIC* COMMAND PROCESSING, IT VALIDATES THE 00199 M00S00170.crmtask +++|* COMMAND AND JUMPS TO THE *SIC* PROCESSOR. IF COM- 00200 M00S00171.crmtask +++|* MAND ORIGINATES FROM A TERMINAL, THE PARAMETERS ARE 00201 M00S00172.crmtask +++|* UNPACKED INTO RA+2 AND THEN MOVED BACK TO *TMSW*. 00202 M00S00173.crmtask +++|* 00203 M00S00174.crmtask +++|* ENTRY COMMUNICATION BLOCK LOADED. 00204 M00S00175.crmtask +++|* 00205 M00S00176.crmtask +++|* EXIT TO *CVL*, IF *TAF* OR TERMINAL ORIGIN. 00206 M00S00177.crmtask +++|* (B3) = FWA OF VALID COMMAND TABLE. 00207 M00S00178.crmtask +++|*
| Line S00179 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00208 M01S00179.v23l617 ---|* ERROR TO *IBR*, IF INVALID *SIC* COMMAND.
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00209 M01S00013.v23l617 +++|* ERROR TO *IBR*, IF INCORRECT *SIC* COMMAND. 00210 M00S00180.crmtask +++|* (X3) = ERROR CODE.
| Line S00181 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00211 M01S00181.v23l617 ---|* TO *TTE*, IF INVALID TERMINAL COMMAND.
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00212 M01S00014.v23l617 +++|* TO *TTE*, IF INCORRECT TERMINAL COMMAND. 00213 M00S00182.crmtask +++|* (B2) = ERROR CODE. 00214 M00S00183.crmtask +++|* 00215 M00S00184.crmtask +++|* USES X - 0, 1, 2, 3, 5, 6, 7.
| Line S00185 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00216 M01S00185.241l630 ---|* A - 1, 2, 5, 6.
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00217 M01S00011.241l630 +++|* A - 1, 2, 5, 6, 7. 00218 M00S00186.crmtask +++|* B - 1, 3. 00219 M00S00187.crmtask +++|*
| Line S00188 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00220 M01S00188.241l630 ---|* CALLS ITU.
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00221 M01S00012.241l630 +++|* CALLS ITU, PRK. 00222 M01S00013.241l630 +++|* 00223 M01S00014.241l630 +++|* MACROS IIO, ITL. 00224 M00S00189.crmtask +++| 00225 M00S00190.crmtask +++| 00226 M00S00191.crmtask +++| 00227 M00S00192.crmtask +++| CRMTASK BSS 0 ENTRY 00228 M00S00193.crmtask +++| SB1 1
| Line S00194 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00229 M01S00194.v23l617 ---| IIO IOLN INCREASE TASK-S RA+1 CALL LIMIT
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00230 M01S00015.v23l617 +++| IIO IOLN INCREASE TASK-S SYSTEM REQUEST CALL LIMIT 00231 M00S00195.crmtask +++| ITL TILN INCREASE TASK-S TIME LIMIT
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00232 M01S00015.241l630 +++| SX3 KBLG 00233 M01S00016.241l630 +++| RJ PRK PRESET *K-DISPLAY* BUFFER 00234 M00S00196.crmtask +++| SA1 TRSQ 00235 M00S00197.crmtask +++| MX0 12 00236 M00S00198.crmtask +++| BX6 X0*X1 EXTRACT DATA BASE FROM C.B. 00237 M00S00199.crmtask +++| SA6 DBNM 00238 M00S00200.crmtask +++| SX6 B0+ 00239 M00S00201.crmtask +++| SA1 CBSYW 00240 M00S00202.crmtask +++| LX1 59-CBSYS 00241 M00S00203.crmtask +++| NG X1,CRM1 IF SYSTEM ORIGIN TASK 00242 M00S00204.crmtask +++| SX6 B1 TERMINAL ORIGIN 00243 M00S00205.crmtask +++| MX0 36 00244 M00S00206.crmtask +++| SA1 TMSW 00245 M00S00207.crmtask +++| SA2 CRMA 00246 M00S00208.crmtask +++| SX3 IER0 IN CASE ATTEMPTED *SIC* REQUEST 00247 M00S00209.crmtask +++| BX1 X1-X2 00248 M00S00210.crmtask +++| ZR X1,IBR IF *SIC* FROM TERMINAL 00249 M00S00211.crmtask +++| CRM1 SA6 ORIG SAVE TASK ORIGIN
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00250 M01S00017.241l630 +++| SX7 KDEB+1 *K-DISPLAY* INPUT LINE 00251 M01S00018.241l630 +++| SA7 IAKD 00252 M00S00212.crmtask +++| SB3 CVLA FWA OF COMMAND TABLE 00253 M00S00213.crmtask +++| ZR X6,CVL IF *TAF* ORIGIN 00254 M00S00214.crmtask +++| RJ ITU INSERT TERMINATOR AND UNPACK MESSAGE 00255 M00S00215.crmtask +++| SA1 2 00256 M00S00216.crmtask +++| SA2 A1+1 00257 M00S00217.crmtask +++| SA5 CRMB 00258 M00S00218.crmtask +++| BX6 X1 00259 M00S00219.crmtask +++| BX5 X5-X1 00260 M00S00220.crmtask +++| NZ X5,TTE IF REQUEST OTHER THAN *CRMSTAT* 00261 M00S00221.crmtask +++| SA6 TMSW 00262 M00S00222.crmtask +++| BX7 X2 00263 M00S00223.crmtask +++| SB3 CVLA FWA OF COMMAND TABLE 00264 M00S00224.crmtask +++| SA7 A6+B1 00265 M00S00225.crmtask +++| EQ CVL SEARCH FOR THE PROCESSOR 00266 M00S00226.crmtask +++| 00267 M00S00227.crmtask +++| CRMA DATA 0LCRMSIC 00268 M00S00228.crmtask +++| CRMB DATA 0LCRMSTAT 00269 M00S00229.crmtask +++| CVL SPACE 4,25 00270 M00S00230.crmtask +++|** CVL - COMMAND VALIDATION. 00271 M00S00231.crmtask +++|* 00272 M00S00232.crmtask +++|* CVL VALIDATES THE COMMAND AND JUMPS TO THE RELEVANT COMMAND 00273 M00S00233.crmtask +++|* PROCESSOR. 00274 M00S00234.crmtask +++|* 00275 M00S00235.crmtask +++|* ENTRY (B3) = FWA OF VALID COMMAND TABLE.
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00276 M01S00019.241l630 +++|* (IAKD) = *K-DISPLAY* INPUT MESSAGE ADDRESS. 00277 M00S00236.crmtask +++|* FIRST WORD OF DATA AREA OF COMMUNICATION BLOCK HAS THE 00278 M00S00237.crmtask +++|* COMMAND. 00279 M00S00238.crmtask +++|* 00280 M00S00239.crmtask +++|* EXIT TO RELEVANT COMMAND PROCESSOR. 00281 M00S00240.crmtask +++|* 00282 M00S00241.crmtask +++|* ERROR TO *TPA* (*TAF* ORIGIN). 00283 M00S00242.crmtask +++|* TO *TTE* (TERMINAL ORIGIN). 00284 M00S00243.crmtask +++|* (B2) = ERROR CODE. 00285 M00S00244.crmtask +++|* 00286 M00S00245.crmtask +++|* USES X - 0, 1, 2, 3, 4, 7. 00287 M00S00246.crmtask +++|* A - 1, 2, 3, 7. 00288 M00S00247.crmtask +++|* B - 2, 3. 00289 M00S00248.crmtask +++|* 00290 M00S00249.crmtask +++|* CALLS SEM. 00291 M00S00250.crmtask +++|* 00292 M00S00251.crmtask +++|* MACROS MOVE. 00293 M00S00252.crmtask +++| 00294 M00S00253.crmtask +++| 00295 M00S00254.crmtask +++| CVL BSS 0 ENTRY
| Line S00255 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00296 M01S00255.241l630 ---| MOVE KBLCL,KBLC,KDBF BLANK ERROR MESSAGE LINES
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00297 M01S00020.241l630 +++| MOVE KBLCL,KBLC,KDBD BLANK ERROR MESSAGE LINES
| Line S00256 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00298 M01S00256.241l630 ---| MOVE KBLCL,KBLC,KDCO
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00299 M01S00021.241l630 +++| MOVE KBLCL,KBLC,KDCM 00300 M00S00257.crmtask +++| MOVE KBLFL,KBLF,KDAF 00301 M00S00258.crmtask +++| MOVE KBLFL,KBLF,KDEA
| Line S00259 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00302 M01S00259.241l630 ---| MOVE KBLFL,KBLF,KDDA 00303 M00S00260.crmtask +++| SA1 TRSQ 00304 M00S00261.crmtask +++| SA2 TMSW+1 PARAMETER 00305 M00S00262.crmtask +++| MX0 12 00306 M00S00263.crmtask +++| BX4 X1-X2 00307 M00S00264.crmtask +++| SA3 ORIG 00308 M00S00265.crmtask +++| BX4 X0*X4 00309 M00S00266.crmtask +++| MX0 42 00310 M00S00267.crmtask +++| SX7 B0+ 00311 M00S00268.crmtask +++| SA1 TMSW 00312 M00S00269.crmtask +++| SA7 RFRS RESET SCREEN REFRESH SWITCH 00313 M00S00270.crmtask +++| ZR X3,CVL1 IF *TAF* ORIGIN 00314 M00S00271.crmtask +++| ZR X2,CVL1 IF NO PARAMETER 00315 M00S00272.crmtask +++| NZ X4,CVL2 IF NOT TERMINAL OWN DATA BASE 00316 M00S00273.crmtask +++| CVL1 SA2 B3 NEXT COMMAND FROM LIST 00317 M00S00274.crmtask +++| ZR X2,CVL2 IF END OF LIST 00318 M00S00275.crmtask +++| SB3 B3+B1 00319 M00S00276.crmtask +++| BX3 X0*X2 00320 M00S00277.crmtask +++| BX3 X3-X1 00321 M00S00278.crmtask +++| NZ X3,CVL1 IF NO MATCH 00322 M00S00279.crmtask +++| SB3 X2+ COMMAND PROCESSOR ADDRESS 00323 M00S00280.crmtask +++| JP B3 PROCESS COMMAND 00324 M00S00281.crmtask +++| 00325 M00S00282.crmtask +++| CVL2 SA3 ORIG ORIGIN
| Line S00283 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00326 M01S00283.v23l617 ---| SB2 ER5 *INVALID COMMAND.*
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00327 M01S00016.v23l617 +++| SB2 ER5 *INCORRECT COMMAND.* 00328 M00S00284.crmtask +++| NZ X3,TTE IF TERMINAL ORIGIN 00329 M00S00285.crmtask +++| RJ SEM SET ERROR MESSAGE 00330 M00S00286.crmtask +++| EQ TPA DISPLAY ERROR MESSAGE 00331 M00S00287.crmtask +++| 00332 M00S00288.crmtask +++| 00333 M00S00289.crmtask +++|* VALID COMMAND TABLE FIRST TIME THROUGH. 00334 M00S00290.crmtask +++| 00335 M00S00291.crmtask +++| CVLA BSS 0 00336 M00S00292.crmtask +++| VFD 42/0,18/DMU 00337 M00S00293.crmtask +++| VFD 42/0LMENU,18/DMU 00338 M00S00294.crmtask +++| VFD 42/0LCRMSTAT,18/CRS 00339 M00S00295.crmtask +++| VFD 42/0LDBUP,18/DBU 00340 M00S00296.crmtask +++| VFD 42/0LDBDOWN,18/DBD 00341 M00S00297.crmtask +++| VFD 42/0LCRMSIC,18/SIC 00342 M00S00298.crmtask +++| CON 0 TABLE TERMINATOR 00343 M00S00299.crmtask +++| 00344 M00S00300.crmtask +++|* VALID COMMAND TABLE WHILE RUNNING. 00345 M00S00301.crmtask +++| 00346 M00S00302.crmtask +++| CVLB VFD 42/0LCRMSTAT,18/CRS 00347 M00S00303.crmtask +++| VFD 42/0LDBUP,18/DBU 00348 M00S00304.crmtask +++| VFD 42/0LDBDOWN,18/DBD 00349 M00S00305.crmtask +++| VFD 42/0LMENU,18/DMU 00350 M00S00306.crmtask +++| VFD 42/0LEND,18/TPD 00351 M00S00307.crmtask +++| VFD 42/1C+,18/PFP 00352 M00S00308.crmtask +++| VFD 42/1C-,18/PBP 00353 M00S00309.crmtask +++| CON 0 TABLE TERMINATOR 00354 M00S00310.crmtask +++| CRS SPACE 4,25 00355 M00S00311.crmtask +++|** CRS - CRMSTAT PROCESSOR. 00356 M00S00312.crmtask +++|* 00357 M00S00313.crmtask +++|* CRS VALIDATES THE PARAMETER AND IF VALID ISSUES A *CRMSTAT* 00358 M00S00314.crmtask +++|* REQUEST TO *AAMI* TO GET STATUS INFORMATION. 00359 M00S00315.crmtask +++|* 00360 M00S00316.crmtask +++|* ENTRY SECOND WORD OF DATA AREA OF COMMUNICATION BLOCK 00361 M00S00317.crmtask +++|* CONTAINS THE PARAMETER. 00362 M00S00318.crmtask +++|* 00363 M00S00319.crmtask +++|* EXIT TO *FCD* IF CRM STATUS REQUEST. 00364 M00S00320.crmtask +++|* TO *FDD* IF DATA BASE STATUS REQUEST. 00365 M00S00321.crmtask +++|* TO *FFD* IF FILE STATUS REQUEST. 00366 M00S00322.crmtask +++|* 00367 M00S00323.crmtask +++|* ERROR TO *TPA*. (TAF ORIGIN). 00368 M00S00324.crmtask +++|* (X1) = ADDRESS OF K-DISPLAY CONTROL WORD. 00369 M00S00325.crmtask +++|* TO *TTE*. (TERMINAL ORIGIN). 00370 M00S00326.crmtask +++|* (B2) = ERROR CODE. 00371 M00S00327.crmtask +++|* 00372 M00S00328.crmtask +++|* USES X - ALL. 00373 M00S00329.crmtask +++|* A - 1, 3, 4, 7. 00374 M00S00330.crmtask +++|* B - 2. 00375 M00S00331.crmtask +++|* 00376 M00S00332.crmtask +++|* CALLS CST, SEM. 00377 M00S00333.crmtask +++| 00378 M00S00334.crmtask +++| 00379 M00S00335.crmtask +++| CRS BSS 0 ENTRY 00380 M00S00336.crmtask +++| SX7 B0+ 00381 M00S00337.crmtask +++| SB2 BUFSIZE 00382 M00S00338.crmtask +++| CRS1 SB2 B2-1 CLEAR BUFFER 00383 M00S00339.crmtask +++| SA7 BADR+B2 00384 M00S00340.crmtask +++| PL B2,CRS1 IF NOT ENTIRE BUFFER SET TO ZEROS 00385 M00S00341.crmtask +++| SA4 ORIG ORIGIN 00386 M00S00342.crmtask +++| SA1 TMSW+1 PARAMETER 00387 M00S00343.crmtask +++| SX6 B1 00388 M00S00344.crmtask +++| BX7 X1 00389 M00S00345.crmtask +++| SA6 RFRS SET SWITCH TO REFRESH *K-DISPLAY* 00390 M00S00346.crmtask +++| SA7 CPAR SAVE *CRMSTAT* PARAMETER 00391 M00S00347.crmtask +++| ZR X1,CRS3 IF NO PARAMETER 00392 M00S00348.crmtask +++| MX0 12 00393 M00S00349.crmtask +++| BX2 -X0*X1 00394 M00S00350.crmtask +++| SA3 DBNM 00395 M00S00351.crmtask +++| ZR X4,CRS2 IF SYSTEM ORIGIN 00396 M00S00352.crmtask +++| BX3 X1-X3 00397 M00S00353.crmtask +++| BX3 X0*X3
| Line S00354 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00398 M01S00354.v23l617 ---| SB2 ER5 *INVALID REQUEST*
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00399 M01S00017.v23l617 +++| SB2 ER5 *INCORRECT REQUEST* 00400 M00S00355.crmtask +++| NZ X3,TTE IF TERMINAL DID NOT REQUEST OWN DATA BASE 00401 M00S00356.crmtask +++| CRS2 NZ X2,CRS5 IF FILE STATUS REQUEST 00402 M00S00357.crmtask +++| EQ CRS4 PROCESS DATA BASE STATUS REQUEST 00403 M00S00358.crmtask +++| 00404 M00S00359.crmtask +++|* CRM STATUS REQUEST. 00405 M00S00360.crmtask +++| 00406 M00S00361.crmtask +++| CRS3 SX5 B0+ FUNCTION CODE - *CRM* STATUS
| Line S00362 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00407 M01S00362.v23l617 ---| SB2 ER5 *INVALID COMMAND*
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00408 M01S00018.v23l617 +++| SB2 ER5 *INCORRECT COMMAND* 00409 M00S00363.crmtask +++| NZ X4,TTE IF REQUEST FROM TERMINAL 00410 M00S00364.crmtask +++| SX6 BADR FWA OF BUFFER TO RECEIVE STATUS 00411 M00S00365.crmtask +++| SX7 CST1L LENGTH OF BUFFER 00412 M00S00366.crmtask +++| RJ CST ISSUE *CRMSTAT* REQUEST 00413 M00S00367.crmtask +++| SB2 ER4 *INSUFICIENT FIELD LENGTH.* 00414 M00S00368.crmtask +++| NZ X2,CRS6 IF BUFFER TOO SMALL 00415 M00S00369.crmtask +++| SX5 B1+ FUNCTION CODE - REQUEST ALL *TDRF-S* 00416 M00S00370.crmtask +++| SX6 BADR+CST1L FWA OF BUFFER TO RECEIVE STATUS 00417 M00S00371.crmtask +++| SX7 CST2L LENGTH OF BUFFER 00418 M00S00372.crmtask +++| RJ CST ISSUE *CRMSTAT* FUNCTION 00419 M00S00373.crmtask +++| NZ X2,CRS6 IF BUFFER TOO SMALL 00420 M00S00374.crmtask +++| EQ FCD FORMAT DISPLAY 00421 M00S00375.crmtask +++| 00422 M00S00376.crmtask +++|* DATA BASE STATUS REQUEST. 00423 M00S00377.crmtask +++| 00424 M00S00378.crmtask +++| CRS4 SX5 B1+B1 FUNCTION CODE - DATA BASE STATUS 00425 M00S00379.crmtask +++| BX5 X1+X5 DATA BASE NAME + FUNCTION CODE 00426 M00S00380.crmtask +++| SX6 BADR FWA OF BUFFER TO RECEIVE STATUS 00427 M00S00381.crmtask +++| SX7 DST1L LENGTH OF BUFFER 00428 M00S00382.crmtask +++| RJ CST ISSUE *CRMSTAT* REQUEST 00429 M00S00383.crmtask +++| SX2 X2-1 00430 M00S00384.crmtask +++| SB2 ER0 *DATA BASE/FILE NAME UNKNOWN.* 00431 M00S00385.crmtask +++| ZR X2,CRS6 IF DATA BASE UNKNOWN 00432 M00S00386.crmtask +++| SB2 ER4 *INSUFICIENT FIELD LENGTH.* 00433 M00S00387.crmtask +++| PL X2,CRS6 IF BUFFER TOO SMALL 00434 M00S00388.crmtask +++| SA1 TMSW+1 DATA BASE NAME 00435 M00S00389.crmtask +++| SX5 3 FUNCTION CODE - REQUEST ALL *TLNT-S* 00436 M00S00390.crmtask +++| BX5 X1+X5 00437 M00S00391.crmtask +++| SX6 BADR+DST1L FWA OF BUFFER TO RECEIVE STATUS 00438 M00S00392.crmtask +++| SX7 DST2L LENGTH OF BUFFER 00439 M00S00393.crmtask +++| RJ CST ISSUE *CRMSTAT* REQUEST 00440 M00S00394.crmtask +++| SB2 ER4 *INSUFICIENT FIELD LENGTH.* 00441 M00S00395.crmtask +++| NZ X2,CRS6 IF BUFFER TOO SMALL 00442 M00S00396.crmtask +++| EQ FDD FORMAT DISPLAY 00443 M00S00397.crmtask +++| 00444 M00S00398.crmtask +++|* FILE STATUS REQUEST. 00445 M00S00399.crmtask +++| 00446 M00S00400.crmtask +++| CRS5 SX5 4 FUNCTION CODE - FILE STATUS 00447 M00S00401.crmtask +++| BX5 X1+X5 FILE NAME + FUNCTION CODE 00448 M00S00402.crmtask +++| SX6 BADR FWA OF BUFFER TO RECEIVE STATUS 00449 M00S00403.crmtask +++| SX7 FSTBL LENGTH OF BUFFER 00450 M00S00404.crmtask +++| RJ CST ISSUE *CRMSTAT* REQUEST 00451 M00S00405.crmtask +++| SX2 X2-1 00452 M00S00406.crmtask +++| SB2 ER0 *DATA BASE/FILE NAME UNKNOWN.* 00453 M00S00407.crmtask +++| ZR X2,CRS6 IF FILE NAME UNKNOWN 00454 M00S00408.crmtask +++| SB2 ER4 *INSUFICIENT FIELD LENGTH.* 00455 M00S00409.crmtask +++| PL X2,CRS6 IF BUFFER TOO SMALL 00456 M00S00410.crmtask +++| EQ FFD FORMAT DISPLAY 00457 M00S00411.crmtask +++| 00458 M00S00412.crmtask +++|* PROCESS ERRORS. 00459 M00S00413.crmtask +++| 00460 M00S00414.crmtask +++| CRS6 NZ X4,TTE IF TERMINAL ORIGIN 00461 M00S00415.crmtask +++| RJ SEM SET ERROR MESSAGE 00462 M00S00416.crmtask +++| EQ TPA DISPLAY ERROR MESSAGE 00463 M00S00417.crmtask +++| DBD SPACE 4,25 00464 M00S00418.crmtask +++|** DBD - DATA BASE DOWN. 00465 M00S00419.crmtask +++|* 00466 M00S00420.crmtask +++|* DBD ISSUES A REQUEST TO *AAMI* TO DOWN A DATA BASE OR DATA 00467 M00S00421.crmtask +++|* BASE FILE. 00468 M00S00422.crmtask +++|* 00469 M00S00423.crmtask +++|* ENTRY SECOND WORD OF DATA AREA OF COMMUNICATION BLOCK 00470 M00S00424.crmtask +++|* CONTAINS DATA BASE OR FILE NAME. 00471 M00S00425.crmtask +++|* 00472 M00S00426.crmtask +++|* EXIT TO *TPA*. (TAF ORIGIN). 00473 M00S00427.crmtask +++|* (X1) = ADDRESS OF *K-DISPLAY* CONTROL WORD. 00474 M00S00428.crmtask +++|* TO *TPD*. (TERMINAL ORIGIN). 00475 M00S00429.crmtask +++|* 00476 M00S00430.crmtask +++|* ERROR TO *TPA*. (TAF ORIGIN). 00477 M00S00431.crmtask +++|* (X1) = ADDRESS OF *K-DISPLAY* CONTROL WORD. 00478 M00S00432.crmtask +++|* TO *TTE*. (TERMINAL ORIGIN). 00479 M00S00433.crmtask +++|* (B2) = ERROR CODE. 00480 M00S00434.crmtask +++|* 00481 M00S00435.crmtask +++|* USES X - 1, 2, 6, 7. 00482 M00S00436.crmtask +++|* A - 1, 2, 6, 7. 00483 M00S00437.crmtask +++|* B - 2. 00484 M00S00438.crmtask +++|* 00485 M00S00439.crmtask +++|* CALLS SEM. 00486 M00S00440.crmtask +++|* 00487 M00S00441.crmtask +++|* MACROS DBDOWN. 00488 M00S00442.crmtask +++| 00489 M00S00443.crmtask +++| 00490 M00S00444.crmtask +++| DBD BSS 0 ENTRY
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00491 M01S00022.241l630 +++| SX6 DMU 00492 M01S00023.241l630 +++| SA6 FPAG SET PROCESSOR ADDRESS 00493 M01S00024.241l630 +++| SA6 PAGE
| Line S00445 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00494 M01S00445.241l630 ---| SX6 KDD *K-DISPLAY* CONTROL WORD 00495 M01S00446.241l630 ---| SX7 KDDA *K-DISPLAY* ERROR LINE
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00496 M01S00025.241l630 +++| SX6 KDE *K-DISPLAY* CONTROL WORD 00497 M01S00026.241l630 +++| SX7 KDEA *K-DISPLAY* ERROR LINE 00498 M00S00447.crmtask +++| SA6 CWKD 00499 M00S00448.crmtask +++| SA7 EAKD
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00500 M01S00027.241l630 +++| SX6 KDEB+1 *K-DISPLAY* INPUT LINE 00501 M01S00028.241l630 +++| SA6 IAKD 00502 M00S00449.crmtask +++| SX6 B0+ FORMATTED *K-DISPLAY* 00503 M00S00450.crmtask +++| SA6 DSTP 00504 M00S00451.crmtask +++| SA1 TMSW+1 DATA BASE OR FILE NAME 00505 M00S00452.crmtask +++| BX6 X1 00506 M00S00453.crmtask +++| BX7 X7-X7 00507 M00S00454.crmtask +++| SA6 PADR 00508 M00S00455.crmtask +++| SA7 A6+B1 CLEAR STATUS WORD 00509 M00S00456.crmtask +++| SA7 A7+B1 PARAMETER LIST TERMINATOR 00510 M00S00457.crmtask +++| DBDOWN CSQ2 ISSUE *AAMI* REQUEST 00511 M00S00458.crmtask +++| SA1 PADR+1 STATUS 00512 M00S00459.crmtask +++| SA2 ORIG 00513 M00S00460.crmtask +++| NZ X1,DBD1 IF ERROR 00514 M00S00461.crmtask +++| SB2 ER7 *REQUEST COMPLETE.* 00515 M00S00462.crmtask +++| NZ X2,TPD IF TERMINAL ORIGIN 00516 M00S00463.crmtask +++| RJ SEM 00517 M00S00464.crmtask +++| EQ TPA COMPLETE PROCESSING 00518 M00S00465.crmtask +++| 00519 M00S00466.crmtask +++| DBD1 SX6 X1-TERB 00520 M00S00467.crmtask +++| SB2 ER0 *DATA BASE/FILE NAME UNKNOWN.* 00521 M00S00468.crmtask +++| ZR X6,DBD2 IF NO FILE OR DATA BASE 00522 M00S00469.crmtask +++| SB2 ER3 *DATA BASE/FILE ALREADY DOWN OR IDLE.* 00523 M00S00470.crmtask +++| DBD2 NZ X2,TTE IF TERMINAL ORIGIN 00524 M00S00471.crmtask +++| RJ SEM SET ERROR MESSAGE 00525 M00S00472.crmtask +++| EQ TPA DISPLAY ERROR MESSAGE 00526 M00S00473.crmtask +++| DBU SPACE 4,25 00527 M00S00474.crmtask +++|** DBU - DATA BASE UP. 00528 M00S00475.crmtask +++|* 00529 M00S00476.crmtask +++|* DBU ISSUES A REQUEST TO *AAMI* TO UP A DATA BASE OR DATA BASE 00530 M00S00477.crmtask +++|* FILE. 00531 M00S00478.crmtask +++|* 00532 M00S00479.crmtask +++|* ENTRY SECOND WORD OF DATA AREA OF COMMUNICATION BLOCK 00533 M00S00480.crmtask +++|* CONTAINS DATA BASE OR FILE NAME. 00534 M00S00481.crmtask +++|* 00535 M00S00482.crmtask +++|* EXIT TO *TPA*. (TAF ORIGIN). 00536 M00S00483.crmtask +++|* (X1) = ADDRESS OF *K-DISPLAY* CONTROL WORD. 00537 M00S00484.crmtask +++|* TO *TPD*. (TERMINAL ORIGIN). 00538 M00S00485.crmtask +++|* 00539 M00S00486.crmtask +++|* ERROR TO *TPA*. (TAF ORIGIN). 00540 M00S00487.crmtask +++|* (X1) = ADDRESS OF *K-DISPLAY* CONTROL WORD. 00541 M00S00488.crmtask +++|* TO *TTE*. (TERMINAL ORIGIN). 00542 M00S00489.crmtask +++|* (B2) = ERROR CODE. 00543 M00S00490.crmtask +++|* 00544 M00S00491.crmtask +++|* USES X - 1, 2, 6, 7. 00545 M00S00492.crmtask +++|* A - 1, 2, 6, 7. 00546 M00S00493.crmtask +++|* B - 2. 00547 M00S00494.crmtask +++|* 00548 M00S00495.crmtask +++|* CALLS SEM. 00549 M00S00496.crmtask +++|* 00550 M00S00497.crmtask +++|* MACROS DBUP. 00551 M00S00498.crmtask +++| 00552 M00S00499.crmtask +++| 00553 M00S00500.crmtask +++| DBU BSS 0 ENTRY
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00554 M01S00029.241l630 +++| SX6 DMU 00555 M01S00030.241l630 +++| SA6 FPAG SET PROCESSOR ADDRESS 00556 M01S00031.241l630 +++| SA6 PAGE
| Line S00501 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00557 M01S00501.241l630 ---| SX6 KDD *K-DISPLAY* CONTROL WORD 00558 M01S00502.241l630 ---| SX7 KDDA *K-DISPLAY* ERROR LINE
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00559 M01S00032.241l630 +++| SX6 KDE *K-DISPLAY* CONTROL WORD 00560 M01S00033.241l630 +++| SX7 KDEA *K-DISPLAY* ERROR LINE 00561 M00S00503.crmtask +++| SA6 CWKD 00562 M00S00504.crmtask +++| SA7 EAKD
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00563 M01S00034.241l630 +++| SX6 KDEB+1 *K-DISPLAY* INPUT LINE 00564 M01S00035.241l630 +++| SA6 IAKD 00565 M00S00505.crmtask +++| SX6 B0+ FORMATTED *K-DISPLAY* 00566 M00S00506.crmtask +++| SA6 DSTP 00567 M00S00507.crmtask +++| SA1 TMSW+1 DATA BASE OR FILE NAME 00568 M00S00508.crmtask +++| BX6 X1 00569 M00S00509.crmtask +++| BX7 X7-X7 00570 M00S00510.crmtask +++| SA6 PADR 00571 M00S00511.crmtask +++| SA7 A6+B1 CLEAR STATUS WORD 00572 M00S00512.crmtask +++| SA7 A7+B1 PARAMETER LIST TERMINATOR 00573 M00S00513.crmtask +++| DBUP CSQ2 ISSUE *AAMI* REQUEST 00574 M00S00514.crmtask +++| SA1 PADR+1 STATUS 00575 M00S00515.crmtask +++| SA2 ORIG 00576 M00S00516.crmtask +++| NZ X1,DBU1 IF ERROR 00577 M00S00517.crmtask +++| SB2 ER7 *REQUEST COMPLETE.* 00578 M00S00518.crmtask +++| NZ X2,TPD IF TERMINAL ORIGIN 00579 M00S00519.crmtask +++| RJ SEM 00580 M00S00520.crmtask +++| EQ TPA COMPLETE PROCESSING 00581 M00S00521.crmtask +++| 00582 M00S00522.crmtask +++| DBU1 SX6 X1-TERB 00583 M00S00523.crmtask +++| SB2 ER0 *DATA BASE/FILE NAME UNKNOWN.* 00584 M00S00524.crmtask +++| ZR X6,DBU2 IF NO FILE OR DATA BASE 00585 M00S00525.crmtask +++| SB2 ER1 *NOT ALL DATA BASE FILES UPPED.* 00586 M00S00526.crmtask +++| SX6 X1-TERAL 00587 M00S00527.crmtask +++| ZR X6,DBU2 IF NOT ALL FILES UP 00588 M00S00528.crmtask +++| SB2 ER2 *DATA BASE/FILE CANNOT BE UPPED.* 00589 M00S00529.crmtask +++| DBU2 NZ X2,TTE IF TERMINAL ORIGIN 00590 M00S00530.crmtask +++| RJ SEM SET ERROR MESSAGE 00591 M00S00531.crmtask +++| EQ TPA DISPLAY ERROR MESSAGE 00592 M00S00532.crmtask +++| DMU SPACE 4,25 00593 M00S00533.crmtask +++|** DMU - DISPLAY MENU. 00594 M00S00534.crmtask +++|* 00595 M00S00535.crmtask +++|* THIS SUBROUTINE DISPLAYS THE MENU OF *CRMTASK* 00596 M00S00536.crmtask +++|* COMMANDS UPON THE *K-DISPLAY*. IT CAN ONLY BE 00597 M00S00537.crmtask +++|* INVOKED BY *K-DISPLAY* COMMAND. NO PROVISIONS ARE 00598 M00S00538.crmtask +++|* MADE TO DISPLAY MENU AT THE TERMINAL. 00599 M00S00539.crmtask +++|* 00600 M00S00540.crmtask +++|* ENTRY NONE. 00601 M00S00541.crmtask +++|*
| Line S00542 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00602 M01S00542.241l630 ---|* EXIT TO *CVL*. 00603 M01S00543.241l630 ---|* (B3) = FWA OF VALID COMMAND TABLE.
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00604 M01S00036.241l630 +++|* EXIT TO *TPA*. 00605 M01S00037.241l630 +++|* (X1) = *K-DISPLAY* CONTROL WORD. 00606 M00S00544.crmtask +++|* 00607 M00S00545.crmtask +++|* ERROR TO *TTE*, IF TERMINAL ORIGIN. 00608 M00S00546.crmtask +++|* (B2) =ERROR CODE. 00609 M00S00547.crmtask +++|* TO *IBR*, IF *SIC* REQUEST. 00610 M00S00548.crmtask +++|* (X3) = ERROR CODE. 00611 M00S00549.crmtask +++|*
| Line S00550 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00612 M01S00550.241l630 ---|* USES X - 1, 3, 6, 7.
| Line S00038 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00613 M01S00038.241l630 +++|* USES X - 1, 3, 4, 6, 7. 00614 M00S00551.crmtask +++|* A - 1, 6, 7. 00615 M00S00552.crmtask +++|* B - 2, 3. 00616 M00S00553.crmtask +++|* 00617 M00S00554.crmtask +++|* MACROS SYSTEM. 00618 M00S00555.crmtask +++| 00619 M00S00556.crmtask +++| 00620 M00S00557.crmtask +++| DMU BSS 0 ENTRY
| Line S00039 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00621 M01S00039.241l630 +++| SX6 DMU 00622 M01S00040.241l630 +++| SA6 FPAG SET PROCESSOR ADDRESS 00623 M01S00041.241l630 +++| SA6 PAGE 00624 M00S00558.crmtask +++| SX6 KDE *K-DISPLAY* CONTROL WORD 00625 M00S00559.crmtask +++| SX7 KDEA *K-DISPLAY* ERROR LINE 00626 M00S00560.crmtask +++| SA6 CWKD 00627 M00S00561.crmtask +++| SA7 EAKD
| Line S00042 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00628 M01S00042.241l630 +++| SX6 KDEB+1 *K-DISPLAY* INPUT LINE 00629 M01S00043.241l630 +++| SA6 IAKD 00630 M00S00562.crmtask +++| SX6 B0+ FORMATTED *K-DISPLAY* 00631 M00S00563.crmtask +++| SA6 DSTP 00632 M00S00564.crmtask +++| SA1 ORIG
| Line S00565 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00633 M01S00565.v23l617 ---| SB2 ER5 *INVALID COMMAND.*
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00634 M01S00019.v23l617 +++| SB2 ER5 *INCORRECT COMMAND.* 00635 M00S00566.crmtask +++| SX1 X1-1 00636 M00S00567.crmtask +++| ZR X1,TTE IF TERMINAL ORIGIN
| Line S00568 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00637 M01S00568.v23l617 ---| SX3 B0+ *INVALID SIC REQUEST.*
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00638 M01S00020.v23l617 +++| SX3 B0+ *INCORRECT SIC REQUEST.* 00639 M00S00569.crmtask +++| PL X1,IBR IF *BTRAN* REQUEST
| Line S00570 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00640 M01S00570.241l630 ---| SYSTEM CTI,,KDE,8 00641 M01S00571.241l630 ---| SB3 CVLB 00642 M01S00572.241l630 ---| EQ CVL WAIT FOR NEXT COMMAND
| Line S00044 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00643 M01S00044.241l630 +++| SX1 KDE *K-DISPLAY* CONTROL WORD 00644 M01S00045.241l630 +++| EQ TPA DISPLAY THE MENU 00645 M00S00573.crmtask +++| PBP SPACE 4,20 00646 M00S00574.crmtask +++|** PBP - PAGE BACKWARD PROCESSOR. 00647 M00S00575.crmtask +++|* 00648 M00S00576.crmtask +++|* PBP REPROCESSES THE *CRMSTAT* INFORMATION AGAIN. 00649 M00S00577.crmtask +++|* IT GETS THE FWA OF THE BUFFER AND ENTERS THE AP- 00650 M00S00578.crmtask +++|* PROPRIATE DISPLAY PROCESSOR. 00651 M00S00579.crmtask +++|* 00652 M00S00580.crmtask +++|* ENTRY (FPAG) = PROCESSOR ADDRESS. 00653 M00S00581.crmtask +++|* (BADR) = CONTAINS DATA RECEIVED FROM *AAMI*. 00654 M00S00582.crmtask +++|* 00655 M00S00583.crmtask +++|* EXIT TO (PAGE). 00656 M00S00584.crmtask +++|*
| Line S00585 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00657 M01S00585.241l630 ---|* ERROR TO *PSE*, IF (FPAG) = 0. 00658 M01S00586.241l630 ---|* 00659 M01S00587.241l630 ---|* 00660 M00S00588.crmtask +++|* USES X - 2. 00661 M00S00589.crmtask +++|* A - 2. 00662 M00S00590.crmtask +++|* B - 3. 00663 M00S00591.crmtask +++| 00664 M00S00592.crmtask +++| 00665 M00S00593.crmtask +++| PBP BSS 0 ENTRY 00666 M00S00594.crmtask +++| SA2 FPAG
| Line S00595 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00667 M01S00595.241l630 ---| ZR X2,PSE IF NO PROCESSOR ADDRESS 00668 M00S00596.crmtask +++| SB3 X2+ 00669 M00S00597.crmtask +++| JP B3 ENTER PROCESSOR 00670 M00S00598.crmtask +++| PFP SPACE 4,20 00671 M00S00599.crmtask +++|** PFP - PAGE FORWARD PROCESSOR. 00672 M00S00600.crmtask +++|* 00673 M00S00601.crmtask +++|* PFP GETS THE BUFFER ADDRESS FROM WHICH TO CONSTRUCT THE NEXT 00674 M00S00602.crmtask +++|* PAGE OF THE DISPLAY, AND RE-ENTERS THE DISPLAY PROCESSOR. 00675 M00S00603.crmtask +++|* 00676 M00S00604.crmtask +++|* ENTRY (PAGE) = PROCESSOR ADDRESS FOR REENTRY. 00677 M00S00605.crmtask +++|* (NPAG) = BUFFER ADDRESS OF DATA FOR DISPLAY. 00678 M00S00606.crmtask +++|* 00679 M00S00607.crmtask +++|* EXIT TO DISPLAY PROCESSOR WHOSE ADDRESS IS IN *PAGE*. 00680 M00S00608.crmtask +++|* (A5) = FWA OF BUFFER OF DISPLAY DATA. 00681 M00S00609.crmtask +++|* (X5) = CONTENTS OF A WORD AT (A5). 00682 M00S00610.crmtask +++|*
| Line S00611 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00683 M01S00611.241l630 ---|* ERROR TO *PSE* IF (PAGE) OR (NPAG) = 0. 00684 M01S00612.241l630 ---|* 00685 M00S00613.crmtask +++|* USES X - 1, 2, 5. 00686 M00S00614.crmtask +++|* A - 1, 2, 5. 00687 M00S00615.crmtask +++|* B - 3. 00688 M00S00616.crmtask +++| 00689 M00S00617.crmtask +++| 00690 M00S00618.crmtask +++| PFP BSS 0 ENTRY 00691 M00S00619.crmtask +++| SA1 NPAG 00692 M00S00620.crmtask +++| SA2 PAGE
| Line S00621 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00693 M01S00621.241l630 ---| ZR X2,PSE IF NO RE-ENTRY ADDRESS 00694 M01S00622.241l630 ---| ZR X1,PSE IF NO DATA TO PAGE FORWARD TO 00695 M00S00623.crmtask +++| SB3 X2 00696 M00S00624.crmtask +++| SA5 X1 00697 M00S00625.crmtask +++| JP B3 REENTER DISPLAY PROCESSOR 00698 M00S00626.crmtask +++| SIC SPACE 4,20 00699 M00S00627.crmtask +++|** SIC - PROCESS *CRMSIC* REQUEST. 00700 M00S00628.crmtask +++|* 00701 M00S00629.crmtask +++|* SIC REFORMATS THE INFORMATION FROM THE COMMUNICATION BLOCK 00702 M00S00630.crmtask +++|* INTO A PARAMETER BLOCK, AND ISSUES A *CRMSIC* REQUEST TO 00703 M00S00631.crmtask +++|* *AAMI*. 00704 M00S00632.crmtask +++|* 00705 M00S00633.crmtask +++|* ENTRY FIRST FOUR WORDS OF DATA AREA OF COMMUNICATION BLOCK 00706 M00S00634.crmtask +++|* CONTAIN INFORMATION TO BE STORED IN PARAMETER BLOCK. 00707 M00S00635.crmtask +++|* 00708 M00S00636.crmtask +++|* EXIT TO *TPD*. 00709 M00S00637.crmtask +++|* 00710 M00S00638.crmtask +++|* ERROR TO *IBR*. 00711 M00S00639.crmtask +++|* (X3) = ERROR CODE. 00712 M00S00640.crmtask +++|* 00713 M00S00641.crmtask +++|* USES X - 0, 1, 3, 6, 7. 00714 M00S00642.crmtask +++|* A - 1, 3, 6, 7. 00715 M00S00643.crmtask +++|* 00716 M00S00644.crmtask +++|* MACROS CRMSIC. 00717 M00S00645.crmtask +++| 00718 M00S00646.crmtask +++| 00719 M00S00647.crmtask +++| SIC BSS 0 ENTRY 00720 M00S00648.crmtask +++| SA1 TMSW+1 00721 M00S00649.crmtask +++| MX0 42 00722 M00S00650.crmtask +++| BX6 X0*X1 DATA BASE/FILE NAME 00723 M00S00651.crmtask +++| SA6 PADR 00724 M00S00652.crmtask +++| SX7 B0 00725 M00S00653.crmtask +++| SA7 A6+B1 CLEAR STATUS WORD 00726 M00S00654.crmtask +++| BX6 -X0*X1 BATCH JOB SEQUENCE NUMBER 00727 M00S00655.crmtask +++| SA6 A7+B1 00728 M00S00656.crmtask +++| SA1 A1+B1 FUNCTION CODE 00729 M00S00657.crmtask +++| BX6 X1 00730 M00S00658.crmtask +++| SA6 A6+B1 00731 M00S00659.crmtask +++| SA7 A6+B1 PARAMETER LIST TERMINATOR 00732 M00S00660.crmtask +++| CRMSIC CSQ3 ISSUE *AAMI* REQUEST 00733 M00S00661.crmtask +++| SA3 PADR+1 STATUS 00734 M00S00662.crmtask +++| ZR X3,TPD IF NO ERROR 00735 M00S00663.crmtask +++| SX6 X1-TERB 00736 M00S00664.crmtask +++| SX3 IER1 00737 M00S00665.crmtask +++| ZR X6,IBR IF UNKNOWN DATA BASE 00738 M00S00666.crmtask +++| SX3 IER2 00739 M00S00667.crmtask +++| SX6 X1-TERAD
| Line S00668 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00740 M01S00668.v23l617 ---| ZR X6,IBR IF INVALID TT NUMBER
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00741 M01S00021.v23l617 +++| ZR X6,IBR IF INCORRECT TT NUMBER 00742 M00S00669.crmtask +++| SX3 IER3 00743 M00S00670.crmtask +++| SX6 X1-TERAK 00744 M00S00671.crmtask +++| ZR X6,IBR IF DATA BASE DOWNED BY OPERATOR 00745 M00S00672.crmtask +++| SX3 IER4 00746 M00S00673.crmtask +++| SX6 X1-TERAL 00747 M00S00674.crmtask +++| ZR X6,IBR IF NOT ALL FILE UP 00748 M00S00675.crmtask +++| SX3 IER5 00749 M00S00676.crmtask +++| SX6 X1-TERAM 00750 M00S00677.crmtask +++| ZR X6,IBR IF DATA BASE CANNOT BE UPPED 00751 M00S00678.crmtask +++| SX3 IER6 00752 M00S00679.crmtask +++| SX6 X1-TERAG 00753 M00S00680.crmtask +++| ZR X6,IBR IF DATA BASE IDLING DOWN 00754 M00S00681.crmtask +++| SX3 IER7 00755 M00S00682.crmtask +++| EQ IBR JOURNAL MESSAGE AND QUIT 00756 M00S00683.crmtask +++| CST SPACE 4,45 00757 M00S00684.crmtask +++|** CST - ISSUE *CRMSTAT* REQUEST. 00758 M00S00685.crmtask +++|* 00759 M00S00686.crmtask +++|* THIS SUBROUTINE REQUESTS *AAMI* STATUS. FUNCTION CODE IN X5 00760 M00S00687.crmtask +++|* DETERMINES WHAT IS RETURNED BY *AAMI*. 00761 M00S00688.crmtask +++|* 00762 M00S00689.crmtask +++|* FC = 0, *AAMI* RETURNS *TSEQ* TABLE, 00763 M00S00690.crmtask +++|* A WORD OF BINARY ZEROS, 00764 M00S00691.crmtask +++|* INPUT QUEUE FET, 00765 M00S00692.crmtask +++|* INPUT QUEUE, 00766 M00S00693.crmtask +++|* OUTPUT QUEUE FET, 00767 M00S00694.crmtask +++|* OUTPUT QUEUE, 00768 M00S00695.crmtask +++|* A WORD OF BINARY ZEROS. 00769 M00S00696.crmtask +++|* = 1, *AAMI* RETURNS ALL *TDRF* TABLES, 00770 M00S00697.crmtask +++|* A WORD OF BINARY ZEROS. 00771 M00S00698.crmtask +++|* = 2, *AAMI* RETURNS *TDRF* TABLE, 00772 M00S00699.crmtask +++|* A WORD OF BINARY ZEROS, 00773 M00S00700.crmtask +++|* *TARF* TABLE, 00774 M00S00701.crmtask +++|* A WORD OF BINARY ZEROS, 00775 M00S00702.crmtask +++|* ALL *TQRF* TABLES FOR 00776 M00S00703.crmtask +++|* THE SPECFIED DATA BASE, 00777 M00S00704.crmtask +++|* A WORD OF BINARY ZEROS. 00778 M00S00705.crmtask +++|* = 3, *AAMI* RETURNS ALL *TLNT* TABLES FOR 00779 M00S00706.crmtask +++|* THE SPECFIED DATA BASE, 00780 M00S00707.crmtask +++|* A WORD OF BINARY ZEROS. 00781 M00S00708.crmtask +++|* = 4, *AAMI* RETURNS *TLNT* TABLE, 00782 M00S00709.crmtask +++|* A WORD OF BINARY ZEROS, 00783 M00S00710.crmtask +++|* NUMBER OF ACTIVE USERS, 00784 M00S00711.crmtask +++|* NUMBER OF LOCKED RECORDS FOR 00785 M00S00712.crmtask +++|* THE SPECFIED DATA BASE FILE, 00786 M00S00713.crmtask +++|* A WORD OF BINARY ZEROS. 00787 M00S00714.crmtask +++|* 00788 M00S00715.crmtask +++|* ENTRY (X5) = FUNCTION CODE 00789 M00S00716.crmtask +++|* (X6) = FWA OF BUFFER 00790 M00S00717.crmtask +++|* (X7) = LENGTH OF BUFFER 00791 M00S00718.crmtask +++|* 00792 M00S00719.crmtask +++|* EXIT (X2) = STATUS REPLY 00793 M00S00720.crmtask +++|* 00794 M00S00721.crmtask +++|* USES X - 2, 6, 7. 00795 M00S00722.crmtask +++|* A - 2, 6, 7. 00796 M00S00723.crmtask +++|* 00797 M00S00724.crmtask +++|* MACROS CRMSTAT. 00798 M00S00725.crmtask +++| 00799 M00S00726.crmtask +++| 00800 M00S00727.crmtask +++| CST SUBR ENTRY/EXIT 00801 M00S00728.crmtask +++| SA7 PADR+2 00802 M00S00729.crmtask +++| SA6 CSQ1+2 00803 M00S00730.crmtask +++| BX6 X6-X6 00804 M00S00731.crmtask +++| SA6 A7-B1 00805 M00S00732.crmtask +++| BX6 X5 00806 M00S00733.crmtask +++| SA6 A6-B1 00807 M00S00734.crmtask +++| BX7 X7-X7 00808 M00S00735.crmtask +++| SA7 A7+B1 PARAMETER LIST TERMINATOR 00809 M00S00736.crmtask +++| CRMSTAT CSQ1 ISSUE *AAMI* REQUEST 00810 M00S00737.crmtask +++| SA2 PADR+1 STATUS WORD 00811 M00S00738.crmtask +++| EQ CSTX RETURN 00812 M00S00739.crmtask +++| FCD SPACE 4,20 00813 M00S00740.crmtask +++|** FCD - FORMAT CRMSTAT DISPLAY. 00814 M00S00741.crmtask +++|* 00815 M00S00742.crmtask +++|* FCD EXTRACTS RAW DATA FROM THE *TSEQ*, *AMIQ*, *AMOQ*, *TDRF* 00816 M00S00743.crmtask +++|* TABLES AND FORMATS A *K-DISPLAY*. 00817 M00S00744.crmtask +++|* 00818 M00S00745.crmtask +++|* ENTRY BADR = FWA OF TABLES. 00819 M00S00746.crmtask +++|* 00820 M00S00747.crmtask +++|* REENTRY AT *FCD5*. 00821 M00S00748.crmtask +++|* (A5) = FWA OF NEXT *TDRF*. 00822 M00S00749.crmtask +++|* (X5) = FIRST WORD OF *TDRF*. 00823 M00S00750.crmtask +++|* 00824 M00S00751.crmtask +++|* EXIT TO *TPA*. 00825 M00S00752.crmtask +++|* 00826 M00S00753.crmtask +++|* USES X - ALL. 00827 M00S00754.crmtask +++|* A - 1, 2, 3, 4, 5, 6, 7. 00828 M00S00755.crmtask +++|* B - 2, 3, 4, 6. 00829 M00S00756.crmtask +++|* 00830 M00S00757.crmtask +++|* CALLS CDD. 00831 M00S00758.crmtask +++| 00832 M00S00759.crmtask +++| 00833 M00S00760.crmtask +++| FCD BSS 0 ENTRY 00834 M00S00761.crmtask +++| SX6 FCD 00835 M00S00762.crmtask +++| SA6 FPAG SET PROCESSOR ADDRESS
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00836 M01S00046.241l630 +++| SA6 PAGE 00837 M00S00763.crmtask +++| SX6 KDA *K-DISPLAY* CONTROL WORD 00838 M00S00764.crmtask +++| SX7 KDAF *K-DISPLAY* ERROR LINE 00839 M00S00765.crmtask +++| SA6 CWKD 00840 M00S00766.crmtask +++| SA7 EAKD
| Line S00047 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00841 M01S00047.241l630 +++| SX6 KDAG+1 *K-DISPLAY* INPUT LINE 00842 M01S00048.241l630 +++| SA6 IAKD
| Line S00767 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00843 M01S00767.241l630 ---| SX6 B0+ FORMATTED *K-DISPLAY*
| Line S00049 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00844 M01S00049.241l630 +++| SX6 B0 FORMATTED *K-DISPLAY* 00845 M01S00050.241l630 +++| SX1 B0 INITIALIZE COUNT OF ACTIVE TRANSACTIONS 00846 M00S00768.crmtask +++| SA6 DSTP 00847 M00S00769.crmtask +++| SB2 TSEQE LENGTH OF *TSEQ* TABLE ENTRY
| Line S00770 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00848 M01S00770.241l630 ---| SX1 B0+ INITIALIZE COUNT OF ACTIVE TRANSACTIONS 00849 M00S00771.crmtask +++| SB3 CMDM*RMDM+1 NO OF ENTRIES 00850 M00S00772.crmtask +++| SA5 BADR-TSEQE 00851 M00S00773.crmtask +++| FCD1 SB3 B3-B1 00852 M00S00774.crmtask +++| LT B3,FCD2 IF ALL ENTRIES CHECKED 00853 M00S00775.crmtask +++| SA5 A5+B2 NEXT ENTRY 00854 M00S00776.crmtask +++| ZR X5,FCD1 IF EMPTY 00855 M00S00777.crmtask +++| SX1 X1+1 INCREMENT ACTIVE COUNT 00856 M00S00778.crmtask +++| EQ FCD1 NEXT ENTRY 00857 M00S00779.crmtask +++| 00858 M00S00780.crmtask +++| FCD2 RJ CDD CONVERT TO DECIMAL DISPLAY
| Line S00781 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00859 M01S00781.241l630 ---| SA1 KDAB 00860 M01S00782.241l630 ---| MX0 24 00861 M01S00783.241l630 ---| BX2 X0*X1 RETAIN *DSD* COORDINATES 00862 M01S00784.241l630 ---| BX6 -X0*X6 REMOVE LEADING 4 BLANKS FROM COUNT 00863 M01S00785.241l630 ---| BX6 X2+X6 00864 M01S00786.241l630 ---| SA6 A1+ STORE IN DISPLAY BUFFER
| Line S00051 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00865 M01S00051.241l630 +++| SA6 KDAB+1 STORE IN DISPLAY BUFFER 00866 M00S00787.crmtask +++| SA5 A5+TSEQE+1 SKIP LAST ENTRY AND THE ZERO WORD 00867 M00S00788.crmtask +++| SA1 A5+B1 GET *AMIQ* FET POINTERS 00868 M00S00789.crmtask +++| SX1 X1 FIRST 00869 M00S00790.crmtask +++| SA2 A1+B1 IN 00870 M00S00791.crmtask +++| SA3 A2+B1 OUT 00871 M00S00792.crmtask +++| SA4 A3+1 00872 M00S00793.crmtask +++| SX4 X4 LIMIT 00873 M00S00794.crmtask +++| IX6 X2-X3 IN-OUT 00874 M00S00795.crmtask +++| PL X6,FCD3 IF IN .GE. OUT 00875 M00S00796.crmtask +++| IX3 X4-X3 LIMIT-OUT 00876 M00S00797.crmtask +++| IX2 X2-X1 IN-FIRST 00877 M00S00798.crmtask +++| IX6 X2+X3 REQUESTS IN *AMIQ* 00878 M00S00799.crmtask +++| FCD3 BX1 X6
| Line S00052 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00879 M01S00052.241l630 +++| MX0 24 00880 M00S00800.crmtask +++| RJ CDD CONVERT TO DECIMAL DISPLAY
| Line S00801 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00881 M01S00801.241l630 ---| SA1 KDAA 00882 M01S00802.241l630 ---| BX2 X0*X1 RETAIN *DSD* CO-ORDINATES 00883 M01S00803.241l630 ---| BX6 -X0*X6 REMOVE LEADING 4 BLANKS FROM COUNT
| Line S00053 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00884 M01S00053.241l630 +++| SA1 KDAA NUMBER OF TRANSACTIONS IN INPUT QUEUE 00885 M01S00054.241l630 +++| BX2 X0*X1 EXTRACT *KDL* COORDINATES 00886 M01S00055.241l630 +++| BX6 -X0*X6 00887 M00S00804.crmtask +++| BX6 X2+X6
| Line S00805 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00888 M01S00805.241l630 ---| SA6 A1 STORE IN DISPLAY BUFFER
| Line S00056 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00889 M01S00056.241l630 +++| SA6 A1 STORE IN DISPLAY BUFFER 00890 M00S00806.crmtask +++| SA5 A5+AAMQFL+AIBFL GET *AMOQ* FET POINTERS
| Line S00807 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00891 M01S00807.241l630 ---| SA2 A5+1
| Line S00057 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00892 M01S00057.241l630 +++| SA2 A5+B1 00893 M00S00808.crmtask +++| SX2 X2 FIRST 00894 M00S00809.crmtask +++| SA3 A2+B1 IN
| Line S00810 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00895 M01S00810.241l630 ---| SA4 A3+1 OUT 00896 M01S00811.241l630 ---| SA1 A4+1
| Line S00058 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00897 M01S00058.241l630 +++| SA4 A3+B1 OUT 00898 M01S00059.241l630 +++| SA1 A4+B1 00899 M00S00812.crmtask +++| SX1 X1 LIMIT 00900 M00S00813.crmtask +++| IX6 X3-X4
| Line S00060 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00901 M01S00060.241l630 +++| IX4 X1-X4 LIMIT-OUT 00902 M00S00814.crmtask +++| PL X6,FCD4 IF IN .GE. OUT
| Line S00815 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00903 M01S00815.241l630 ---| IX4 X1-X4 LIMIT-OUT 00904 M00S00816.crmtask +++| IX3 X3-X2 IN - FIRST 00905 M00S00817.crmtask +++| IX6 X3+X4 REQUESTS IN *AMOQ* 00906 M00S00818.crmtask +++| FCD4 BX1 X6 00907 M00S00819.crmtask +++| RJ CDD CONVERT TO DECIMAL DISPLAY
| Line S00820 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00908 M01S00820.241l630 ---| SA1 KDAC 00909 M01S00821.241l630 ---| BX2 X0*X1 RETAIN *DSD* CO-ORDINATES 00910 M01S00822.241l630 ---| BX6 -X0*X6 REMOVE LEADING 4 BLANKS FROM COUNT
| Line S00061 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00911 M01S00061.241l630 +++| SA1 KDAC NUMBER OF TRANSACTIONS IN OUTPUT QUEUE 00912 M01S00062.241l630 +++| BX2 X0*X1 EXTRACT *KDL* COORDINATES 00913 M01S00063.241l630 +++| BX6 -X0*X6 00914 M00S00823.crmtask +++| BX6 X2+X6 00915 M00S00824.crmtask +++| SA6 A1 STORE IN DISPLAY 00916 M00S00825.crmtask +++| SA5 A5+AAMQFL+AOBFL+1 POSITION TO FIRST *TDRF* 00917 M00S00826.crmtask +++| 00918 M00S00827.crmtask +++|* REENTRY POINT. 00919 M00S00828.crmtask +++|* 00920 M00S00829.crmtask +++|* ENTRY (A5) = ADDRESS OF THE NEXT *TDRF* TO DISPLAY. 00921 M00S00830.crmtask +++|* (X5) = FIRST WORD OF THE NEXT *TDRF* TO DISPLAY. 00922 M00S00831.crmtask +++| 00923 M00S00832.crmtask +++| FCD5 SB3 3 DATA BASES PER DISPLAY LINE 00924 M00S00833.crmtask +++| SA4 KDAD-2
| Line S00834 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00925 M01S00834.241l630 ---| SB4 23 NUMBER OF LINES PER DISPLAY
| Line S00064 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00926 M01S00064.241l630 +++| SB4 10 NUMBER OF LINES PER DISPLAY 00927 M00S00835.crmtask +++| SA3 A4+1 *KDAD*-1 00928 M00S00836.crmtask +++| BX6 X3 00929 M00S00837.crmtask +++| MX0 TDIDN 00930 M00S00838.crmtask +++| SA6 A3+ IN CASE OF NO DATA BASES 00931 M00S00839.crmtask +++| FCD6 ZR X5,FCD9 IF NO DATA BASES 00932 M00S00840.crmtask +++| SA3 A5+TDODW 00933 M00S00841.crmtask +++| SA4 A4+2 ADDRESS IN DISPLAY BUFFER 00934 M00S00842.crmtask +++| SA2 A5+TDIDW 00935 M00S00843.crmtask +++| BX6 X0*X2
| Line S00844 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00936 M01S00844.241l630 ---| LX4 59-23
| Line S00065 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00937 M01S00065.241l630 +++| LX4 59-35 00938 M00S00845.crmtask +++| SA1 A5+TDSDW 00939 M00S00846.crmtask +++| BX4 -X0*X4 00940 M00S00847.crmtask +++| BX6 X4+X6 INSERT DATA BASE NAME INTO THE LINE
| Line S00848 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00941 M01S00848.241l630 ---| LX6 23-59
| Line S00066 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00942 M01S00066.241l630 +++| LX6 35-59 00943 M00S00849.crmtask +++| SA6 A4 00944 M00S00850.crmtask +++| LX3 59-TDODS 00945 M00S00851.crmtask +++| SB6 B0 INITIALIZE STATUS = UP 00946 M00S00852.crmtask +++| NG X1,FCD7 IF DATA BASE DOWN 00947 M00S00853.crmtask +++| LX1 TDSDS-TDSIS 00948 M00S00854.crmtask +++| PL X1,FCD8 IF NOT IDLE 00949 M00S00855.crmtask +++| SB6 B1 STATUS = IDLE 00950 M00S00856.crmtask +++| EQ FCD8 SET STATUS IN DISPLAY 00951 M00S00857.crmtask +++| 00952 M00S00858.crmtask +++| FCD7 SB6 B1+B1 STATUS = DOWN 00953 M00S00859.crmtask +++| PL X3,FCD8 IF NOT OPERATOR DOWN 00954 M00S00860.crmtask +++| SB6 B6+B1 STATUS = OPERATOR DOWN 00955 M00S00861.crmtask +++| FCD8 SA3 FCDA+B6 GET STATUS 00956 M00S00862.crmtask +++| BX6 X3 00957 M00S00863.crmtask +++| SA6 A6+B1 STORE IN DISPLAY BUFFER 00958 M00S00864.crmtask +++| SB3 B3-1 00959 M00S00865.crmtask +++| SA5 A5+TDRFE NEXT *TDRF* 00960 M00S00866.crmtask +++| NE B3,FCD6 IF MORE TO GO IN THIS LINE 00961 M00S00867.crmtask +++| SB3 3 00962 M00S00868.crmtask +++| SB4 B4-1 DECREMENT LINE COUNT 00963 M00S00869.crmtask +++| NE B4,FCD6 IF DISPLAY NOT FULL
| Line S00870 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00964 M01S00870.241l630 ---| SB3 6 DATA WORDS PER DISPLAY LINE 00965 M00S00871.crmtask +++| ZR X5,FCD9 IF ALL DATA BASES DISPLAYED 00966 M00S00872.crmtask +++| SA2 MORE 00967 M00S00873.crmtask +++| BX6 X2 00968 M00S00874.crmtask +++| SX7 A5 00969 M00S00875.crmtask +++| SA6 KDAE+1 INDICATE MORE TO BE DISPLAYED 00970 M00S00876.crmtask +++| SA7 NPAG SAVE FWA FOR NEXT PAGE 00971 M00S00877.crmtask +++| SX7 FCD5 00972 M00S00878.crmtask +++| SA7 PAGE SAVE RESTART ADDRESS FOR PAGING 00973 M00S00879.crmtask +++| SX1 KDA ADDRESS OF K-DISPLAY CONTROL WORD 00974 M00S00880.crmtask +++| EQ TPA GO TO TERMINATION PROCESSOR 00975 M00S00881.crmtask +++| 00976 M00S00882.crmtask +++| FCD9 SA2 BLNK BLANK OUT UNUSED PART OF DISPLAY
| Line S00883 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00977 M01S00883.241l630 ---| BX7 X7-X7
| Line S00067 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00978 M01S00067.241l630 +++| SX7 FCD 00979 M01S00068.241l630 +++| SA7 PAGE ALLOW FORWARD PAGING TO ROLL BACK 00980 M01S00069.241l630 +++| SX4 B3+ 00981 M00S00884.crmtask +++| MX0 24
| Line S00885 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00982 M01S00885.241l630 ---| SX4 B3 00983 M01S00886.241l630 ---| SA7 NPAG SET NO FORWARD PAGING 00984 M00S00887.crmtask +++| LX4 1 CONVERT DATA BASES/LINE TO WORDS/LINE 00985 M00S00888.crmtask +++| SX1 KDA *K-DISPLAY* CONTROL WORD 00986 M00S00889.crmtask +++| SB3 X4+
| Line S00070 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00987 M01S00070.241l630 +++| SB4 B4+1 BLANK OUT *MORE* LINE 00988 M00S00890.crmtask +++| FCD10 EQ B4,TPA IF ALL LINES BLANKED 00989 M00S00891.crmtask +++| SB6 B3-6 00990 M00S00892.crmtask +++| NE B6,FCD11 IF NOT FIRST WORD OF DISPLAY LINE 00991 M00S00893.crmtask +++| SA4 A6+B1 00992 M00S00894.crmtask +++| BX6 X0*X4 RETAIN *DSD* CO-ORDINATES 00993 M00S00895.crmtask +++| BX3 -X0*X2 00994 M00S00896.crmtask +++| BX6 X6+X3 00995 M00S00897.crmtask +++| SA6 A4+ 00996 M00S00898.crmtask +++| EQ FCD12 CONTINUE WITH THE NEXT WORD 00997 M00S00899.crmtask +++| 00998 M00S00900.crmtask +++| FCD11 BX6 X2 00999 M00S00901.crmtask +++| SA6 A6+1 01000 M00S00902.crmtask +++| FCD12 SB3 B3-B1 01001 M00S00903.crmtask +++| NE B3,FCD10 IF MORE WORDS IN LINE 01002 M00S00904.crmtask +++| SB4 B4-B1 DECREMENT LINE COUNT 01003 M00S00905.crmtask +++| SB3 6 WORDS PER DISPLAY LINE 01004 M00S00906.crmtask +++| EQ FCD10 BLANK NEXT WORD 01005 M00S00907.crmtask +++| 01006 M00S00908.crmtask +++|* TABLE OF DATA BASE STATUSES. 01007 M00S00909.crmtask +++| 01008 M00S00910.crmtask +++| FCDA BSS 0 01009 M00S00911.crmtask +++| LOC 0
| Line S00912 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01010 M01S00912.241l630 ---| DATA 10H UP 01011 M01S00913.241l630 ---| DATA 10H IDLE 01012 M01S00914.241l630 ---| DATA 10H DOWN 01013 M01S00915.241l630 ---| DATA 10H OP-DOWN
| Line S00071 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01014 M01S00071.241l630 +++| DATA 10H UP 01015 M01S00072.241l630 +++| DATA 10H IDLE 01016 M01S00073.241l630 +++| DATA 10H DOWN 01017 M01S00074.241l630 +++| DATA 10H OP-DOWN 01018 M00S00916.crmtask +++| LOC *O 01019 M00S00917.crmtask +++| FDD SPACE 4,30
| Line S00918 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01020 M01S00918.241l630 ---|** FDD - FORMAT DATA BASE DISPLAY
| Line S00075 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01021 M01S00075.241l630 +++|** FDD - FORMAT DATA BASE DISPLAY. 01022 M00S00919.crmtask +++|* 01023 M00S00920.crmtask +++|* FDD EXTRACTS RAW DATA FROM THE *TDRF*, *TARF*, *TQRF* TABLES 01024 M00S00921.crmtask +++|* AND FORMATS A DATA BASE STATUS DISPLAY SUITABLE FOR THE 01025 M00S00922.crmtask +++|* OPERATOR CONSOLE OR USER TERMINAL. IF THE DISPLAY IS TO 01026 M00S00923.crmtask +++|* BE SENT TO A TERMINAL, DISPLAY LINES MAY ROLL OFF 01027 M00S00924.crmtask +++|* THE TOP OF THE SCREEN. DUE TO THE LARGE NUMBER OF 01028 M00S00925.crmtask +++|* TERMINAL TYPES, NO ATTEMPT IS MADE TO PREVENT THIS. 01029 M00S00926.crmtask +++|* 01030 M00S00927.crmtask +++|* ENTRY BADR = FWA OF TABLES. 01031 M00S00928.crmtask +++|*
| Line S00929 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01032 M01S00929.241l630 ---|* REENTRY AT *FDD9*.
| Line S00076 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01033 M01S00076.241l630 +++|* RE-ENTRY AT *FDD4*, *FDD14*, AND *FDD15*. 01034 M00S00930.crmtask +++|* (A5) = FWA OF NEXT *TLNT*. 01035 M00S00931.crmtask +++|* (X5) = FIRST WORD OF *TLNT*. 01036 M00S00932.crmtask +++|* 01037 M00S00933.crmtask +++|* EXIT TO *TPA* IF TAF ORIGIN. 01038 M00S00934.crmtask +++|* (X1) = ADDRESS OF K-DISPLAY CONTROL WORD. 01039 M00S00935.crmtask +++|* TO *TPB* IF TERMINAL ORIGIN. 01040 M00S00936.crmtask +++|* (X1) = FWA OF SEND BUFFER. 01041 M00S00937.crmtask +++|* (X5) = NUMBER OF WORDS TO SEND. 01042 M00S00938.crmtask +++|* 01043 M00S00939.crmtask +++|* USES X - ALL.
| Line S00940 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01044 M01S00940.241l630 ---|* A - 1, 2, 3, 5, 6, 7. 01045 M01S00941.241l630 ---|* B - 3, 4, 5, 6.
| Line S00077 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01046 M01S00077.241l630 +++|* A - ALL. 01047 M01S00078.241l630 +++|* B - ALL. 01048 M00S00942.crmtask +++|* 01049 M00S00943.crmtask +++|* CALLS CDD, SFN. 01050 M00S00944.crmtask +++|* 01051 M00S00945.crmtask +++|* MACROS MOVE. 01052 M00S00946.crmtask +++| 01053 M00S00947.crmtask +++| 01054 M00S00948.crmtask +++| FDD BSS 0 ENTRY 01055 M00S00949.crmtask +++| SX6 FDD 01056 M00S00950.crmtask +++| SA6 FPAG SET PROCESSOR ADDRESS
| Line S00079 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01057 M01S00079.241l630 +++| SA6 PAGE 01058 M00S00951.crmtask +++| SX6 KDB *K-DISPLAY* CONTROL WORD
| Line S00952 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01059 M01S00952.241l630 ---| SX7 KDBF *K-DISPLAY* ERROR LINE
| Line S00080 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01060 M01S00080.241l630 +++| SX7 KDBD *K-DISPLAY* ERROR LINE 01061 M00S00953.crmtask +++| SA6 CWKD 01062 M00S00954.crmtask +++| SA7 EAKD
| Line S00081 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01063 M01S00081.241l630 +++| SX6 KDBE *K-DISPLAY* INPUT LINE 01064 M01S00082.241l630 +++| SA6 IAKD 01065 M01S00083.241l630 +++| SX6 B1+ -C- FORMAT DISPLAY
| Line S00955 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01066 M01S00955.241l630 ---| SX6 B1+ -C- FORMAT DISPLAY 01067 M00S00956.crmtask +++| SA6 DSTP 01068 M00S00957.crmtask +++| SA1 BADR+TDSDW 01069 M00S00958.crmtask +++| SA2 BADR+TDIDW 01070 M00S00959.crmtask +++| MX0 12 01071 M00S00960.crmtask +++| BX4 X0*X2 DATA BASE NAME 01072 M00S00961.crmtask +++| LX4 -12 01073 M00S00962.crmtask +++| LX0 -12
| Line S00963 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01074 M01S00963.241l630 ---| SA3 KDBB+1
| Line S00084 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01075 M01S00084.241l630 +++| SA3 KDBG+2 01076 M00S00964.crmtask +++| BX6 -X0*X3 MASK OUT ANY PREVIOUS NAME 01077 M00S00965.crmtask +++| BX6 X6+X4 MERGE IN CURRENT NAME
| Line S00966 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01078 M01S00966.241l630 ---| SA6 A3 STORE IN DISPLAY BUFFER
| Line S00085 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01079 M01S00085.241l630 +++| SA6 A3 STORE IN DATA BASE STATUS HEADING 01080 M00S00967.crmtask +++| SB6 B0 PRESET STATUS = UP 01081 M00S00968.crmtask +++| NG X1,FDD1 IF FILE DOWN 01082 M00S00969.crmtask +++| LX1 TDSDS-TDSIS 01083 M00S00970.crmtask +++| PL X1,FDD2 IF NOT IDLE
| Line S00971 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01084 M01S00971.241l630 ---| SB6 B1 SET STATUS = IDLE
| Line S00086 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01085 M01S00086.241l630 +++| SB6 B1+ SET STATUS = IDLE 01086 M00S00972.crmtask +++| EQ FDD2 STORE STATUS 01087 M00S00973.crmtask +++| 01088 M00S00974.crmtask +++| FDD1 SA2 BADR+TDODW OPERATOR DOWN INDICATOR 01089 M00S00975.crmtask +++| SB6 B1+B1 01090 M00S00976.crmtask +++| LX2 59-TDODS 01091 M00S00977.crmtask +++| PL X2,FDD2 IF NOT OPERATOR DOWN 01092 M00S00978.crmtask +++| SB6 3 01093 M00S00979.crmtask +++| FDD2 SA3 FDDE+B6 GET STATUS MESSAGE
| Line S00980 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01094 M01S00980.241l630 ---| BX6 X3 01095 M01S00981.241l630 ---| SA6 KDBB+5 STORE IN DISPLAY BUFFER
| Line S00087 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01096 M01S00087.241l630 +++| LX3 6 01097 M01S00088.241l630 +++| SX6 1R=&1R 01098 M01S00089.241l630 +++| LX6 54 01099 M01S00090.241l630 +++| BX6 X6-X3 01100 M01S00091.241l630 +++| SA6 KDBH+2 STORE IN DATA BASE STATUS HEADING 01101 M00S00982.crmtask +++| SA1 BADR+TDRFE+1
| Line S00983 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01102 M01S00983.241l630 ---| NZ X1,FDD3 IF LONG RECOVERY FILE EXISTS
| Line S00092 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01103 M01S00092.241l630 +++| NZ X1,FDD3 IF AFTER IMAGE RECOVERY FILE EXISTS 01104 M00S00984.crmtask +++| SA2 BLNK 01105 M00S00985.crmtask +++| SA1 A1+B1 FWA OF FIRST *TLNT* 01106 M00S00986.crmtask +++| BX6 X2
| Line S00987 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01107 M01S00987.241l630 ---| SA6 KDBC+2 BLANK OUT LONG RECOVERY FILE NAME 01108 M01S00988.241l630 ---| SA6 KDBC+5 AND PRU-S REMAINING
| Line S00093 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01109 M01S00093.241l630 +++| SA6 KDBG+5 BLANK OUT AFTER IMAGE RECOVERY FILE NAME 01110 M01S00094.241l630 +++| SA6 KDBH+5 AND PRU-S REMAINING 01111 M01S00095.241l630 +++| MOVE KDBFW,KDBF,KDBA STORE DATA BASE STATUS HEADING 01112 M00S00989.crmtask +++| SA5 BADR+DST1L+TLFNW FWA OF 1ST *TLNT* FILE NAME
| Line S00990 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01113 M01S00990.241l630 ---| EQ FDD9 FORMAT FILE LIST
| Line S00096 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01114 M01S00096.241l630 +++| EQ FDD13 FORMAT FILE LIST 01115 M00S00991.crmtask +++| 01116 M00S00992.crmtask +++| FDD3 SA1 A1+TAFFW 01117 M00S00993.crmtask +++| MX0 42
| Line S00994 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01118 M01S00994.241l630 ---| BX1 X0*X1 LONG RECOVERY FILE NAME
| Line S00097 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01119 M01S00097.241l630 +++| BX1 X0*X1 AFTER IMAGE RECOVERY FILE NAME 01120 M00S00995.crmtask +++| SA2 FDDD 01121 M00S00996.crmtask +++| BX6 X1+X2 PAD NAME WITH BLANKS 01122 M00S00997.crmtask +++| LX6 -6 01123 M00S00998.crmtask +++| MX0 TACPN
| Line S00999 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01124 M01S00999.241l630 ---| SA6 KDBC+2 STORE IN DISPLAY BUFFER
| Line S00098 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01125 M01S00098.241l630 +++| SA6 KDBG+5 STORE IN DATA BASE STATUS HEADING 01126 M00S01000.crmtask +++| SA1 BADR+TDRFE+1+TACPW 01127 M00S01001.crmtask +++| LX1 59-TACPS 01128 M00S01002.crmtask +++| BX1 X0*X1 01129 M00S01003.crmtask +++| LX1 TACPN 01130 M00S01004.crmtask +++| RJ CDD CONVERT UNUSED PRU COUNT 01131 M00S01005.crmtask +++| BX6 X4
| Line S00099 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01132 M01S00099.241l630 +++| LX6 -6 01133 M00S01006.crmtask +++| MX0 TQFFN
| Line S01007 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01134 M01S01007.241l630 ---| SA6 KDBC+5 STORE IN DISPLAY BUFFER
| Line S00100 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01135 M01S00100.241l630 +++| SA6 KDBH+5 STORE IN DATA BASE STATUS HEADING 01136 M01S00101.241l630 +++| MOVE KDBFW,KDBF,KDBA STORE DATA BASE STATUS HEADING 01137 M01S00102.241l630 +++| MOVE KDBIW,KDBI,KDBB STORE BEFORE IMAGE FILE HEADER
| Line S01008 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01138 M01S01008.241l630 ---| SA1 A1+TARFE-TACPW+1
| Line S00103 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01139 M01S00103.241l630 +++| SA5 A1+TARFE-TACPW+1
| Line S01009 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01140 M01S01009.241l630 ---| SB3 6 NUMBER OF FILES PER DISPLAY LINE
| Line S01010 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
M02 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01141 M02S01010.241l630 ---| SB4 19 NUMBER OF DISPLAY LINES
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01142 M02S00022.241l630 ---| SB4 KFNL-3 NUMBER OF DISPLAY LINES
| Line S01011 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01143 M01S01011.241l630 ---| SX6 1R
| Line S00104 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01144 M01S00104.241l630 +++| SB4 KFNL-KDBFL-KDBIL NUMBER OF DISPLAY LINES 01145 M01S00105.241l630 +++| SX6 1R
| Line S01012 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01146 M01S01012.241l630 ---| LX6 54
| Line S00106 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01147 M01S00106.241l630 +++| LX6 59-5
| Line S01013 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01148 M01S01013.241l630 ---| SA6 KDBD
| Line S00107 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01149 M01S00107.241l630 +++| SA6 KDBB+KDBIW-1 01150 M01S00108.241l630 +++| EQ FDD5 DISPLAY *BRF-S* 01151 M01S00109.241l630 +++| 01152 M01S00110.241l630 +++|* RE-ENTRY POINT. 01153 M01S00111.241l630 +++|* 01154 M01S00112.241l630 +++|* ENTRY (A5) = ADDRESS OF THE NEXT *TLNT* TO DISPLAY. 01155 M01S00113.241l630 +++|* (X5) = FIRST WORD OF THE NEXT *TLNT* TO DISPLAY. 01156 M01S00114.241l630 +++| 01157 M01S00115.241l630 +++| FDD4 MOVE KDBKW,KDBK,KDBA STORE FILE AND STATUS SUB-HEADING 01158 M01S00116.241l630 +++| SX6 1R 01159 M01S00117.241l630 +++| LX6 59-5 01160 M01S00118.241l630 +++| SA6 KDBA+KDBKW-1 01161 M01S00119.241l630 +++| SB4 KFNL-KDBKL NUMBER OF DISPLAY LINES
| Line S01014 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01162 M01S01014.241l630 ---| FDD4 SA1 A1+TQSTW *QRF* STATUS WORD 01163 M01S01015.241l630 ---| SA2 A1+TQFFW-TQSTW *QRF* FILE NAME
| Line S00120 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01164 M01S00120.241l630 +++| FDD5 SB3 6 NUMBER OF WORDS PER DISPLAY LINE 01165 M01S00121.241l630 +++| FDD6 SA5 A5+TQSTW *BRF* STATUS WORD 01166 M01S00122.241l630 +++| SA2 A5+TQFFW-TQSTW *BRF* FILE NAME 01167 M01S00123.241l630 +++| MX0 TQFFN
| Line S01016 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01168 M01S01016.241l630 ---| BX2 X0*X2
| Line S00124 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01169 M01S00124.241l630 +++| BX1 X0*X2 01170 M01S00125.241l630 +++| RJ SFN 01171 M01S00126.241l630 +++| LX6 41-59 01172 M01S00127.241l630 +++| SA6 A6+B1 STORE *BRF* FILE NAME 01173 M00S01017.crmtask +++| SA3 FDDA STATUS = UP
| Line S01018 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01174 M01S01018.241l630 ---| PL X1,FDD5 IF *QRF* UP
| Line S00128 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01175 M01S00128.241l630 +++| PL X5,FDD7 IF *BRF* UP 01176 M00S01019.crmtask +++| SA3 FDDB STATUS = DOWN
| Line S01020 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01177 M01S01020.241l630 ---| FDD5 BX6 X2+X3 01178 M01S01021.241l630 ---| SA6 A6+B1 STORE IN DISPLAY
| Line S00129 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01179 M01S00129.241l630 +++| FDD7 BX6 X3 01180 M01S00130.241l630 +++| SA6 A6+B1 STORE STATUS
| Line S01022 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01181 M01S01022.241l630 ---| SB3 B3-1 DECREMENT COUNT
| Line S00131 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01182 M01S00131.241l630 +++| SB3 B3-2 DECREMENT COUNT
| Line S01023 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01183 M01S01023.241l630 ---| SA1 A1+TQRFE-TQSTW NEXT *QRF* 01184 M01S01024.241l630 ---| ZR X1,FDD6 IF NO MORE *QRF-S* 01185 M01S01025.241l630 ---| NE B3,FDD4 IF MORE *QRF-S* THIS DISPLAY LINE
| Line S00132 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01186 M01S00132.241l630 +++| SA5 A5+TQRFE-TQSTW NEXT *BRF* 01187 M01S00133.241l630 +++| ZR X5,FDD8 IF NO MORE *BRF-S* 01188 M01S00134.241l630 +++| NE B3,FDD6 IF MORE *BRF-S* THIS DISPLAY LINE
| Line S01026 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01189 M01S01026.241l630 ---| SB3 6 RE-INITIALIZE COUNT 01190 M00S01027.crmtask +++| SB4 B4-1 DECREMENT THE LINE COUNT
| Line S00135 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01191 M01S00135.241l630 +++| SX6 1R 01192 M01S00136.241l630 +++| LX6 59-5 01193 M01S00137.241l630 +++| SA6 A6+B1 SKIP OVER END OF LINE
| Line S01028 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01194 M01S01028.241l630 ---| EQ FDD4 DISPLAY NEXT *QRF*
| Line S00138 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01195 M01S00138.241l630 +++| NE B4,FDD5 IF DISPLAY NOT FULL 01196 M01S00139.241l630 +++| SX6 FDD4 RE-ENTRY ADDRESS 01197 M01S00140.241l630 +++| EQ FDD20 PROCESS NEXT PAGE 01198 M01S00141.241l630 +++| 01199 M01S00142.241l630 +++|* DISPLAY *AFTER IMAGE RECOVERY FILES*. 01200 M01S00143.241l630 +++|
| Line S01029 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01201 M01S01029.241l630 ---| 01202 M01S01030.241l630 ---| FDD6 SB4 B4-1 DECREMENT DISPLAY LINE COUNT
| Line S00144 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01203 M01S00144.241l630 +++| FDD8 SB4 B4-B1 DECREMENT DISPLAY LINE COUNT 01204 M00S01031.crmtask +++| SA2 BLNK 01205 M00S01032.crmtask +++| BX6 X2
| Line S01033 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01206 M01S01033.241l630 ---| ZR B3,FDD8 IF DISPLAY LINE FULL 01207 M01S01034.241l630 ---| FDD7 SA6 A6+B1 BLANK OUT REST OF LINE 01208 M01S01035.241l630 ---| SB3 B3-B1
| Line S00145 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01209 M01S00145.241l630 +++| ZR B3,FDD10 IF DISPLAY LINE FULL 01210 M01S00146.241l630 +++| FDD9 SA6 A6+1 BLANK OUT REST OF LINE 01211 M01S00147.241l630 +++| SA6 A6+1 01212 M01S00148.241l630 +++| SB3 B3-2
| Line S01036 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01213 M01S01036.241l630 ---| NE B3,FDD7 IF MORE TO BLANK
| Line S00149 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01214 M01S00149.241l630 +++| NE B3,FDD9 IF MORE TO BLANK 01215 M01S00150.241l630 +++| FDD10 SB5 6 01216 M01S00151.241l630 +++| LT B4,B5,FDD11 IF NOT ENOUGH ROOM ON CURRENT PAGE 01217 M01S00152.241l630 +++| SX5 A6+2 SKIP OVER END OF LINE 01218 M01S00153.241l630 +++| MOVE KDBJW,KDBJ,X5 MOVE FILE HEADING TO DISPLAY 01219 M01S00154.241l630 +++| SB4 B4-KDBJL DECREMENT LINE COUNT 01220 M01S00155.241l630 +++| SB5 X5+KDBJW FWA TO STORE FILE NAMES 01221 M01S00156.241l630 +++| SA5 BADR+DST1L+TLFNW FWA OF FIRST *TLNT* FILE NAME
| Line S01037 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01222 M01S01037.241l630 ---| FDD8 SX5 A6+1 01223 M01S01038.241l630 ---| MOVE KDBHL,KDBH,X5 MOVE FILE HEADING TO DISPLAY 01224 M01S01039.241l630 ---| SB5 X5+KDBHL FWA TO STORE FILE NAMES 01225 M01S01040.241l630 ---| SA5 BADR+DST1L+TLFNW FWA OF 1ST *TLNT* FILE NAME 01226 M01S01041.241l630 ---| EQ FDD10 FORMAT FILE LIST
| Line S00157 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01227 M01S00157.241l630 +++| EQ FDD16 FORMAT FILE LIST 01228 M00S01042.crmtask +++|
| Line S01043 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01229 M01S01043.241l630 ---|* REENTRY POINT.
| Line S00158 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01230 M01S00158.241l630 +++| FDD11 ZR B4,FDD12 IF ALL LINES PROCESSED 01231 M01S00159.241l630 +++| SX6 1R 01232 M01S00160.241l630 +++| LX6 59-5 01233 M01S00161.241l630 +++| SA6 A6+B1 END OF LINE 01234 M01S00162.241l630 +++| SB3 6 RE-INITIALIZE COUNT 01235 M01S00163.241l630 +++| EQ FDD8 BLANK OUT NEXT LINE 01236 M01S00164.241l630 +++| 01237 M01S00165.241l630 +++| FDD12 SX6 FDD15 RE-ENTRY ADDRESS 01238 M01S00166.241l630 +++| SA5 BADR+DST1L+TLFNW FWA OF FIRST *TLNT* FILE NAME 01239 M01S00167.241l630 +++| EQ FDD20 PROCESS NEXT PAGE 01240 M01S00168.241l630 +++| 01241 M01S00169.241l630 +++| FDD13 MOVE KDBJW,KDBJ,KDBB STORE DATA BASE FILE HEADER 01242 M01S00170.241l630 +++| SB5 KDBB+KDBJW FWA TO STORE FILE NAMES 01243 M01S00171.241l630 +++| SB4 KFNL-KDBFL-KDBJL NUMBER OF DISPLAY LINES 01244 M01S00172.241l630 +++| EQ FDD16 DISPLAY DATA BASE FILES 01245 M01S00173.241l630 +++| 01246 M01S00174.241l630 +++|* RE-ENTRY POINTS. 01247 M00S01044.crmtask +++|* 01248 M00S01045.crmtask +++|* ENTRY (A5) = ADDRESS OF THE NEXT *TLNT* TO DISPLAY. 01249 M00S01046.crmtask +++|* (X5) = FIRST WORD OF THE NEXT *TLNT* TO DISPLAY.
| Line S00175 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01250 M01S00175.241l630 +++| 01251 M01S00176.241l630 +++| FDD14 MOVE KDBKW,KDBK,KDBA STORE FILE AND STATUS SUB-HEADING 01252 M01S00177.241l630 +++| SB5 KDBA+KDBKW FWA TO STORE FILE NAMES 01253 M01S00178.241l630 +++| SB4 KFNL-KDBKL NUMBER OF DISPLAY LINES 01254 M01S00179.241l630 +++| EQ FDD16 DISPLAY DATA BASE FILES
| Line S01047 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01255 M01S01047.241l630 ---| 01256 M01S01048.241l630 ---| FDD9 MOVE KDBHL,KDBH,KDBD 01257 M01S01049.241l630 ---| SB5 KDBD+KDBHL
| Line S01050 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
M02 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01258 M02S01050.241l630 ---| SB4 16 NUMBER OF DISPLAY LINES
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01259 M02S00023.241l630 ---| SB4 KFNL-6 NUMBER OF DISPLAY LINES
| Line S00180 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01260 M01S00180.241l630 +++| 01261 M01S00181.241l630 +++| FDD15 MOVE KDBJW,KDBJ,KDBA STORE DATA BASE FILE HEADER 01262 M01S00182.241l630 +++| SB5 KDBA+KDBJW FWA TO STORE FILE NAMES 01263 M01S00183.241l630 +++| SB4 KFNL-KDBJL NUMBER OF DISPLAY LINES
| Line S01051 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01264 M01S01051.241l630 ---| FDD10 MX0 TLFNN
| Line S00184 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01265 M01S00184.241l630 +++| FDD16 MX0 TLFNN 01266 M00S01052.crmtask +++| SB3 6 WORDS PER DISPLAY LINE
| Line S01053 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01267 M01S01053.241l630 ---| FDD11 BX1 X0*X5
| Line S00185 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01268 M01S00185.241l630 +++| FDD17 BX1 X0*X5 01269 M00S01054.crmtask +++| RJ SFN
| Line S01055 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01270 M01S01055.241l630 ---| LX6 -12
| Line S00186 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01271 M01S00186.241l630 +++| LX6 41-59 01272 M00S01056.crmtask +++| SA2 A5+TLFDW-TLFNW STATUS WORD 01273 M00S01057.crmtask +++| LX2 59-TLFDS 01274 M00S01058.crmtask +++| SB6 B0+ STATUS = UP
| Line S01059 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01275 M01S01059.241l630 ---| NG X2,FDD12 IF FILE DOWN
| Line S00187 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01276 M01S00187.241l630 +++| NG X2,FDD18 IF FILE DOWN 01277 M00S01060.crmtask +++| LX2 TLFDS-TLFIS
| Line S01061 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01278 M01S01061.241l630 ---| PL X2,FDD13 IF FILE NOT IDLE
| Line S00188 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01279 M01S00188.241l630 +++| PL X2,FDD19 IF FILE NOT IDLE 01280 M00S01062.crmtask +++| SB6 B1 STATUS = IDLE
| Line S01063 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01281 M01S01063.241l630 ---| EQ FDD13 GET STATUS
| Line S00189 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01282 M01S00189.241l630 +++| EQ FDD19 GET STATUS 01283 M00S01064.crmtask +++|
| Line S01065 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01284 M01S01065.241l630 ---| FDD12 LX2 TLFDS-TLFES
| Line S00190 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01285 M01S00190.241l630 +++| FDD18 LX2 TLFDS-TLFES 01286 M00S01066.crmtask +++| SB6 2 STATUS = DOWN
| Line S01067 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01287 M01S01067.241l630 ---| PL X2,FDD13 IF NOT DUE TO *CRM* ERROR
| Line S00191 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01288 M01S00191.241l630 +++| PL X2,FDD19 IF NOT DUE TO *CRM* ERROR 01289 M00S01068.crmtask +++| SB6 B6+2 STATUS=*CRM* ERROR
| Line S01069 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01290 M01S01069.241l630 ---| FDD13 SA3 FDDE+B6 GET STATUS
| Line S00192 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01291 M01S00192.241l630 +++| FDD19 SA3 FDDE+B6 GET STATUS 01292 M00S01070.crmtask +++| BX7 X3 01293 M00S01071.crmtask +++| SA6 B5 STORE FILE NAME
| Line S01072 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01294 M01S01072.241l630 ---| LX7 -6 01295 M01S01073.241l630 ---| SA7 A6+B1
| Line S00193 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01296 M01S00193.241l630 +++| SA7 A6+1 01297 M00S01074.crmtask +++| SB3 B3-2 01298 M00S01075.crmtask +++| SB5 B5+2 ADDRESS FOR NEXT FILE NAME 01299 M00S01076.crmtask +++| SA5 A5+TLNTE-TLFNW NEXT *TLNT*
| Line S01077 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01300 M01S01077.241l630 ---| ZR X5,FDD14 IF END 01301 M01S01078.241l630 ---| NE B3,FDD11 IF MORE FILES THIS DISPLAY LINE
| Line S00194 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01302 M01S00194.241l630 +++| ZR X5,FDD21 IF END 01303 M01S00195.241l630 +++| NE B3,FDD17 IF MORE FILES THIS DISPLAY LINE 01304 M00S01079.crmtask +++| SB3 6 01305 M00S01080.crmtask +++| SB4 B4-B1 DECREMENT LINE COUNT 01306 M00S01081.crmtask +++| SB5 B5+B1 ADDRESS OF NEXT DISPLAY LINE
| Line S01082 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01307 M01S01082.241l630 ---| NE B4,FDD11 IF DISPLAY NOT FULL
| Line S00196 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01308 M01S00196.241l630 +++| NE B4,FDD17 IF DISPLAY NOT FULL 01309 M01S00197.241l630 +++| SX6 FDD14 RE-ENTRY ADDRESS 01310 M01S00198.241l630 +++| 01311 M01S00199.241l630 +++|* PROCESS NEXT PAGE. 01312 M01S00200.241l630 +++| 01313 M01S00201.241l630 +++| FDD20 SA6 PAGE 01314 M00S01083.crmtask +++| SA2 MORE 01315 M00S01084.crmtask +++| BX6 X2 01316 M00S01085.crmtask +++| SX7 A5 01317 M00S01086.crmtask +++| SX1 KDB *K-DISPLAY* CONTROL WORD
| Line S01087 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01318 M01S01087.241l630 ---| SA6 KDBE INDICATE MORE FILES 01319 M01S01088.241l630 ---| SX6 FDD9 RE-ENTRY ADDRESS
| Line S00202 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01320 M01S00202.241l630 +++| SA6 KDBC+1 INDICATE MORE FILES
| Line S01089 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01321 M01S01089.241l630 ---| SA6 PAGE
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/crmtask.txt · Last modified: by 127.0.0.1