Seq # *Modification Id* Act
----------------------------+
01098 M01S00749.comcchg +++| SA1 EISX SET RETURN ADDRESS
01099 M01S00750.comcchg +++| BX6 X1
01100 M01S00751.comcchg +++| SA6 B7
01101 M01S00752.comcchg +++| JP B7+1 EXECUTE SUBROUTINE
| Line S00753 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01102 M02S00753.261l700 ---| ERR SPACE 4,10
01103 M01S00199.261l700 +++| ERR SPACE 4,15
01104 M01S00754.comcchg +++|** ERR - ERROR EXIT.
01105 M01S00755.comcchg +++|*
01106 M01S00756.comcchg +++|* ENTRY (B6) = ERROR MESSAGE ADDRESS.
01107 M01S00757.comcchg +++|*
| Line S00758 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
01108 M02S00758.ns22000 ---|* EXIT TO *CHGX* TO RETURN ERROR STATUS FROM COMMON DECK.
01109 M01S00102.ns22000 +++|* EXIT RETURN ERROR STATUS FROM COMMON DECK.
| Line S00103 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01110 M02S00103.261l700 ---|* TO *CHGX* IF ENTERED FROM *CHG*.
01111 M01S00200.261l700 +++|* TO *VCNX* IF ENTERED FROM *VCN*.
01112 M01S00104.ns22000 +++|* TO *RPEX* IF ENTERED FROM *RPE*.
01113 M01S00759.comcchg +++|*
| Line S00760 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01114 M02S00760.261l700 ---|* MACROS RETURN
01115 M01S00201.261l700 +++|* USES X - 1, 2, 6.
01116 M01S00202.261l700 +++|* A - 1, 2, 6.
01117 M01S00203.261l700 +++|* B - 6, 7.
01118 M01S00204.261l700 +++|*
01119 M01S00205.261l700 +++|* MACROS RETURN.
01120 M01S00761.comcchg +++|
01121 M01S00762.comcchg +++|
01122 M01S00763.comcchg +++| ERR BSS 0 ENTRY
01123 M01S00001.cchg1 +++| SA2 P ENSURE COMPLETE BIT SET IN FET
01124 M01S00002.cchg1 +++| SX6 B1
01125 M01S00003.cchg1 +++| BX6 X2+X6
01126 M01S00004.cchg1 +++| SA6 A2
01127 M01S00764.comcchg +++| RETURN P
01128 M01S00765.comcchg +++| SB7 ERRD
| Line S00766 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
01129 M02S00766.v23l617 ---| NE B6,B7,ERR1 IF NOT *INVALID CHARGE.*
01130 M01S00024.v23l617 +++| NE B6,B7,ERR1 IF NOT *CHARGE NOT VALID.*
01131 M01S00767.comcchg +++| SA1 DCF
01132 M01S00768.comcchg +++| ZR X1,ERR1 IF NOT DEFAULT CHARGE
| Line S00769 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
01133 M02S00769.v23l617 ---| SB6 ERRI * INVALID DEFAULT CHARGE.*
01134 M01S00025.v23l617 +++| SB6 ERRI * DEFAULT CHARGE NOT VALID.*
| Line S00770 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act
----------------------------+
01135 M02S00770.ns22000 ---| ERR1 EQ CHGX RETURN WITH ERROR STATUS
01136 M01S00105.ns22000 +++| ERR1 BSS 1 RETURN WITH ERROR STATUS
| Line S00106 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01137 M02S00106.261l700 ---|* EQ CHGX IF ENTERED FROM *CHG*
01138 M01S00206.261l700 +++|* EQ VCNX IF ENTERED FROM *VCN*
01139 M01S00107.ns22000 +++|* EQ RPEX IF ENTERED FROM *RPE*
01140 M01S00108.ns22000 +++| ERRX EQU *-1
01141 M01S00771.comcchg +++|
01142 M01S00207.261l700 +++|
| Line S00772 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
01143 M02S00772.v23l617 ---| ERRA DATA C* CHARGE INVALID AT THIS HOUR.*
01144 M01S00026.v23l617 +++| ERRA DATA C* CHARGE NOT VALID AT THIS HOUR.*
01145 M01S00773.comcchg +++| ERRB DATA C* CUMULATIVE SRU LIMIT EXCEEDED.*
01146 M01S00774.comcchg +++| ERRC DATA C* CUMULATIVE LIMIT EXCEEDED.*
| Line S00775 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
01147 M02S00775.v23l617 ---| ERRD DATA C* INVALID CHARGE.*
01148 M01S00027.v23l617 +++| ERRD DATA C* CHARGE NOT VALID.*
01149 M01S00776.comcchg +++| ERRE DATA C* DATA BASE ERROR.*
01150 M01S00777.comcchg +++| ERRF DATA C* CHARGE FILE BUSY.*
01151 M01S00778.comcchg +++| ERRG DATA C* CHARGE NUMBER EXPIRED.*
01152 M01S00779.comcchg +++| ERRH DATA C* PROJECT NUMBER EXPIRED.*
| Line S00780 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
01153 M02S00780.v23l617 ---| ERRI DATA C* INVALID DEFAULT CHARGE.*
01154 M01S00028.v23l617 +++| ERRI DATA C* DEFAULT CHARGE NOT VALID.*
| Line S00781 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01155 M02S00781.261l700 ---| ICN SPACE 4,15
| Line S00782 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01156 M02S00782.261l700 ---|** ICN - ISSUE CHARGE NUMBER MESSAGES.
| Line S00783 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01157 M02S00783.261l700 ---|*
| Line S00109 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01158 M02S00109.261l700 ---|* ENTRY (B5) = ADDRESS OF PROJECT ENTRY.
| Line S00110 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01159 M02S00110.261l700 ---|*
| Line S00784 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns22000 |
M03 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01160 M03S00784.261l700 ---|* EXIT ACCOUNTING INFORMATION ISSUED TO ACCOUNT AND USER
| Line S00785 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns22000 |
M03 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01161 M03S00785.261l700 ---|* DAYFILES. CHARGE REQUIRED FLAG CLEARED IF CHARGE
| Line S00786 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns22000 |
M03 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01162 M03S00786.261l700 ---|* NUMBER ENTERED. JOB SERVICE CLASS CHANGED IF SERVICE
| Line S00787 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns22000 |
M03 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01163 M03S00787.261l700 ---|* CLASS PARAMETER SPECIFIED.
| Line S00111 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01164 M02S00111.261l700 ---|* EXIT PROJECT PROLOGUE AND EPILOGUE CONTROL FIELDS SET IN
| Line S00112 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01165 M02S00112.261l700 ---|* CP AREA.
| Line S00113 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01166 M02S00113.261l700 ---|* ACCOUNTING INFORMATION ISSUED TO ACCOUNT AND USER
| Line S00114 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01167 M02S00114.261l700 ---|* DAYFILES.
| Line S00115 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | ns2323 |
M03 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01168 M03S00115.261l700 ---|* CHARGE REQUIRED FLAG CLEARED IF CHARGE NUMBER ENTERED.
| Line S00009 Modification History |
M01 (Added by) | ns2323 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01169 M02S00009.261l700 ---|* CHARGE REQUIRED FLAG CLEARED IN CONTROL POINT AREA.
| Line S00788 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01170 M02S00788.261l700 ---|*
| Line S00789 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01171 M02S00789.261l700 ---|* USES A - 1, 2, 6, 7.
| Line S00790 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns2323 |
M03 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01172 M03S00790.261l700 ---|* X - 0, 1, 2, 3, 6, 7.
| Line S00010 Modification History |
M01 (Added by) | ns2323 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01173 M02S00010.261l700 ---|* X - 1, 2, 3, 6, 7.
| Line S00791 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01174 M02S00791.261l700 ---|* B - 2, 3, 4, 6, 7.
| Line S00792 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01175 M02S00792.261l700 ---|*
| Line S00793 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01176 M02S00793.261l700 ---|* CALLS CCC, CPM=.
| Line S00794 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns22000 |
M03 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01177 M03S00794.261l700 ---|*
| Line S00795 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns22000 |
M03 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01178 M03S00795.261l700 ---|* MACROS RECALL.
| Line S00116 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01179 M02S00116.261l700 ---|*
| Line S00117 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01180 M02S00117.261l700 ---|* MACROS BEGINAB, RECALL.
| Line S00796 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01181 M02S00796.261l700 ---|
| Line S00797 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01182 M02S00797.261l700 ---|
| Line S00798 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01183 M02S00798.261l700 ---| ICN SUBR ENTRY/EXIT
| Line S00799 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01184 M02S00799.261l700 ---| SA1 SRUM+2 GET CHARGE NUMBER
| Line S00800 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns22000 |
M03 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01185 M03S00800.261l700 ---| ZR X1,ICN5.1 IF NO CHARGE NUMBER ENTERED
| Line S00801 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01186 M02S00801.261l700 ---| SA1 =6RACCN, SET ACCOUNT FILE MESSAGE HEADER
| Line S00802 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01187 M02S00802.261l700 ---| SB2 60-36
| Line S00803 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01188 M02S00803.261l700 ---| MX3 6 SET CHARACTER MASK
| Line S00804 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01189 M02S00804.261l700 ---| SB7 SRUM+5 FWA OF MESSAGE AREA
| Line S00805 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01190 M02S00805.261l700 ---| BX6 X1
| Line S00806 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01191 M02S00806.261l700 ---| SB6 SRUM+2 ADDRESS OF CHARGE/PROJECT BLOCK
| Line S00807 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01192 M02S00807.261l700 ---| SB4 2
| Line S00808 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01193 M02S00808.261l700 ---| ICN1 SA1 B6 FETCH FIRST/NEXT CHARGE/PROJECT
| Line S00809 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01194 M02S00809.261l700 ---| SB6 B6+B1
| Line S00810 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01195 M02S00810.261l700 ---| SB3 60
| Line S00811 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01196 M02S00811.261l700 ---| ICN2 BX7 X3*X1
| Line S00812 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01197 M02S00812.261l700 ---| ZR X7,ICN4 IF AT END OF THIS WORD
| Line S00813 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01198 M02S00813.261l700 ---| LX1 6
| Line S00814 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01199 M02S00814.261l700 ---| BX6 X6+X7 MERGE NEW CHARACTER
| Line S00815 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01200 M02S00815.261l700 ---| LX6 6
| Line S00816 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01201 M02S00816.261l700 ---| SB2 B2-6
| Line S00817 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01202 M02S00817.261l700 ---| ZR B2,ICN7 IF MESSAGE WORD FULL
| Line S00818 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01203 M02S00818.261l700 ---| SB3 B3-6
| Line S00819 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01204 M02S00819.261l700 ---| ICN3 NZ B3,ICN2 IF MORE CHARACTERS TO CHECK
| Line S00820 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01205 M02S00820.261l700 ---| ICN4 GT B4,B1,ICN6 IF SEPARATOR REQUIRED
| Line S00821 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01206 M02S00821.261l700 ---| ICN5 SB4 B4-1
| Line S00822 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01207 M02S00822.261l700 ---| PL B4,ICN1 IF MORE CHARGE/PROJECT
| Line S00823 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01208 M02S00823.261l700 ---| SX2 1R.
| Line S00824 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01209 M02S00824.261l700 ---| LX2 -6
| Line S00825 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01210 M02S00825.261l700 ---| BX6 X2+X6 MERGE TERMINATOR
| Line S00826 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01211 M02S00826.261l700 ---| MX7 0
| Line S00827 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01212 M02S00827.261l700 ---| LX6 B2 LEFT JUSTIFY
| Line S00828 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01213 M02S00828.261l700 ---| SA7 B7+B1
| Line S00829 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01214 M02S00829.261l700 ---| SA6 B7 STORE LAST WORD AND ZERO WORD
| Line S00830 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01215 M02S00830.261l700 ---|
| Line S00831 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01216 M02S00831.261l700 ---|* SET UP SRU MULTIPLIERS.
| Line S00832 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01217 M02S00832.261l700 ---|
| Line S00833 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01218 M02S00833.261l700 ---| SA1 SRM SRU INDICES
| Line S00834 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01219 M02S00834.261l700 ---| SA2 TSRM
| Line S00835 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01220 M02S00835.261l700 ---| RJ CCC CALCULATE CHARGE CONSTANTS
| Line S00836 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01221 M02S00836.261l700 ---| SA6 SRUM
| Line S00837 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01222 M02S00837.261l700 ---| RECALL P
| Line S00838 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01223 M02S00838.261l700 ---|
| Line S00839 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns2323 |
M03 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01224 M03S00839.261l700 ---|* CALL *CPM* TO ISSUE APPROPRIATE ACCOUNT FILE MESSAGES.
| Line S00840 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns2323 |
M03 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01225 M03S00840.261l700 ---|* CLEAR *CHARGE REQUIRED* BIT IN CP AREA.
| Line S00011 Modification History |
M01 (Added by) | ns2323 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01226 M02S00011.261l700 ---|* CALL *CPM* TO BEGIN ACCOUNT BLOCK.
| Line S00841 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01227 M02S00841.261l700 ---|
| Line S00842 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns22000 |
M03 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01228 M03S00842.261l700 ---| ICN5.1 SX1 SRUM SET BLOCK ADDRESS
| Line S00843 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns22000 |
M03 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01229 M03S00843.261l700 ---| SX2 42B SET CPM FUNCTION CODE
| Line S00844 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns22000 |
M03 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01230 M03S00844.261l700 ---| RJ =XCPM=
| Line S00118 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01231 M02S00118.261l700 ---| BEGINAB SRUM BEGIN ACCOUNT BLOCK
| Line S00845 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns2323 |
M03 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01232 M03S00845.261l700 ---| SA1 SSJ=+UIDS CLEAR CHARGE REQUIRED
| Line S00846 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns2323 |
M03 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01233 M03S00846.261l700 ---| MX0 -1
| Line S00847 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns2323 |
M03 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01234 M03S00847.261l700 ---| LX0 17
| Line S00848 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns2323 |
M03 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01235 M03S00848.261l700 ---| BX6 X0*X1
| Line S00849 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns2323 |
M03 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01236 M03S00849.261l700 ---| SA6 A1
| Line S00850 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01237 M02S00850.261l700 ---| EQ ICNX RETURN
| Line S00851 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01238 M02S00851.261l700 ---|
| Line S00852 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01239 M02S00852.261l700 ---| ICN6 SB3 A1-ICNA
| Line S00853 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01240 M02S00853.261l700 ---| ZR B3,ICN5 IF SEPARATOR ALREADY SET
| Line S00854 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01241 M02S00854.261l700 ---| SA1 ICNA
| Line S00855 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01242 M02S00855.261l700 ---| SB3 ICNB SET SEPARATOR AND LENGTH
| Line S00856 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01243 M02S00856.261l700 ---| EQ ICN2 CONTINUE BUILDING MESSAGE
| Line S00857 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01244 M02S00857.261l700 ---|
| Line S00858 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01245 M02S00858.261l700 ---| ICN7 SA6 B7 STORE FIRST/NEXT MESSAGE WORD
| Line S00859 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01246 M02S00859.261l700 ---| SB7 B7+B1
| Line S00860 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01247 M02S00860.261l700 ---| SB2 60
| Line S00861 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01248 M02S00861.261l700 ---| SX6 B0+ CLEAR BUILD WORD
| Line S00862 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01249 M02S00862.261l700 ---| SB3 B3-6
| Line S00863 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01250 M02S00863.261l700 ---| EQ ICN3 CONTINUE THE BUILD
| Line S00864 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01251 M02S00864.261l700 ---|
| Line S00865 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01252 M02S00865.261l700 ---| .1 MICRO 1,,*, * SEPARATOR CHARACTERS
| Line S00866 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01253 M02S00866.261l700 ---| .2 MICCNT .1
| Line S00867 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01254 M02S00867.261l700 ---|
| Line S00868 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01255 M02S00868.261l700 ---| ICNA DATA L*".1"*
| Line S00869 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01256 M02S00869.261l700 ---| ICNB EQU .2*6
01257 M01S00870.comcchg +++| MWS SPACE 4,20
01258 M01S00871.comcchg +++|** MWS - MULTIPLE WORD TABLE SEARCH.
01259 M01S00872.comcchg +++|*
01260 M01S00873.comcchg +++|* ENTRY (A0) = BLOCK LEVEL.
01261 M01S00874.comcchg +++|* (B2) = FWA TABLE.
01262 M01S00875.comcchg +++|* (B3) = LIMIT OF TABLE (FWA+LENGTH).
01263 M01S00876.comcchg +++|* (B6) = ENTRY BLOCK ADDRESS.
01264 M01S00877.comcchg +++|* (B7) = WORD COUNT/ENTRY.
01265 M01S00878.comcchg +++|* (X5) = WORD COUNT/ ENTRY FOR COMPARE.
01266 M01S00879.comcchg +++|*
01267 M01S00880.comcchg +++|* ENTRY (X2) = (LAST WORD IN MATCHED ENTRY).
01268 M01S00881.comcchg +++|* (X2) = 0 IF ENTRY NOT FOUND.
01269 M01S00882.comcchg +++|* (B2) = NEXT TABLE ENTRY.
01270 M01S00883.comcchg +++|* (B3) = LIMIT OF TABLE.
01271 M01S00884.comcchg +++|*
01272 M01S00885.comcchg +++|* USES A - 0, 1, 2.
01273 M01S00886.comcchg +++|* X - 0, 1, 2, 3, 5.
01274 M01S00887.comcchg +++|* B - 2, 3, 4, 5.
01275 M01S00888.comcchg +++|
01276 M01S00889.comcchg +++|
01277 M01S00890.comcchg +++| MWS8 SB3 A0-B2
01278 M01S00891.comcchg +++| MX2 0 SET ERROR
01279 M01S00892.comcchg +++| ZR B3,MWSX IF FIRST ENTRY
01280 M01S00893.comcchg +++| ZR X0,MWS6 IF LEVEL-0
01281 M01S00894.comcchg +++|
01282 M01S00895.comcchg +++| MWS SUBR ENTRY/EXIT
01283 M01S00896.comcchg +++| EQ B2,B3,MWS7 IF NULL TABLE
01284 M01S00897.comcchg +++| BX5 -X5
01285 M01S00898.comcchg +++| SX0 A0
01286 M01S00899.comcchg +++| SX5 X5+B7
01287 M01S00900.comcchg +++| SA0 B2+
01288 M01S00901.comcchg +++| BX5 -X5
01289 M01S00902.comcchg +++| EQ MWS2 ENTER SEARCH LOOP
01290 M01S00903.comcchg +++|
01291 M01S00904.comcchg +++| MWS1 PL X3,MWS8 IF PAST NUMBER
01292 M01S00905.comcchg +++| SB2 B2+B7 INCREMENT TABLE ENTRY
01293 M01S00906.comcchg +++| MX2 0 SET ERROR
01294 M01S00907.comcchg +++| GE B2,B3,MWSX IF END OF TABLE
01295 M01S00908.comcchg +++| MWS2 SB5 B0+ INITIALIZE COMPARE
01296 M01S00909.comcchg +++| SB4 B7+X5
01297 M01S00910.comcchg +++| MWS3 SA2 B2+B5
01298 M01S00911.comcchg +++| SA1 B6+B5
01299 M01S00912.comcchg +++| NG X2,MWS4 IF AT LEAST ONE NEGATIVE
01300 M01S00913.comcchg +++| PL X1,MWS5 IF BOTH POSITIVE
01301 M01S00914.comcchg +++| SX3 -B1 SET ENTRY NOT REACHED
01302 M01S00915.comcchg +++| EQ MWS1 CONTINUE SEARCH
01303 M01S00916.comcchg +++|
01304 M01S00917.comcchg +++| MWS4 NG X1,MWS5 IF BOTH NEGATIVE
01305 M01S00918.comcchg +++| SX3 B1 SET PAST ENTRY
01306 M01S00919.comcchg +++| EQ MWS1 CONTINUE SEARCH
01307 M01S00920.comcchg +++|
01308 M01S00921.comcchg +++| MWS5 IX3 X2-X1
01309 M01S00922.comcchg +++| NZ X3,MWS1 IF NO MATCH
01310 M01S00923.comcchg +++| SB5 B5+B1
01311 M01S00924.comcchg +++| LT B5,B4,MWS3 IF NOT END OF COMPARE
01312 M01S00925.comcchg +++| SB2 B2+B7
01313 M01S00926.comcchg +++| MWS6 SA2 B2-B1 SET LAST WORD OF ENTRY
01314 M01S00927.comcchg +++| EQ MWSX RETURN
01315 M01S00928.comcchg +++|
01316 M01S00929.comcchg +++| MWS7 MX2 0 SET ERROR
01317 M01S00930.comcchg +++| EQ MWSX RETURN
| Line S00119 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01318 M02S00119.261l700 ---| PPE$ IF DEF,PPE$
| Line S00120 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01319 M02S00120.261l700 ---| PPE SPACE 4,15
| Line S00121 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01320 M02S00121.261l700 ---|** PPE - PASS PROJECT PROLOGUE/EPILOGUE PARAMETERS.
| Line S00122 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01321 M02S00122.261l700 ---|*
| Line S00123 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01322 M02S00123.261l700 ---|* ENTRY (B5) = ADDRESS OF PROJECT ENTRY.
| Line S00124 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01323 M02S00124.261l700 ---|*
| Line S00125 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01324 M02S00125.261l700 ---|* EXIT PROLOGUE/EPILOGUE PARAMETERS SET IN (SRUM+1).
| Line S00126 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01325 M02S00126.261l700 ---|* (PPF) = PROJECT PROLOGUE FILE NAME.
| Line S00127 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01326 M02S00127.261l700 ---|* (PPU) = PROJECT PROLOGUE USER NAME.
| Line S00128 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01327 M02S00128.261l700 ---|* (PPW) = PROJECT PROLOGUE PASSWORD.
| Line S00129 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01328 M02S00129.261l700 ---|*
| Line S00130 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01329 M02S00130.261l700 ---|* A - 1, 2, 3, 4, 5.
| Line S00131 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01330 M02S00131.261l700 ---|* X - 0, 1, 2, 3, 4, 5, 6, 7.
| Line S00132 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01331 M02S00132.261l700 ---|
| Line S00133 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01332 M02S00133.261l700 ---|
| Line S00134 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01333 M02S00134.261l700 ---| PPE SUBR ENTRY/EXIT
| Line S00135 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01334 M02S00135.261l700 ---| SA1 SRUM+1 READ *CPM* PARAMETER WORD
| Line S00136 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01335 M02S00136.261l700 ---| SA2 B5+PPNW READ PROJECT PROLOGUE FILE NAME
| Line S00137 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01336 M02S00137.261l700 ---| MX0 42
| Line S00138 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01337 M02S00138.261l700 ---| SX5 B1
| Line S00139 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01338 M02S00139.261l700 ---| LX5 52-0
| Line S00140 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01339 M02S00140.261l700 ---| BX6 X0*X2
| Line S00141 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01340 M02S00141.261l700 ---| ZR X6,PPE1 IF NO PROJECT PROLOGUE DEFINED
| Line S00142 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01341 M02S00142.261l700 ---| SA6 PPF SET PROJECT PROLOGUE FILE NAME
| Line S00143 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01342 M02S00143.261l700 ---| SA3 B5+PPUW READ PROJECT PROLOGUE USER NAME
| Line S00144 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01343 M02S00144.261l700 ---| SA4 B5+PPPW READ PROJECT PROLOGUE PASSWORD
| Line S00145 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01344 M02S00145.261l700 ---| BX6 X0*X3
| Line S00146 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01345 M02S00146.261l700 ---| BX7 X0*X4
| Line S00147 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01346 M02S00147.261l700 ---| SA6 PPU SET PROJECT PROLOGUE USER NAME
| Line S00148 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01347 M02S00148.261l700 ---| SA7 PPP SET PROJECT PROLOGUE PASSWORD
| Line S00149 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01348 M02S00149.261l700 ---| SX7 3
| Line S00150 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01349 M02S00150.261l700 ---| BX1 X1+X5 SET PROJECT PROLOGUE REQUIRED FLAG
| Line S00151 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01350 M02S00151.261l700 ---| BX7 X7*X2 SET CHARGE REQUIRED OPTION
| Line S00152 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01351 M02S00152.261l700 ---| LX7 50-0
| Line S00153 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01352 M02S00153.261l700 ---| BX1 X1+X7
| Line S00154 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01353 M02S00154.261l700 ---| PPE1 SA2 B5+PENW
| Line S00155 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01354 M02S00155.261l700 ---| BX2 X0*X2
| Line S00156 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01355 M02S00156.261l700 ---| ZR X2,PPE2 IF NO PROJECT EPILOGUE DEFINED
| Line S00157 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01356 M02S00157.261l700 ---| LX5 53-52 SET PROJECT EPILOGUE REQUIRED FLAG
| Line S00158 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01357 M02S00158.261l700 ---| BX1 X1+X5
| Line S00159 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01358 M02S00159.261l700 ---| PPE2 BX6 X1 WRITE *CPM* PARAMETER WORD
| Line S00160 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01359 M02S00160.261l700 ---| SA6 A1
| Line S00161 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01360 M02S00161.261l700 ---| EQ PPEX RETURN
| Line S00162 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01361 M02S00162.261l700 ---| PPE$ ENDIF
01362 M01S00931.comcchg +++| RPR SPACE 4,15
01363 M01S00932.comcchg +++|** RPR - READ PHYSICAL RECORD.
01364 M01S00933.comcchg +++|*
01365 M01S00934.comcchg +++|* ENTRY (X2) = RANDOM ADDRESS OF RECORD (BITS 0 - 17).
01366 M01S00935.comcchg +++|*
01367 M01S00936.comcchg +++|* EXIT RECORD IN PROFILO BUFFER.
01368 M01S00937.comcchg +++|*
01369 M01S00938.comcchg +++|* USES A - 2, 3, 6, 7.
01370 M01S00939.comcchg +++|* X - 0, 2, 3, 6, 7.
01371 M01S00940.comcchg +++|*
01372 M01S00941.comcchg +++|* MACROS ERROR, RPHR.
01373 M01S00942.comcchg +++|
01374 M01S00943.comcchg +++|
01375 M01S00944.comcchg +++| RPR SUBR ENTRY/EXIT
01376 M01S00945.comcchg +++| SA3 P+1
01377 M01S00946.comcchg +++| SX6 X3
01378 M01S00947.comcchg +++| SA6 A3+B1
01379 M01S00948.comcchg +++| SA6 A6+B1
01380 M01S00949.comcchg +++| SX7 X2
01381 M01S00950.comcchg +++| SA7 P+6
01382 M01S00951.comcchg +++| RPHR P,R
01383 M01S00952.comcchg +++| SA2 X2
01384 M01S00953.comcchg +++| MX0 -8
01385 M01S00954.comcchg +++| LX0 10
01386 M01S00955.comcchg +++| BX3 -X0*X2
01387 M01S00956.comcchg +++| ZR X3,RPRX IF NO ERROR
01388 M01S00957.comcchg +++| ERROR ERRE * DATA BASE ERROR.*
01389 M01S00958.comcchg +++| SUR SPACE 4,20
| Line S00959 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
01390 M02S00959.v23l617 ---|** SUR - SEARCH USER NUMBER RANGE.
01391 M01S00029.v23l617 +++|** SUR - SEARCH USER NAME RANGE.
01392 M01S00960.comcchg +++|*
| Line S00961 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
01393 M02S00961.v23l617 ---|* ENTRY (X1) = USER NUMBER TO SEARCH FOR.
01394 M01S00030.v23l617 +++|* ENTRY (X1) = USER NAME TO SEARCH FOR.
01395 M01S00962.comcchg +++|* (B2) = LOWER RANGE ADDRESS.
01396 M01S00963.comcchg +++|* (B3) = UPPER RANGE ADDRESS + 1.
01397 M01S00964.comcchg +++|*
01398 M01S00965.comcchg +++|* EXIT (X4) = 0, IF MATCH.
| Line S00966 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
01399 M02S00966.v23l617 ---|* (X4) = 1, IF USER NUMBER NOT IN LIST (LOWER 18
| Line S00967 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
01400 M02S00967.v23l617 ---|* BITS OF USER NUMBER ENTRY EQUALS 1).
01401 M01S00031.v23l617 +++|* (X4) = 1, IF USER NAME NOT IN LIST (LOWER 18
01402 M01S00032.v23l617 +++|* BITS OF USER NAME ENTRY EQUALS 1).
01403 M01S00968.comcchg +++|* (X4) = OTHER, IF END OF RANGE ENCOUNTERED
01404 M01S00969.comcchg +++|* (NOTE - NOT NECESSARILY END OF LIST).
01405 M01S00970.comcchg +++|*
01406 M01S00971.comcchg +++|* USES X - 3, 4.
01407 M01S00972.comcchg +++|* A - 3.
01408 M01S00973.comcchg +++|* B - 2.
01409 M01S00974.comcchg +++|
01410 M01S00975.comcchg +++|
01411 M01S00976.comcchg +++| SUR SUBR ENTRY/EXIT
01412 M01S00977.comcchg +++| SUR1 SA3 B2
01413 M01S00978.comcchg +++| SX4 X3
| Line S00979 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
01414 M02S00979.v23l617 ---| NZ X4,SURX IF USER NUMBER NOT IN LIST
01415 M01S00033.v23l617 +++| NZ X4,SURX IF USER NAME NOT IN LIST
01416 M01S00980.comcchg +++| BX4 X1-X3
01417 M01S00981.comcchg +++| ZR X4,SURX IF MATCH
01418 M01S00982.comcchg +++| SB2 B2+B1
| Line S00983 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
01419 M02S00983.v23l617 ---| LT B2,B3,SUR1 IF ANOTHER USER NUMBER IN RANGE
01420 M01S00034.v23l617 +++| LT B2,B3,SUR1 IF ANOTHER USER NAME IN RANGE
01421 M01S00984.comcchg +++| EQ SURX RETURN
01422 M01S00985.comcchg +++| TITLE COMCCHG - TABLES AND BUFFERS.
01423 M01S00986.comcchg +++| SPACE 4,10
| Line S00987 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01424 M02S00987.261l700 ---|** PRESET DATA AREAS.
01425 M01S00208.261l700 +++|* DATA AREA.
01426 M01S00988.comcchg +++|
01427 M01S00989.comcchg +++|
01428 M01S00990.comcchg +++|* THE FOLLOWING TWO DEFINITIONS MUST BE CONTIGUOUS.
| Line S00001 Modification History |
M01 (Added by) | ns21000 |
M02 (Updated by) | ns2483 |
Seq # *Modification Id* Act
----------------------------+
01429 M02S00001.ns2483 ---|
| Line S00002 Modification History |
M01 (Added by) | ns21000 |
M02 (Updated by) | ns2483 |
Seq # *Modification Id* Act
----------------------------+
01430 M02S00002.ns2483 ---| LIST G
| Line S00003 Modification History |
M01 (Added by) | ns21000 |
M02 (Updated by) | ns2483 |
Seq # *Modification Id* Act
----------------------------+
01431 M02S00003.ns2483 ---| .BUF SET *
| Line S00004 Modification History |
M01 (Added by) | ns21000 |
M02 (Updated by) | ns2483 |
Seq # *Modification Id* Act
----------------------------+
01432 M02S00004.ns2483 ---| BEGIN BSSN .BUF
01433 M01S00991.comcchg +++|
01434 M01S00992.comcchg +++| DCF BSSN 1 DEFAULT CHARGE FLAG
01435 M01S00993.comcchg +++| SRM BSSN 1 SRU MULTIPLIER INDICES
01436 M01S00994.comcchg +++| CDT BSSN 1 CURRENT DATA AND TIME
01437 M01S00995.comcchg +++|
| Line S00996 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
01438 M02S00996.v23l617 ---| CUN BSSN 1 CURRENT USER NUMBER
| Line S00997 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act
----------------------------+
01439 M02S00997.v23l617 ---| MUN BSSN 1 MASTER USER NUMBER
01440 M01S00035.v23l617 +++| CUN BSSN 1 CURRENT USER NAME
01441 M01S00036.v23l617 +++| MUN BSSN 1 MASTER USER NAME
01442 M01S00998.comcchg +++|
01443 M01S00999.comcchg +++| ERRM BSSN 5 PFM ERROR MESSAGE
| Line S01000 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01444 M02S01000.261l700 ---| BUFFERS SPACE 4
| Line S01001 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01445 M02S01001.261l700 ---|* VALIDATION FILE BUFFER.
01446 M01S00209.261l700 +++| BUFFERS SPACE 4,10
01447 M01S00210.261l700 +++|* BUFFERS.
01448 M01S01002.comcchg +++|
01449 M01S01003.comcchg +++|
| Line S01004 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01450 M02S01004.261l700 ---| PBUF BSSN PBUFL
01451 M01S00211.261l700 +++| PBUF BSSN PBUFL PROFILE FILE BUFFER
01452 M01S00212.261l700 +++| EBUF BSSN PMWE LEVEL 3 ENTRY BUFFER
01453 M01S00213.261l700 +++| BUFE BSSN 0 END OF BUFFERS
01454 M01S00005.ns21000 +++| END BSSN
01455 M01S01005.comcchg +++|
| Line S01006 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01456 M02S01006.261l700 ---| CHGL EQU PBUF+PBUFL END OF PRESET AREA
01457 M01S00214.261l700 +++| CHGL EQU BUFE END OF *COMCCHG*
| Line S01007 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
01458 M02S01007.ns21000 ---|
| Line S01008 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
01459 M02S01008.ns21000 ---|
| Line S01009 Modification History |
M01 (Added by) | comcchg |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act
----------------------------+
01460 M02S01009.ns21000 ---| USE *
| Line S00006 Modification History |
M01 (Added by) | ns21000 |
M02 (Updated by) | ns2483 |
Seq # *Modification Id* Act
----------------------------+
01461 M02S00006.ns2483 ---|
| Line S00007 Modification History |
M01 (Added by) | ns21000 |
M02 (Updated by) | ns2483 |
Seq # *Modification Id* Act
----------------------------+
01462 M02S00007.ns2483 ---| LIST *
01463 M01S01010.comcchg +++| SPACE 4,10
01464 M01S01011.comcchg +++| QUAL$ IF -DEF,QUAL$
01465 M01S01012.comcchg +++| QUAL *
01466 M01S00215.261l700 +++| BAB EQU /COMCCHG/BAB
01467 M01S01013.comcchg +++| CHG EQU /COMCCHG/CHG
01468 M01S01014.comcchg +++| CHGL EQU /COMCCHG/CHGL
| Line S00163 Modification History |
M01 (Added by) | ns22000 |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act
----------------------------+
01469 M02S00163.261l700 ---| IF DEF,PPE$,1
01470 M01S00216.261l700 +++| IF DEF,RPE$,1
01471 M01S00164.ns22000 +++| RPE EQU /COMCCHG/RPE
01472 M01S00217.261l700 +++| VCN EQU /COMCCHG/VCN
01473 M01S01015.comcchg +++| QUAL$ ENDIF
01474 M01S01016.comcchg +++| BASE *
01475 M01S01017.comcchg +++| SPACE 4
01476 M01S01018.comcchg +++| ENDX