Seq # *Modification Id* Act
----------------------------+
00001 M01S00001.o26 +++| IDENT O26,O26
00002 M01S00002.o26 +++| PERIPH
00003 M01S00003.o26 +++| BASE MIXED
00004 M01S00004.o26 +++| SST MDC,RDS
00005 M01S00005.o26 +++|*COMMENT O26 - CONSOLE TEXT EDITOR.
Line S00006 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
00006 M02S00006.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1978.
00007 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
00008 M01S00007.o26 +++| TITLE O26 - CONSOLE TEXT EDITOR.
00009 M01S00008.o26 +++| O26 SPACE 4,10
00010 M01S00009.o26 +++|*** O26 - CONSOLE TEXT EDITOR.
00011 M01S00010.o26 +++|* D. A. CAHLANDER. 70/05/05.
00012 M01S00011.o26 +++|* G. R. MANSFIELD. 70/10/25.
00013 M01S00012.o26 +++|* D. A. CAHLANDER. 71/06/05.
00014 M01S00013.o26 +++|* A. D. FORET. 74/12/05.
00015 M01S00001.241l630 +++|* P. D. HAAS. 84/02/08.
00016 M01S00014.o26 +++| DOC SPACE 4,10
00017 M01S00015.o26 +++|*** O26 PROVIDES THE CAPABILITY TO CREATE AND EDIT A FILE
00018 M01S00016.o26 +++|* FROM THE 6612 CONSOLE. A CM BUFFER IS USED TO STORE AND
00019 M01S00017.o26 +++|* EDIT THE BCD LINES BEFORE WRITING THE FILE. THE CM
00020 M01S00018.o26 +++|* BUFFER SIZE = FL - 140, AND ALL LINES OF A FILE MUST FIT
00021 M01S00019.o26 +++|* IN THE BUFFER.
00022 M01S00020.o26 +++| OPERATOR SPACE 4,10
00023 M01S00021.o26 +++|*** OPERATOR MESSAGES.
00024 M01S00022.o26 +++|*
00025 M01S00023.o26 +++|*
00026 M01S00024.o26 +++|* *REQUEST DISPLAY. (O26)* = O26 IS WAITING FOR THE DISPLAY
00027 M01S00025.o26 +++|* TO BE ASSIGNED.
00028 M01S00026.o26 +++| TITLE DIRECT CELL ALLOCATIONS AND ASSEMBLY CONSTANTS.
00029 M01S00027.o26 +++| DIRECT SPACE 4,20
00030 M01S00028.o26 +++|**** DIRECT LOCATION ASSIGNMENTS.
00031 M01S00029.o26 +++|
00032 M01S00030.o26 +++|
00033 M01S00002.241l630 +++| LL EQU 15 LAST LINE POSITION STATUS
00034 M01S00003.241l630 +++| DA EQU 16 - 17 DISPLAY ADDRESS
00035 M01S00031.o26 +++| AB EQU 20 - 24 ASSEMBLY BUFFER (5 LOCATIONS)
00036 M01S00032.o26 +++| CA EQU 25 CHARACTER ADDRESS
00037 M01S00033.o26 +++| XC EQU 26 X-COORDINATE
00038 M01S00034.o26 +++| YC EQU 27 Y-COORDINATE
00039 M01S00035.o26 +++| KE EQU 30 KEYBOARD ENTRY
00040 M01S00036.o26 +++| KI EQU 31 KEYBOARD INDEX
00041 M01S00037.o26 +++| KM EQU 32 KEYBOARD MESSAGE
Line S00038 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00042 M02S00038.241l630 ---| FR EQU 33 CONSTANT 40
Line S00039 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00043 M02S00039.241l630 ---| CC EQU 34 DISPLAY CYCLE COUNT
00044 M01S00004.241l630 +++| KP EQU 33 KEYBOARD PREVIOUS STATUS
00045 M01S00005.241l630 +++| DR EQU 34 DISPLAY REFRESH STATUS
00046 M01S00040.o26 +++| LC EQU 35 CHARACTER COUNT OF LINE
00047 M01S00041.o26 +++|
00048 M01S00042.o26 +++|* MAINTAIN FOLLOWING ORDER.
00049 M01S00043.o26 +++|
00050 M01S00044.o26 +++| SI EQU 36 SCAN INDEX
00051 M01S00045.o26 +++| UC EQU 37 UPPER CASE FLAG
00052 M01S00046.o26 +++| IP EQU 40 - 41 INSERT POSITION (2 LOCATIONS)
00053 M01S00047.o26 +++| HF EQU 42 HOLD FLAG
00054 M01S00048.o26 +++|
00055 M01S00049.o26 +++| IF EQU 43 INSERT FLAG
00056 M01S00050.o26 +++| DL EQU 44 DISPLAY LENGTH
Line S00051 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00057 M02S00051.241l630 ---| NC EQU 45 NUMBER OF CP-S (FOR *COMDSYS*)
00058 M01S00006.241l630 +++| KD EQU 45 KEYBOARD BUFFER DISPLAY STATUS
00059 M01S00052.o26 +++| SF EQU 46 SCAN FLAG
00060 M01S00053.o26 +++| SC EQU 47 SCAN NUMBER
00061 M01S00054.o26 +++|
00062 M01S00055.o26 +++| IO EQU 57 I/O BUSY FLAG
00063 M01S00056.o26 +++| FT EQU 60 - 61 FIRST ADDRESS OF BUFFER (2 LOCATIONS)
00064 M01S00057.o26 +++| IN EQU 62 - 63 NEXT INPUT ADDRESS (2 LOCATIONS)
00065 M01S00058.o26 +++| OT EQU 64 - 65 NEXT OUTPUT ADDRESS (2 LOCATIONS)
00066 M01S00059.o26 +++| LM EQU 66 - 67 LIMIT ADDRESS OF BUFFER (2 LOCATIONS)
00067 M01S00060.o26 +++|****
00068 M01S00061.o26 +++| ASSEMBLY SPACE 4,10
00069 M01S00062.o26 +++|** ASSEMBLY CONSTANTS.
00070 M01S00063.o26 +++|
00071 M01S00064.o26 +++|
00072 M01S00065.o26 +++| CH EQU CHDS DISPLAY CHANNEL
00073 M01S00066.o26 +++| FET EQU 10 ADDRESS OF FILE FET
00074 M01S00067.o26 +++| FETL EQU 10 FET LENGTH
00075 M01S00068.o26 +++| SBUF EQU FET+FETL ADDRESS OF CM SYNTAX BUFFER
00076 M01S00069.o26 +++| TITLE OVERLAY CONTROL AND MACRO DEFNITIONS.
00077 M01S00070.o26 +++| OVL SPACE 4,20
00078 M01S00071.o26 +++|** OVERLAY CONTROL.
00079 M01S00072.o26 +++|
00080 M01S00073.o26 +++|
00081 M01S00074.o26 +++| NAME MICRO 1,, O26
Line S00075 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
00082 M02S00075.261l700 ---| OVNG MICRO 1,, GH OVERLAY NUMBER GENERATOR
00083 M01S00001.261l700 +++| OVNG MICRO 1,, OP OVERLAY NUMBER GENERATOR
00084 M01S00076.o26 +++| OVNB MICRO 1,1, "OVNG" OVERLAY NAME BIAS MICRO
00085 M01S00077.o26 +++| OVNB EQU 1R"OVNB" OVERLAY NAME BIAS
00086 M01S00078.o26 +++| NOREF .L,.N
00087 M01S00079.o26 +++| .N SET 0 OVERLAY NUMBER
00088 M01S00080.o26 +++| .N MICRO 1,,
00089 M01S00081.o26 +++| .L SET *
00090 M01S00082.o26 +++| COMCMAC SPACE 4,15
00091 M01S00083.o26 +++|* MACRO DEFINITIONS AND INSTRUCTION CONSTANTS.
00092 M01S00084.o26 +++|
00093 M01S00085.o26 +++|
00094 M01S00086.o26 +++|*CALL COMPMAC
00095 M01S00001.v23l617 +++|*CALL COMDMAC
00096 M01S00087.o26 +++| SPACE 4,10
00097 M01S00088.o26 +++|** COMMON DECKS.
00098 M01S00089.o26 +++|
00099 M01S00090.o26 +++|
00100 M01S00091.o26 +++|*CALL COMSCPS
00101 M01S00092.o26 +++|*CALL COMSPIM
00102 M01S00001.o2614 +++|*CALL COMSSRT
00103 M01S00093.o26 +++| COMMAND SPACE 4,20
00104 M01S00094.o26 +++|** COMMAND - GENERATE COMMAND OVERLAY.
00105 M01S00095.o26 +++|*
00106 M01S00096.o26 +++|*
00107 M01S00097.o26 +++|* COMMAND (SUBTITLE)
00108 M01S00098.o26 +++|* ENTRY *SUBTITLE* = COMMAND SUBTITLE.
00109 M01S00099.o26 +++|
00110 M01S00100.o26 +++|
00111 M01S00101.o26 +++| PURGMAC COMMAND
00112 M01S00102.o26 +++| COMMAND MACRO TXT
00113 M01S00103.o26 +++| LOCAL A
00114 M01S00104.o26 +++| QUAL
00115 M01S00105.o26 +++| .M OVLN .N
00116 M01S00106.o26 +++| QUAL O26".M"
00117 M01S00107.o26 +++| TTL O26/9".M" - TXT
00118 M01S00108.o26 +++| TITLE
00119 M01S00109.o26 +++| HERE
00120 M01S00110.o26 +++| QUAL
00121 M01S00111.o26 +++| USE END FORCE LITERALS*/
00122 M01S00112.o26 +++| A EQU *
00123 M01S00113.o26 +++| .N SET .N+1
00124 M01S00114.o26 +++| .N MICRO 1,, ".M"
00125 M01S00115.o26 +++| QUAL O26".N"
00126 M01S00116.o26 +++| IDENT 9".N",OVL TXT
00127 M01S00117.o26 +++| ORG OVL
00128 M01S00118.o26 +++|*COMMENT O26 - TXT
Line S00119 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
00129 M02S00119.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1970.
00130 M01S00002.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
00131 M01S00120.o26 +++| QUAL
Line S00007 Modification History |
M01 (Added by) | 241l630 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
00132 M02S00007.261l700 ---| IFC NE,*".N"*GB*,1
00133 M01S00002.261l700 +++| IFC NE,*".N"*OB*,1
00134 M01S00121.o26 +++| .L MAX A,.L
00135 M01S00122.o26 +++| QUAL *
00136 M01S00123.o26 +++| COMMAND ENDM
Line S00124 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00137 M02S00124.241l630 ---| DISPLA SPACE 4,20
Line S00125 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00138 M02S00125.241l630 ---|** DISPLA - DISPLAY DATA.
Line S00126 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00139 M02S00126.241l630 ---|*
Line S00127 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00140 M02S00127.241l630 ---|*
Line S00128 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00141 M02S00128.241l630 ---|* DISPLA X,Y,(TEXT)
Line S00129 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00142 M02S00129.241l630 ---|* ENTRY *X* = X-COORDINATE.
Line S00130 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00143 M02S00130.241l630 ---|* *Y* = Y-COORDINATE.
Line S00131 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00144 M02S00131.241l630 ---|* *TEXT* = DISPLAY TEXT.
Line S00132 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00145 M02S00132.241l630 ---|* IF COORDINATES ARE NOT PRESENT, DISPLAY TEXT AT CURRENT
Line S00133 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00146 M02S00133.241l630 ---|* POSITION.
Line S00134 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00147 M02S00134.241l630 ---|
Line S00135 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00148 M02S00135.241l630 ---|
Line S00136 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00149 M02S00136.241l630 ---| PURGMAC DISPLA
Line S00137 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00150 M02S00137.241l630 ---| DISPLA MACRO X,Y,T
Line S00138 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00151 M02S00138.241l630 ---| LOCAL I,J,K
Line S00139 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00152 M02S00139.241l630 ---| QUAL
Line S00140 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00153 M02S00140.241l630 ---| K MICRO 1,,/T/
Line S00141 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00154 M02S00141.241l630 ---| .1 MICCNT K
Line S00142 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00155 M02S00142.241l630 ---| I SET .1+1
Line S00143 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00156 M02S00143.241l630 ---| I SET I/2
Line S00144 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00157 M02S00144.241l630 ---| LDN K
Line S00145 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00158 M02S00145.241l630 ---| OAM J,CH
Line S00146 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00159 M02S00146.241l630 ---| QUAL *
Line S00147 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00160 M02S00147.241l630 ---| DIS RMT
Line S00148 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00161 M02S00148.241l630 ---| QUAL
Line S00149 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00162 M02S00149.241l630 ---| J BSS 0
Line S00150 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00163 M02S00150.241l630 ---| IFNE X,,2
Line S00151 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00164 M02S00151.241l630 ---| CON X
Line S00152 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00165 M02S00152.241l630 ---| I SET I+1
Line S00153 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00166 M02S00153.241l630 ---| IFNE Y,,2
Line S00154 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00167 M02S00154.241l630 ---| CON Y
Line S00155 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00168 M02S00155.241l630 ---| I SET I+1
Line S00156 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00169 M02S00156.241l630 ---| DATA H/"K"/
Line S00157 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00170 M02S00157.241l630 ---| K EQU I
Line S00158 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00171 M02S00158.241l630 ---| QUAL *
Line S00159 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00172 M02S00159.241l630 ---| DIS RMT
Line S00160 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00173 M02S00160.241l630 ---| DISPLA ENDM
00174 M01S00008.241l630 +++| DKP SPACE 4,10
00175 M01S00009.241l630 +++|** DKP - DISPLAY KEYBOARD POINTER.
00176 M01S00010.241l630 +++|*
00177 M01S00011.241l630 +++|* ENTRY (XC) = X-COORDINATE.
00178 M01S00012.241l630 +++|* (YC) = Y-COORDINATE.
00179 M01S00013.241l630 +++|* (T2) = ADDRESS OF NEXT CHARACTER.
00180 M01S00014.241l630 +++|*
00181 M01S00015.241l630 +++|* MACROS CFNC.
00182 M01S00016.241l630 +++|
00183 M01S00017.241l630 +++|
00184 M01S00018.241l630 +++| PURGMAC DKPM545,DKPM721
00185 M01S00019.241l630 +++|
00186 M01S00020.241l630 +++| DKPM545 MACRO *** CC545 CODE ***
00187 M01S00021.241l630 +++| LDD UC
00188 M01S00022.241l630 +++| ZJN DKP1
00189 M01S00023.241l630 +++| LCN 4
00190 M01S00024.241l630 +++| DKP1 SBN YINC
00191 M01S00025.241l630 +++| ADD YC
00192 M01S00026.241l630 +++| OAN CH+40
00193 M01S00027.241l630 +++| LDN 1RA
00194 M01S00028.241l630 +++| OAN CH+40
00195 M01S00029.241l630 +++| LDD XC
00196 M01S00030.241l630 +++| OAN CH+40
00197 M01S00031.241l630 +++| LDN 1RI
00198 M01S00032.241l630 +++| OAN CH+40
00199 M01S00033.241l630 +++| UJN DKPX
00200 M01S00034.241l630 +++| DKPM545 ENDM
00201 M01S00035.241l630 +++|
00202 M01S00036.241l630 +++|
00203 M01S00037.241l630 +++| DKPM721 MACRO *** CDC721 CODE ***
00204 M01S00038.241l630 +++| CFNC BIVF
00205 M01S00039.241l630 +++| CFNC DSCF
00206 M01S00040.241l630 +++| LDI T2
00207 M01S00041.241l630 +++| LPN 77
00208 M01S00042.241l630 +++| OAN CH+40
00209 M01S00043.241l630 +++| CFNC EIVF
00210 M01S00044.241l630 +++| UJN DKPX
00211 M01S00045.241l630 +++| DKPM721 ENDM
00212 M01S00046.241l630 +++| EDW SPACE 4,10
00213 M01S00047.241l630 +++|** EDW - EDIT AND DISPLAY WORD.
00214 M01S00048.241l630 +++|*
00215 M01S00049.241l630 +++|* ENTRY (CM - CM+4) = WORD TO BE PROCESSED.
00216 M01S00050.241l630 +++|*
00217 M01S00051.241l630 +++|* USES T1.
00218 M01S00052.241l630 +++|*
00219 M01S00053.241l630 +++|* MACROS CFNC.
00220 M01S00054.241l630 +++|
00221 M01S00055.241l630 +++|
00222 M01S00056.241l630 +++| PURGMAC EDWM545,EDWM721
00223 M01S00057.241l630 +++|
00224 M01S00058.241l630 +++| EDWM545 MACRO *** CC545 CODE ***
00225 M01S00059.241l630 +++| LDD CM
00226 M01S00060.241l630 +++| SBD XC
00227 M01S00061.241l630 +++| MJN EDW1
00228 M01S00062.241l630 +++| LPN 77
00229 M01S00063.241l630 +++| STD CM
00230 M01S00064.241l630 +++| EDW1 LDD CM+1
00231 M01S00065.241l630 +++| SBD XC
00232 M01S00066.241l630 +++| MJN EDW2
00233 M01S00067.241l630 +++| LPN 77
00234 M01S00068.241l630 +++| STD CM+1
00235 M01S00069.241l630 +++| EDW2 LDD CM+2
00236 M01S00070.241l630 +++| SBD XC
00237 M01S00071.241l630 +++| MJN EDW3
00238 M01S00072.241l630 +++| LPN 77
00239 M01S00073.241l630 +++| STD CM+2
00240 M01S00074.241l630 +++| EDW3 LDD CM+3
00241 M01S00075.241l630 +++| SBD XC
00242 M01S00076.241l630 +++| MJN EDW4
00243 M01S00077.241l630 +++| LPN 77
00244 M01S00078.241l630 +++| STD CM+3
00245 M01S00079.241l630 +++| EDW4 LDD CM+4
00246 M01S00080.241l630 +++| SBD XC
00247 M01S00081.241l630 +++| MJN EDW6
00248 M01S00082.241l630 +++| LPN 77
00249 M01S00083.241l630 +++| NJN EDW5
00250 M01S00084.241l630 +++| LDN 1R
00251 M01S00085.241l630 +++| EDW5 STD CM+4
00252 M01S00086.241l630 +++| EDW6 LDN 5
00253 M01S00087.241l630 +++| OAM CM,CH
00254 M01S00088.241l630 +++| UJP EDWX
00255 M01S00089.241l630 +++| EDWM545 ENDM
00256 M01S00090.241l630 +++|
00257 M01S00091.241l630 +++|
00258 M01S00092.241l630 +++| EDWM721 MACRO *** CDC721 CODE ***
00259 M01S00093.241l630 +++| LDN CM
00260 M01S00094.241l630 +++| STD T1
00261 M01S00095.241l630 +++| EDW10 LDI T1
00262 M01S00096.241l630 +++| SBD XC
00263 M01S00097.241l630 +++| MJN EDW11
00264 M01S00098.241l630 +++| LPN 77
00265 M01S00099.241l630 +++| LMC 2L
00266 M01S00100.241l630 +++| STI T1
00267 M01S00101.241l630 +++| EDW11 AOD T1
00268 M01S00102.241l630 +++| LMN CM+5
00269 M01S00103.241l630 +++| NJN EDW10
00270 M01S00104.241l630 +++| EDW12 SOD T1
00271 M01S00105.241l630 +++| LMN CM-1
00272 M01S00106.241l630 +++| ZJN EDW13
00273 M01S00107.241l630 +++| LDI T1
00274 M01S00108.241l630 +++| ZJN EDW12
00275 M01S00109.241l630 +++| LDD T1
00276 M01S00110.241l630 +++| SBN CM-1
00277 M01S00111.241l630 +++| OAM CM,CH
00278 M01S00112.241l630 +++| LDD CM+4
00279 M01S00113.241l630 +++| NJN EDWX
00280 M01S00114.241l630 +++| EDW13 CFNC EELF
00281 M01S00115.241l630 +++| UJP EDWX
00282 M01S00116.241l630 +++| EDWM721 ENDM
00283 M01S00161.o26 +++| ENTER SPACE 4,15
00284 M01S00162.o26 +++|** ENTER - ENTER SPECIAL SYNTAX.
00285 M01S00163.o26 +++|*
00286 M01S00164.o26 +++|*
00287 M01S00165.o26 +++|*ADDR ENTER (SYNTAX)
00288 M01S00166.o26 +++|* ENTRY *ADDR* = OVERLAY ENTRY ADDRESS.
00289 M01S00167.o26 +++|* *SYNTAX* = SYNTAX OF COMMAND.
00290 M01S00168.o26 +++|
00291 M01S00169.o26 +++|
00292 M01S00170.o26 +++| PURGMAC ENTER
00293 M01S00171.o26 +++| MACRO ENTER,ADDR,SYNTAX
00294 M01S00172.o26 +++| LOCAL A
00295 M01S00173.o26 +++| A SET *
00296 M01S00174.o26 +++| CON ADDR/10000+100*OVNB,ADDR-ADDR/10000*10000
00297 M01S00175.o26 +++| ORG *O-2
00298 M01S00176.o26 +++| ENTER MICRO 1,, SYNTAX
00299 M01S00177.o26 +++| ESS MICCNT ENTER
00300 M01S00178.o26 +++| ESS DECMIC ESS
00301 M01S00179.o26 +++| LOC A
00302 M01S00180.o26 +++| VFD 42/"ESS"L_SYNTAX,18/ADDR
00303 M01S00181.o26 +++| LOC A+1
00304 M01S00182.o26 +++| ENTER ENDM
00305 M01S00183.o26 +++| ENTRY SPACE 4,15
00306 M01S00184.o26 +++|** ENTRY - DEFINE OVERLAY ENTRY POINT.
00307 M01S00185.o26 +++|*
00308 M01S00186.o26 +++|*
00309 M01S00187.o26 +++|*NAME ENTRY ADDR
00310 M01S00188.o26 +++|* ENTRY *NAME* = ENTRY POINT NAME.
00311 M01S00189.o26 +++|* *ADDR* = ADDRESS OF ENTRY POINT.
00312 M01S00190.o26 +++|* IF *ADDR* IS NOT PRESENT, ADDRESS OF ENTRY
00313 M01S00191.o26 +++|* POINT IS THE CURRENT VALUE OF THE ORIGIN COUNTER.
00314 M01S00192.o26 +++|
00315 M01S00193.o26 +++|
00316 M01S00194.o26 +++| PURGMAC ENTRY
00317 M01S00195.o26 +++| MACRO ENTRY,NAME,ADDR
00318 M01S00196.o26 +++| IFC NE,*ADDR**
00319 M01S00197.o26 +++| RMT
00320 M01S00198.o26 +++| QUAL
00321 M01S00199.o26 +++| NAME EQU .N*10000B+/O26".N"/ADDR
00322 M01S00200.o26 +++| QUAL *
00323 M01S00201.o26 +++| RMT
00324 M01S00202.o26 +++| ELSE 4
00325 M01S00203.o26 +++| NAME BSS 0
00326 M01S00204.o26 +++| QUAL
00327 M01S00205.o26 +++| NAME EQU .N*10000B+/O26".N"/NAME
00328 M01S00206.o26 +++| QUAL *
00329 M01S00207.o26 +++| ENTRY ENDM
00330 M01S00208.o26 +++| JMP SPACE 4,10
00331 M01S00209.o26 +++|** JMP - THREADED JUMP.
00332 M01S00210.o26 +++|*
00333 M01S00211.o26 +++|*
00334 M01S00212.o26 +++|* JMP ADDR
00335 M01S00213.o26 +++|* ENTRY *ADDR* = JUMP ADDRESS.
00336 M01S00214.o26 +++|
00337 M01S00215.o26 +++|
00338 M01S00216.o26 +++| PURGMAC JMP
00339 M01S00217.o26 +++| JMP MACRO ADDR
00340 M01S00218.o26 +++| IF -DEF,.ADDR,2
00341 M01S00219.o26 +++| NOREF .ADDR
00342 M01S00220.o26 +++| .ADDR MAX ADDR,*-40
00343 M01S00221.o26 +++| IFGT .ADDR,*-40
00344 M01S00222.o26 +++| UJN .ADDR
00345 M01S00223.o26 +++| .ADDR SET *-1
00346 M01S00224.o26 +++| ELSE 2
00347 M01S00225.o26 +++| .ADDR SET *
00348 M01S00226.o26 +++| LJM ADDR
00349 M01S00227.o26 +++| JMP ENDM
00350 M01S00228.o26 +++| OVLN SPACE 4,15
00351 M01S00229.o26 +++|** OVLN - GENERATE OVERLAY NUMBER.
00352 M01S00230.o26 +++|*
00353 M01S00231.o26 +++|*
00354 M01S00232.o26 +++|*A OVLN B
00355 M01S00233.o26 +++|* ENTRY *B* = OVERLAY NUMBER.
00356 M01S00234.o26 +++|* EXIT *A* = MICRO OF OVERLAY NAME.
00357 M01S00235.o26 +++|
00358 M01S00236.o26 +++|
00359 M01S00237.o26 +++| PURGMAC OVLN
00360 M01S00238.o26 +++| MACRO OVLN,A,B
00361 M01S00239.o26 +++| LOCAL C
00362 M01S00240.o26 +++| C SET B/1R4
00363 M01S00241.o26 +++| C MICRO C+1,1, "OVNG"
00364 M01S00242.o26 +++| A MICRO B-C*1R4+1,1, ABCDEFGHIJKLMNOPQRSTUVWXYZ01234
00365 M01S00243.o26 +++| A MICRO 1,, "C""A"
00366 M01S00244.o26 +++| OVLN ENDM
00367 M01S00245.o26 +++| TITLE OVERLAY LOADER.
00368 M01S00117.241l630 +++| TITLE SUBROUTINES / MESSAGES.
00369 M01S00246.o26 +++| LOV SPACE 4,20
00370 M01S00247.o26 +++|** LOV - LOAD OVERLAY.
00371 M01S00248.o26 +++|*
00372 M01S00249.o26 +++|* ENTRY (A) = BITS 17-12 OVERLAY INDEX.
00373 M01S00250.o26 +++|* BITS 11-00 ENTRY ADDRESS.
Line S00251 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00374 M02S00251.241l630 ---|* (LA) = OVERLAY LOAD ADDRESS.
00375 M01S00252.o26 +++|*
00376 M01S00253.o26 +++|* USES T0, AB - AB+4.
00377 M01S00254.o26 +++|*
00378 M01S00255.o26 +++|* CALLS LPP.
00379 M01S00256.o26 +++|
00380 M01S00257.o26 +++|
00381 M01S00258.o26 +++| QUAL
00382 M01S00259.o26 +++| USE END
00383 M01S00260.o26 +++| USE PRS
00384 M01S00261.o26 +++| USE LOV
00385 M01S00262.o26 +++| PRSA BSS 0
00386 M01S00263.o26 +++| LOC MSFW
Line S00264 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00387 M02S00264.241l630 ---| CON 0
00388 M01S00265.o26 +++|
00389 M01S00266.o26 +++| LOV STM LOVA SET ENTRY
00390 M01S00267.o26 +++| SHN -14
00391 M01S00268.o26 +++| ZJN LOV1 IF RESIDENT
00392 M01S00269.o26 +++| STD T0
00393 M01S00270.o26 +++| SHN 1
00394 M01S00271.o26 +++| SCN 77
00395 M01S00272.o26 +++| LMD T0
00396 M01S00273.o26 +++| SCN 40
Line S00274 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
00397 M02S00274.261l700 ---| ADC 3R9GA-1
00398 M01S00003.261l700 +++| ADC 3R9OA-1
00399 M01S00275.o26 +++| STM LOVB+4
00400 M01S00276.o26 +++| SHN -14
00401 M01S00277.o26 +++| STM LOVB+3
00402 M01S00278.o26 +++| SHN 6
Line S00279 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00403 M02S00279.241l630 ---| LMM -5,LA
00404 M01S00118.241l630 +++| LMM OVL-5
00405 M01S00280.o26 +++| SHN 6
00406 M01S00281.o26 +++| LMM LOVB+4
00407 M01S00282.o26 +++| SHN 6
Line S00283 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00408 M02S00283.241l630 ---| LMM -4,LA
00409 M01S00119.241l630 +++| LMM OVL-4
00410 M01S00284.o26 +++| ZJN LOV1 IF PROGRAM IN CORE
00411 M01S00285.o26 +++| RJM LPP LOAD PP PROGRAM
00412 M01S00286.o26 +++| LOV1 LDN ZERL CLEAR ASSEMBLY BUFFER
00413 M01S00287.o26 +++| CRD AB
00414 M01S00288.o26 +++| LDC KBI8 CLEAR OVERLAY LOAD
00415 M01S00289.o26 +++| STM KBIA
Line S00290 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00416 M02S00290.241l630 ---| LDC OVL
Line S00291 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00417 M02S00291.241l630 ---| STD LA
00418 M01S00120.241l630 +++| AOD DR
00419 M01S00292.o26 +++| LDD CA (A) = CHARACTER ADDRESS
00420 M01S00293.o26 +++| LJM *
00421 M01S00294.o26 +++| LOVA EQU *-1
00422 M01S00295.o26 +++|
Line S00296 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00423 M02S00296.241l630 ---| LOVB. EQU *O
Line S00297 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00424 M02S00297.241l630 ---| LOVB VFD 60/3L1DL
00425 M01S00121.241l630 +++|
00426 M01S00122.241l630 +++| LOVB VFD 24/3L1DL,12/CH,24/0
00427 M01S00298.o26 +++| LPP SPACE 4,20
00428 M01S00299.o26 +++|** LPP - LOAD PP PROGRAM.
00429 M01S00300.o26 +++|*
Line S00301 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | ns2708 |
Seq # *Modification Id* Act
----------------------------+
00430 M02S00301.ns2708 ---|* ENTRY (LOVB - LOVB+4) = PP PROGRAM NAME.
Line S00302 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
M03 (Updated by) | ns2708 |
Seq # *Modification Id* Act
----------------------------+
00431 M03S00302.ns2708 ---|* (LA) = OVERLAY LOAD ADDRESS.
Line S00303 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | ns2708 |
Seq # *Modification Id* Act
----------------------------+
00432 M02S00303.ns2708 ---|*
Line S00304 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | ns2708 |
Seq # *Modification Id* Act
----------------------------+
00433 M02S00304.ns2708 ---|* USES T1, CM - CM+4.
Line S00123 Modification History |
M01 (Added by) | 241l630 |
M02 (Updated by) | ns2708 |
Seq # *Modification Id* Act
----------------------------+
00434 M02S00123.ns2708 ---|*
Line S00124 Modification History |
M01 (Added by) | 241l630 |
M02 (Updated by) | ns2708 |
Seq # *Modification Id* Act
----------------------------+
00435 M02S00124.ns2708 ---|* MACROS CFNC, DFIM, MONITOR.
00436 M01S00001.ns2708 +++|* ENTRY (LOVB+3 - LOVB+4) = PP PROGRAM NAME.
00437 M01S00002.ns2708 +++|*
00438 M01S00003.ns2708 +++|* EXIT TO *KIC* IF WAITING FOR OVERLAY TO BE LOADED.
00439 M01S00004.ns2708 +++|* TO *ABT* IF CHANNEL TIMEOUT.
00440 M01S00005.ns2708 +++|* TO *ABT1* IF NO PP AVAILABLE FOR *1DL*.
00441 M01S00006.ns2708 +++|*
00442 M01S00007.ns2708 +++|* USES T1, CM - CM+4, KM.
00443 M01S00008.ns2708 +++|*
00444 M01S00009.ns2708 +++|* MACROS CFNC, DFIM, EXECUTE, MONITOR.
00445 M01S00305.o26 +++|
00446 M01S00306.o26 +++|
00447 M01S00307.o26 +++| LPP SUBR ENTRY/EXIT
00448 M01S00010.ns2708 +++| EXECUTE 1DL,=
Line S00308 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00449 M02S00308.241l630 ---| LDD LA SET LOAD ADDRESS
Line S00309 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00450 M02S00309.241l630 ---| SBN 5
Line S00310 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00451 M02S00310.241l630 ---| STM LPPC
Line S00311 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00452 M02S00311.241l630 ---| LDM O26A SET DISPLAY CHANNEL
Line S00312 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00453 M02S00312.241l630 ---| LPN 77
Line S00313 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00454 M02S00313.241l630 ---| STM LOVB+2
00455 M01S00314.o26 +++| LDD MA
00456 M01S00315.o26 +++| CWM LOVB,ON
00457 M01S00316.o26 +++| LDN 1 DISABLE QUEUING OF PP REQUEST
00458 M01S00317.o26 +++| STD CM+1
00459 M01S00318.o26 +++| MONITOR RPPM REQUEST 1DL
00460 M01S00319.o26 +++| LDD CM+1 CHECK CALL
00461 M01S00320.o26 +++| STM LPPA
00462 M01S00321.o26 +++| NJN LPP1 IF PP AVAILABLE
00463 M01S00322.o26 +++| LDC ERRC MESSAGE = *SYSTEM BUSY - PPU.*
00464 M01S00323.o26 +++| STD KM
00465 M01S00324.o26 +++| LJM ABT1
00466 M01S00325.o26 +++|
00467 M01S00326.o26 +++|* WAIT FOR 1DL.
00468 M01S00327.o26 +++|
00469 M01S00328.o26 +++| LPP1 RJM KBIA SET RE-ENTRY
00470 M01S00011.ns2708 +++| DFIM (CON SDCF),*+1
00471 M01S00012.ns2708 +++| LDC DDCF DESELECT DISPLAY
00472 M01S00013.ns2708 +++| CFNC
00473 M01S00329.o26 +++| LDC ** READ PP INPUT REGISTER
00474 M01S00330.o26 +++| LPPA EQU *-1
00475 M01S00331.o26 +++| CRD CM
00476 M01S00332.o26 +++| LDD CM+1 CHECK INPUT REGISTER
00477 M01S00333.o26 +++| SCN 37
00478 M01S00334.o26 +++| SHN 6
00479 M01S00335.o26 +++| LMD CM
00480 M01S00336.o26 +++| LMC 3RL1D
00481 M01S00337.o26 +++| ZJN LPP2 IF *1DL*
00482 M01S00338.o26 +++| SHN 14
00483 M01S00339.o26 +++| LMN 1R1
Line S00340 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00484 M02S00340.241l630 ---| NJN LPP4.1 IF *1DL* NOT LOADING
00485 M01S00125.241l630 +++| NJN LPP5 IF *1DL* NOT LOADING
00486 M01S00341.o26 +++| LPP2 LDD CM+2
00487 M01S00342.o26 +++| LMC 7777
00488 M01S00343.o26 +++| ZJN LPP3 IF TRANSMISSION READY
00489 M01S00014.ns2708 +++| DCN CH+40
00490 M01S00015.ns2708 +++| CCF *+2,CH
00491 M01S00344.o26 +++| LDC ERRB MESSAGE = *SYSTEM BUSY - DISK.*
00492 M01S00345.o26 +++| LJM KIC INCOMPLETE ENTRY
00493 M01S00346.o26 +++|
00494 M01S00347.o26 +++|* INPUT OVERLAY.
00495 M01S00348.o26 +++|
Line S00349 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00496 M02S00349.241l630 ---| LPP3 FNC 0,CH CLEAR DISPLAY
Line S00126 Modification History |
M01 (Added by) | 241l630 |
M02 (Updated by) | ns2708 |
Seq # *Modification Id* Act
----------------------------+
00497 M02S00126.ns2708 ---| DFIM (CON SDCF),*+1
Line S00127 Modification History |
M01 (Added by) | 241l630 |
M02 (Updated by) | ns2708 |
Seq # *Modification Id* Act
----------------------------+
00498 M02S00127.ns2708 ---| LPP3 LDC DDCF DESELECT DISPLAY
Line S00128 Modification History |
M01 (Added by) | 241l630 |
M02 (Updated by) | ns2708 |
Seq # *Modification Id* Act
----------------------------+
00499 M02S00128.ns2708 ---| CFNC
Line S00350 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | ns2708 |
Seq # *Modification Id* Act
----------------------------+
00500 M02S00350.ns2708 ---| LDD TH DELAY
00501 M01S00016.ns2708 +++| LPP3 LDD TH DELAY
00502 M01S00351.o26 +++| SBN 1
00503 M01S00352.o26 +++| NJN *-1 IF DELAY NOT ELAPSED
00504 M01S00353.o26 +++| DCN CH+40
00505 M01S00354.o26 +++|* LDN 0 SET READY RECEIVE
00506 M01S00355.o26 +++| STD CM+2
00507 M01S00356.o26 +++| LDM LPPA
00508 M01S00357.o26 +++| CWD CM
00509 M01S00358.o26 +++| ACN CH
00510 M01S00359.o26 +++| LCN 0 SET TIMER
00511 M01S00360.o26 +++| STD T1
Line S00361 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00512 M02S00361.241l630 ---| LPP4 BSS 0
Line S00362 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00513 M02S00362.241l630 ---| LPPB FJM LPP5,CH IF CHANNEL FULL
00514 M01S00129.241l630 +++| LPP4 FJM LPP6,CH IF CHANNEL FULL
00515 M01S00363.o26 +++| SOD T1
00516 M01S00364.o26 +++| NJN LPP4 IF CHANNEL NOT TIMED OUT
Line S00365 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | ns2708 |
Seq # *Modification Id* Act
----------------------------+
00517 M02S00365.ns2708 ---| DCN CH+40
00518 M01S00017.ns2708 +++| LPP5 DCN CH+40
Line S00366 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00519 M02S00366.241l630 ---| LPP4.1 LJM ABT ABORT
Line S00367 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00520 M02S00367.241l630 ---|
Line S00368 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00521 M02S00368.241l630 ---| LPP5 LCN 0 INPUT OVERLAY
Line S00369 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00522 M02S00369.241l630 ---| IAM OVL-5,CH
Line S00370 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00523 M02S00370.241l630 ---| LPPC EQU *-1
00524 M01S00130.241l630 +++| CCF *+2,CH
Line S00131 Modification History |
M01 (Added by) | 241l630 |
M02 (Updated by) | ns2708 |
Seq # *Modification Id* Act
----------------------------+
00525 M02S00131.ns2708 ---| LPP5 LJM ABT ABORT
00526 M01S00018.ns2708 +++| LJM ABT ABORT
00527 M01S00132.241l630 +++|
00528 M01S00133.241l630 +++| LPP6 LCN 0 INPUT OVERLAY
00529 M01S00134.241l630 +++| IAM OVL-5,CH
00530 M01S00371.o26 +++| LDD KM CHECK MESSAGE
00531 M01S00372.o26 +++| LMC ERRB
Line S00373 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00532 M02S00373.241l630 ---| NJN LPP6 IF NOT *SYSTEM BUSY - DISK.*
00533 M01S00135.241l630 +++| CCF *+2,CH
00534 M01S00136.241l630 +++| NJN LPP7 IF NOT *DISK BUSY.*
00535 M01S00374.o26 +++|* LDN 0 CLEAR KEYBOARD MESSAGE
00536 M01S00375.o26 +++| STD KM
Line S00376 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00537 M02S00376.241l630 ---| LPP6 LJM LPPX RETURN
00538 M01S00137.241l630 +++| LPP7 LJM LPPX RETURN
00539 M01S00138.241l630 +++| CDL SPACE 4,15
00540 M01S00139.241l630 +++|** CDL - CLEAR DISPLAY LINES.
00541 M01S00140.241l630 +++|*
00542 M01S00141.241l630 +++|* ENTRY (DR) = DISPLAY REFRESH STATUS.
00543 M01S00142.241l630 +++|* (IO) = I/O BUSY STATUS.
00544 M01S00143.241l630 +++|*
00545 M01S00144.241l630 +++|* EXIT (A) = (DR) = 0.
00546 M01S00145.241l630 +++|*
00547 M01S00146.241l630 +++|* USES T1, YC.
00548 M01S00147.241l630 +++|*
00549 M01S00148.241l630 +++|* CALLS ERL.
00550 M01S00149.241l630 +++|*
00551 M01S00150.241l630 +++|* MACROS CFNC, DFIM.
00552 M01S00151.241l630 +++|
00553 M01S00152.241l630 +++|
00554 M01S00153.241l630 +++| CDL3 CFNC CHSF CLEAR HIDDEN SCREEN
00555 M01S00154.241l630 +++| LDN 0
00556 M01S00155.241l630 +++| STD DR DISABLE REFRESH NEXT PASS
00557 M01S00156.241l630 +++|
00558 M01S00157.241l630 +++| CDL SUBR ENTRY/EXIT
00559 M01S00158.241l630 +++| LDM DBFD
00560 M01S00159.241l630 +++| NJN CDL1 IF DISPLAY NOT ROLLING
00561 M01S00160.241l630 +++| AOD DR
00562 M01S00161.241l630 +++| CDL1 CFNC SLSF SELECT LEFT SCREEN - SMALL CHARACTERS
00563 M01S00162.241l630 +++| LDD DR
00564 M01S00163.241l630 +++| ADD IO SET REFRESH STATUS
00565 M01S00164.241l630 +++| STM DBFC
00566 M01S00165.241l630 +++| NJN CDL3 IF DISPLAY REFRESH ENABLED
00567 M01S00166.241l630 +++| STD T1
00568 M01S00167.241l630 +++| CDL2 LDM CDLA,T1
00569 M01S00168.241l630 +++| ZJN CDLX IF ALL LINES CLEARED
00570 M01S00169.241l630 +++| STD YC
00571 M01S00170.241l630 +++| RJM ERL ERASE LINE
00572 M01S00171.241l630 +++| AOD T1
00573 M01S00172.241l630 +++| UJN CDL2 LOOP
00574 M01S00173.241l630 +++|
00575 M01S00174.241l630 +++|
00576 M01S00175.241l630 +++| CDLA CON HL01
00577 M01S00176.241l630 +++| CON HL02
00578 M01S00177.241l630 +++| CON HL04
00579 M01S00178.241l630 +++| CON 0
00580 M01S00179.241l630 +++| ERL SPACE 4,10
00581 M01S00180.241l630 +++|** ERL - ERASE LINE.
00582 M01S00181.241l630 +++|*
00583 M01S00182.241l630 +++|* ENTRY (XC) = X-COORDINATE.
00584 M01S00183.241l630 +++|* (YC) = Y-COORDINATE.
00585 M01S00184.241l630 +++|*
00586 M01S00185.241l630 +++|* MACROS CFNC.
00587 M01S00186.241l630 +++|
00588 M01S00187.241l630 +++|
00589 M01S00188.241l630 +++| ERL SUBR ENTRY/EXIT
00590 M01S00189.241l630 +++| LDN 2
00591 M01S00190.241l630 +++| OAM XC,CH OUTPUT COORDINATES
00592 M01S00191.241l630 +++| CFNC EELF
00593 M01S00192.241l630 +++| UJN ERLX RETURN
00594 M01S00377.o26 +++| ERR SPACE 4,15
00595 M01S00378.o26 +++|** ERR - ERROR MESSAGES.
00596 M01S00379.o26 +++|
00597 M01S00380.o26 +++|
00598 M01S00381.o26 +++| ERRA DATA C*FORMAT ERROR.*
00599 M01S00382.o26 +++|
00600 M01S00383.o26 +++| ERRB DATA C*DISK BUSY.*
00601 M01S00384.o26 +++|
00602 M01S00385.o26 +++| ERRC DATA C*PP BUSY.*
00603 M01S00386.o26 +++|
00604 M01S00387.o26 +++| ERRD DATA C*REPEAT ENTRY.*
00605 M01S00388.o26 +++|
Line S00389 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | o2611 |
Seq # *Modification Id* Act
----------------------------+
00606 M02S00389.o2611 ---| ERRE DATA C*RECORD TOO LONG.*
00607 M01S00001.o2611 +++| DFIM (CON LN27)
00608 M01S00002.o2611 +++| ERRE CON LN45,CH03
00609 M01S00003.o2611 +++| DATA C*RECORD TOO LONG.*
00610 M01S00004.o2611 +++| ERREL EQU *-ERRE
00611 M01S00390.o26 +++|
Line S00391 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | ns2735 |
Seq # *Modification Id* Act
----------------------------+
00612 M02S00391.ns2735 ---| ERRF DATA C*WRITE ON READ-ONLY FILE.*
00613 M01S00001.ns2735 +++| ERRF DATA C*CANNOT PERFORM I/O ON FILE.*
00614 M01S00002.ns2735 +++|
00615 M01S00392.o26 +++|
00616 M01S00393.o26 +++| ERRNG PPFW-* IF PP RESIDENT MEMORY OVERFLOW
00617 M01S00394.o26 +++| LOC *O
00618 M01S00395.o26 +++| PRSAL EQU *-PRSA
Line S00396 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00619 M02S00396.241l630 ---|
Line S00397 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00620 M02S00397.241l630 ---| OVERFLOW CHECK FOR *PRESET* MEMORY OVERFLOW
00621 M01S00398.o26 +++| TITLE MAIN PROGRAM.
00622 M01S00399.o26 +++| O26 SPACE 4,20
00623 M01S00400.o26 +++|** O26 - MAIN PROGRAM.
00624 M01S00401.o26 +++|
00625 M01S00402.o26 +++|
00626 M01S00403.o26 +++| ORG PPFW
Line S00404 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00627 M02S00404.241l630 ---| O26 RJM PRS PRESET PROGRAM
Line S00405 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00628 M02S00405.241l630 ---| O261 RJM SYS DISPLAY SYSTEM STATUS
Line S00002 Modification History |
M01 (Added by) | v23l617 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00629 M02S00002.241l630 ---| DCN CH+40
Line S00406 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00630 M02S00406.241l630 ---| O26A FNC 7000,CH SELECT LEFT SCREEN, 64 CHARACTERS/LINE
Line S00407 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00631 M02S00407.241l630 ---| ACN CH
Line S00408 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00632 M02S00408.241l630 ---| RJM DBS DISPLAY BUFFER STATUS
Line S00409 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00633 M02S00409.241l630 ---| RJM DKB DISPLAY KEYBOARD BUFFER
Line S00410 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00634 M02S00410.241l630 ---| DCN CH+40
Line S00411 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00635 M02S00411.241l630 ---| RJM DBF DISPLAY BUFFER
Line S00412 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00636 M02S00412.241l630 ---| AOD CC ADVANCE CYCLE COUNT
00637 M01S00193.241l630 +++| O26 LJM PRS PRESET PROGRAM
00638 M01S00194.241l630 +++|
00639 M01S00195.241l630 +++| O261 RJM CDL CLEAR DISPLAY LINES
00640 M01S00196.241l630 +++| O262 RJM SYS DISPLAY SYSTEM STATUS
00641 M01S00197.241l630 +++| DCN CH+40
00642 M01S00198.241l630 +++| DFIM (CON LDMI)
00643 M01S00199.241l630 +++| UJN O263 DISPLAY BUFFER
00644 M01S00200.241l630 +++|
00645 M01S00201.241l630 +++| CON DBFC
00646 M01S00202.241l630 +++| NJN O263 IF SCREENS BEING REPAINTED
00647 M01S00203.241l630 +++| LDD KI
00648 M01S00204.241l630 +++| LMD KP
00649 M01S00205.241l630 +++| ZJN O264 IF NO KEYBOARD INPUT
00650 M01S00206.241l630 +++| O263 RJM DBF DISPLAY BUFFER
00651 M01S00207.241l630 +++| DCN CH+40
00652 M01S00208.241l630 +++| RJM DKB DISPLAY KEYBOARD BUFFER
00653 M01S00209.241l630 +++| DFIM (LDD KI)
00654 M01S00210.241l630 +++| UJN O265 DISPLAY BUFFER STATUS
00655 M01S00211.241l630 +++|
00656 M01S00212.241l630 +++| STD KP SET PREVIOUS INDEX = CURRENT
00657 M01S00213.241l630 +++| LDN 0
00658 M01S00214.241l630 +++| STD KD
00659 M01S00215.241l630 +++| O264 RJM KBI CHECK KEYBOARD INPUT
00660 M01S00216.241l630 +++| O265 RJM DBS DISPLAY BUFFER STATUS
00661 M01S00217.241l630 +++| CFNC THVF TRANSFER HIDDEN SCREEN TO VISIBLE
00662 M01S00218.241l630 +++| DCN CH+40
00663 M01S00413.o26 +++| RJM KBI KEYBOARD INPUT
00664 M01S00414.o26 +++| RJM TIO TRY I/O
Line S00415 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00665 M02S00415.241l630 ---| RJM PSS PAUSE FOR SYSTEM
Line S00416 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00666 M02S00416.241l630 ---| UJN O261 LOOP
00667 M01S00219.241l630 +++| O266 RJM PSS PAUSE FOR SYSTEM
00668 M01S00220.241l630 +++| DFIM (CON O261),*+1
00669 M01S00221.241l630 +++| LJM O262 LOOP
00670 M01S00001.o2612 +++| DPP SPACE 4,10
00671 M01S00002.o2612 +++|** DPP - CLEAR *DIS* FLAG AND DROP PP.
00672 M01S00003.o2612 +++|*
00673 M01S00004.o2612 +++|* EXIT TO PPR.
00674 M01S00005.o2612 +++|*
00675 M01S00006.o2612 +++|* USES CM - CM+4.
00676 M01S00007.o2612 +++|*
00677 M01S00008.o2612 +++|* MACROS MONITOR.
00678 M01S00009.o2612 +++|*
00679 M01S00010.o2612 +++|* NOTE THIS ROUTINE IS CALLED FROM *COMDDSP* ROUTINE *PSS*.
00680 M01S00417.o26 +++|
Line S00418 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | o2612 |
Seq # *Modification Id* Act
----------------------------+
00681 M02S00418.o2612 ---| DPP MONITOR DPPM DROP PP
00682 M01S00011.o2612 +++|
00683 M01S00012.o2612 +++| DPP BSS 0 ENTRY
00684 M01S00013.o2612 +++| LDN ZERL
00685 M01S00014.o2612 +++| CRD CM
00686 M01S00015.o2612 +++| LDN 10 SET MASK FOR *JCIW*
00687 M01S00016.o2612 +++| STD CM+4
00688 M01S00017.o2612 +++| LDN CCTS CLEAR *DIS* FLAG
00689 M01S00018.o2612 +++| STD CM+1
00690 M01S00019.o2612 +++| MONITOR SJCM
00691 M01S00020.o2612 +++| MONITOR DPPM DROP PP
00692 M01S00419.o26 +++| LJM PPR EXIT TO PP RESIDENT
00693 M01S00420.o26 +++| DBF SPACE 4,20
00694 M01S00421.o26 +++|** DBF - DISPLAY BUFFER.
00695 M01S00422.o26 +++|*
00696 M01S00423.o26 +++|* ENTRY (OT - OT+1) = DISPLAY ADDRESS.
00697 M01S00424.o26 +++|*
Line S00425 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00698 M02S00425.241l630 ---|* EXIT (T6 - T7) = ADDRESS OF LAST LINE + 1.
Line S00426 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00699 M02S00426.241l630 ---|* (DL) = DISPLAY LENGTH.
00700 M01S00222.241l630 +++|* EXIT (DL) = DISPLAY LENGTH.
00701 M01S00223.241l630 +++|* (LL) = 0 IF EXIT ON LAST LINE OF SCREEN.
00702 M01S00224.241l630 +++|* (DA - DA+1) = ADDRESS OF LAST LINE + 1.
00703 M01S00427.o26 +++|*
00704 M01S00428.o26 +++|* USES T1 - T7, CM - CM+4.
00705 M01S00429.o26 +++|*
Line S00430 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00706 M02S00430.241l630 ---|* CALLS CDA, DIC, DIL.
00707 M01S00225.241l630 +++|* CALLS CDA, DIL, EDW.
00708 M01S00226.241l630 +++|*
00709 M01S00227.241l630 +++|* MACROS CFNC, DFIM.
00710 M01S00431.o26 +++|
00711 M01S00432.o26 +++|
00712 M01S00433.o26 +++| DBF SUBR ENTRY/EXIT
00713 M01S00434.o26 +++| LDD OT SET DISPLAY ADDRESS
Line S00435 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00714 M02S00435.241l630 ---| STD T6
Line S00436 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00715 M02S00436.241l630 ---| LDD OT+1
Line S00437 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00716 M02S00437.241l630 ---| STD T7
00717 M01S00228.241l630 +++| STD DA
00718 M01S00229.241l630 +++| LDD OT+1
00719 M01S00230.241l630 +++| STD DA+1
00720 M01S00438.o26 +++| LDN 0 SET DISPLAY LENGTH
00721 M01S00439.o26 +++| STD DL
Line S00440 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00722 M02S00440.241l630 ---| LDC 7000 SET LEFT SCREEN
Line S00441 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00723 M02S00441.241l630 ---| STM DBFB
Line S00442 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00724 M02S00442.241l630 ---| LDC 7640 SET Y-COORDINATE
00725 M01S00231.241l630 +++| LDC SLSF SET LEFT SCREEN
00726 M01S00232.241l630 +++| STM DBFB
00727 M01S00233.241l630 +++| LDC LN06 SET FIRST LINE
00728 M01S00443.o26 +++| DBFA EQU *-1
00729 M01S00444.o26 +++| STD YC
Line S00445 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00730 M02S00445.241l630 ---| LMC 7640
00731 M01S00234.241l630 +++| DFIM (UJN DBF1)
00732 M01S00235.241l630 +++| LMC LN06
00733 M01S00446.o26 +++| ZJN DBF1 IF TOP OF SCREEN
00734 M01S00447.o26 +++| AOM DBFA ADVANCE Y
Line S00448 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00735 M02S00448.241l630 ---| STM DBFC SET ROLL NOT NEEDED
Line S00449 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00736 M02S00449.241l630 ---| DBF1 FNC 7000,CH SELECT SCREEN, 64 CHARACTERS/LINE
Line S00450 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00737 M02S00450.241l630 ---| DBFB EQU *-1
Line S00451 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00738 M02S00451.241l630 ---| ACN CH
Line S00452 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00739 M02S00452.241l630 ---| DBF2 RJM CDA CHECK DISPLAY ADDRESS
Line S00453 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00740 M02S00453.241l630 ---| PJN DBFX IF BUFFER EMPTY
Line S00454 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00741 M02S00454.241l630 ---| RJM DIL DISPLAY INSERT LINE
Line S00455 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00742 M02S00455.241l630 ---| LDN 2 OUTPUT COORDINATES
00743 M01S00236.241l630 +++| STM DBFD
00744 M01S00237.241l630 +++| DBF1 LDC SLSF
00745 M01S00238.241l630 +++| DBFB EQU *-1
00746 M01S00239.241l630 +++| CFNC SELECT SCREEN - SMALL CHARACTERS
00747 M01S00240.241l630 +++| DBF2 RJM CDA CHECK DISPLAY ADDRESS
00748 M01S00241.241l630 +++| PJN DBFX IF BUFFER EMPTY
00749 M01S00242.241l630 +++| RJM DIL DISPLAY INSERT LINE
00750 M01S00243.241l630 +++| LDN 0
00751 M01S00244.241l630 +++| STD T3 CLEAR WORD COUNTS
00752 M01S00245.241l630 +++| STD T4
00753 M01S00246.241l630 +++| LDM DBFC
00754 M01S00247.241l630 +++| ZJN DBF3 IF DISPLAY REFRESH DISABLED
00755 M01S00248.241l630 +++| LDN 2
00756 M01S00456.o26 +++| OAM XC,CH
00757 M01S00457.o26 +++| OAN CH+40
Line S00458 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00758 M02S00458.241l630 ---| LDN 1R. DISPLAY LINE
Line S00459 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00759 M02S00459.241l630 ---| OAN CH+40
Line S00460 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00760 M02S00460.241l630 ---| LDN 0 CLEAR WORD COUNT
Line S00461 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00761 M02S00461.241l630 ---| STD T3
Line S00462 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00762 M02S00462.241l630 ---| LCN 0
Line S00463 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00763 M02S00463.241l630 ---| STD T4
00764 M01S00249.241l630 +++| LDC 2R .
00765 M01S00250.241l630 +++| OAN CH+40
00766 M01S00464.o26 +++|
00767 M01S00465.o26 +++|* DISPLAY LINE.
00768 M01S00466.o26 +++|
Line S00467 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00769 M02S00467.241l630 ---| DBF3 LDD T6 READ WORD
00770 M01S00251.241l630 +++| DBF3 LDD DA READ WORD
00771 M01S00468.o26 +++| SHN 6
00772 M01S00469.o26 +++| ADD RA
00773 M01S00470.o26 +++| SHN 6
Line S00471 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00774 M02S00471.241l630 ---| ADD T7
00775 M01S00252.241l630 +++| ADD DA+1
00776 M01S00472.o26 +++| CRD CM
00777 M01S00473.o26 +++| AOD DL ADVANCE DISPLAY LENGTH
00778 M01S00474.o26 +++| LDD SF
Line S00475 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00779 M02S00475.241l630 ---| ZJN DBF4 IF SCAN NOT SET
00780 M01S00253.241l630 +++| ZJN DBF7 IF SCAN NOT SET
00781 M01S00476.o26 +++|
00782 M01S00477.o26 +++|* DISPLAY SCAN LINE.
00783 M01S00478.o26 +++|
00784 M01S00479.o26 +++| AOD T3 COUNT WORD READ
00785 M01S00480.o26 +++| SBD SC
00786 M01S00481.o26 +++| SBN 1
Line S00482 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | o263 |
M03 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00787 M03S00482.241l630 ---| MJN DBF6 IF WORD NOT REACHED
Line S00001 Modification History |
M01 (Added by) | o263 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00788 M02S00001.241l630 ---| MJN DBF3.1 IF WORD NOT REACHED
Line S00483 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00789 M02S00483.241l630 ---| SBN 6
Line S00484 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00790 M02S00484.241l630 ---| MJN DBF5 IF 6 WORDS NOT DISPLAYED
Line S00485 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00791 M02S00485.241l630 ---| SBN 10
Line S00486 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | o263 |
M03 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00792 M03S00486.241l630 ---| MJN DBF6 IF 8 WORDS NOT SKIPPED
Line S00487 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | o263 |
M03 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00793 M03S00487.241l630 ---| UJN DBF7 PROCESS AS END OF LINE
Line S00002 Modification History |
M01 (Added by) | o263 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00794 M02S00002.241l630 ---| DBF3.1 MJN DBF6 IF 8 WORDS NOT SKIPPED
Line S00003 Modification History |
M01 (Added by) | o263 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00795 M02S00003.241l630 ---| LJM DBF7 PROCESS AS END OF LINE
00796 M01S00254.241l630 +++| PJN DBF5 IF WORD REACHED
00797 M01S00255.241l630 +++| DBF4 LJM DBF9 PROCESS END OF WORD
00798 M01S00256.241l630 +++|
00799 M01S00257.241l630 +++| DBF5 SBN 6
00800 M01S00258.241l630 +++| MJN DBF7 IF SIX WORDS NOT DISPLAYED
00801 M01S00259.241l630 +++| SBN 10
00802 M01S00260.241l630 +++| MJN DBF4 IF EIGHT WORDS NOT SKIPPED
00803 M01S00261.241l630 +++| DBF6 LJM DBF10 PROCESS AS END OF LINE
00804 M01S00488.o26 +++|
00805 M01S00489.o26 +++|* DISPLAY NORMAL LINE.
00806 M01S00490.o26 +++|
Line S00491 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00807 M02S00491.241l630 ---| DBF4 AOD T4 COUNT WORD DISPLAYED
Line S00492 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00808 M02S00492.241l630 ---| LMN 6
Line S00493 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00809 M02S00493.241l630 ---| NJN DBF5 IF NOT 6TH WORD
Line S00494 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00810 M02S00494.241l630 ---| STD T4
Line S00495 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00811 M02S00495.241l630 ---| LDC 6040 RESET X
Line S00496 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00812 M02S00496.241l630 ---| OAN CH+40
Line S00497 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00813 M02S00497.241l630 ---| LCN 12 ADVANCE Y
00814 M01S00262.241l630 +++| DBF7 AOD T4 COUNT WORD DISPLAYED
00815 M01S00263.241l630 +++| LMN 7
00816 M01S00264.241l630 +++| NJN DBF8 IF NOT 7TH WORD
00817 M01S00265.241l630 +++| STD T4
00818 M01S00266.241l630 +++| LDC CH05 RESET X-COORDINATE
00819 M01S00267.241l630 +++| OAN CH+40
00820 M01S00268.241l630 +++| LCN YINC
00821 M01S00498.o26 +++| RAD YC
00822 M01S00499.o26 +++| OAN CH+40
Line S00500 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00823 M02S00500.241l630 ---| ADC -7020
Line S00501 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00824 M02S00501.241l630 ---| MJN DBF7 IF SCREEN OVERFLOW
Line S00502 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00825 M02S00502.241l630 ---| RJM CDA CHECK DISPLAY ADDRESS
Line S00503 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00826 M02S00503.241l630 ---| MJN DBF5 IF BUFFER NOT EMPTY
Line S00504 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00827 M02S00504.241l630 ---| LJM DBFX RETURN
Line S00505 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00828 M02S00505.241l630 ---|
Line S00506 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | o263 |
M03 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00829 M03S00506.241l630 ---| DBF5 RJM DIC DELETE INVALID CHARACTERS
Line S00507 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | o263 |
M03 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00830 M03S00507.241l630 ---| LDN 5 DISPLAY 5 BYTES
Line S00004 Modification History |
M01 (Added by) | o263 |
M02 (Updated by) | o267 |
M03 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00831 M03S00004.241l630 ---| DBF5 LDM DBFD
Line S00005 Modification History |
M01 (Added by) | o263 |
M02 (Updated by) | o267 |
M03 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00832 M03S00005.241l630 ---| ZJN DBF5.1 IF NOT TO CLEAR SPECIAL CHARACTERS
Line S00006 Modification History |
M01 (Added by) | o263 |
M02 (Updated by) | o267 |
M03 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00833 M03S00006.241l630 ---| RJM DIC DELETE INVALID CHARACTERS
Line S00007 Modification History |
M01 (Added by) | o263 |
M02 (Updated by) | o267 |
M03 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00834 M03S00007.241l630 ---| DBF5.1 LDN 5 DISPLAY 5 BYTES
Line S00001 Modification History |
M01 (Added by) | o267 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00835 M02S00001.241l630 ---| DBF5 RJM DIC DELETE INVALID CHARACTERS
Line S00002 Modification History |
M01 (Added by) | o267 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00836 M02S00002.241l630 ---| LDN 5 DISPLAY 5 BYTES
Line S00508 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00837 M02S00508.241l630 ---| OAM CM,CH
00838 M01S00269.241l630 +++| DFIM (ADC -LN25)
00839 M01S00270.241l630 +++| ADC -LN42
00840 M01S00271.241l630 +++| MJN DBF6 IF SCREEN OVERFLOW
00841 M01S00272.241l630 +++| RJM CDA CHECK DISPLAY ADDRESS
00842 M01S00273.241l630 +++| MJN DBF8 IF BUFFER NOT EMPTY
00843 M01S00274.241l630 +++| LJM DBFX RETURN
00844 M01S00275.241l630 +++|
00845 M01S00276.241l630 +++| DBF8 LDC 1
00846 M01S00277.241l630 +++| DBFC EQU *-1
00847 M01S00278.241l630 +++| ZJN DBF9 IF REFRESH DISABLED
00848 M01S00279.241l630 +++| RJM EDW DISPLAY WORD
00849 M01S00509.o26 +++|
00850 M01S00510.o26 +++|* PROCESS END-OF-WORD.
00851 M01S00511.o26 +++|
Line S00512 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00852 M02S00512.241l630 ---| DBF6 AOD T7 ADVANCE WORD ADDRESS
Line S00513 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00853 M02S00513.241l630 ---| SHN -14
Line S00514 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00854 M02S00514.241l630 ---| RAD T6
Line S00515 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00855 M02S00515.241l630 ---| LDD CM+4
Line S00516 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00856 M02S00516.241l630 ---| ZJN DBF7 IF END OF LINE
Line S00001 Modification History |
M01 (Added by) | o265 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00857 M02S00001.241l630 ---| LDD T6 CHECK ADDRESS
00858 M01S00280.241l630 +++| DBF9 AOD DA+1 ADVANCE WORD ADDRESS
00859 M01S00281.241l630 +++| SHN -14
00860 M01S00282.241l630 +++| RAD DA
00861 M01S00283.241l630 +++| LDD CM+4
00862 M01S00284.241l630 +++| ZJN DBF10 IF END OF LINE
00863 M01S00285.241l630 +++| LDD DA
00864 M01S00002.o265 +++| SBD IN
00865 M01S00003.o265 +++| SHN 14
Line S00004 Modification History |
M01 (Added by) | o265 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00866 M02S00004.241l630 ---| ADD T7
Line S00005 Modification History |
M01 (Added by) | o265 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00867 M02S00005.241l630 ---| SBD IN+1
Line S00006 Modification History |
M01 (Added by) | o265 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00868 M02S00006.241l630 ---| PJN DBF7 IF ADDRESS .GE. *IN*
00869 M01S00286.241l630 +++| ADD DA+1
00870 M01S00287.241l630 +++| SBD IN+1
00871 M01S00288.241l630 +++| PJN DBF10 IF ADDRESS .GE. *IN*
00872 M01S00517.o26 +++| LJM DBF3 LOOP
00873 M01S00518.o26 +++|
00874 M01S00519.o26 +++|* PROCESS END-OF-LINE.
00875 M01S00520.o26 +++|
Line S00521 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00876 M02S00521.241l630 ---| DBF7 LDC 1 ADVANCE LINE NUMBER
Line S00522 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00877 M02S00522.241l630 ---| DBFC EQU *-1 (ROLL NEEDED FLAG)
Line S00523 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00878 M02S00523.241l630 ---| NJN DBF8 IF ROLL NOT NEEDED
Line S00524 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00879 M02S00524.241l630 ---| LDD T6 SET FIRST LINE ADDRESS
Line S00525 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00880 M02S00525.241l630 ---| STD OT
Line S00526 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00881 M02S00526.241l630 ---| LDD T7
00882 M01S00289.241l630 +++| DBF10 LDC 1 ADVANCE LINE NUMBER
00883 M01S00290.241l630 +++| DBFD EQU *-1
00884 M01S00291.241l630 +++| NJN DBF12 IF ROLL NOT NEEDED
00885 M01S00292.241l630 +++| AOD DR
00886 M01S00293.241l630 +++| LDD DA
00887 M01S00294.241l630 +++| STD OT
00888 M01S00295.241l630 +++| LDD DA+1 SET FIRST LINE ADDRESS
00889 M01S00527.o26 +++| STD OT+1
00890 M01S00528.o26 +++| LDD YC SET NEW Y-COORDINATE
Line S00529 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00891 M02S00529.241l630 ---| SBN 24
Line S00530 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00892 M02S00530.241l630 ---| STM DBFA
Line S00531 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00893 M02S00531.241l630 ---| STM DBFC SET ROLL NOT NEEDED
Line S00532 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00894 M02S00532.241l630 ---| DBF8 LCN 24 DECREASE Y
Line S00533 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00895 M02S00533.241l630 ---| RAD YC
Line S00534 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00896 M02S00534.241l630 ---| ADC -7126
Line S00535 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00897 M02S00535.241l630 ---| MJN DBF9 IF BOTTOM OF SCREEN REACHED
00898 M01S00296.241l630 +++| DFIM (UJN DBF11)
00899 M01S00297.241l630 +++| SBN 2*YINC
00900 M01S00298.241l630 +++| STM DBFA
00901 M01S00299.241l630 +++| DBF11 STM DBFD SET ROLL NOT NEEDED
00902 M01S00300.241l630 +++| DFIM (LCN YINC)
00903 M01S00301.241l630 +++| DBF12 LCN 2*YINC
00904 M01S00302.241l630 +++| RAD YC
00905 M01S00303.241l630 +++| DFIM (ADC -LN25)
00906 M01S00304.241l630 +++| ADC -LN41
00907 M01S00305.241l630 +++| MJN DBF13 IF BOTTOM OF SCREEN
00908 M01S00306.241l630 +++| STD LL
00909 M01S00536.o26 +++| LJM DBF2 LOOP
00910 M01S00537.o26 +++|
Line S00538 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00911 M02S00538.241l630 ---| DBF9 LDM DBFB SET NEXT SCREEN
Line S00539 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00912 M02S00539.241l630 ---| LMD HN
Line S00540 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00913 M02S00540.241l630 ---| STM DBFB
Line S00541 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00914 M02S00541.241l630 ---| SHN 13
Line S00542 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00915 M02S00542.241l630 ---| PJN DBF10 IF RIGHT SCREEN DISPLAYED
Line S00543 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00916 M02S00543.241l630 ---| DCN CH+40
Line S00544 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00917 M02S00544.241l630 ---| LDC 7664-7126 RESET Y
00918 M01S00307.241l630 +++| DBF13 LDD HN SET NEXT SCREEN
00919 M01S00308.241l630 +++| RAM DBFB
00920 M01S00309.241l630 +++| ERRNZ SLSF+100-SRSF CODE DEPENDS ON VALUE
00921 M01S00310.241l630 +++| SHN 21-6
00922 M01S00311.241l630 +++| PJN DBF14 IF RIGHT SCREEN DISPLAYED
00923 M01S00312.241l630 +++| FJM *,CH
00924 M01S00313.241l630 +++| DCN CH+40
00925 M01S00314.241l630 +++| DFIM (CON LN06),*+1
00926 M01S00315.241l630 +++| LDC LN06-LN41+YINC RESET LINE NUMBER
00927 M01S00316.241l630 +++| DFIM (STD YC)
00928 M01S00545.o26 +++| RAD YC
00929 M01S00546.o26 +++| LJM DBF1 LOOP
00930 M01S00547.o26 +++|
Line S00548 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00931 M02S00548.241l630 ---| DBF10 LDD HF SET ROLL FLAG
Line S00549 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00932 M02S00549.241l630 ---| STM DBFC
Line S00550 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00933 M02S00550.241l630 ---| RJM DIL DISPLAY INSERT LINE
Line S00551 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00934 M02S00551.241l630 ---| DCN CH+40
Line S00552 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00935 M02S00552.241l630 ---| LJM DBFX RETURN
00936 M01S00317.241l630 +++| DBF14 LDD HF SET ROLL FLAG
00937 M01S00318.241l630 +++| STM DBFD
00938 M01S00319.241l630 +++| RJM DIL DISPLAY INSERT LINE
00939 M01S00320.241l630 +++| LJM DBFX RETURN
Line S00008 Modification History |
M01 (Added by) | o263 |
M02 (Updated by) | o267 |
Seq # *Modification Id* Act
----------------------------+
00940 M02S00008.o267 ---|
Line S00009 Modification History |
M01 (Added by) | o263 |
M02 (Updated by) | o267 |
Seq # *Modification Id* Act
----------------------------+
00941 M02S00009.o267 ---| DBFD CON 0 SPECIAL CHARACTER FLAG
00942 M01S00553.o26 +++| DBS SPACE 4,20
00943 M01S00554.o26 +++|** DBS - DISPLAY BUFFER STATUS.
00944 M01S00555.o26 +++|*
Line S00556 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00945 M02S00556.241l630 ---|* USES T1, T7, CM - CM+4.
00946 M01S00321.241l630 +++|* USES T1, CM - CM+4.
00947 M01S00557.o26 +++|*
00948 M01S00558.o26 +++|* CALLS D6S, DOL.
00949 M01S00322.241l630 +++|*
00950 M01S00323.241l630 +++|* MACROS CFNC, DISPLA, MONITOR.
00951 M01S00559.o26 +++|
00952 M01S00560.o26 +++|
00953 M01S00561.o26 +++| DBS SUBR ENTRY/EXIT
Line S00562 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00954 M02S00562.241l630 ---| LDN 4 SET REPEAT COUNT
Line S00563 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00955 M02S00563.241l630 ---| STD T7
Line S00564 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00956 M02S00564.241l630 ---|
Line S00565 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00957 M02S00565.241l630 ---| DBS1 LDD IO CHECK IF I/O BUSY
Line S00566 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00958 M02S00566.241l630 ---| ZJN DBS2 IF I/O NOT BUSY
Line S00567 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00959 M02S00567.241l630 ---|
Line S00568 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00960 M02S00568.241l630 ---| DISPLA 6000,7670,( CIO BUSY.)
Line S00569 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00961 M02S00569.241l630 ---|
Line S00570 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00962 M02S00570.241l630 ---| DBS2 DISPLA 6000,7656,(O26. FILE = )
Line S00571 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00963 M02S00571.241l630 ---|
00964 M01S00324.241l630 +++| CFNC SLSF
00965 M01S00325.241l630 +++| LDD IO
00966 M01S00326.241l630 +++| ZJN DBS1 IF I/O NOT BUSY
00967 M01S00327.241l630 +++| DISPLA CH04,HL02,(CIO BUSY.)
00968 M01S00328.241l630 +++| DBS1 DISPLA CH01,HL01,(O26. FILE = )
00969 M01S00572.o26 +++| LDD RA READ FILE NAME
00970 M01S00573.o26 +++| SHN 6
00971 M01S00574.o26 +++| ADN FET
00972 M01S00575.o26 +++| CRD CM
00973 M01S00576.o26 +++| LDN 4 DISPLAY FILE NAME
00974 M01S00577.o26 +++| OAM CM,CH
00975 M01S00578.o26 +++| LDM CRSB CHECK WRITE LOCKOUT
Line S00579 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00976 M02S00579.241l630 ---| ZJN DBS2.1 IF WRITE IS ALLOWED
Line S00580 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00977 M02S00580.241l630 ---| LDN 1R* DISPLAY ASTERISK
Line S00581 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00978 M02S00581.241l630 ---| DBS2.1 OAN CH
00979 M01S00329.241l630 +++| ZJN DBS2 IF WRITE ALLOWED
00980 M01S00330.241l630 +++| LDN 1R*
00981 M01S00331.241l630 +++| DBS2 OAN CH+40
00982 M01S00582.o26 +++| LDD CM+4 DISPLAY STATUS
00983 M01S00583.o26 +++| RJM D6S
Line S00584 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00984 M02S00584.241l630 ---|
00985 M01S00585.o26 +++| DISPLA ,,(RS=) DISPLAY CURRENT RECORD SIZE
Line S00586 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00986 M02S00586.241l630 ---|
00987 M01S00587.o26 +++| LDD IN
00988 M01S00588.o26 +++| SBD FT
00989 M01S00589.o26 +++| SHN 14
00990 M01S00590.o26 +++| ADD IN+1
00991 M01S00591.o26 +++| SBD FT+1
Line S00592 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00992 M02S00592.241l630 ---| RJM D6S DISPLAY WORD COUNT IN BUFFER
Line S00593 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
00993 M02S00593.241l630 ---| RJM CBC COMPARE AGAINST ORIGINAL BUFFER SIZE
00994 M01S00332.241l630 +++| SHN 14 PRESERVE PRU COUNT
00995 M01S00333.241l630 +++| STD CM
00996 M01S00334.241l630 +++| SHN 6 DISPLAY WORD COUNT IN BUFFER
00997 M01S00335.241l630 +++| RJM D6S
00998 M01S00336.241l630 +++| LDD CM COMPARE WITH ORIGINAL BUFFER SIZE
00999 M01S00594.o26 +++| LMM TIOG
01000 M01S00595.o26 +++| ZJN DBS3 IF SAME FILE PRU SIZE
Line S00596 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01001 M02S00596.241l630 ---|
01002 M01S00597.o26 +++| DISPLA ,,(**.) SET WARNING IF FILE CHANGED PRU SIZE
Line S00598 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01003 M02S00598.241l630 ---|
01004 M01S00599.o26 +++| DBS3 DISPLA ,,(CM=)
Line S00600 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01005 M02S00600.241l630 ---|
01006 M01S00601.o26 +++| LDD LM COMPUTE STORAGE
01007 M01S00602.o26 +++| SBD IN
01008 M01S00603.o26 +++| SHN 14
01009 M01S00604.o26 +++| ADD LM+1
01010 M01S00605.o26 +++| SBD IN+1
01011 M01S00606.o26 +++| RJM D6S DISPLAY STORAGE
01012 M01S00607.o26 +++| LDD CP READ MESSAGE 2
01013 M01S00608.o26 +++| ADN MS2W
01014 M01S00609.o26 +++| STD T1
01015 M01S00610.o26 +++| CRD CM
01016 M01S00611.o26 +++| LDD CM
01017 M01S00612.o26 +++| NJN DBS4 IF SET
01018 M01S00613.o26 +++| LDD CP READ MESSAGE 1
01019 M01S00614.o26 +++| ADN MS1W
01020 M01S00615.o26 +++| CRD CM
01021 M01S00616.o26 +++| STD T1
01022 M01S00617.o26 +++| DBS4 LDN 2 OUTPUT COORDINATES
01023 M01S00618.o26 +++| OAM DBSA,CH
01024 M01S00619.o26 +++| LDD T1 DISPLAY MESSAGE
01025 M01S00620.o26 +++| RJM DOL
01026 M01S00621.o26 +++| LDD CP READ JOB CONTROL
01027 M01S00622.o26 +++| ADN STSW
01028 M01S00623.o26 +++| CRD CM
01029 M01S00624.o26 +++| LDD CM+2 CHECK ROLLOUT FLAG
01030 M01S00625.o26 +++| LPN 1
01031 M01S00626.o26 +++| ZJN DBS5 IF NOT SET
Line S00627 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01032 M02S00627.241l630 ---|
Line S00628 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01033 M02S00628.241l630 ---| DISPLA 6300,7740-24,(ROLLOUT.)
Line S00629 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01034 M02S00629.241l630 ---|
Line S00630 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01035 M02S00630.241l630 ---| UJN DBS6 CHECK FOR END OF DISPLAY CYCLE
Line S00631 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01036 M02S00631.241l630 ---|
Line S00632 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01037 M02S00632.241l630 ---| DBS5 LDD LM COMPUTE STORAGE
Line S00633 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01038 M02S00633.241l630 ---| SBD IN
Line S00634 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01039 M02S00634.241l630 ---| SHN 14
Line S00635 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01040 M02S00635.241l630 ---| ADD LM+1
Line S00636 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01041 M02S00636.241l630 ---| SBD IN+1
Line S00637 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01042 M02S00637.241l630 ---| SBN 40
Line S00638 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01043 M02S00638.241l630 ---| MJN DBS6 IF BUFFER OVERFLOWED
Line S00639 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01044 M02S00639.241l630 ---| LDM CRSA
Line S00640 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01045 M02S00640.241l630 ---| NJN DBS7 IF RECORD READ NOT TOO LONG
Line S00641 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01046 M02S00641.241l630 ---| DBS6 SOD T7
Line S00642 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01047 M02S00642.241l630 ---| SHN 1
Line S00643 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01048 M02S00643.241l630 ---| LMD CC
Line S00644 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01049 M02S00644.241l630 ---| LPN 6
Line S00645 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01050 M02S00645.241l630 ---| ZJN DBS7 IF END OF DISPLAY CYCLE
Line S00646 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01051 M02S00646.241l630 ---| LJM DBS1 LOOP
Line S00647 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01052 M02S00647.241l630 ---|
Line S00648 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01053 M02S00648.241l630 ---| DBS7 LDD CP READ CP STATUS
Line S00649 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01054 M02S00649.241l630 ---| ADN STSW
Line S00650 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01055 M02S00650.241l630 ---| CRD CM
Line S00651 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01056 M02S00651.241l630 ---| LDD CM+1 CHECK ERROR FLAG
Line S00652 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01057 M02S00652.241l630 ---| ZJN DBS8 IF NOT SET
Line S00653 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01058 M02S00653.241l630 ---| LDD CM CHECK STATUS
Line S00654 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01059 M02S00654.241l630 ---| LPN 37
Line S00655 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01060 M02S00655.241l630 ---| SBN 2
Line S00656 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01061 M02S00656.241l630 ---| PJN DBS8 IF .GE. 2 PP-S ASSIGNED
Line S00657 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01062 M02S00657.241l630 ---| LDN 0 CLEAR I/O BUSY
01063 M01S00337.241l630 +++| DISPLA CH25,HL02,(ROLLOUT.),H
01064 M01S00338.241l630 +++| DBS5 LDD CM+1
01065 M01S00339.241l630 +++| ZJN DBS8 IF ERROR FLAG NOT SET
01066 M01S00340.241l630 +++| SOD CM
01067 M01S00341.241l630 +++| LPN 37
01068 M01S00342.241l630 +++| NJN DBS8 IF .GT. 1 PP ASSIGNED
01069 M01S00658.o26 +++| STD IO
01070 M01S00659.o26 +++| LDN ZERL
01071 M01S00660.o26 +++| CRD CM CLEAR RANDOM ACCESS
01072 M01S00661.o26 +++| LDD RA
01073 M01S00662.o26 +++| SHN 6
01074 M01S00663.o26 +++| ADN FET+6
01075 M01S00664.o26 +++| CWD CM
01076 M01S00665.o26 +++| MONITOR CEFM CLEAR ERROR FLAG
Line S00666 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01077 M02S00666.241l630 ---|
01078 M01S00667.o26 +++| DBS8 LJM DBSX RETURN
01079 M01S00668.o26 +++|
Line S00669 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01080 M02S00669.241l630 ---| DBSA CON 6000,7740-12
01081 M01S00343.241l630 +++|
01082 M01S00344.241l630 +++| DBSA CON CH01,HL04
01083 M01S00670.o26 +++| DKB SPACE 4,20
01084 M01S00671.o26 +++|** DKB - DISPLAY KEYBOARD BUFFER.
01085 M01S00672.o26 +++|*
01086 M01S00673.o26 +++|* ENTRY (KM) = ADDRESS OF KEYBOARD MESSAGE. (IF (KM) = 0,
01087 M01S00674.o26 +++|* NO MESSAGE.)
01088 M01S00675.o26 +++|* (KI) = KEYBOARD INDEX.
01089 M01S00345.241l630 +++|* (KD) = 0 IF KEYBOARD BUFFER NOT DISPLAYED.
01090 M01S00676.o26 +++|*
Line S00677 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | o2611 |
Seq # *Modification Id* Act
----------------------------+
01091 M02S00677.o2611 ---|* USES T1, YC.
01092 M01S00005.o2611 +++|* USES T1, T3, YC.
01093 M01S00678.o26 +++|*
Line S00679 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01094 M02S00679.241l630 ---|* CALLS DDN, DKL.
Line S00346 Modification History |
M01 (Added by) | 241l630 |
M02 (Updated by) | o2611 |
Seq # *Modification Id* Act
----------------------------+
01095 M02S00346.o2611 ---|* CALLS DDN, DKL, ERL.
01096 M01S00006.o2611 +++|* CALLS DKL, ERL, HIL.
01097 M01S00347.241l630 +++|*
01098 M01S00348.241l630 +++|* MACROS CFNC, DFIM, DISPLA.
01099 M01S00680.o26 +++|
01100 M01S00681.o26 +++|
01101 M01S00682.o26 +++| DKB SUBR ENTRY/EXIT
Line S00683 Modification History |
M01 (Added by) | o26 |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act
----------------------------+
01102 M02S00683.241l630 ---| LDN 2 OUTPUT MESSAGE COORDINATES