Routine: DICM

Package	Total	Call Graph
VA Fileman	12	F^DIC D^DIC0 (BAD,DO,RENUM)^DIC1 (GOT,R)^DIC2 (ADDKEY,S)^DIC3 NXTINDX^DICF2 $$OKTOADD^DICM0 (,SOU)^DICM1 ^DICN INDEX^DICUIX ($$ORDERQ,ORDERQ)^DICUIX2 $$UP^DILIBF

Package	Total	Caller Graph
VA Fileman	4	DIC DIC3 DIC5 DICF4
Local Area Programs	1	AZAXTT

Entry Points

Name	Comments	DBIA/ICR reference
A	; Set variables needed for transforming date/set/ptr/var.ptr
SOUNDEX
B
NL
D
RS
K
L
DD
N
1
2
SOU
RCR
W
NQ
7
E
R
DIC	;
DINUM

External References

Name	Field # of Occurrence
F^DIC	7+6
D^DIC0	2
BAD^DIC1	DD, B, N+6
DO^DIC1	E+5
RENUM^DIC1	DIC+4
GOT^DIC2	DINUM+1, DINUM+7, NL+2
R^DIC2	K+1
ADDKEY^DIC3	DINUM+1, DINUM+7, NL+2
S^DIC3	NQ
NXTINDX^DICF2	1+19
$$OKTOADD^DICM0	%+2
^DICM1	1+14, 1+15, N+3
SOU^DICM1	1+11, SOU
^DICN	L
INDEX^DICUIX	D+10
$$ORDERQ^DICUIX2	1+12
ORDERQ^DICUIX2	1+12
$$UP^DILIBF	2+4, 2+21

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: " " Line Location: SOUNDEX+0
Routine Call	DIC Line Location: 7+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	DICM+5, 1+2, 1+8, 1+10, DINUM, N+1, N+2

Label References

Name	Line Occurrences
%	2+3, 2+13, 2+17, 2+21, A+2
1	R+4
2	DICM+7, R+5, N+7
7	2+14, 2+20, 2+24
@(	DICM+5
A	1+11, 1+14, 1+15
D	1+11, 1+14, 1+15
DD	W
DIC	2+5
E	N+5, 7+8
K	2+1, 2+2, 2+6
L	N+5
N	DICM+4
NL	W
NQ	NL
R	SOUNDEX+1
RCR	SOUNDEX
RS	1+10, N, SOUNDEX
SOU	SOUNDEX
W	DICM+6

Naked Globals

Name	Field # of Occurrence
^(	1+2
^("LOOK"	DICM+5
^(0	DINUM+6
^(7	1+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	1+9, 2, 2+7, 2+12, 2+17, 2+21, N, A+1, E+1, E+2 , E+3, E+4, 7~*, 7+2
%Y	1~, 1+1, 1+2, 1+3, 1+4, 1+5, 1+6, 1+8, 1+9, 1+10 , N+1, N+2
>> D	2, 2+12, 2+17, 2+21, N, D+1, D+4, E, E+3*
DD	DICM+6, 2+7, 2+8, 2+9, 2+10, 2+11, K, DINUM+1~, DINUM+7~, NL+1~ , DD, L!
DF	A+2!, %+4, D+1, DIC+5!, E+3
DIASKOK	NL+1~*
>> DIC	W, DINUM, DINUM+3, DINUM+6, NQ
>> DIC("S"	DINUM+1, DINUM+6, 7, 7+2, 7+7!
>> DIC("S1"	7+1, 7+2*, 7+7!
>> DIC("W"	K+1!
>> DIC(0	DICM+3, DICM+6, DICM+7, R, R+2, R+3, 1+12, 1+17, 2+2, 2+4* , 2+6, 2+14, 2+18, 2+19, 2+20, 2+23, W, DINUM+5, L, %+1 , RS, D+3, D+4, D+5, DIC+1, DIC+5, E+1, SOUNDEX, 7+6*
DICR	DICM+3~, 2+17, 2+21, 2+22, K!, NL, A+1, %+1, %+2, %+3 , %+4, RS, D, D+1, D+7, D+9, DIC+1, DIC+5, E, E+1
DICR(	1+5, 1+6, 1+9, 2+4, 2+17, 2+21, K, A+1, %+1, %+2* , %+3, %+4, RS, D, D+1, D+7, D+9, DIC+1, DIC+5, E+1 , E+2, E+3, E+4!
DICR(1	DICM+3
DICRS	RCR*, E+4!, SOUNDEX
DID	R+2, R+3, A+2!, %+4, E+3*
DID(1	%+4, E+3*
DIDA	RCR, DIC+4!
DIFILEI	1+19, 2+3~, %+2, D+10, 7+5~
>> DIFINDER	%+2
DIFLAGS	R~*, 1+19, D+10
DIFORCE	R+1~, R+2*, 1+19
DIFORCE(0	R+3*
DIFORCE(1	R+3*
DILONGX	2+4, 2+13~, 2+16~, 2+17*
DINDEX	R+3, R+4, 1+2, 1+3, 1+5, 1+6, 1+9, 1+19, 2+3~, %+2 , D+7~, D+8~, D+9, D+10, 7+5~
DINDEX("#"	N+1, N+4, D+11
DINDEX("1"	DINUM
DINDEX("IXFILE"	1+1
DINDEX("IXTYPE"	1+11
DINDEX("START"	D+7, D+9
DINDEX("WAY"	D+9*
DINDEX(1	1+1, 1+6, 1+15, N+1, D+11*
DINUM	A+2!, %+3, D, E+2
DIOUT	DINUM+3~, DINUM+4, DINUM+6*, DINUM+7
>> DIROUT	R+4, 2+1, 2+2, 2+6, K+2, W+1, NL
DITRANX	1+15~*, D+4
DIV	1~, 1+18!*, 1+19
DIV(1	1+18*
DIVAL	DIC+3~, 7+4~
DIVAL(0	7+4*
DIVAL(1	DIC+3, 7+4
>> DIVALUE	D+10
>> DIX	1+12, 2+6, 2+13
>> DIY	DINUM+1, DINUM+7
DO	N+3!
DO(2	DICM+5, 1+2, 1+3, 1+6, W+1, DINUM, N+2, E+5
DS	1~, 1+8, 1+10!, 1+12, 2+6, 2+10, 2+11, 2+12, 2+14, 2+18* , 2+19, 2+23, DINUM+1, DINUM+3, DINUM+5, DINUM+7, NL+1, N+1, N+2, N+3 , D+2, 7+1, 7+2
DS("INT"	N+3*
>> DTOUT	R+4, K+2, NL
DUOUT	N+6!
DZ	DINUM+1~, DINUM+7~, NL+1~
I	D+7~*!
T	D+2~*, D+3, D+4, D+5
U	R, 1+5, 1+6, 1+9, 1+12, DINUM, DINUM+6, N+3, %+4, D+2 , E+3
X	DICM+4, 1+18~, 2+2, 2+4, 2+6, 2+7, 2+13, 2+15, 2+17, 2+20 , 2+21, DINUM, DINUM+1, DINUM+6, N, N+3, N+4, N+5, RS, D+11 , DIC+2, DIC+3~, E+1, NQ, 7+3, 7+4~*
X(1	N+4, DIC+3, 7+4*
Y	R+4, 1+1, 1+2, 1+3, 1+4, 1+5, 1+6, 1+7, 1+8, 1+9 , 1+10, 1+11, 1+12, 1+13, 1+14, 1+15, 1+16, 1+17, 1+18~, 2+1 , 2+6, 2+15, 2+17, 2+18, 2+19, 2+20, 2+22, 2+23, K+1, W+1 , DINUM, DINUM+1, DINUM+2, DINUM+4, DINUM+6, NL, DD, N+3, N+5, N+6 , DIC+2, NQ, SOUNDEX, 7*

Marked Items

Name	Field # of Occurrence
$T(ORDERQ^DICUIX2	1+12

Customize PDF page

Package: VA Fileman

Routine: DICM

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 5

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items