File: CCLTBL.LS of Disk: V50/Source/Source-Listing-MAC-1
(Source file text)
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 1
FILE # 1
1 /CCL INTERNAL TABLES FOR KBM V50
2 /
3 /
4 /
5 /
6 /
7 /
8 / CCL INTERNAL TABLES FOR KBM V50
9 / VERSION=5A
10
113
114 .LIST MEB
115 .GLOBAL GLIN
116 .GLOBAL SWTCHS
117 .GLOBAL EXTCM
118 .GLOBAL YBATCH,YDATE
119 .GLOBAL YFRTS,YF4
120 .GLOBAL YCCL,FNAME1
121 .GLOBAL CORE,CORSIZ
122 .GLOBAL LPTDEV,TTYDEV,PTPDEV
123 .EXTERNAL NMOVE,DONB,UNKN,MONRES
124 .EXTERNAL SETDEV
125 .EXTERNAL SETLPT,SETTTY,SETPTP,COLSET
126 .EXTERNAL TECSUB,MAKSUB,MNGSUB,TTSUB
127 .EXTERNAL USRSUB
128 .EXTERNAL MOVRT,KILRT,RENRT
129 .EXTERNAL EXSUB,LOSUB,FOSUB,GTOSUB
130 .EXTERNAL BASUB,DETCOR,DATE,DEASSIGN,SQSUB,VERTN,ZERSUB
131 .EXTERNAL YAT
132 .EXTERNAL CRSUB,EDSUB
133 .EXTERNAL TLKSUB,OPNSUB,CLOSUB,LGISUB,LGOSUB
134
135 0000 .DSECT PTBL
136
137 0000 FIELD 0
138 0200 .ASECT SWS
139 7360 *7360
140 0200 .ASECT LONGS
141 5000 *5000
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 3
FILE # 1
142
143
144
145 / LAYOUT:
146 / ASECT LONGS 5000 5566
147 / ASECT TABLES 6100 6567
148 / ASECT EXTNS 6600 6732
149 / ASECT FNAMES 7000 7155
150 / ASECT CORF0 7200 7356
151 / ASECT SWS 7360 7571
152
153 / FORMAT OF CCL TABLE
154
155 /ENTRY PURPOSE
156
157 / TABLE WIDTH=7 (BUT VARIES)
158
159 /0 FLAG WORD
160
161 /BIT MEANING IF ON
162
163 /0 PERFORM CD (IF 0, OMIT ENTRIES 1-6)
164 /1 DON'T PERMIT SPOOLING
165 /2 ALLOW .LS, .NB, .MP SWITCHES
166 /3 ADD _ TO END OF COMMAND STRING
167 /4 SET OUTPUT EXTENSION = INPUT EXTENSION (IF BIT 2 ON)
168 /5 RESERVED
169 /6-8 SPECIFIES AUTOMATIC INPUT REMEMBERING (REM LINE MINUS 1)
170 / 0 MEANS NONE. 7 RESERVED FOR SPECIAL USE.
171 /9 OPEN/CLOSE SPECIAL (ALLOW NON-EXISTING DEVS)
172 /10 CAUSE -L, ETC. TO GO TO 2ND OUTPUT FILE & COPIES NAME
173 /11 WANT DEFAULT ALTMODE (COMPL IF AMFLAG=1)
174
175 /1 PTR TO DEFAULT EXTENSION LIST FOR INPUT FILES.
176 / IF PTS TO 0, NONE. IF PTS TO 5200, USE SPECIAL MODE.
177
178 /2-4 DEFAULT SWITCHES TO BE OR'ED INTO THOSE
179 / EXPLICITLY GIVEN.
180
181 /5 ADDRESS OF SUBROUTINE TO BE CALLED
182 / AFTER C.D. HAS BEEN DONE. 0 IF NONE.
183
184 /6 PTR TO FILENAME OF PROGRAM
185 / TO BE CHAINED TO. 0 IF NONE.
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 4
FILE # 1
186
187
188
189
190
191
192
193
194
195
196 .MACRO .BOX COM,SPACES,STARS
197 LEN=.NCHARS COM
198 .PUSH .LISTWD
199 L1=LEN+4
200 L2=LEN+2
201 ;.LIST ME
202
203 / STARS[1:L1]
204 / STARS[1]SPACES[1:L2]STARS[1]
205 / STARS[1] COM STARS[1]
206 / STARS[1]SPACES[1:L2]STARS[1]
207 / STARS[1:L1]
208 .POP .LISTWD
209 .ENDM .BOX
210
211 .MACRO .EXT
212 .ENDM
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 5
FILE # 1
213
214
215
216
217
218
219
220
221
222
223 .MACRO .CMD COMAND,ABBREV,CODE,EXTEN,SWITCH,SUBR,PROGRM,LABEL
224 .BOX COMAND," ","****************"
225 ..=.
226 .DSECT PTBL
227 ;..
228 .SECT *
229 X'ABBREV, CODE
230 IFNZRO CODE&4000 <
231 ;EXTEN
232 .IF NBL SWITCH[1]<
233 XX="SWITCH[1]&77;YY=<XX-1>%12.;7643+YY;ZZ=XX-<YY^12.>
234 QQ=1
235 .REPT 12.-ZZ&17
236 QQ=QQ^2
237 .ENDR
238 ;QQ>
239 .IF NBL SWITCH[2]<
240 XX="SWITCH[2]&77;YY=<XX-1>%12.;7643+YY;ZZ=XX-<YY^12.>
241 QQ=1
242 .REPT 12.-ZZ&17
243 QQ=QQ^2
244 .ENDR
245 ;QQ>
246 ;0
247 .ASECT SWS
248 ..=.
249 .SECT *
250 .IF BL LABEL <;.. > /REMOVE IF DON'T WANT MULTIPLE CHARACTER SWITCHES
251 .IF NB LABEL <;LABEL>
252 ;SUBR
253 .IF NB PROGRM<
254 ;Y'PROGRM>
255 .IF BL PROGRM<
256 ;0>
257 >
258 IFZERO CODE&4000 <
259 ;EXTEN
260 .IF NB SWITCH<
261 ;Y'SWITCH>
262 .IF BL SWITCH<
263 ;0>
264 >
265 .ENDM
266
267
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 5-1
FILE # 1
268 .MACRO .EXTRA COMAND,ABBREV
269 .BOX COMAND," ","##################"
270 .DSECT PTBL
271 ;X'ABBREV
272 .SECT *
273 .ENDM
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 6
FILE # 1
274
275
276
277
278
279
280
281
282
283
284 .MACRO .QUAL LONG,SHORT,NAME
285 .ASECT LONGS
286 ..=.
287 ;TEXT "LONG[1:6]";"SHORT
288 .SECT *
289 .ASECT SWS
290 .IF NB NAME <NAME=.>
291 ;..
292 .SECT *
293 .ENDM
294
295
296 .MACRO .ENDQ
297 .ASECT SWS
298 ;0
299 .SECT *
300 .ENDM
301
302 .IF DF GERMAN <
303
304 .ASECT TABLES
305 FIELD 0
306 *6100
307
308
309 .CMD EXECUTE,EX,5013,EXTEXE, G, EXSUB, PAL8
310 /EXECUTE MUST BE FIRST FOR TECO EG
311 .ENDQ
312 .CMD ACID,AC,5011, EXTAC, , EXSUB, ACID
313 .QUAL KINHALT,N,ACOPT
314 .QUAL TRENNUNG,L
315 .ENDQ
316 .CMD BASIC,BA,0, BASUB, BASIC
317 .ENDQ
318 .CMD BOOT,BO,0, 0, BOOT
319 .ENDQ
320 .CMD TTL,TT,0, TTSUB, TECO
321 .ENDQ
322 .CMD CLOSE,CL,4004, STAR, , CLOSUB,
323 .ENDQ
324 .CMD COMPARE,COMPA,4001, EXTNUL, , SETTTY, SRCCOM
325 .QUAL NKOMMENTAR,C
326 .QUAL TEXT,S
327 .ENDQ
328 .CMD COM,COM,5013, EXTCOM, , EXSUB, PAL8
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 6-1
FILE # 1
329 .QUAL KISN,N
330 .QUAL OPTIMIZE,Q
331 .QUAL STARTE,G
332 .ENDQ
333 .CMD COPY,COP,4001, STAR, L, MOVRT, FOTP
334 .QUAL LOESCHE,D
335 .QUAL SICHER,N
336 .QUAL FORTSETZUNG,F
337 .QUAL HEUTE,C,LSTOPT
338 .QUAL NHEUTE,O
339 .QUAL FRAGE,Q
340 .QUAL DATUM,T
341 .QUAL REIHENFOLGE,U
342 .QUAL ANDERE,V
343 .QUAL RUHIG,H
344 .ENDQ
345 .CMD CREF,CREF,4002, EXTCF, C, 0, PAL8
346 .QUAL CREF,U
347 .QUAL RALF,R
348 .QUAL KLITERALS,X
349 .QUAL GROSS,M
350 .ENDQ
351 .CMD CREATE,CRE,4400,EXTNUL, , CRSUB, EDIT
352 .ENDQ
353 .CMD DATE,DA,0, DATE,
354 .ENDQ
355 .CMD DEASSIGN,DEA,0, DEASSIG,
356 .ENDQ
357 .CMD DELETE,DEL,4001,STAR, LD, KILRT, FOTP, LSTOPT
358 .CMD DIRECT,DI,4001, STAR, , COLSET, DIRECT
359 .QUAL ALPHAB,A
360 .QUAL BLOECKE,B
361 .QUAL HEUTE,C
362 .QUAL DATUM,D
363 .QUAL VOLLSTA,E
364 .QUAL KURZ,F
365 .QUAL LOECHER,M
366 .QUAL NHEUTE,O
367 .QUAL SEITE,P
368 .QUAL REST,R
369 .QUAL NEUE,T
370 .QUAL ANDERE,V
371 .QUAL ZUSATZ,X
372 .ENDQ
373 .EXTRA DRUCKEN,LI
374 .CMD DUPLIC,DU,4001, STAR, , 0, RXCOP
375 .QUAL NKOPIEREN,M
376 .QUAL PAUSE,P
377 .QUAL LESEN,R
378 .ENDQ
379 .CMD EDIT,ED,5230, EXTNUL, , EDSUB, EDIT
380 .ENDQ
381 .CMD FOCAL,FO,4071, STAR, , FOSUB, DPF
382 .QUAL KFUNKTION,N
383 .QUAL UNGENAU,6
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 6-2
FILE # 1
384 .QUAL SCHREIBE,W
385 .QUAL STARTE,G
386 .ENDQ
387 .CMD FUTIL,FU,4401, EXTSV, , 0, FUTIL
388 .ENDQ
389 .CMD GOTO,G,0, GTOSUB
390 .ENDQ
391 .CMD HELP,H,4001, STAR, T, SETTTY, HELP
392 .ENDQ
393 .EXTRA INHALT,DI
394 .CMD LAUF,LAU,4000, EXTBI, HS, 0, BATCH, SUBOPT
395 .EXTRA LADE,LO
396 .CMD LINK,LIN,5023, EXTLI, , LOSUB, LINK
397 .QUAL STARTE,G
398 .QUAL HALTS,H
399 .QUAL SPEICHER,K
400 .QUAL START,S
401 .ENDQ
402 .CMD LIST,LI,4001, STAR, U, SETLPT, FOTP, LSTOPT
403 .EXTRA LOESCHE,DEL
404 .CMD LOGIN,LOGI,0, LGISUB, BATCH
405 .ENDQ
406 .CMD LOGOUT,LOGO,0, LGOSUB, BATCH
407 .ENDQ
408 .CMD LOAD,LO,5023, EXTLO, , LOSUB, ABSLDR
409 .QUAL FORTSETZUNG,C
410 .QUAL IMAGE,I
411 .QUAL ALLESYMBOLE,S
412 .QUAL STARTE,G
413 / /8 /9 /START:N /FIELD:F /P
414 .ENDQ
415 .CMD MAKE,MACE,0, MAKSUB, TECO
416 .ENDQ
417 .EXTRA MACHE,MACE
418 .CMD MAC,MAC,5013, EXTMA, , EXSUB, MACREL
419 .QUAL KOPF,B
420 .QUAL CREF,C
421 .QUAL STARTE,G
422 .QUAL LINK,L
423 .QUAL PERMANENT,M
424 .QUAL NLISTEN,N
425 .QUAL EAE,Q
426 .QUAL KBATCH,Z
427 .QUAL FEHLER,X
428 .ENDQ
429 .CMD MAP,MAP,4001, EXTBN, , SETTTY, BITMAP
430 .ENDQ
431 .CMD MEMORY,ME,0, DETCOR,
432 .ENDQ
433 .CMD MUNG,MU,0, MNGSUB, TECO
434 .ENDQ
435 .EXTRA NAME,REN
436 .CMD OCOMP,OC,4001, STAR, TH, 0, OCOMP
437 .QUAL SUCHE,S
438 .QUAL SV,I
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 6-3
FILE # 1
439 .QUAL CCB,C
440 .ENDQ
441 .EXTRA OEFFNE,OP
442 .CMD OPEN,OP,4004, STAR, , OPNSUB,
443 .ENDQ
444 .CMD PAL,PA,5013, EXTPA, , EXSUB, PAL8
445 .QUAL CREF,C
446 .QUAL DDT,D
447 .QUAL LGFEHLER,E
448 .QUAL KFILLER,F
449 .QUAL STARTE,G
450 .QUAL KSEITEN,H
451 .QUAL LADE,L
452 .QUAL SYMBOLEN,N
453 .QUAL KSYMBOLEN,S
454 .QUAL VERGESSE,W
455 .QUAL BREIT,7
456 .ENDQ
457 / /K /T
458 .CMD PIP,PIP,4001, EXTNUL, , 0, PIP
459 .ENDQ
460 .CMD PRINT,PR,4000, STAR, , SETLPT, LPTSPL
461 .ENDQ
462 .CMD RENAME,REN,4001,STAR, LR, RENRT, FOTP, LSTOPT
463 .CMD RTES,RT,5011, EXTAC, , EXSUB, RTES, ACOPT
464 .EXTRA SCHLIESSE,CL
465 .EXTRA SENDE,TA
466 .CMD SET,SET,0, 0, SET
467 .ENDQ
468 .CMD SHSAVE,SH,4001, STAR, , 0, SHSAVE
469 .ENDQ
470 .EXTRA SPEICHER,ME
471 .CMD SQUISH,SQ,4001, EXTNUL, S, SQSUB, PIP
472 .QUAL OK,O
473 .QUAL RUHIG,H
474 .ENDQ
475 .CMD SUBMIT,SU,4000, EXTBI, , 0, BATCH
476 .QUAL KARTEN,C,SUBOPT
477 .QUAL KFEHLER,E
478 .QUAL RUHIG,H
479 .QUAL DRUCKER,L
480 .QUAL KBEDIENUNG,U
481 .QUAL SUBROUTINE,S
482 .QUAL 026,6
483 .ENDQ
484 .CMD SYSTEM,SY,4001,EXTSY, , SETTTY, RESORC
485 .QUAL ALLES,E
486 .QUAL KURZ,L
487 .ENDQ
488 .CMD TALK,TA,0, TLKSUB,
489 .ENDQ
490 .CMD TECO,TE,30, TECSUB, TECO
491 .ENDQ
492 .CMD TYPE,TY,4001, STAR, U, SETTTY, FOTP, LSTOPT
493 .CMD UA,UA,40, USRSUB,
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 6-4
FILE # 1
494 .ENDQ
495 .CMD UB,UB,50, USRSUB,
496 .ENDQ
497 .CMD UC,UC,60, USRSUB,
498 .ENDQ
499 .CMD UX,UX,0, USRSUB,
500 .ENDQ
501 .CMD USERA,USA,4001, EXTNUL, , 0, USERA
502 .ENDQ
503 .CMD USERB,USB,4001, EXTNUL, , 0, USERB
504 .ENDQ
505 .CMD USERC,USC,4001, EXTNUL, , 0, USERC
506 .ENDQ
507 .EXTRA VERDICHT,SQ
508 .EXTRA VERGLEICH,COMPA
509 .CMD VERSION,VE,0, VERTN,
510 .ENDQ
511 .EXTRA ZEIGE,TY
512 .CMD ZERO,ZERO,4401, EXTNUL, Z, ZERSUB, PIP
513 .ENDQ
514 / .CMD @,@,0, YAT,
515 / .ENDQ
516 ..=.
517 0;YAT;0
518 .DSECT PTBL
519 ..
520 0;0
521
522 >
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7
FILE # 1
523
524
525
526
527
528
529
530
531
532 .IF NDF GERMAN <
533
534 0200 .ASECT TABLES
535 0000 FIELD 0
536 6100 *6100
537
538
539 .CMD EXECUTE,EX,5013,EXTEXE, G, EXSUB, PAL8
/ ***********
/ * *
/ * EXECUTE *
/ * *
/ ***********
00000 6100
06100 5013 XEX, 5013
06101 6664
06102 7643
06103 0040
06104 0000
06105 7360
06106 0000 *
06107 7017
540 /EXECUTE MUST BE FIRST FOR TECO EG
541 .ENDQ
07360 0000
542 .CMD BASIC,BA,0, BASUB, BASIC
/ *********
/ * *
/ * BASIC *
/ * *
/ *********
00001 6110
06110 0000 XBA, 0
06111 0000 *
06112 7063
543 .ENDQ
07361 0000
544 .CMD BOOT,BO,0, 0, BOOT
/ ********
/ * *
/ * BOOT *
/ * *
/ ********
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-1
FILE # 1
00002 6113
06113 0000 XBO, 0
06114 0000
06115 7003
545 .ENDQ
07362 0000
546 .CMD CCL,CCL,0, MONRES,
/ *******
/ * *
/ * CCL *
/ * *
/ *******
00003 6116
06116 0000 XCCL, 0
06117 0000 *
06120 0000
547 .ENDQ
07363 0000
548 .CMD CLOSE,CL,4004, STAR, , CLOSUB,
/ *********
/ * *
/ * CLOSE *
/ * *
/ *********
00004 6121
06121 4004 XCL, 4004
06122 6600
06123 0000
06124 7364
06125 0000 *
06126 0000
549 .ENDQ
07364 0000
550 .CMD COMPARE,COMPA,4001, EXTNUL, , SETTTY, SRCCOM
/ ***********
/ * *
/ * COMPARE *
/ * *
/ ***********
00005 6127
06127 4001 XCOMPA, 4001
06130 6640
06131 0000
06132 7365
06133 0000 *
06134 7011
551 .QUAL NOCOMMENTS,C
05000 1617
05001 0317
05002 1515
05003 0000
05004 0303
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-2
FILE # 1
07365 5000
552 .QUAL NOSPACES,S
05005 1617
05006 2320
05007 0103
05010 0000
05011 0323
07366 5005
553 /.QUAL TABS,T
554 /.QUAL BLANKS,B
555 /.QUAL NOPRINTCOMMENTS,X
556 .ENDQ
07367 0000
557 .CMD COM,COM,5013, EXTCOM, , EXSUB, PAL8
/ *******
/ * *
/ * COM *
/ * *
/ *******
00006 6135
06135 5013 XCOM, 5013
06136 6714
06137 0000
06140 7370
06141 0000 *
06142 7017
558 .QUAL NOISN,N
05012 1617
05013 1123
05014 1600
05015 0316
07370 5012
559 .QUAL OPTIMIZE,Q
05016 1720
05017 2411
05020 1511
05021 0000
05022 0321
07371 5016
560 .QUAL GO,G
05023 0717
05024 0000
05025 0307
07372 5023
561 .ENDQ
07373 0000
562 .CMD COPY,COP,4001, STAR, L, MOVRT, FOTP
/ ********
/ * *
/ * COPY *
/ * *
/ ********
00007 6143
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-3
FILE # 1
06143 4001 XCOP, 4001
06144 6600
06145 7643
06146 0001
06147 0000
06150 7374
06151 0000 *
06152 7022
563 .QUAL NOCOPY,D
05026 1617
05027 0317
05030 2031
05031 0000
05032 0304
07374 5026
564 .QUAL NOPREDELETE,N
05033 1617
05034 2022
05035 0504
05036 0000
05037 0316
07375 5033
565 .QUAL RENAME,R
05040 2205
05041 1601
05042 1505
05043 0000
05044 0322
07376 5040
566 .QUAL FAILSAFE,F
05045 0601
05046 1114
05047 2301
05050 0000
05051 0306
07377 5045
567 .QUAL CURRENT,C,LSTOPT
05052 0325
05053 2222
05054 0516
05055 0000
05056 0303
07400 5052
568 .QUAL OTHER,O
05057 1724
05060 1005
05061 2200
05062 0317
07401 5057
569 .QUAL QUERY,Q
05063 2125
05064 0522
05065 3100
05066 0321
07402 5063
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-4
FILE # 1
570 .QUAL TODAY,T
05067 2417
05070 0401
05071 3100
05072 0324
07403 5067
571 .QUAL UGLY,U
05073 2507
05074 1431
05075 0000
05076 0325
07404 5073
572 .QUAL INVERT,V
05077 1116
05100 2605
05101 2224
05102 0000
05103 0326
07405 5077
573 /.QUAL VERSION,W
574 /.QUAL RUHIG,H
575 .ENDQ
07406 0000
576 .CMD CREF,CREF,4002, EXTCF, C, 0, PAL8
/ ********
/ * *
/ * CREF *
/ * *
/ ********
00010 6153
06153 4002 XCREF, 4002
06154 6620
06155 7643
06156 1000
06157 0000
06160 7407
06161 0000
06162 7017
577 .QUAL NOLIST,P
05104 1617
05105 1411
05106 2324
05107 0000
05110 0320
07407 5104
578 .QUAL NOSYMTAB,U
05111 1617
05112 2331
05113 1524
05114 0000
05115 0325
07410 5111
579 .QUAL RALF,R
05116 2201
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-5
FILE # 1
05117 1406
05120 0000
05121 0322
07411 5116
580 /.QUAL SABR,S
581 .QUAL NOLITERALS,X
05122 1617
05123 1411
05124 2405
05125 0000
05126 0330
07412 5122
582 .QUAL MAMMOTH,M
05127 1501
05130 1515
05131 1724
05132 0000
05133 0315
07413 5127
583 .ENDQ
07414 0000
584 .CMD CREATE,CRE,4400,EXTNUL, , CRSUB, EDIT
/ **********
/ * *
/ * CREATE *
/ * *
/ **********
00011 6163
06163 4400 XCRE, 4400
06164 6640
06165 0000
06166 7415
06167 0000 *
06170 7000
585 .QUAL SPACES,B
05134 2320
05135 0103
05136 0523
05137 0000
05140 0302
07415 5134
586 .ENDQ
07416 0000
587 .CMD DATE,DA,0, DATE,
/ ********
/ * *
/ * DATE *
/ * *
/ ********
00012 6171
06171 0000 XDA, 0
06172 0000 *
06173 0000
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-6
FILE # 1
588 .ENDQ
07417 0000
589 .CMD DEASSIGN,DEA,0, DEASSIG,
/ ************
/ * *
/ * DEASSIGN *
/ * *
/ ************
00013 6174
06174 0000 XDEA, 0
06175 0000 *
06176 0000
590 .ENDQ
07420 0000
591 .CMD DELETE,DEL,4001,STAR, LD, KILRT, FOTP, LSTOPT
/ **********
/ * *
/ * DELETE *
/ * *
/ **********
00014 6177
06177 4001 XDEL, 4001
06200 6600
06201 7643
06202 0001
06203 7643
06204 0400
06205 0000
06206 7400
06207 0000 *
06210 7022
592 .CMD DIRECT,DI,4001, STAR, , COLSET, DIRECT
/ **********
/ * *
/ * DIRECT *
/ * *
/ **********
00015 6211
06211 4001 XDI, 4001
06212 6600
06213 0000
06214 7421
06215 0000 *
06216 7025
593 .QUAL ALPHAB,A
05141 0114
05142 2010
05143 0102
05144 0000
05145 0301
07421 5141
594 .QUAL BLOCKS,B
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-7
FILE # 1
05146 0214
05147 1703
05150 1323
05151 0000
05152 0302
07422 5146
595 .QUAL CURRENT,C
05153 0325
05154 2222
05155 0516
05156 0000
05157 0303
07423 5153
596 .QUAL DATUM,D
05160 0401
05161 2425
05162 1500
05163 0304
07424 5160
597 .QUAL EXTENDED,E
05164 0530
05165 2405
05166 1604
05167 0000
05170 0305
07425 5164
598 .QUAL FAST,F
05171 0601
05172 2324
05173 0000
05174 0306
07426 5171
599 /.QUAL ADDITIONAL,I
600 .QUAL EMPTIES,M
05175 0515
05176 2024
05177 1105
05200 0000
05201 0315
07427 5175
601 .QUAL OTHER,O
05202 1724
05203 1005
05204 2200
05205 0317
07430 5202
602 /.QUAL SEITE,P
603 .QUAL REMAINDER,R
05206 2205
05207 1501
05210 1116
05211 0000
05212 0322
07431 5206
604 /.QUAL NEUE,T
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-8
FILE # 1
605 .QUAL UGLY,U
05213 2507
05214 1431
05215 0000
05216 0325
07432 5213
606 .QUAL INVERT,V
05217 1116
05220 2605
05221 2224
05222 0000
05223 0326
07433 5217
607 /.QUAL VERSION,W
608 /.QUAL V,V
609 .QUAL COLUMNS,Z /DUMMY
05224 0317
05225 1425
05226 1516
05227 0000
05230 0332
07434 5224
610 /.QUAL ZUSATZ,X
611 .ENDQ
07435 0000
612 .CMD DUPLIC,DU,4001, STAR, , 0, RXCOP
/ **********
/ * *
/ * DUPLIC *
/ * *
/ **********
00016 6217
06217 4001 XDU, 4001
06220 6600
06221 0000
06222 7436
06223 0000
06224 7066
613 .QUAL NOCOPY,M
05231 1617
05232 0317
05233 2031
05234 0000
05235 0315
07436 5231
614 /.QUAL NOMATCH,N
615 .QUAL PAUSE,P
05236 2001
05237 2523
05240 0500
05241 0320
07437 5236
616 .QUAL READONLY,R
05242 2205
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-9
FILE # 1
05243 0104
05244 1716
05245 0000
05246 0322
07440 5242
617 /.QUAL VERSION,V
618 .ENDQ
07441 0000
619 .CMD EDIT,ED,5230, EXTNUL, , EDSUB, EDIT
/ ********
/ * *
/ * EDIT *
/ * *
/ ********
00017 6225
06225 5230 XED, 5230
06226 6640
06227 0000
06230 7442
06231 0000 *
06232 7000
620 /.QUAL SPACES,B
621 /.QUAL PREDELETE,D
622 .ENDQ
07442 0000
623 .CMD FOCAL,FO,4071, STAR, , FOSUB, DPF
/ *********
/ * *
/ * FOCAL *
/ * *
/ *********
00020 6233
06233 4071 XFO, 4071
06234 6600
06235 0000
06236 7443
06237 0000 *
06240 7030
624 .QUAL NOFUNC,N
05247 1617
05250 0625
05251 1603
05252 0000
05253 0316
07443 5247
625 /.QUAL NOPRECISION,6
626 .QUAL WRITE,W
05254 2722
05255 1124
05256 0500
05257 0327
07444 5254
627 .QUAL START,G
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-10
FILE # 1
05260 2324
05261 0122
05262 2400
05263 0307
07445 5260
628 .ENDQ
07446 0000
629 .CMD FUTIL,FU,4401, EXTSV, , 0, FUTIL
/ *********
/ * *
/ * FUTIL *
/ * *
/ *********
00021 6241
06241 4401 XFU, 4401
06242 6656
06243 0000
06244 7447
06245 0000
06246 7041
630 .ENDQ
07447 0000
631 .CMD GOTO,G,0, GTOSUB
/ ********
/ * *
/ * GOTO *
/ * *
/ ********
00022 6247
06247 0000 XG, 0
06250 0000 *
06251 0000
632 .ENDQ
07450 0000
633 .CMD HELP,H,4001, STAR, T, SETTTY, HELP
/ ********
/ * *
/ * HELP *
/ * *
/ ********
00023 6252
06252 4001 XH, 4001
06253 6600
06254 7644
06255 0020
06256 0000
06257 7451
06260 0000 *
06261 7105
634 .ENDQ
07451 0000
635 .CMD LAUF,LAU,4000, EXTBI, HS, 0, BATCH, SUBOPT
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-11
FILE # 1
/ ********
/ * *
/ * LAUF *
/ * *
/ ********
00024 6262
06262 4000 XLAU, 4000
06263 6614
06264 7643
06265 0020
06266 7644
06267 0040
06270 0000
06271 7541
06272 0000
06273 7074
636 .CMD LINK,LIN,5023, EXTLI, , LOSUB, LINK
/ ********
/ * *
/ * LINK *
/ * *
/ ********
00025 6274
06274 5023 XLIN, 5023
06275 6646
06276 0000
06277 7452
06300 0000 *
06301 7113
637 .QUAL GO,G
05264 0717
05265 0000
05266 0307
07452 5264
638 .QUAL HALTS,H
05267 1001
05270 1424
05271 2300
05272 0310
07453 5267
639 /.QUAL JUMPS,J
640 .QUAL MEMORY,K
05273 1505
05274 1517
05275 2231
05276 0000
05277 0313
07454 5273
641 /.QUAL VERSION,V
642 .QUAL START,S
05300 2324
05301 0122
05302 2400
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-12
FILE # 1
05303 0323
07455 5300
643 /.QUAL JSW,W
644 /.QUAL M,M
645 .ENDQ
07456 0000
646 .CMD LIST,LI,4001, STAR, U, SETLPT, FOTP, LSTOPT
/ ********
/ * *
/ * LIST *
/ * *
/ ********
00026 6302
06302 4001 XLI, 4001
06303 6600
06304 7644
06305 0010
06306 0000
06307 7400
06310 0000 *
06311 7022
647 .CMD LOGIN,LOGI,0, LGISUB, BATCH
/ *********
/ * *
/ * LOGIN *
/ * *
/ *********
00027 6312
06312 0000 XLOGI, 0
06313 0000 *
06314 7074
648 .ENDQ
07457 0000
649 .CMD LOGOUT,LOGO,0, LGOSUB, BATCH
/ **********
/ * *
/ * LOGOUT *
/ * *
/ **********
00030 6315
06315 0000 XLOGO, 0
06316 0000 *
06317 7074
650 .ENDQ
07460 0000
651 .CMD LOAD,LO,5023, EXTLO, , LOSUB, ABSLDR
/ ********
/ * *
/ * LOAD *
/ * *
/ ********
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-13
FILE # 1
00031 6320
06320 5023 XLO, 5023
06321 6642
06322 0000
06323 7461
06324 0000 *
06325 7047
652 .QUAL CONTINUE,C
05304 0317
05305 1624
05306 1116
05307 0000
05310 0303
07461 5304
653 .QUAL IMAGE,I
05311 1115
05312 0107
05313 0500
05314 0311
07462 5311
654 .QUAL MULTIPLE,S
05315 1525
05316 1424
05317 1120
05320 0000
05321 0323
07463 5315
655 .QUAL GO,G
05322 0717
05323 0000
05324 0307
07464 5322
656 / /8 /9 /START:N /FIELD:F /P
657 .ENDQ
07465 0000
658 .CMD MAKE,MACE,0, MAKSUB, TECO
/ ********
/ * *
/ * MAKE *
/ * *
/ ********
00032 6326
06326 0000 XMACE, 0
06327 0000 *
06330 7052
659 .ENDQ
07466 0000
660 .CMD MAC,MAC,5013, EXTMA, , EXSUB, MACREL
/ *******
/ * *
/ * MAC *
/ * *
/ *******
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-14
FILE # 1
00033 6331
06331 5013 XMAC, 5013
06332 6624
06333 0000
06334 7467
06335 0000 *
06336 7110
661 .QUAL BLOCK,B
05325 0214
05326 1703
05327 1300
05330 0302
07467 5325
662 .QUAL CREF,C
05331 0322
05332 0506
05333 0000
05334 0303
07470 5331
663 .QUAL GO,G
05335 0717
05336 0000
05337 0307
07471 5335
664 /.QUAL NOCONDITIONALS,J
665 .QUAL LINK,L
05340 1411
05341 1613
05342 0000
05343 0314
07472 5340
666 .QUAL PERMANENT,M
05344 2005
05345 2215
05346 0116
05347 0000
05350 0315
07473 5344
667 .QUAL NOLIST,N
05351 1617
05352 1411
05353 2324
05354 0000
05355 0316
07474 5351
668 /.QUAL NOMACROS,O
669 /.QUAL RESET,P
670 .QUAL EAE,Q
05356 0501
05357 0500
05360 0321
07475 5356
671 /.QUAL REMOVE,R
672 /.QUAL REDUNDANT,R
673 .QUAL NOBATCH,Z
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-15
FILE # 1
05361 1617
05362 0201
05363 2403
05364 0000
05365 0332
07476 5361
674 .QUAL EXTENDED,X
05366 0530
05367 2405
05370 1604
05371 0000
05372 0330
07477 5366
675 .QUAL K,K
05373 1300
05374 0313
07500 5373
676 .QUAL P,P
05375 2000
05376 0320
07501 5375
677 .ENDQ
07502 0000
678 .CMD MAP,MAP,4001, EXTBN, , SETTTY, BITMAP
/ *******
/ * *
/ * MAP *
/ * *
/ *******
00034 6337
06337 4001 XMAP, 4001
06340 6634
06341 0000
06342 7503
06343 0000 *
06344 7006
679 .QUAL MULTIPLE,S
05377 1525
05400 1424
05401 1120
05402 0000
05403 0323
07503 5377
680 .QUAL INVERT,T
05404 1116
05405 2605
05406 2224
05407 0000
05410 0324
07504 5404
681 /FIELD:N
682 .ENDQ
07505 0000
683 .CMD MEMORY,ME,0, DETCOR,
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-16
FILE # 1
/ **********
/ * *
/ * MEMORY *
/ * *
/ **********
00035 6345
06345 0000 XME, 0
06346 0000 *
06347 0000
684 .ENDQ
07506 0000
685 .CMD MUNG,MU,0, MNGSUB, TECO
/ ********
/ * *
/ * MUNG *
/ * *
/ ********
00036 6350
06350 0000 XMU, 0
06351 0000 *
06352 7052
686 .ENDQ
07507 0000
687 .CMD OCOMP,OC,4001, STAR, TH, 0, OCOMP
/ *********
/ * *
/ * OCOMP *
/ * *
/ *********
00037 6353
06353 4001 XOC, 4001
06354 6600
06355 7644
06356 0020
06357 7643
06360 0020
06361 0000
06362 7510
06363 0000
06364 7135
688 .QUAL SUCHE,S
05411 2325
05412 0310
05413 0500
05414 0323
07510 5411
689 .QUAL SV,I
05415 2326
05416 0000
05417 0311
07511 5415
690 .QUAL CCB,C
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-17
FILE # 1
05420 0303
05421 0200
05422 0303
07512 5420
691 .ENDQ
07513 0000
692 .CMD OPEN,OP,4004, STAR, , OPNSUB,
/ ********
/ * *
/ * OPEN *
/ * *
/ ********
00040 6365
06365 4004 XOP, 4004
06366 6600
06367 0000
06370 7514
06371 0000 *
06372 0000
693 .ENDQ
07514 0000
694 .CMD PAL,PA,5013, EXTPA, , EXSUB, PAL8
/ *******
/ * *
/ * PAL *
/ * *
/ *******
00041 6373
06373 5013 XPA, 5013
06374 6630
06375 0000
06376 7515
06377 0000 *
06400 7017
695 /.QUAL SHIFT,B
696 .QUAL CREF,C
05423 0322
05424 0506
05425 0000
05426 0303
07515 5423
697 .QUAL DDT,D
05427 0404
05430 2400
05431 0304
07516 5427
698 .QUAL NOLINKS,E
05432 1617
05433 1411
05434 1613
05435 0000
05436 0305
07517 5432
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-18
FILE # 1
699 .QUAL NOFILL,F
05437 1617
05440 0611
05441 1414
05442 0000
05443 0306
07520 5437
700 .QUAL GO,G
05444 0717
05445 0000
05446 0307
07521 5444
701 .QUAL NONPAGINATED,H
05447 1617
05450 1620
05451 0107
05452 0000
05453 0310
07522 5447
702 /.QUAL NOCONDITIONALS,J
703 .QUAL LOAD,L
05454 1417
05455 0104
05456 0000
05457 0314
07523 5454
704 .QUAL NOLIST,N
05460 1617
05461 1411
05462 2324
05463 0000
05464 0316
07524 5460
705 /.QUAL NOORIG,O
706 .QUAL NOSYMTAB,S
05465 1617
05466 2331
05467 1524
05470 0000
05471 0323
07525 5465
707 .QUAL NOREMEMBERLITERALS,W
05472 1617
05473 2205
05474 1505
05475 0000
05476 0327
07526 5472
708 .QUAL WIDE,7
05477 2711
05500 0405
05501 0000
05502 0267
07527 5477
709 /.QUAL W,W
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-19
FILE # 1
710 .ENDQ
07530 0000
711 / /K /T
712 .CMD PIP,PIP,4001, EXTNUL, , 0, PIP
/ *******
/ * *
/ * PIP *
/ * *
/ *******
00042 6401
06401 4001 XPIP, 4001
06402 6640
06403 0000
06404 7531
06405 0000
06406 7044
713 .ENDQ
07531 0000
714 .CMD PRINT,PR,4000, STAR, , SETLPT, LPTSPL
/ *********
/ * *
/ * PRINT *
/ * *
/ *********
00043 6407
06407 4000 XPR, 4000
06410 6600
06411 0000
06412 7532
06413 0000 *
06414 7055
715 .ENDQ
07532 0000
716 .CMD PUNCH,PU,4001, EXTNUL, , SETPTP, PIP
/ *********
/ * *
/ * PUNCH *
/ * *
/ *********
00044 6415
06415 4001 XPU, 4001
06416 6640
06417 0000
06420 7533
06421 0000 *
06422 7044
717 .ENDQ
07533 0000
718 .CMD RENAME,REN,4001,STAR, LR, RENRT, FOTP, LSTOPT
/ **********
/ * *
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-20
FILE # 1
/ * RENAME *
/ * *
/ **********
00045 6423
06423 4001 XREN, 4001
06424 6600
06425 7643
06426 0001
06427 7644
06430 0100
06431 0000
06432 7400
06433 0000 *
06434 7022
719 .EXTRA RES,SY
/ #######
/ # #
/ # RES #
/ # #
/ #######
00046 6464
720 .CMD SET,SET,0, 0, SET
/ *******
/ * *
/ * SET *
/ * *
/ *******
00047 6435
06435 0000 XSET, 0
06436 0000
06437 7060
721 .ENDQ
07534 0000
722 .CMD SHSAVE,SH,4001, STAR, , 0, SHSAVE
/ **********
/ * *
/ * SHSAVE *
/ * *
/ **********
00050 6440
06440 4001 XSH, 4001
06441 6600
06442 0000
06443 7535
06444 0000
06445 7140
723 .ENDQ
07535 0000
724 .CMD SQUISH,SQ,4001, EXTNUL, S, SQSUB, PIP
/ **********
/ * *
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-21
FILE # 1
/ * SQUISH *
/ * *
/ **********
00051 6446
06446 4001 XSQ, 4001
06447 6640
06450 7644
06451 0040
06452 0000
06453 7536
06454 0000 *
06455 7044
725 .QUAL OK,O
05503 1713
05504 0000
05505 0317
07536 5503
726 .QUAL QUIET,H
05506 2125
05507 1105
05510 2400
05511 0310
07537 5506
727 .ENDQ
07540 0000
728 .CMD SUBMIT,SU,4000, EXTBI, , 0, BATCH
/ **********
/ * *
/ * SUBMIT *
/ * *
/ **********
00052 6456
06456 4000 XSU, 4000
06457 6614
06460 0000
06461 7541
06462 0000
06463 7074
729 .QUAL CARDS,C,SUBOPT
05512 0301
05513 2204
05514 2300
05515 0303
07541 5512
730 .QUAL NONFATAL,E
05516 1617
05517 1606
05520 0124
05521 0000
05522 0305
07542 5516
731 /.QUAL PAPERTAPE,P
732 /.QUAL QUIET,Q
733 .QUAL HUSH,H
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-22
FILE # 1
05523 1025
05524 2310
05525 0000
05526 0310
07543 5523
734 .QUAL DRUCKER,L
05527 0422
05530 2503
05531 1305
05532 0000
05533 0314
07544 5527
735 /.QUAL TERMINAL,T
736 .QUAL UNATTENDED,U
05534 2516
05535 0124
05536 2405
05537 0000
05540 0325
07545 5534
737 .QUAL SUBROUTINE,S
05541 2325
05542 0222
05543 1725
05544 0000
05545 0323
07546 5541
738 /.QUAL VERSION,V
739 .QUAL 026,6
05546 6062
05547 6600
05550 0266
07547 5546
740 .ENDQ
07550 0000
741 .CMD SYSTEM,SY,4001,EXTSY, , SETTTY, RESORC
/ **********
/ * *
/ * SYSTEM *
/ * *
/ **********
00053 6464
06464 4001 XSY, 4001
06465 6610
06466 0000
06467 7551
06470 0000 *
06471 7071
742 .QUAL EXTENDED,E
05551 0530
05552 2405
05553 1604
05554 0000
05555 0305
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-23
FILE # 1
07551 5551
743 .QUAL KURZ,L
05556 1325
05557 2232
05560 0000
05561 0314
07552 5556
744 .QUAL FAST,F
05562 0601
05563 2324
05564 0000
05565 0306
07553 5562
745 .ENDQ
07554 0000
746 .CMD TALK,TA,0, TLKSUB,
/ ********
/ * *
/ * TALK *
/ * *
/ ********
00054 6472
06472 0000 XTA, 0
06473 0000 *
06474 0000
747 .ENDQ
07555 0000
748 .CMD TECO,TE,30, TECSUB, TECO
/ ********
/ * *
/ * TECO *
/ * *
/ ********
00055 6475
06475 0030 XTE, 30
06476 0000 *
06477 7052
749 .ENDQ
07556 0000
750 .CMD TTL,TT,0, TTSUB, TECO
/ *******
/ * *
/ * TTL *
/ * *
/ *******
00056 6500
06500 0000 XTT, 0
06501 0000 *
06502 7052
751 .ENDQ
07557 0000
752 .CMD TYPE,TY,4001, STAR, U, SETTTY, FOTP, LSTOPT
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-24
FILE # 1
/ ********
/ * *
/ * TYPE *
/ * *
/ ********
00057 6503
06503 4001 XTY, 4001
06504 6600
06505 7644
06506 0010
06507 0000
06510 7400
06511 0000 *
06512 7022
753 .CMD UA,UA,40, USRSUB,
/ ******
/ * *
/ * UA *
/ * *
/ ******
00060 6513
06513 0040 XUA, 40
06514 0000 *
06515 0000
754 .ENDQ
07560 0000
755 .CMD UB,UB,50, USRSUB,
/ ******
/ * *
/ * UB *
/ * *
/ ******
00061 6516
06516 0050 XUB, 50
06517 0000 *
06520 0000
756 .ENDQ
07561 0000
757 .CMD UC,UC,60, USRSUB,
/ ******
/ * *
/ * UC *
/ * *
/ ******
00062 6521
06521 0060 XUC, 60
06522 0000 *
06523 0000
758 .ENDQ
07562 0000
759 .CMD UX,UX,0, USRSUB,
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-25
FILE # 1
/ ******
/ * *
/ * UX *
/ * *
/ ******
00063 6524
06524 0000 XUX, 0
06525 0000 *
06526 0000
760 .ENDQ
07563 0000
761 .CMD USERA,USA,4001, EXTNUL, , 0, USERA
/ *********
/ * *
/ * USERA *
/ * *
/ *********
00064 6527
06527 4001 XUSA, 4001
06530 6640
06531 0000
06532 7564
06533 0000
06534 7143
762 .ENDQ
07564 0000
763 .CMD USERB,USB,4001, EXTNUL, , 0, USERB
/ *********
/ * *
/ * USERB *
/ * *
/ *********
00065 6535
06535 4001 XUSB, 4001
06536 6640
06537 0000
06540 7565
06541 0000
06542 7146
764 .ENDQ
07565 0000
765 .CMD USERC,USC,4001, EXTNUL, , 0, USERC
/ *********
/ * *
/ * USERC *
/ * *
/ *********
00066 6543
06543 4001 XUSC, 4001
06544 6640
06545 0000
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-26
FILE # 1
06546 7566
06547 0000
06550 7151
766 .ENDQ
07566 0000
767 .CMD VERSION,VE,0, VERTN,
/ ***********
/ * *
/ * VERSION *
/ * *
/ ***********
00067 6551
06551 0000 XVE, 0
06552 0000 *
06553 0000
768 .ENDQ
07567 0000
769 .CMD ZERO,ZERO,4401, EXTNUL, Z, ZERSUB, PIP
/ ********
/ * *
/ * ZERO *
/ * *
/ ********
00070 6554
06554 4401 XZERO, 4401
06555 6640
06556 7645
06557 2000
06560 0000
06561 7570
06562 0000 *
06563 7044
770 .ENDQ
07570 0000
771 / .CMD @,@,0, YAT,
772 / .ENDQ
773 6564 ..=.
774 06564 0000 0;YAT;0
06565 0000 *
06566 0000
775 0071 .DSECT PTBL
776 00071 6564 ..
777 00072 0000 0;0
00073 0000
778
779 >
780
781 .EXT ALG=AL
782 .EXT BAK=BK
783 .EXT BAS=BA
784 .EXT BIN=BN
785 .EXT BUG=BG
786 .EXT CMD=CM
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 7-27
FILE # 1
787 .EXT COM=CM
788 .EXT CRF=CF
789 .EXT CTL=CM
790 .EXT DAT=DA
791 .EXT DIR=DI
792 .EXT DOC=DC
793 .EXT HLP=HL
794 .EXT INI=IN
795 .EXT LOG=LG
796 .EXT LPT=LP
797 .EXT LST=LS
798 .EXT MAC=MA
799 .EXT MAN=MN
800 .EXT MAP=MP
801 .EXT MEM=ME
802 .EXT OLD=OL
803 .EXT PAL=PA
804 .EXT REL=RL
805 .EXT RIM=RM
806 .EXT RNO=RO
807 .EXT SAV=SV
808 .EXT EXE=SV
809 .EXT SNO=SN
810 .EXT SRC=SR
811 .EXT SYS=SY
812 .EXT TEC=TE
813 .EXT TEM=TM
814 .EXT TMP=TM
815 .EXT TXT=TX
816 .EXT BAT=BI
817 .EXT FOR=FT
818 .EXT RLF=RA
819 .EXT OBJ=RB
820 .EXT SBR=SB
821 .EXT FTN=FT
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 8
FILE # 1
822
823
824
825
826
827
828
829
830
831
832 0200 .ASECT EXTNS
833 0000 FIELD 0
834 6600 *6600
835 06600 5200 STAR, 5200; 0
06601 0000
836 06602 0000 0; 0
06603 0000
837
838 06604 0103 EXTAC, 'AC; 0
06605 0000
839 06606 0000 0; 0
06607 0000
840
841 06610 2331 EXTSY, 'SY; 0
06611 0000
842 06612 0000 0; 0
06613 0000
843
844 06614 0211 EXTBI, 'BI; 0
06615 0000
845 06616 0000 0; 0
06617 0000
846
847 06620 2001 EXTCF, 'PA; YPAL8
06621 7017
848 06622 0000 0; YPAL8
06623 7017
849
850 06624 1501 EXTMA, 'MA; YMACREL
06625 7110
851 06626 0000 0; YMACREL
06627 7110
852
853 06630 2001 EXTPA, 'PA; YPAL8
06631 7017
854 06632 0000 0; YPAL8
06633 7017
855
856 06634 0216 EXTBN, 'BN; 0
06635 0000
857 06636 0000 0; YABSLDR
06637 7047
858
859 06640 0000 EXTNUL, 0; 0
06641 0000
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 8-1
FILE # 1
860
861 06642 0216 EXTLO, 'BN; YABSLDR
06643 7047
862 06644 2214 'RL; YLOAD
06645 7132
863 06646 2202 EXTLI, 'RB; YLINK
06647 7113
864 06650 0000 0; 0
06651 0000
865
866 06652 0315 EXTCM, 'CM; 0
06653 0000
867 06654 0000 0; 0
06655 0000
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 9
FILE # 1
868
869
870
871
872
873
874
875
876
877
878 06656 2326 EXTSV, 'SV; 0
06657 0000
879 06660 1404 'LD; 0
06661 0000
880 06662 0000 0; 0
06663 0000
881
882 06664 1404 EXTEXE, 'LD; YFRTS
06665 7124
883 06666 0216 'BN; YABSLDR
06667 7047
884 06670 2214 'RL; YLOAD
06671 7132
885 06672 2202 'RB; YLINK
06673 7113
886 06674 2001 'PA; YPAL8
06675 7017
887 06676 0624 'FT; YF4
06677 7127
888 06700 0201 'BA; YBCOMP
06701 7014
889 06702 1501 'MA; YMACREL
06703 7110
890 06704 2201 'RA; YRALF
06705 7077
891 06706 2302 'SB; YSABR
06707 7102
892 06710 0211 'BI; YBATCH
06711 7074
893 06712 0000 0; 0
06713 0000
894
895 06714 2001 EXTCOM, 'PA; YPAL8
06715 7017
896 06716 0624 'FT; YF4
06717 7127
897 06720 0201 'BA; YBCOMP
06721 7014
898 06722 1501 'MA; YMACREL
06723 7110
899 06724 2201 'RA; YRALF
06725 7077
900 06726 2302 'SB; YSABR
06727 7102
901 06730 0000 0; 0
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 9-1
FILE # 1
06731 0000
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 10
FILE # 1
902
903
904
905
906
907
908
909
910
911
912 0200 .ASECT FNAMES
913 0000 FIELD 0
914 7000 *7000
915 07000 0504 YEDIT, FILENAME EDIT.SV
07001 1124
07002 0000
07003 2326
916 7003 *.-1
917 07003 0217 YBOOT, FILENAME BOOT.SV
07004 1724
07005 0000
07006 2326
918 7006 *.-1
919 07006 0211 YBITMAP,FILENAME BITMAP.SV
07007 2415
07010 0120
07011 2326
920 7011 *.-1
921 07011 2322 YSRCCOM,FILENAME SRCCOM.SV
07012 0303
07013 1715
07014 2326
922 7014 *.-1
923 07014 0203 YBCOMP, FILENAME BCOMP.SV
07015 1715
07016 2000
07017 2326
924 7017 *.-1
925 07017 2001 YPAL8, FILENAME PAL8.SV
07020 1470
07021 0000
07022 2326
926 7022 *.-1
927 07022 0617 YFOTP, FILENAME FOTP.SV
07023 2420
07024 0000
07025 2326
928 7025 *.-1
929 07025 0411 YDIRECT,FILENAME DIRECT.SV
07026 2205
07027 0324
07030 2326
930 7030 *.-1
931 07030 0420 YDPF, FILENAME DPF.SV
07031 0600
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 10-1
FILE # 1
07032 0000
07033 2326
932 7033 *.-1
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 11
FILE # 1
933
934
935
936
937
938
939
940
941
942
943 07033 0103 YACID, FILENAME ACID.SV
07034 1104
07035 0000
07036 2326
944 7036 *.-1
945 07036 2224 YRTES, FILENAME RTES.SV
07037 0523
07040 0000
07041 2326
946 7041 *.-1
947 07041 0625 YFUTIL, FILENAME FUTIL.SV
07042 2411
07043 1400
07044 2326
948 7044 *.-1
949 07044 2011 YPIP, FILENAME PIP.SV
07045 2000
07046 0000
07047 2326
950 7047 *.-1
951 07047 0102 YABSLDR,FILENAME ABSLDR.SV
07050 2314
07051 0422
07052 2326
952 7052 *.-1
953 07052 2405 YTECO, FILENAME TECO.SV
07053 0317
07054 0000
07055 2326
954 7055 *.-1
955 07055 1420 YLPTSPL,FILENAME LPTSPL.SV
07056 2423
07057 2014
07060 2326
956 7060 *.-1
957 07060 2305 YSET, FILENAME SET.SV
07061 2400
07062 0000
07063 2326
958 7063 *.-1
959 07063 0201 YBASIC, FILENAME BASIC.SV
07064 2311
07065 0300
07066 2326
960 7066 *.-1
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 12
FILE # 1
961
962
963
964
965
966
967
968
969
970
971 07066 2230 YRXCOP, FILENAME RXCOPY.SV
07067 0317
07070 2031
07071 2326
972 7071 *.-1
973 07071 2205 YRESORC,FILENAME RESORC.SV
07072 2317
07073 2203
07074 2326
974 7074 *.-1
975 07074 0201 YBATCH, FILENAME BATCH.SV
07075 2403
07076 1000
07077 2326
976 7077 *.-1
977 07077 2201 YRALF, FILENAME RALF.SV
07100 1406
07101 0000
07102 2326
978 7102 *.-1
979 07102 2301 YSABR, FILENAME SABR.SV
07103 0222
07104 0000
07105 2326
980 7105 *.-1
981 07105 1005 YHELP, FILENAME HELP.SV
07106 1420
07107 0000
07110 2326
982 7110 *.-1
983 07110 1501 YMACREL,FILENAME MACREL.SV
07111 0322
07112 0514
07113 2326
984 7113 *.-1
985 07113 1411 YLINK, FILENAME LINK.SV
07114 1613
07115 0000
07116 2326
986 7116 *.-1
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 13
FILE # 1
987
988
989
990
991
992
993
994
995
996
997 07116 0401 YDATE, FILENAME DATE.SV
07117 2405
07120 0000
07121 2326
998 7121 *.-1
999 07121 0303 YCCL, FILENAME CCL.SV
07122 1400
07123 0000
07124 2326
1000 7124 *.-1
1001 07124 0622 YFRTS, FILENAME FRTS.SV /**
07125 2423
07126 0000
07127 2326
1002 7127 *.-1
1003 07127 0664 YF4, FILENAME F4.SV /** THESE THREE MUST BE TOGETHER !!!
07130 0000
07131 0000
07132 2326
1004 7132 *.-1
1005 07132 1417 YLOAD, FILENAME LOAD.SV /**
07133 0104
07134 0000
07135 2326
1006 7135 *.-1
1007 07135 1703 YOCOMP, FILENAME OCOMP.SV
07136 1715
07137 2000
07140 2326
1008 7140 *.-1
1009 07140 2310 YSHSAVE,FILENAME SHSAVE.SV
07141 2301
07142 2605
07143 2326
1010 7143 *.-1
1011 07143 2523 YUSERA, FILENAME USERA.SV
07144 0522
07145 0100
07146 2326
1012 7146 *.-1
1013 07146 2523 YUSERB, FILENAME USERB.SV
07147 0522
07150 0200
07151 2326
1014 7151 *.-1
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 13-1
FILE # 1
1015 07151 2523 YUSERC, FILENAME USERC.SV
07152 0522
07153 0300
07154 2326
1016 7154 *.-1
/CCL INTERNAL TABLES FOR KBM V50 MACREL-V2C TUE 02-JUN-92 PAGE 14
FILE # 1
1017
1018
1019
1020
1021
1022
1023
1024
1025
1026
CCL CORE SIZE MACREL-V2C TUE 02-JUN-92 PAGE 14
FILE # 1
1027 EJECT CCL CORE SIZE
1028 / VERSION=5A
1029
1030 0200 .ASECT CORF0
1031 6200 LXM=6200
1032 0000 FIELD 0
1033 7200 *7200
1034 07200 7235 CORLOC, CORX
1035 07201 1400 CORV, 1400
1036 07202 7400 CORRES, -7000-1400
1037 07203 0001 CORSIZ, 1
1038
1039 07204 0000 CORE, 0
1040 07205 1257 TAD T7000 /SETS KT8A IF PRESENT
1041 07206 6200 LXM /LXM INSTRUCTION
1042 07207 7201 CLA IAC /LXM ACTS AS NOP IF NO KT8A
1043 07210 3203 DCA CORSIZ /INITIALIZE CORSIZ TO 1
1044 07211 1202 TAD CORRES
1045 07212 3235 DCA CORX /SET WRAPPER LOC
1046 07213 6201 CORE2, CDF 0
1047 07214 1203 TAD CORSIZ /ADJUST FIELDS FOR CDF
1048 07215 7112 CLL RTR
1049 07216 7012 RTR
1050 07217 7002 BSW
1051 07220 7430 SZL
1052 07221 1256 TAD T4
1053 07222 0233 AND COR174
1054 07223 1246 TAD COREX
1055 07224 3225 DCA .+1
1056 07225 6201 COR1, CDF
1057 07226 1600 TAD I CORLOC
1058 07227 7000 COR2, NOP
1059 07230 3225 DCA COR1
1060 07231 1227 TAD COR2
1061 07232 3600 DCA I CORLOC
1062 07233 0174 COR174, 174
1063 07234 1600 TAD I CORLOC
1064 07235 7400 CORX, 7400
1065 07236 1235 TAD CORX
1066 07237 1201 TAD CORV
1067 07240 7640 SZA CLA
1068 07241 5246 JMP COREX
1069 07242 1225 TAD COR1
1070 07243 3600 DCA I CORLOC
1071 07244 2203 ISZ CORSIZ
1072 07245 5213 JMP CORE2
1073 07246 6201 COREX, CDF 0
1074 07247 6200 LXM /NEUTRALIZES KT8A
1075 07250 1203 TAD CORSIZ
1076 07251 7106 CLL RTL
1077 07252 1255 TAD M10
1078 07253 6213 CIF CDF 10
1079 07254 5604 JMP I CORE /RETURN
1080 07255 7770 M10, -10
1081 07256 0004 T4, 4
CCL CORE SIZE MACREL-V2C TUE 02-JUN-92 PAGE 14-1
FILE # 1
1082 07257 7000 T7000, 7000
CCL CORE SIZE MACREL-V2C TUE 02-JUN-92 PAGE 15
FILE # 1
1083
1084
1085
1086
1087
1088
1089
1090
1091
1092
1093 07260 0000 GLIN, 0 /FOR SEMICOLON LINKAGE
1094 07261 4664 JMS I PGLINE
1095 07262 6213 CIF CDF 10
1096 07263 5660 JMP I GLIN
1097 07264 1200 PGLINE, GLINE
1098
1099 07265 1420 LPTDEV, DEVICE LPT
07266 2400
1100 07267 2426 TVDEV, DEVICE TV
07270 0000
1101 07271 2424 TTYDEV, DEVICE TTY
07272 3100
1102 07273 2024 PTPDEV, DEVICE PTP
07274 2000
1103 07275 0402 DMPDEV, DEVICE DBL /DIABLO PRINTER
07276 1400
1104 07277 1625 NULDEV, DEVICE NULL
07300 1414
1105 07301 0000 FNAME1, ZBLOCK 5
CCL CORE SIZE MACREL-V2C TUE 02-JUN-92 PAGE 16
FILE # 1
1106
1107
1108
1109
1110
1111
1112
1113
1114
1115
CCL SWITCHES MACREL-V2C TUE 02-JUN-92 PAGE 16
FILE # 1
1116 EJECT CCL SWITCHES
1117 / VERSION=4A
1118
1119
1120 07306 1423 SWTCHS, 1423; P1 /LS
07307 7332
1121 07310 1602 1602; P2 /NB
07311 7334
1122 07312 1520 1520; P3 /MP
07313 7336
1123 07314 1400 1400; P4 /L
07315 7340
1124 07316 2400 2400; P5 /T
07317 7342
1125 07320 2300 2300; P6 /S
07321 7344
1126 07322 2000 2000; P7 /P
07323 7346
1127 07324 0400 0400; P8 /D
07325 7350
1128 07326 1600 1600; P9 /N
07327 7352
1129 07330 0000 0000; P10 /UNKNOWN
07331 7354
CCL SWITCHES MACREL-V2C TUE 02-JUN-92 PAGE 17
FILE # 1
1130
1131
1132
1133
1134
1135
1136
1137
1138
1139
1140 07332 0000 * P1, NMOVE
1141 07333 7605 7605
1142 07334 0000 * P2, DONB
1143 07335 0000 0
1144 07336 0000 * P3, NMOVE
1145 07337 7612 7612
1146 07340 0000 * P4, SETDEV
1147 07341 7265 LPTDEV
1148 07342 0000 * P5, SETDEV
1149 07343 7271 TTYDEV
1150 07344 0000 * P6, SETDEV
1151 07345 7267 TVDEV
1152 07346 0000 * P7, SETDEV
1153 07347 7273 PTPDEV
1154 07350 0000 * P8, SETDEV
1155 07351 7275 DMPDEV
1156 07352 0000 * P9, SETDEV
1157 07353 7277 NULDEV
1158 07354 0000 * P10, UNKN
1159 07355 0000 0
CCL SWITCHES MACREL-V2C TUE 02-JUN-92 PAGE 18
SYMBOL TABLE
AMFLAG 0017 EXTBI 6614 MPARAM 7643 SYSTEM 0022
BASUB X **** EXTBN 6634 MREAD 7757 T 0020
BATBUF 4400 EXTCF 6620 MSOVL2 0055 TABLES 6567 ASECT
BATCCL 7777 EXTCM G 6652 M10 7255 TBLTBL 6100
BATERR 7000 EXTCOM 6714 NAME1 0023 TECSUB X ****
BATIN 5400 EXTEXE 6664 NAME2 0024 TESBUF 2000
BATOUT 7400 EXTLI 6646 NAME3 0025 TLKSUB X ****
BATSPL 7200 EXTLO 6642 NAME4 0026 TT 0021
BATTBL 6600 EXTMA 6624 NAME5 0027 TTSUB X ****
BATVFY 5600 EXTNS 6732 ASECT NMBASE 0037 TTYDEV G 7271
BEGLN 1000 EXTNUL 6640 NMOVE X **** TVDEV 7267
BFR 3000 EXTPA 6630 NULDEV 7277 T4 7256
CCLBLK 0067 EXTSV 6656 OPNSUB X **** T7000 7257
CCLDEV 0001 EXTSY 6610 OS78BI 7771 UNKN X ****
CCLHND 0000 EXTTBL 6600 OV 1375 USR 0200
CCLINC 0054 FILDMY 0002 PGLINE 7264 USRSUB X ****
CCLNUM 0265 FILETB 7000 PRMES 0330 VERTN X ****
CCLSW 0435 FLD: 0 0200 ASECT PRQMRK 1357 XBA 6110
CCLTAB 0265 FNAMES 7155 ASECT PTBL 0074 DSECT XBO 6113
CCLVER 0301 FNAME1 G 7301 PTPDEV G 7273 XCCL 6116
CLOSUB X **** FOSUB X **** PTR 0036 XCL 6121
CLXR 0035 F0STUF 7200 P1 7332 XCOM 6135
COLSET X **** GETCCL 1362 P10 7354 XCOMPA 6127
CORE G 7204 GIOT 6770 P2 7334 XCOP 6143
COREX 7246 GLIN G 7260 P3 7336 XCRE 6163
CORE2 7213 GLINE 1200 P4 7340 XCREF 6153
CORF0 7356 ASECT GTOSUB X **** P5 7342 XDA 6171
CORLOC 7200 HNDLR 4400 P6 7344 XDEA 6174
CORRES 7202 JSBITS 7746 P7 7346 XDEL 6177
CORSIZ G 7203 KEYMON 0403 P8 7350 XDI 6211
CORV 7201 KILRT X **** P9 7352 XDU 6217
CORX 7235 KMNTRY 0400 QQ 2000 XED 6225
COR1 7225 LEN 0004 REMBLO 0065 XEX 6100
COR174 7233 LGISUB X **** REMSPA 4000 XFERV G 0070
COR2 7227 LGOSUB X **** RENRT X **** XFO 6233
CRSUB X **** LONGS 5566 ASECT REST 5000 XFU 6241
CTRLCK 1241 LONGTB 5000 SBLOCK 7776 XG 6247
DATE X **** LOSUB X **** SCOPE 7726 XH 6252
DEASAD 0427 LPTDEV G 7265 SETDEV X **** XLAU 6262
DEASSI X **** LSTOPT 7400 SETLPT X **** XLI 6302
DEF 0022 LXM 6200 SETPTP X **** XLIN 6274
DEFALT 0033 LXR 0034 SETTTY X **** XLO 6320
DELIM 0032 L1 0010 SHNDLR 7607 XLOGI 6312
DETCOR X **** L2 0006 SM8 6254 XLOGO 6315
DEV1 0030 MAKSUB X **** SOFSET 7747 XMAC 6331
DEV2 0031 MDATE 7666 SPLNUM 7777 XMACE 6326
DMPDEV 7275 MIFILE 7617 SQSUB X **** XMAP 6337
DOLFLG 7776 MMISC 7777 STAR 6600 XME 6345
DONB X **** MNGSUB X **** SUBOPT 7541 XMU 6350
DVHNDL 7647 MOFILE 7600 SWS 7571 ASECT XOC 6353
EDSUB X **** MONLOD 7605 SWSTBL 7360 XOP 6365
ERRET 0033 MONRES X **** SWTCHS G 7306 XPA 6373
EXSUB X **** MONSAV 7600 SYBLKN 7774 XPIP 6401
EXTAC 6604 MOVRT X **** SYCNT 7775 XPR 6407
CCL SWITCHES MACREL-V2C TUE 02-JUN-92 PAGE 18-1
SYMBOL TABLE
XPU 6415 YSHSAV 7140
XR 0016 YSRCCO 7011
XREN 6423 YTECO 7052
XR2 0015 YUSERA 7143
XSET 6435 YUSERB 7146
XSH 6440 YUSERC 7151
XSQ 6446 YY 0002
XSU 6456 ZERSUB X ****
XSY 6464 ZZ 0002
XTA 6472 .BOX M 0000
XTE 6475 .CMD M 0000
XTT 6500 .ENDQ M 0000
XTY 6503 .EXT M 0000
XUA 6513 .EXTRA M 0000
XUB 6516 .QUAL M 0000
XUC 6521 .. 6564
XUSA 6527
XUSB 6535
XUSC 6543
XUX 6524
XVE 6551
XX 0032
XZERO 6554
YABSLD 7047
YACID 7033
YAT X ****
YBASIC 7063
YBATCH G 7074
YBCOMP 7014
YBITMA 7006
YBOOT 7003
YCCL G 7121
YDATE G 7116
YDIREC 7025
YDPF 7030
YEDIT 7000
YFOTP 7022
YFRTS G 7124
YFUTIL 7041
YF4 G 7127
YHELP 7105
YLINK 7113
YLOAD 7132
YLPTSP 7055
YMACRE 7110
YOCOMP 7135
YPAL8 7017
YPIP 7044
YRALF 7077
YRESOR 7071
YRTES 7036
YRXCOP 7066
YSABR 7102
YSET 7060