Trailing-Edge
-
PDP-10 Archives
-
BB-H348C-RM_1982
-
swskit-v21/listings/mcb/cnffnd.list
There are no other files named cnffnd.list in the archive.
CNFFND MACRO M1110 13-OCT-79 10:49 PAGE 3
1 .TITLE CNFFND
2 .IDENT /V01.00/
3 ;
4 ; COPYRIGHT (C) 1978 BY
5 ; DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS.
6 ;
7 ;
8 ; THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED
9 ; ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE
10 ; INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER
11 ; COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY
12 ; OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY
13 ; TRANSFERRED.
14 ;
15 ; THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE
16 ; AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT
17 ; CORPORATION.
18 ;
19 ; DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS
20 ; SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL.
21 ;
22 ;
23 ; MODULE DESCRIPTION:
24 ;
25 ; NCU UTILITY MODULE TO FIND A CONFIGURATION DATABASE ENTRYX
26 ;
27 ;
28 ; DISTRIBUTED SYSTEMS SOFTWARE ENGINEERING
29 ;
30 ; IDENT HISTORY:
31 ;
32 ; 1.00 10-FEB-78
33 ; VERSION 2.0 RELEASE
34 ;
CNFFND MACRO M1110 13-OCT-79 10:49 PAGE 4
36 ;
37 ;======================================================================;
38 ;++
39 ; +-------------------------------------------------+
40 ; I I
41 ; I C N F F N D I
42 ; I - - - - - - I
43 ; I I
44 ; +-------------------------------------------------+
45 ;
46 ; FUNCTION:
47 ;
48 ; UTILITY MODULE TO FIND A CONFIGURATION DATABASE ENTRY
49 ;
50 ; CALLING SEQUENCE: CALL CNFFND
51 ;
52 ; INPUT:
53 ;
54 ; R0 - ADDRESS OF IMAGE FIELD CONTAINING NODE NAME
55 ; R1 - ZERO IF ENTRY TO BE FOUND BY TARGET NAME, ADDRESS OF LINE ID
56 ; IF ENTRY TO BE FOUND BY SERVER ID
57 ;
58 ; OUTPUT:
59 ;
60 ; C-BIT - CLEAR IF ENTRY FOUND, SET IF NOT
61 ; R0 - IF ERROR, NICE ERROR RETURN CODE
62 ; R3 - IF SUCCESS, ADDRESS OF DATABASE ENTRY
63 ;
64 ; REQUIREMENTS:
65 ;
66 ; CONFIGURATION DATABASE:
67 ;
68 ; CNFDB - GLOBAL SYMBOL FOR ADDRESS OF FIRST ENTRY
69 ; CNFDBE - GLOBAL SYMBOL FOR END ADDRESS
70 ;
71 ; TEMPORARY MEMORY:
72 ;
73 ; FIRST SIX WORDS
74 ;
75 ; NICE MESSAGE SYMBOLS:
76 ;
77 ; NE$NOD - INVALID NODE NAME ERROR CODE
78 ; NE$SER - INVALID SERVER ID ERROR CODE
79 ;
80 ; CONFIGURATION DATABASE SYMBOLS:
81 ;
82 ; ENTLEN - LENGTH OF AN ENTRY
83 ;
84 ;--
85 ;======================================================================;
86 ;
87 ;
88 ; EXTERNAL MACROS
89 ;
90 .MCALL PROC,TEMMDF,NICDF,CNFDF
91 ;
92 ; DEFINE EXTERNAL SYMBOLS
CNFFND MACRO M1110 13-OCT-79 10:49 PAGE 4-1
93 ;
94 000000 NICDF ;NICE MESSAGE SYMBOLS
95 000000 CNFDF ;CONFIGURATION DATABASE SYMBOLS
96 ;
97 ; DEFINE LOCAL SYMBOLS
98 ;
99 000006 NODLEN = 6. ;MAXIMUM LENGTH OF A NODE NAME
100 ;
101 ; LABELS FOR TEMPORARY MEMORY
102 ;
103 000000' NODADR = TEMBLK ;ADDRESS OF IMAGE OF NODE NAME LOOKING FOR
104 000002' LINADR = TEMBLK+2 ;ADDRESS OF LINE LOOKING FOR
105 000004' LOCSER = TEMBLK+4 ;SET IF SERVER IS LOCAL NODE, CLEAR IF NOT
106 000006' LOCNAM = TEMBLK+6 ;6 BYTE SPACE FOR LOCAL NAME
107 ;
108 ; DEFINE READ/WRITE MEMORY
109 ;
110 000000 TEMMDF ;TEMPORARY MEMORY
CNFFND MACRO M1110 13-OCT-79 10:49 PAGE 5
112 ;
113 ; PROCEDURE BODY
114 ;
115 000000 PROC CNFFND
116 000000 010067 000000' MOV R0,NODADR ;SAVE ADDRESS OF NODE TO FIND
117 000004 010167 000002' MOV R1,LINADR ;SAVE ADDRESS OF LINE TO FIND
118 000010 105067 000004' CLRB LOCSER ;INITIALIZE TO LOCAL NODE NOT SERVER
119 000014 IF ; IDENTIFICATION BY SERVER
120 000014 FALSEB CLEAR LINADR
121 000022 THEN
122 000022 012701 000006 MOV #NODLEN,R1 ;MAXIMUM LENGTH OF NODE NAME
123 000026 012702 000006' MOV #LOCNAM,R2 ;ADDRESS OF SPACE FOR LOCAL NAME
124 000032 CALL LOCNOD ;GET LOCAL NODE NAME
125 000036 016700 000000' MOV NODADR,R0 ;POINT TO SERVER NAME IMAGE
126 000042 IF ; LENGTH OF LOCAL NAME = LENGTH OF SERVER NAME
127 000042 FALSEB NE R1,(R0)+
128 000046 THEN
129 000046 012702 000006' MOV #LOCNAM,R2 ;POINT TO LOCAL NAME
130 000052 CALL COMPAR ;COMPARE THE NODE NAMES
131 000056 IF ; MATCH
132 000056 FALSE CS
133 000060 THEN
134 000060 105267 000004' INCB LOCSER ;SET LOCAL NODE IS SERVER
135 000064 ENDIF
136 000064 ENDIF
137 000064 ENDIF
138 000064 012703 000000G MOV #CNFDB,R3 ;FIRST ENTRY IN CONFIGURATION DATABASE
139 000070 WHILE ; CURRENT ADDRESS < END AND NO MATCH
140 000070 FALSE HIS R3,#CNFDBE
141 000076 CALL COMENT
142 000102 FALSE CC
143 000104 DO
144 000104 062703 000034 ADD #ENTLEN,R3 ;MOVE TO NEXT ENTRY
145 000110 ENDWHILE
146 000112 IF ; NO MATCH FOUND
147 000112 FALSE LO R3,#CNFDBE
148 000120 THEN
149 000120 IF ; IDENTIFICATION BY SERVER
150 000120 FALSEB CLEAR LINADR
151 000126 THEN
152 000126 012700 177764 MOV #NE$SER,R0 ;INVALID SERVER ID
153 000132 ELSE
154 000134 012700 177765 MOV #NE$NOD,R0 ;INVALID NODE NAME
155 000140 ENDIF
156 000140 000261 SEC ;FLAG AN ERROR
157 000142 ELSE
158 000144 000241 CLC ;SUCCESS
159 000146 ENDIF
160 000146 ENDPROC
CNFFND MACRO M1110 13-OCT-79 10:49 PAGE 6
162 ;
163 ;======================================================================;
164 ;++
165 ; +-------------------------------------------------+
166 ; I I
167 ; I C O M P A R I
168 ; I - - - - - - I
169 ; I I
170 ; +-------------------------------------------------+
171 ;
172 ; FUNCTION:
173 ;
174 ; LOCAL MODULE TO COMPARE TWO IMAGE FIELDS FOR CNFFND
175 ;
176 ; CALLING SEQUENCE: CALL COMPAR
177 ;
178 ; INPUT:
179 ;
180 ; R0 - ADDRESS OF ONE STRING
181 ; R1 - LENGTH TO COMPARE
182 ; R2 - ADDRESS OF OTHER STRING
183 ;
184 ; OUTPUT:
185 ;
186 ; C-BIT - CLEAR IF MATCHED, SET IF NOT
187 ;
188 ;--
189 ;======================================================================;
190 ;
191 ;
192 ; LOCAL PROCEDURE BODY
193 ;
194 000150 PROCLC COMPAR
195 000150 WHILE ; COUNT > 0 AND BYTES MATCH
196 000150 FALSE LE R1
197 000154 FALSEB NE (R0)+,(R2)+
198 000160 DO
199 000160 005301 DEC R1 ;DECREMENT COUNT
200 000162 ENDWHILE
201 000164 IF ; COUNT EXHAUSTED
202 000164 FALSE SET R1
203 000170 THEN
204 000170 000241 CLC ;MATCHED
205 000172 ELSE
206 000174 000261 SEC ;DIDN'T MATCH
207 000176 ENDIF
208 000176 ENDPROC
CNFFND MACRO M1110 13-OCT-79 10:49 PAGE 7
210 ;
211 ;======================================================================;
212 ;++
213 ; +-------------------------------------------------+
214 ; I I
215 ; I C O M E N T I
216 ; I - - - - - - I
217 ; I I
218 ; +-------------------------------------------------+
219 ;
220 ; FUNCTION:
221 ;
222 ; LOCAL MODULE TO COMPARE AN ENTRY WITH SEARCH PARAMETERS FOR CNFFND
223 ;
224 ; CALLING SEQUENCE: CALL COMENT
225 ;
226 ; INPUT:
227 ;
228 ; R3 - ADDRESS OF ENTRY TO CHECK
229 ; LINADR - ZERO IF COMPARE BY TARGET NAME, ADDRESS OF LINE ID IF
230 ; COMPARE BY SERVER
231 ; LOCSER - SET IF LOCAL NODE IS SERVER
232 ; NODADR - ADDRESS OF NODE NAME IMAGE
233 ;
234 ; OUTPUT:
235 ;
236 ; C-BIT - CLEAR IF MATCH, SET IF NOT
237 ;
238 ; REQUIREMENTS:
239 ;
240 ; CONFIGURATION DATABASE SYMBOLS:
241 ;
242 ; SVLNAD - OFFSET OF SERVER LINE ID IN ENTRY
243 ; SVNMAD - OFFSET OF SERVER NAME ADDRESS AND LENGTH IN ENTRY
244 ; TGNMAD - OFFSET OF TARGET NAME ADDRESS AND LENGTH IN ENTRY
245 ;
246 ;--
247 ;======================================================================;
248 ;
249 ;
250 ; LOCAL PROCEDURE BODY
251 ;
252 000200 PROCLC COMENT
253 000200 016700 000000' MOV NODADR,R0 ;NAME LOOKING FOR
254 000204 IF ; IDENTIFICATION BY SERVER
255 000204 FALSE CLEAR LINADR
256 000212 THEN
257 000212 012702 000004 MOV #SVNMAD,R2 ;OFFSET OF SERVER NAME ADDRESS IN DATABASE
258 000216 ELSE
259 000220 012702 000000 MOV #TGNMAD,R2 ;OFFSET OF TARGET NAME ADDRESS IN DATABASE
260 000224 ENDIF
261 000224 060302 ADD R3,R2 ;POINT TO NAME ADDRESS IN DATABASE
262 000226 IF ; LENGTH LOOKING FOR <> LENGTH IN DATABASE
263 000226 FALSEB EQ (R0)+,2(R2)
264 000234 THEN
265 000234 IF ; LOCAL NODE IS SERVER AND DATABASE SERVER IS DEFAULTED
266 000234 FALSEB CLEAR LOCSER
CNFFND MACRO M1110 13-OCT-79 10:49 PAGE 7-1
267 000242 FALSEB SET 2(R2)
268 000250 THEN
269 000250 000241 CLC ;SUCCESS
270 000252 ELSE
271 000254 000261 SEC ;NO MATCH
272 000256 ENDIF
273 000256 ELSE
274 000260 016201 000002 MOV 2(R2),R1 ;LENGTH OF BOTH NAMES, FROM DATABASE
275 000264 011202 MOV (R2),R2 ;ADDRESS OF NAME IN DATABASE
276 000266 CALL COMPAR ;COMPARE THEM
277 000272 ENDIF
278 000272 IF ; NAMES MATCH AND IDENTIFICATION BY SERVER
279 000272 FALSE CS
280 000274 FALSE CLEAR LINADR
281 000302 THEN
282 000302 016700 000002' MOV LINADR,R0 ;ADDRESS OF SERVER LINE TO MATCH
283 000306 012701 000004 MOV #4,R1 ;LENGTH OF LINE ID
284 000312 012702 000010 MOV #SVLNID,R2 ;OFFSET OF SERVER LINE IN DATABASE
285 000316 060302 ADD R3,R2 ;MAKE IT AN ADDRESS
286 000320 CALL COMPAR ;COMPARE THE LINE IDS
287 000324 ENDIF
288 000324 ENDPROC
289 000001 .END
CNFFND MACRO M1110 13-OCT-79 10:49 PAGE 7-2
SYMBOL TABLE
A$$CHK= 000000 F$CLLK= 000006 F$TRMS= 000002 ND$RMS= 000003 N$LOAD= 000002
A$$CPS= 000000 F$CLLN= 000002 F$WRBK= 000000 ND$ZLC= 000000 N$LOGD= 000001
A$$TRP= 000000 F$DPOS= 000001 F$WRCL= 000001 ND$ZLN= 000002 N$LOOP= 000005
BTPSAD= 000024 F$DUMP= 000000 F$WRCM= 000000 ND$ZRM= 000001 N$RDIN= 000010
CNFDB = ****** GX F$EVNT= 000001 F$WRRC= 000000 NE$CON= 177762 N$STPR= 000007
CNFDBE= ****** GX F$EXAM= 000001 F$ZERO= 000001 NE$FIL= 177763 N$TEST= 000006
CNFFND 000000RG F$EXHO= 000000 F$ZRCN= 000001 NE$FIO= 177756 N$TRIG= 000004
COMENT 000200R F$GTCM= 000001 F$$LVL= 000001 NE$FOR= 177776 N$ZERO= 000011
COMPAR 000150R F$INCM= 000000 F$150 = 000002 NE$FUN= 177777 N$$USR= 000001
C$$CKP= 000000 F$INLU= 000001 F$300 = 000012 NE$LCO= 177766 N.MLEN= 000454
C$$ORE= 000400 F$IRLU= 000000 F$50 = 000002 NE$LID= 177770 PT$END= 000000
C$$RSH= 177564 F$LKLU= 000010 F$550 = 000002 NE$LPR= 177757 PT$HOS= 000003
DMFLAD= 000030 F$LNLU= 000002 G$$TPP= 000000 NE$LST= 177767 PT$NAM= 000001
DM$END= 000000 F$LNSR= 000001 G$$TSS= 000000 NE$NCO= 177755 PT$NUM= 000002
DM$MIM= 000002 F$LOAD= 000000 G$$TTK= 000000 NE$NIC= 177753 P$$P45= 000000
DM$PXA= 000003 F$LOGD= 000001 I$$RAR= 000000 NE$NOD= 177765 R$$DER= 000000
DM$SAD= 000001 F$LOOP= 000001 I$$RDN= 000000 NE$NOR= 177754 R$$K11= 000001
D$$BUG= 177514 F$NTCM= 000000 K$$CNT= 177546 NE$ORD= 177774 R$$SND= 000000
D$$ISK= 000000 F$OPCL= 000001 K$$CSR= 177546 NE$PAR= 177760 R$$11M= 000000
D$$L11= 000001 F$OPCO= 000000 K$$LDC= 000000 NE$RES= 177761 ST$DIS= 000006
ENTLEN= 000034 F$OPIN= 000000 K$$TPS= 000074 NE$SER= 177764 ST$ENA= 000005
FL$BOO= 000001 F$OPIR= 000000 LDFLAD= 000014 NE$STA= 177775 ST$LOO= 000003
FL$DUM= 000001 F$OPLK= 000005 LDPRAD= 000020 NL$BRC= 000001 ST$MAI= 000004
FL$LOA= 000001 F$OPLN= 000002 LD$LP = 000000 NL$BTR= 000002 ST$OFF= 000001
FL$LOO= 000001 F$OPLO= 000000 LINADR= 000002R 002 NL$RES= 000005 ST$ON = 000000
FR$LCC= 000001 F$OPOR= 000000 LI$KNO= 000000 NL$RLE= 000004 ST$SHU= 000002
FR$LCS= 000001 F$OPOT= 000000 LI$STA= 000001 NL$RTR= 000003 SVLNID= 000010
FR$LNC= 000001 F$ORLU= 000000 LI$STR= 000002 NL$TMO= 000006 SVNMAD= 000004
FR$LNL= 000001 F$OTLU= 000001 LOCNAM= 000006R 002 NL$ZRO= 000000 S$$WRG= 000000
FR$LNS= 000001 F$RCBK= 000002 LOCNOD= ****** GX NN$CAC= 000011 S$$YSZ= 001600
FR$RMC= 000001 F$RCEV= 000001 LOCSER= 000004R 002 NN$CNI= 000013 TEMBLK 000000R 002
FR$RML= 000001 F$RCIN= 000000 LS$DUM= 000002 NN$CNR= 000014 TEMBLN= 000032
FR$RMS= 000001 F$RCMA= 000000 LS$LOA= 000000 NN$EXT= 000003 TEMWLN= 000015
FS$HOS= 000001 F$RCMS= 000002 LS$LOO= 000001 NN$FMT= 000005 TGNMAD= 000000
FS$INT= 000000 F$RDBK= 000000 LS$TRI= 000004 NN$IZS= 000007 T$$KMG= 000000
FS$LLP= 000001 F$RDCM= 000000 LS$TRQ= 000003 NN$IZU= 000010 T$$MIN= 000000
FS$LOF= 000001 F$RDIN= 000001 L$$ASG= 000000 NN$MAC= 000012 V$$CTR= 001000
FS$LOG= 000001 F$RDIS= 000012 L$$DRV= 000000 NN$NKS= 000004 X$$DBT= 000000
FS$LST= 000001 F$RDRC= 000000 L$$P11= 000001 NN$RES= 000006 YES = 000001
FS$NET= 000001 F$RECO= 000001 L$$11R= 000000 NN$UMR= 000002 $$CSTA= 000000
FS$NST= 000000 F$RLBF= 000001 M$$CRB= 000124 NN$UMS= 000001 $$PRST= 000013
FS$PAS= 000001 F$RLCB= 000001 M$$CRX= 000000 NN$ZRO= 000000 $$STIX= 000777
FT$CNS= 000000 F$STBK= 000000 M$$FCS= 000000 NO = 000000 $$STNM= 000000
FT$NOD= 000001 F$STPR= 000001 M$$OVR= 000000 NODADR= 000000R 002 $$S772= 000077
FT$TSK= 000001 F$STPS= 000006 ND$BAD= 177777 NODLEN= 000006 $$S773= 000011
F$ALBF= 000001 F$TEST= 000001 ND$LCC= 000000 NS$SUC= 000001 $$S774= 000077
F$ALCB= 000001 F$TRAC= 000000 ND$LCS= 000001 N$DPOS= 000014 $$S775= 000011
F$CB = 000017 F$TRBK= 000001 ND$LNC= 000004 N$DUMP= 000003 $$S776= 000000
F$CLCL= 000001 F$TRIG= 000001 ND$LNS= 000005 N$EXAM= 000015 $$S777= 000000
F$CLCO= 000000 F$TRIN= 000000 ND$RMC= 000002 N$LNSR= 000016 $$TRNM= 000000
F$CLFL= 000000 F$TRMA= 000000
. ABS. 000000 000
000326 001
TEMDAT 000032 002
ERRORS DETECTED: 0
VIRTUAL MEMORY USED: 8919 WORDS ( 35 PAGES)
CNFFND MACRO M1110 13-OCT-79 10:49 PAGE 7-3
SYMBOL TABLE
DYNAMIC MEMORY: 10060 WORDS ( 38 PAGES)
ELAPSED TIME: 00:00:53
CNFFND,[135,30]CNFFND/CR/-SP=[130,10]NETLIB/ML,[135,10]CFGNIC/PA:1,CNFFND
CNFFND CREATED BY MACRO ON 13-OCT-79 AT 10:49 PAGE 1
SYMBOL CROSS REFERENCE CREF
SYMBOL VALUE REFERENCES
CNFDB = ****** GX 5-138
CNFDBE = ****** GX 5-140 5-147
CNFFND 000000 RG #5-115
COMENT 000200 R 5-141 #7-252
COMPAR 000150 R 5-130 #6-194 7-276 7-286
ENTLEN = 000034 5-144
F$TRAC = 000000 5-115 5-115 5-160 5-160 6-194 6-194 6-208 6-208 7-252
7-252 7-288 7-288
I$$AS = ****** 5-115 6-194 7-252
LINADR = 000002 R #4-104 *5-117 5-120 5-150 7-255 7-280 7-282
LOCNAM = 000006 R #4-106 5-123 5-129
LOCNOD = ****** GX 5-124
LOCSER = 000004 R #4-105 *5-118 *5-134 7-266
NE$NOD = 177765 5-154
NE$SER = 177764 5-152
NODADR = 000000 R #4-103 *5-116 5-125 7-253
NODLEN = 000006 #4-99 5-122
R$$11D = ****** 5-115 6-194 7-252
R$$11M = 000000 5-115 6-194 7-252
SVLNID = 000010 7-284
SVNMAD = 000004 7-257
TEMBLK 000000 R 4-103 4-104 4-105 4-106 #4-110
TEMBLN = 000032 #4-110
TEMWLN = 000015 #4-110 4-110 4-110
TGNMAD = 000000 7-259
$$CSTA = 000000 #5-115 #6-194 #7-252
$$PRST = 000013 #5-115 5-119 #5-119 *5-126 #5-126 5-131 #5-131 *5-139 #5-139
5-146 #5-146 5-149 #5-149 #6-194 6-195 #6-195 6-201 #6-201
#7-252 *7-254 #7-254 7-262 #7-262 7-265 #7-265 7-278 #7-278
$$SLST = ****** 5-115 5-120 5-120 5-121 5-127 5-127 5-128 5-132 5-133
5-135 5-136 5-137 5-139 5-140 5-140 5-142 5-143 5-145
5-145 5-147 5-147 5-148 5-150 5-150 5-151 5-153 5-153
5-155 5-157 5-157 5-159 5-160 6-194 6-195 6-196 6-196
6-197 6-197 6-198 6-200 6-200 6-202 6-202 6-203 6-205
6-205 6-207 6-208 7-252 7-255 7-255 7-256 7-258 7-258
7-260 7-263 7-263 7-264 7-266 7-266 7-267 7-267 7-268
7-270 7-270 7-272 7-273 7-273 7-277 7-279 7-280 7-280
7-281 7-287 7-288
$$STIX = 000777 #5-115 5-119 5-119 #5-119 5-119 5-119 #5-119 *5-126 *5-126
#5-126 *5-126 *5-126 #5-126 5-131 5-131 #5-131 5-131 5-131
#5-131 5-135 #5-135 5-135 5-135 #5-135 5-135 5-136 #5-136
5-136 5-136 #5-136 5-136 5-137 #5-137 5-137 5-137 #5-137
5-137 *5-139 *5-139 #5-139 *5-139 *5-139 #5-139 5-145 #5-145
5-145 5-145 #5-145 5-145 5-146 5-146 #5-146 5-146 5-146
#5-146 5-149 5-149 #5-149 5-149 5-149 #5-149 5-155 #5-155
5-155 5-155 #5-155 5-155 5-159 #5-159 5-159 5-159 #5-159
5-159 #6-194 6-195 6-195 #6-195 6-195 6-195 #6-195 6-200
#6-200 6-200 6-200 #6-200 6-200 6-201 6-201 #6-201 6-201
6-201 #6-201 6-207 #6-207 6-207 6-207 #6-207 6-207 #7-252
*7-254 *7-254 #7-254 *7-254 *7-254 #7-254 7-260 #7-260 7-260
7-260 #7-260 7-260 7-262 7-262 #7-262 7-262 7-262 #7-262
7-265 7-265 #7-265 7-265 7-265 #7-265 7-272 #7-272 7-272
CNFFND CREATED BY MACRO ON 13-OCT-79 AT 10:49 PAGE 2
SYMBOL CROSS REFERENCE CREF
SYMBOL VALUE REFERENCES
7-272 #7-272 7-272 7-277 #7-277 7-277 7-277 #7-277 7-277
7-278 7-278 #7-278 7-278 7-278 #7-278 7-287 #7-287 7-287
7-287 #7-287 7-287
$$STNM = 000000 #5-115 5-119 #5-119 5-119 5-120 5-121 *5-126 #5-126 *5-126
5-127 5-128 5-131 #5-131 5-131 5-132 5-133 5-135 #5-135
5-136 #5-136 5-137 #5-137 *5-139 #5-139 *5-139 *5-139 5-140
5-142 5-143 5-145 5-145 #5-145 5-146 #5-146 5-146 5-147
5-148 5-149 #5-149 5-149 5-150 5-151 *5-153 5-153 *5-155
#5-155 5-157 5-157 5-159 #5-159 #6-194 6-195 #6-195 6-195
6-195 6-196 6-197 6-198 6-200 6-200 #6-200 6-201 #6-201
6-201 6-202 6-203 6-205 6-205 6-207 #6-207 #7-252 *7-254
#7-254 *7-254 7-255 7-256 *7-258 7-258 *7-260 #7-260 7-262
#7-262 7-262 7-263 7-264 7-265 #7-265 7-265 7-266 7-267
7-268 7-270 7-270 7-272 #7-272 7-273 7-273 7-277 #7-277
7-278 #7-278 7-278 7-279 7-280 7-281 7-287 #7-287
$$S772 = 000077 #5-131 5-135
$$S773 = 000011 #5-131 5-135
$$S774 = 000077 #5-126 5-136 #5-149 5-155 #7-265 7-272
$$S775 = 000011 #5-126 5-136 #5-149 5-155 #7-265 7-272
$$S776 = 000000 #5-119 5-137 #5-139 5-145 #5-146 5-159 #6-195 6-200 #6-201
6-207 #7-254 7-260 #7-262 7-277 #7-278 7-287
$$S777 = 000000 #5-119 5-137 #5-139 5-145 #5-146 5-159 #6-195 6-200 #6-201
6-207 #7-254 7-260 #7-262 7-277 #7-278 7-287
$$TRNM = 000000 #5-115 5-119 #5-119 5-120 5-121 *5-126 #5-126 5-127 5-128
5-131 #5-131 5-132 5-133 5-135 #5-135 5-136 #5-136 5-137
#5-137 *5-139 #5-139 5-140 5-142 5-143 5-145 #5-145 5-146
#5-146 5-147 5-148 5-149 #5-149 5-150 5-151 5-153 #5-153
*5-155 #5-155 5-157 #5-157 5-159 #5-159 #6-194 6-195 #6-195
6-196 6-197 6-198 6-200 #6-200 6-201 #6-201 6-202 6-203
6-205 #6-205 6-207 #6-207 #7-252 *7-254 #7-254 7-255 7-256
7-258 #7-258 *7-260 #7-260 7-262 #7-262 7-263 7-264 7-265
#7-265 7-266 7-267 7-268 7-270 #7-270 7-272 #7-272 7-273
#7-273 7-277 #7-277 7-278 #7-278 7-279 7-280 7-281 7-287
#7-287
CNFFND CREATED BY MACRO ON 13-OCT-79 AT 10:49 PAGE 3
MACRO CROSS REFERENCE CREF
MACRO NAME REFERENCES
CALL #5-124 #5-130 #5-141 #7-276 #7-286
CASE #5-115 #6-194 #7-252
CNFDF #4-90 4-95
DO #5-115 5-143 #6-194 6-198 #7-252
ELSE #5-115 5-153 5-157 #6-194 6-205 #7-252 7-258 7-270 7-273
ENDCAS #5-115 #6-194 #7-252
ENDIF #5-115 #5-135 #5-136 #5-137 #5-145 #5-155 #5-159 #6-194 #6-200 #6-207
#7-252 #7-260 #7-272 #7-277 #7-287
ENDPRO #5-115 5-160 #6-194 6-208 #7-252 7-288
ENDWHI #5-115 #5-145 #6-194 #6-200 #7-252
FALSE #5-115 5-132 5-140 5-142 5-147 #6-194 6-196 6-202 #7-252 7-255
7-279 7-280
FALSEB #5-115 5-120 5-127 5-150 #6-194 6-197 #7-252 7-263 7-266 7-267
IF #5-115 #5-119 #5-126 #5-131 #5-139 #5-146 #5-149 #6-194 #6-195 #6-201
#7-252 #7-254 #7-262 #7-265 #7-278
JMPPRO #5-115 #6-194 #7-252
NICDF #4-90 #4-94
ONCASE #5-115 #6-194 #7-252
PROC #4-90 5-115
PROCLC #5-115 6-194 #6-194 7-252 #7-252
SWSTK$ #5-115 #6-194 #7-252
TEMMDF #4-90 #4-110
THEN #5-115 #5-121 #5-128 #5-133 #5-143 #5-148 #5-151 #6-194 #6-198 #6-203
#7-252 #7-256 #7-264 #7-268 #7-281
TRUE #5-115 #6-194 #7-252
TRUEB #5-115 #6-194 #7-252
WHILE #5-115 5-139 #6-194 6-195 #7-252
$$BGND #5-115 #5-120 #5-127 #5-132 #5-140 #5-142 #5-147 #5-150 #6-194 #6-196
#6-197 #6-202 #7-252 #7-255 #7-263 #7-266 #7-267 #7-279 #7-280
$$BGNN #5-115 #5-120 #5-127 #5-132 #5-140 #5-142 #5-145 #5-147 #5-150 #5-153
#5-157 #6-194 #6-196 #6-197 #6-200 #6-202 #6-205 #7-252 #7-255 #7-258
#7-263 #7-266 #7-267 #7-270 #7-273 #7-279 #7-280
$$ELSE #5-115 5-153 5-157 #6-194 6-205 #7-252 7-258 7-270 7-273
$$GEN1 #5-115 #5-115 #5-120 #5-120 #5-121 #5-127 #5-128 #5-132 #5-133 #5-135
#5-136 #5-137 #5-139 #5-140 #5-142 #5-143 #5-145 #5-145 #5-147 #5-148
#5-150 #5-150 #5-151 #5-153 #5-153 #5-155 #5-157 #5-157 #5-159 #5-160
#6-194 #6-194 #6-195 #6-196 #6-196 #6-197 #6-198 #6-200 #6-200 #6-202
#6-202 #6-203 #6-205 #6-205 #6-207 #6-208 #7-252 #7-252 #7-255 #7-255
#7-256 #7-258 #7-258 #7-260 #7-263 #7-264 #7-266 #7-266 #7-267 #7-267
#7-268 #7-270 #7-270 #7-272 #7-273 #7-273 #7-277 #7-279 #7-280 #7-280
#7-281 #7-287 #7-288
$$GEN2 #5-115 #5-127 #5-140 #5-147 #6-194 #6-197 #7-252 #7-263
$$GNAB #5-115 5-127 5-132 5-140 5-142 5-147 #6-194 6-196 6-197 #7-252
7-263 7-279
$$GNBT #5-115 5-120 5-150 #6-194 6-202 #7-252 7-255 7-266 7-267 7-280
$$GNCM #5-115 #5-120 #5-127 #5-132 #5-140 #5-142 #5-147 #5-150 #6-194 #6-196
#6-197 #6-202 #7-252 #7-255 #7-263 #7-266 #7-267 #7-279 #7-280
$$INMC #5-115 5-115 #6-194 6-194 #7-252 7-252
$$INSY #5-115 5-115 #6-194 6-194 #7-252 7-252
$$LAB #5-115 5-121 5-128 5-133 5-135 5-136 5-137 5-139 5-143 5-145
5-148 5-151 5-153 5-155 5-157 5-159 #6-194 6-195 6-198 6-200
6-203 6-205 6-207 #7-252 7-256 7-258 7-260 7-264 7-268 7-270
CNFFND CREATED BY MACRO ON 13-OCT-79 AT 10:49 PAGE 4
MACRO CROSS REFERENCE CREF
MACRO NAME REFERENCES
7-272 7-273 7-277 7-281 7-287
$$POP #5-115 5-135 5-135 5-136 5-136 5-137 5-137 5-145 5-145 5-155
5-155 5-159 5-159 #6-194 6-200 6-200 6-207 6-207 #7-252 7-260
7-260 7-272 7-272 7-277 7-277 7-287 7-287
$$POPI #5-115 5-135 5-135 5-136 5-136 5-137 5-137 5-145 5-145 5-155
5-155 5-159 5-159 #6-194 6-200 6-200 6-207 6-207 #7-252 7-260
7-260 7-272 7-272 7-277 7-277 7-287 7-287
$$PUSH #5-115 5-119 5-119 5-126 5-126 5-131 5-131 5-139 5-139 5-146
5-146 5-149 5-149 #6-194 6-195 6-195 6-201 6-201 #7-252 7-254
7-254 7-262 7-262 7-265 7-265 7-278 7-278
$$STSM #5-115 #5-119 #5-119 #5-126 #5-126 #5-131 #5-131 #5-139 #5-139 #5-146
#5-146 #5-149 #5-149 #6-194 #6-195 #6-195 #6-201 #6-201 #7-252 #7-254
#7-254 #7-262 #7-262 #7-265 #7-265 #7-278 #7-278
$$SYS #5-115 #6-194 #7-252
$$TRCE #5-115 5-115 5-160 #6-194 6-194 6-208 #7-252 7-252 7-288