Routine: DIL

Package	Total	Call Graph
VA Fileman	4	(,DIWR,DN)^DIL0 ^DIL1 ^DIL11 (DE,PX,UP)^DIPZ1

Package	Total	Caller Graph
VA Fileman	6	DIL0 DIL1 DIL11 DIL2 DIP5 DIPZ
IHS Generic Interface System	1	INHDIPZ

Entry Points

Name	Comments	DBIA/ICR reference
A	;
UNSTACK	;
DM
D	;
PX	;
DE
UP
O	;
Q
UN	;
U
T	;
W	;
IF
LOOP
DX(DX)	;If we're in sub-fields, another UTILITY node needs to invoke node DX

Name	Line Occurrences
Function Call: WRITE	Prompt: S Line Location: DM+1
Function Call: WRITE	Prompt: S Condition for execution: DG Line Location: DM+1

Name	Line Occurrences (* Changed, ! Killed)
^UTILITY("DIL"	A+2, A+4, A+8!
^UTILITY($J	PX+1, PX+2, U, T+1, DX+3, DX+4, IF

Name	Field # of Occurrence
^(	PX+2, A+2, A+4, T+1, DX+3, DX+4
^(0	A+4

Name	Field # of Occurrence
>> %	A+4, A+5, A+6, A+7, UN+3*
>> C	DM+4
>> DD	LOOP, D+1
>> DE	DM+1, DE, DE+2, DE+3
>> DG	DM+1, DE, DE+1*, DE+2, DE+3
>> DHD	A+1, U*
>> DHT	PX+1, D+1, UN+2
>> DI	DM+4, UN+2*
>> DI(	UN+2
>> DIC	DE+1*
>> DIL	D+1, UN+2, UN+3*
>> DIL(	UN+3!
>> DIL0	UN+3*
>> DIO	LOOP*, LOOP+1, LOOP+2, T+1
>> DIWL	LOOP*
>> DIWR	W+1
>> DIWR(	LOOP+3*, UN+1
>> DM	LOOP+3, DM, D+1, UNSTACK+1, UN+1, UN+2, UN+3, DX+1, DX+3, DX+4
>> DN	LOOP+1, DM+3, DM+4, DE+2, UN+2
>> DP	DM+1, DM+2, DE, A+1, UN+2*
>> DP(	D+1, UN+2
>> DPQ(	DM+2!
>> DU	DM+3, DM+4
>> DV	PX+1*
DX	LOOP+3, PX+2, PX+3, D+1, UN+2*, T+1, DX~, DX+3, DX+4
>> DY	UN+2*
>> DY(	UN+2
>> F	DM, D+1, UN+2
>> F(	D+1, UN+2, DX+3, DX+4
>> I	DM+1, DE, A+2, A+3, A+4
IOM	DE+1
>> M(	DM+1, DE, A+1*, D+1
>> O	DM+1, PX+4, UN+2, T+1, DX+4
>> R	LOOP
>> R(	D+1*
U	DM+3
V	A+1!, A+2, A+4, A+5, A+7, UN+3
>> W	LOOP, DM, DM+1, DM+2, DE, DE+1, D+1
>> X	DM+3, UN+3*
Y	LOOP+3, DM+1, DM+4, PX+1, PX+2, UN+3, T+1, DX+2~, DX+3, DX+4 , IF
>> Z	A+2, A+3, A+6, A+7, U