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 [ 04/02/2003 8:47 AM ]

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+12
Routine Call	DIC Line Location: EN1+6
Routine Call	DIC Line Location: XTLKDICL+6
Routine Call	DIC Line Location: XTLKDICL+6 EN2+7 EN2+10

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

Name	Line Occurrences
EN2	XTLKDICL+9, TS+13

Name	Field # of Occurrence
^(1	TS+2

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