Routine: XTLKDICL

Select the objects that you wish to see in the downloaded PDF

Information

XTLKDICL ; IHS/ACC,ALB/JLU,SFISC/JC ;10/11/94 14:42

Source file <XTLKDICL.m>

Package	Total	Call Graph
VA FileMan	2	(,ASK,RTN)^DIC DO^DIC1
Toolkit	1	^XTLKKWL

Name	Comments	DBIA/ICR reference
EN1	; FIRST ENTRY FROM DIC
EN2	; SECOND ENTRY FROM DIC OR FALL-THROUGH IF NO 'ASK' INDICATED
TS

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),!!,"'",$P(DO,U),"' is not in the 'Local Lookup Files' file. Unable to use lookup." Line Location: TS+0
Function Call: WRITE	Prompt: ! Line Location: TS+3
Function Call: WRITE	Prompt: !,"Attempting FILEMAN lookup..." Line Location: TS+8
Routine Call	DIC Line Location: XTLKDICL+3
Routine Call	DIC Line Location: EN1+2
Routine Call	DIC Line Location: XTLKDICL+3 EN2+3 EN2+5

Name	Line Occurrences (* Changed, ! Killed)
^XT(8984.4 - [#8984.4]	TS, TS+1, TS+2

Name	Line Occurrences
EN2	XTLKDICL+6, TS+8

Name	Field # of Occurrence
^(1	TS+2

Name	Field # of Occurrence
>> D0(2	EN2+3, EN2+5
>> DIC	TS+1
>> DIC(0	XTLKDICL+3*, EN1+2, TS+3
>> DIPGM(0	XTLKDICL+3, XTLKDICL+6
>> DIROUT	TS+7
>> DO	TS
>> DO(2	TS, TS+1, TS+2
>> DTOUT	TS+7
HITLIMIT	EN1+1!
U	EN2+3, TS, TS+1
>> X	XTLKDICL+4, XTLKDICL+5, EN2+1, EN2+3, EN2+5, TS+1, TS+4, TS+8*
XTLKC	TS+4*, TS+5!
XTLKKSCH	TS+1!
XTLKKSCH("DSPLY"	TS+2*
XTLKKSCH("GBL"	TS+1*
XTLKKSCH("INDEX"	TS+1*
>> XTLKPC	TS+4*
>> XTLKUT	XTLKDICL+3
>> XTLKX	TS+1, TS+4
>> Y	EN2+1, TS, TS+8