Routine: DICATT22

Package	Total	Call Graph
VA Fileman	6	N^DICATT (,TYPE)^DICATT2 ^DIE IX1^DIK DIPZ^DIU0 DIVR^DIUTL

Package	Total	Caller Graph
VA Fileman	2	DICATT2 DICATT3

Entry Points

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),!?5,"Field Definition is TOO LONG by ",%-242," characters!" Line Location: 1+1
Function Call: WRITE	Prompt: $C(7),!,"NUMBER MUST BE BETWEEN ",A," & ",%+1," AND NOT ALREADY IN USE" Line Location: Q+0
Function Call: READ	Timeout: DTIME Variable: DG Line Location: M+1
Function Call: WRITE	Prompt: !,"...." Line Location: SDIK+2
Routine Call	DIE Line Location: DIE+2

Name	Line Occurrences (* Changed, ! Killed)
^DD(	DICATT22+4, 1+3, M, M+2, M+4, VARPOINT+4!, POINT+3, I, I+1!, SDIK+1!
^DD(0	1+2
^UTILITY("DIVR"	I+1!

Name	Field # of Occurrence
>> %	1+1, Q, M, M+2, POINT, POINT+4
%X	M+2*, VARPOINT+2, VARPOINT+4, VARPOINT+5, POINT, POINT+1!, SDIK~
%Y	M+4*, VARPOINT+5, POINT, POINT+1!
>> A	DICATT22+4, 1+2, 1+3, Q, M, M+1, M+2, V+1
>> C	1+1, 1+3, M+4
>> D0	V+1
>> DA	DICATT22+5, 1+3, M, M+2, M+4*, POINT+3, I, SDIK+1
>> DA(1	1+2, SDIK+1
DB	I+1!
DE	M, M+1, M+2, M+4, POINT+3, I+2!
DG	M+1*, I+1!
>> DI	V*
>> DICL	M+4, POINT+4, POINT+5, I+3, SDIK+1
>> DIE	I+2*
>> DIK	POINT+3, POINT+4, I+2, SDIK+1*
>> DIZ	V
DQ	I+1!
DQI	I+1!
DR	I, I+1!, I+2, I+3*, V+2!
DT	I
DTIME	M+1
>> DTOUT	M+1*, V
DUZ(0	M+1, I+2
>> F	1+1, 1+3, M+2, M+4
FD	VARPOINT+1~, VARPOINT+2*, VARPOINT+4
FI	VARPOINT+1~, VARPOINT+2*, VARPOINT+4
I	DICATT22+4, DICATT22+5, M+2, VARPOINT+1~, VARPOINT+3, VARPOINT+4, DIE+1~, P, P+1
I(	M+4*, POINT+4
I(0	DICATT22+5
J	DIE+1~
J(	DICATT22+4, M+4*, I, V, SDIK+1
M	I, I+3, V+2!
M(1	I*
>> N	DICATT22+4, DICATT22+5, M+4*, I, V
>> O	DICATT22+5, 1+2, I, I+2, I+3, SDIK+1
>> O(1	1+2
P	DICATT22+4, VARPOINT+1~, VARPOINT+4*
>> T	1+2, VARPOINT, POINT, POINT+2, POINT+4, I+2, P
U	DICATT22+4, DICATT22+5, 1+2, 1+3, M+1, M+4, I, I+1, I+2, I+3 , P+1
>> V	DICATT22+4, I+3*
>> W	1+1, 1+3, M+2, M+3*, M+4, POINT+3
>> X	1+2*
>> Y	P*
>> Z	1+1, 1+2, 1+3, M+4, I+3*