Routine: DICM0

Package	Total	Call Graph
VA Fileman	4	LIST^DDSU X^DIC DO^DIC1 Y^DICN

Package	Total	Caller Graph
VA Fileman	3	DICM DICM1 DICM3

Entry Points

Name	Comments	DBIA/ICR reference
OKTOADD(DIFILEI,DINDEX,DIFINDER)	; Return 1 if index is OK for LAYGO.
P1	; Build screen to make sure selected entry is pointed-to.
AST	; Process screens on pointers.
SETIX(D,DIC,DID,DF,DICR,DIFILEI)	; If user passes list of indexes to use on pointed-to file, set up to use them.
NO
BLDC(DIGBL,DIXNAM,DIXNO,DIFILEI,DIPGBL,DICODE,DICR)	; Build screening logic to loop through compound index, making sure pointed-to file is pointed-to by entry in index
P	;Pointers, called by ^DICM1
R
L2
SETSCR(DICODE,DICR,DIC,D,DICALL,DID,DF,DIFILEI)	; Execute screening logic for screened pointers and var.ptrs.
L1
RETRY
CHKTMP(DIC,DICR,DIFILEI,DIVAR)	; If DIC(0)["T", add check to make sure entry hasn't already been presented once before.

Name	Field # of Occurrence
LIST^DDSU	L2
X^DIC	P1+16, RETRY+6
DO^DIC1	R+4, RETRY
Y^DICN	L1+8

Name	Line Occurrences
$$CHKTMP	P1+7, P1+8, P1+9, BLDC+12
$$OKTOADD	P+3
BLDC	P1+6
L1	P1+1, P1+5
L2	L1+6
NO	L2
R	L1+1, RETRY+7, NO
RETRY	L1+2
SETIX	P1+14, SETSCR+6, SETSCR+7
SETSCR	AST+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	P1+4, P1+6, P1+7, L1+6, L1+8, R+1, L2, BLDC+1~, BLDC+3, BLDC+6 , BLDC+8, BLDC+10, BLDC+12, SETIX+3~, SETIX+4, SETIX+6, SETIX+9
C	BLDC+1~, BLDC+7, BLDC+8, BLDC+9
D	P+1, AST+5, P1+14, P1+15, RETRY+1, RETRY+5, SETSCR~, SETSCR+3, SETSCR+5, SETSCR+6 , SETSCR+7, SETSCR+8, SETIX~, SETIX+4~, SETIX+5, SETIX+8, SETIX+10, SETIX+11, SETIX+12, SETIX+13 , SETIX+15, SETIX+16, SETIX+17*
DA	RETRY+4~*
DA(1	RETRY+4
>> DDH	L2
>> DDS	L1+8, L2
DF	AST+1~, AST+5, P1+14, RETRY+1, RETRY+5, SETSCR~, SETSCR+6, SETSCR+7, SETIX~, SETIX+15* , SETIX+17*
DIASKOK	P+1~
DIC	P+2, AST+5, P1+7, P1+8, P1+9, P1+14, L1+6, R+1, BLDC+12, CHKTMP~ , SETSCR~, SETSCR+6, SETSCR+7, SETIX~
DIC(	P+8!, R+2*
DIC("P"	R+3
DIC("PTRIX"	P+9
DIC("S"	P1+12, L1!, L1+3, L1+5, R!, L2, SETSCR+4
DIC("W"	R!
DIC(0	P+2, P+3, P+4, P+6, P+7, R+1, R+3, RETRY+2, CHKTMP+1, SETSCR+1* , SETSCR+3, SETSCR+6, SETIX+12, SETIX+14, SETIX+18
DICALL	SETSCR~, SETSCR+6, SETSCR+7
DICODE	P+1~, AST+2, AST+3, AST+4, AST+5, P1+2, P1+3, P1+4, P1+5, P1+6 , P1+7, P1+8, P1+9, P1+10, P1+11, P1+12, BLDC~, BLDC+4, BLDC+5, BLDC+6 , SETSCR~, SETSCR+2
DICR	P+2, P+3, P+4, P+5, P+6, P+8, AST+1, AST+5, P1+1, P1+2 , P1+3, P1+6, P1+7, P1+8, P1+9, P1+11, P1+14, L1, L1+2, L1+3 , L1+4, L1+5, L1+6, L1+7, R+1, R+2, L2, RETRY+1, RETRY+2, RETRY+4 , RETRY+5, RETRY+6, BLDC~, BLDC+4, BLDC+5, BLDC+6, BLDC+8, BLDC+9, BLDC+11, BLDC+12 , BLDC+13, BLDC+14, CHKTMP~, CHKTMP+1, SETSCR~, SETSCR+4, SETSCR+6, SETSCR+7, SETSCR+8, SETIX~ , SETIX+1~*, SETIX+2, SETIX+3, SETIX+6, SETIX+7, SETIX+9, SETIX+10, SETIX+11
DICR(	P+2, P+3, P+4, P+6, P+8, AST+1, P1+1, P1+3, P1+11, L1+2 , L1+3, L1+4, L1+5, L1+6, R+1, R+2, L2, RETRY!, RETRY+1, RETRY+2 , RETRY+4, RETRY+5, RETRY+6!, BLDC+5, BLDC+9, BLDC+13, BLDC+14, SETSCR+4, SETSCR+8, SETIX+3 , SETIX+6, SETIX+7!, SETIX+9, SETIX+10, SETIX+11*
DICR("^"	OKTOADD+5
DICS	R!
DICW	R!
DID	AST+1~, AST+5, P1+14, RETRY+5, SETSCR~, SETSCR+6, SETSCR+7, SETIX~, SETIX+15!, SETIX+17
DID(1	RETRY+5, SETIX+17
DIFILEI	P+3, P+9, P1+6, P1+7, P1+8, P1+9, P1+16~, RETRY+3~, BLDC~, BLDC+12 , CHKTMP~, CHKTMP+2, SETSCR~, SETSCR+6, SETSCR+7, SETIX~, OKTOADD~, OKTOADD+5, OKTOADD+6
DIFINDER	P+3, OKTOADD~, OKTOADD+2
DIGBL	BLDC~, BLDC+3, BLDC+12
DINDEX	P+3, P1+16~, RETRY+3~, OKTOADD~, OKTOADD+3
DINDEX("#"	P1+3, P1+6, P1+11, OKTOADD+4
DINDEX(1	P+9, OKTOADD+1, OKTOADD+6, OKTOADD+7
DIPGBL	BLDC~, BLDC+2
DIPTRIX	P+1~, P+9*, P1+14
>> DIROUT	L1+1
DISAV0	SETSCR+1~*, SETSCR+2~
DISB	BLDC+1~
DIVAR	CHKTMP~, CHKTMP+2
DIVPSEL	P+5~
DIVPSEL(	P+5, L1+6, L1+7
DIXNAM	BLDC~, BLDC+3
DIXNO	BLDC~, BLDC+7, BLDC+14
DO	P1+1!, R!
DO(2	RETRY
DS	P+2, P+4, P+9, AST+1, AST+3, AST+4, AST+5, P1+8, P1+9, P1+14 , P1+16~, RETRY+3~, RETRY+4*!
DST	L1+8*, L2+1!
>> DTOUT	L1+1
I	AST+4~, AST+5, P1+2, P1+4, P1+7, P1+8, P1+9, P1+11, L1+7~, BLDC+1~ , BLDC+7, BLDC+8, BLDC+9, BLDC+10, BLDC+11*, BLDC+12, BLDC+13, SETIX+4
U	P+2, P+4, P+9, AST+1, AST+4, AST+5, P1+9, P1+14, L1+6, RETRY , SETSCR+6, SETSCR+7, SETIX+4, SETIX+5, SETIX+8, SETIX+11, SETIX+12, SETIX+13, SETIX+15, SETIX+16 , SETIX+17
X	R+2, R+4!, L2, RETRY+2, BLDC+1~, BLDC+12, BLDC+13, BLDC+14
Y	P+2, P+3, P+4, P+8, AST+3, AST+4, P1+1, P1+4, P1+6, P1+7 , P1+8, P1+15, L1+1, L1+2, R+4, L2, BLDC+1~, BLDC+2, BLDC+3, NO

Customize PDF page

Package: VA Fileman

Routine: DICM0

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Label References

Local Variables

Legend: