Routine: DIKZ0

Package	Total	Call Graph
VA Fileman	3	(DD,DD1,E)^DIK SV^DIKZ ^DIKZ2

Package	Total	Caller Graph
VA Fileman	2	DIKZ DIKZ2

Entry Points

Name	Comments	DBIA/ICR reference
A	;
INDEX	;Loop through ^TMP and pick up cross references for file DH
DOTLINE(CODE)	;Add code to ^UTILITY. If the code looks like it contains
LINE(CODE)	;Add line of code to ^UTILITY, increment DIKR
XARR	;Build code to set X array
RET
0	;
PUT
GETINDEX	;Get code for one index DIKC in file DH
SD

External References

Name	Field # of Occurrence
DD^DIK	DIKZ0+3
DD1^DIK	SD
E^DIK	RET
SV^DIKZ	0+1
^DIKZ2	0+5

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	SD
^TMP("DIKC"	SD, INDEX+5, GETINDEX+1, GETINDEX+2, GETINDEX+9, GETINDEX+11, GETINDEX+16, GETINDEX+32, GETINDEX+39, GETINDEX+43 , GETINDEX+50, XARR+6, XARR+7, XARR+17
^UTILITY("DIK"	A+1, A+2, A+4!, PUT+1, PUT+2, PUT+5
^UTILITY($J	0+4, 0+6, PUT, PUT+1, PUT+3, PUT+4, PUT+5, PUT+6, PUT+7, LINE+1

Label References

Name	Line Occurrences
0	SD
A	DIKZ0+3
DOTLINE	XARR+20
GETINDEX	INDEX+5
INDEX	A+3
LINE	INDEX+6, GETINDEX+6, GETINDEX+10, GETINDEX+12, GETINDEX+18, GETINDEX+19, GETINDEX+29, GETINDEX+34, GETINDEX+35, GETINDEX+36 , GETINDEX+37, GETINDEX+39, GETINDEX+45, GETINDEX+46, GETINDEX+47, GETINDEX+48, GETINDEX+50, XARR+12, XARR+19, XARR+21 , XARR+23, XARR+25, XARR+26, DOTLINE+3, DOTLINE+4, DOTLINE+5
PUT	A+1, A+2
RET	RET+1
SD	DIKZ0+3, RET+1
XARR	GETINDEX+11

Naked Globals

Name	Field # of Occurrence
^(	0+4, A+1, A+2, PUT+3, PUT+5, GETINDEX+16
^(0	PUT+1, PUT+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	A+1, A+2, PUT, PUT+1, PUT+3*, PUT+4, PUT+5, PUT+6, PUT+7
>> A	RET*, 0+2, 0+3, 0+6, PUT+7
CODE	XARR+2~, XARR+6*, XARR+9, XARR+14, XARR+15, DOTLINE~, DOTLINE+2, DOTLINE+4, DOTLINE+5, LINE~ , LINE+1
>> DH	RET, RET+1, SD*, 0+6, A+1, A+2, PUT+1, PUT+2, PUT+4, PUT+5 , PUT+6, PUT+7, INDEX+5, GETINDEX+1, GETINDEX+2, GETINDEX+9, GETINDEX+11, GETINDEX+16, GETINDEX+32, GETINDEX+39 , GETINDEX+43, GETINDEX+50, XARR+6, XARR+7, XARR+17
>> DH(1	SD
>> DIK	0+6*, PUT
>> DIK(	SD*!
>> DIK0	DIKZ0+3*, PUT+4, PUT+5, PUT+6, PUT+7
DIK01	GETINDEX+4~, GETINDEX+23
DIK01(	GETINDEX+24, XARR+8*
DIK01(0	GETINDEX+27
>> DIK1	0+1, 0+2, 0+3*, 0+4
>> DIK2	0+6
DIK6	A+1!, A+4!, PUT+4!, PUT+5!, GETINDEX+51!
DIK6(	PUT, XARR+11, XARR+13
>> DIK8(	0+6
DIKA	RET*, 0+2, 0+5!
>> DIKC	PUT+2, PUT+3, PUT+4, PUT+5, PUT+6, INDEX+5, GETINDEX+1, GETINDEX+2, GETINDEX+6, GETINDEX+9 , GETINDEX+11, GETINDEX+16, GETINDEX+32, GETINDEX+39, GETINDEX+43, GETINDEX+50, XARR+6, XARR+7, XARR+17
DIKCOD	GETINDEX+4~, GETINDEX+15, GETINDEX+17, GETINDEX+18, GETINDEX+24, GETINDEX+25, GETINDEX+26, GETINDEX+27, GETINDEX+28, GETINDEX+29 , GETINDEX+32, GETINDEX+33, GETINDEX+35, GETINDEX+43, GETINDEX+44, GETINDEX+46
DIKCTAG	INDEX+1~, INDEX+2, INDEX+6, GETINDEX+5, GETINDEX+6
DIKF	GETINDEX+4~, GETINDEX+9*, GETINDEX+12, GETINDEX+27
>> DIKL2	0+3*
>> DIKLW	0+5*
DIKO	INDEX+1~, GETINDEX+4~, GETINDEX+11, GETINDEX+15, GETINDEX+16, GETINDEX+17, GETINDEX+24, GETINDEX+25, XARR+6, XARR+7 , XARR+8, XARR+17, XARR+21, XARR+23, XARR+26
>> DIKQ	A+1, A+2, PUT+1, PUT+2, PUT+4, PUT+5, PUT+6, PUT+7
>> DIKR	0+4, 0+6, PUT, PUT+1, PUT+2, PUT+3, PUT+4, PUT+5, PUT+6, PUT+7 , LINE+1, LINE+2
DIKSET	PUT~, PUT+1*, PUT+3
>> DIKVR	A+1, A+2, GETINDEX+1, GETINDEX+2, GETINDEX+21, GETINDEX+41
>> DIKZQ	DIKZ0+3, RET+1, SD, 0+1
DK1	RET, RET+1!
DK1(	RET, SD*
>> DNM	SD, PUT+6
>> DRN	SD
>> DU(	SD!
LINE	XARR+2~, XARR+14, XARR+15, XARR+19, XARR+22, XARR+23, XARR+25
NODE	XARR+2~, XARR+10*, XARR+11, XARR+12, XARR+13, XARR+14, XARR+22
REF	XARR+2~, XARR+9*, XARR+10, XARR+12, XARR+14
TRANS	XARR+2~, XARR+17*, XARR+18, XARR+20
>> X	SD, PUT+4, PUT+6

Customize PDF page

Package: VA Fileman

Routine: DIKZ0

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: