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
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
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.
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
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
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
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
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
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
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 ---|*
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
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
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
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
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
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
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
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
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
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
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
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.
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
01322 M00S01090.crmtask ---| SA7 NPAG NEXT ADDRESS IN THE BUFFER
01323 M00S01091.crmtask ---| SA2 ORIG
01324 M00S01092.crmtask ---| ZR X2,TPA IF *TAF* ORIGIN
01325 M01S01093.241l630 ---| SX1 KDBA FWA OF SEND BUFFER
01326 M01S01094.241l630 ---| SX5 KDBE-KDBA+1 WORDS TO SEND TO TERMINAL
| Line S00203 Modification History |
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01327 M01S00203.241l630 +++| SX1 KDBA FWA OF SEND BUFFER
01328 M01S00204.241l630 +++| SX5 KDBC-KDBA+2 WORDS TO SEND TO TERMINAL
01329 M00S01095.crmtask +++| EQ TPB SEND DISPLAY TO TERMINAL
01330 M00S01096.crmtask +++|
01331 M01S00205.241l630 +++|* BLANK OUT UNUSED PART OF LAST PAGE.
01332 M01S00206.241l630 +++|
| Line S01097 Modification History |
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01333 M01S01097.241l630 ---| FDD14 SA2 BLNK BLANK OUT UNUSED PART OF DISPLAY
| Line S00207 Modification History |
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01334 M01S00207.241l630 +++| FDD21 SA2 BLNK BLANK OUT UNUSED PART OF DISPLAY
01335 M00S01098.crmtask +++| BX6 X2
| Line S01099 Modification History |
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01336 M01S01099.241l630 ---| SX7 B0
01337 M01S01100.241l630 ---| SA7 NPAG SET NO FORWARD PAGING
01338 M01S01101.241l630 ---| SX5 B5-KDBA+5 WORDS TO SEND
| Line S00208 Modification History |
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01339 M01S00208.241l630 +++| SX7 FDD
01340 M01S00209.241l630 +++| SA7 PAGE ALLOW FORWARD PAGING TO ROLL BACK
01341 M01S00210.241l630 +++| SB4 B4+1 BLANK OUT *MORE* LINE
01342 M01S00211.241l630 +++| SX5 B5-KDBA+1 WORDS TO SEND
| Line S01102 Modification History |
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01343 M01S01102.241l630 ---| FDD15 NE B3,FDD16 IF NOT END OF DISPLAY LINE
| Line S00212 Modification History |
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01344 M01S00212.241l630 +++| FDD22 NE B3,FDD23 IF NOT END OF DISPLAY LINE
01345 M00S01103.crmtask +++| SB3 6
01346 M00S01104.crmtask +++| SB5 B5+1 SKIP OVER END OF LINE
01347 M00S01105.crmtask +++| SB4 B4-1 DECREMENT THE LINE COUNT
| Line S01106 Modification History |
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01348 M01S01106.241l630 ---| FDD16 LE B4,FDD17 IF ALL LINES PROCESSED
| Line S00213 Modification History |
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01349 M01S00213.241l630 +++| FDD23 LE B4,FDD24 IF ALL LINES PROCESSED
01350 M00S01107.crmtask +++| SA6 B5+
01351 M00S01108.crmtask +++| SB5 B5+B1
01352 M00S01109.crmtask +++| SB3 B3-B1
| Line S01110 Modification History |
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01353 M01S01110.241l630 ---| EQ FDD15 BLANK NEXT WORD
| Line S00214 Modification History |
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01354 M01S00214.241l630 +++| EQ FDD22 BLANK NEXT WORD