Routine: DIVR

Package	Total	Call Graph
VA Fileman	6	S2^DIBT1 $$FROOTDA^DIKCU WRAP^DIKCU2 ^DIR (DEVSEL,INIT,Q)^DIV (LOADVER,VER)^DIVC
Kernel	3	^%ZISC $$LGR^%ZOSV $$S^%ZTLOAD

Package	Total	Caller Graph
VA Fileman	3	DIU3 DIUTL DIV
Local Area Programs	1	AZHLSCFV

Entry Points

External References

Name	Field # of Occurrence
^%ZISC	Q+7, Q+9
$$LGR^%ZOSV	LF+3
$$S^%ZTLOAD	LF+9
S2^DIBT1	Q+13
$$FROOTDA^DIKCU	DIVR+14
WRAP^DIKCU2	IER+4
^DIR	LF+6
DEVSEL^DIV	DIVR+7
INIT^DIV	DIVR+8
Q^DIV	DIVR+5
LOADVER^DIVC	DIVR+15
VER^DIVC	INDEX+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7)_"(CANNOT CHECK" Line Location: DIVR+19
Function Call: WRITE	Prompt: "(CHECKING" Line Location: DIVR+20
Function Call: WRITE	Prompt: " CROSS-REFERENCE)" Line Location: DIVR+21
Function Call: WRITE	Prompt: DA,?10,$S($D(^(DA,0)):$P(^(0),U),1:DA),?40,$E(M,1,40) Line Location: DA+2
Function Call: WRITE	Prompt: DA(X),?10,$P(^(DA(X),0),U) Line Location: DA+4
Function Call: WRITE	Prompt: DA,?10,$S($D(^(DA,0)):$P(^(0),U),1:DA) Line Location: IER1+2
Function Call: WRITE	Prompt: ?40,DIVTXT(DIVI) Line Location: IER1+5
Function Call: WRITE	Prompt: DA(X),?10,$P(^(DA(X),0),U) Line Location: IER1+10
Function Call: WRITE	Prompt: ! Line Location: LF+1
Function Call: WRITE	Prompt: ! Line Location: LF+6
Function Call: WRITE	Prompt: @IOF Line Location: LF+10
Function Call: WRITE	Prompt: "VERIFY FIELDS REPORT" Line Location: HDR+3
Function Call: WRITE	Prompt: !,DIVFIL_$J("",DIVTAB)_DIVDAT_DIVPG Line Location: HDR+6
Function Call: WRITE	Prompt: !,DIVFIL,!,$J("",IOM-1-$L(DIVDAT)-$L(DIVPG))_DIVDAT_DIVPG Line Location: HDR+7
Function Call: WRITE	Prompt: !,$TR($J("",IOM-1)," ","-"),! Line Location: HDR+8
Routine Call	DIR Line Location: LF+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS("C"	Q+10
^DD(	DIVR+9, DIVR+17, DIVR+18, E+1, V+2
^DD("IX" - [#.11]	DIVR+13
^DD("KEY" - [#.31]	DIVR+12
^DIBT(	Q+14, Q+15
^UTILITY("DIVR"	Q, Q+14, QX+1!, X, X+1, IER+7, IER+10

Label References

Name	Line Occurrences
0	E+2
@(	R+4, IX+1, INDEX+28
DA	DA+4
E	DIVR+18
F	P, V+4
HDR	LF+10
IER	INDEX+14, INDEX+25
IER1	IER1+11
L	L+4
LF	DIVR+10, DIVR+21, DA+1, DA+3, DA+4, IER1+2, IER1+4, IER1+6, IER1+9
Q	DIVR+21, Q+14
QX	Q+11
X	R+1, P+1, S, S+1, F, IX, V, V+2, V+3
XEC	E+3

Naked Globals

Name	Field # of Occurrence
^(	DIVR+17, DIVR+18, Q, DA+2, DA+4, IER1+2, IER1+10
^(0	DIVR+17, DA+2, V+1, IER1+2
^(1	DIVR+17
^(12.1	E+1
^(2	DIVR+17

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DIVR+17, D, L, L+1, IX
>> A	DIVR+9, DIVR+12, DIVR+13, DIVR+14, DIVR+15, DIVR+17, DIVR+18, E+1, V+2, INDEX+6
C	Q+12~
D	Q+12~
D0	Q+12~
DA	DIVR+12, DIVR+13, DIVR+15, DIVR+17, DIVR+18, E+1, QX+1!, X+1, DA+2, L* , L+2, INDEX+6, IER+10, IER1+2
DA(	X+1, DA+4, IER+10, IER1+10
DDA	Q+12~
DDC	E, E+1, Q+14*, Q+15, QX+1!, S, F+1
DDC(1	E+1*
DE	E+3, E+5, E+6, XEC, QX+1!, 0+1, L, L+1, L+2*
DE(	L*
DE(1	E+5*
DG	DIVR+16!, DIVR+19, DIVR+22, QX+1!
DG(	DIVR+17*, IX
DIBT	Q+11!
DIC	XEC!
DIC("S"	E+1
DICL	Q+12~
DIFLD	Q+12~, V+2
DIINDEX	INDEX+5!
DINAKED	LF+3~, LF+11
DIR	LF+5~
DIR(0	LF+6*
DIROUT	QX+1!
DIRUT	DIVR+10, DIVR+21, Q+11, Q+14, QX+1!, R, DA+1, DA+4, INDEX+9, INDEX+11 , INDEX+12, INDEX+17, INDEX+19, INDEX+20, INDEX+21, IER1+2, IER1+3, IER1+4, IER1+9, LF+8 , LF+9*
DISV	Q+11!
DIU0	Q+12~
DIVDAT	DIVR+5~, HDR+5, HDR+6, HDR+7
DIVFIL	DIVR+5~, HDR+5, HDR+6, HDR+7
DIVFILE	INDEX+18~, INDEX+19*, INDEX+20, INDEX+21, INDEX+22, INDEX+24
DIVI	IER+1~, IER1+3*, IER1+4, IER1+5
DIVINDEX	QX!, INDEX+6, INDEX+9!
DIVINDEX(	INDEX+11, INDEX+12
DIVKEY	QX!, INDEX+5!, INDEX+6, INDEX+17!
DIVKEY(	INDEX+19, INDEX+20, INDEX+21, INDEX+22
DIVKNM	INDEX+18~, INDEX+20*, INDEX+21, INDEX+22, INDEX+24
DIVMODE	DIVR+5~, DIVR+6*
DIVNAME	INDEX+10~, INDEX+11*, INDEX+12, INDEX+13
DIVNUM	INDEX+10~, INDEX+12*, INDEX+13
DIVPG	DIVR+5~, HDR+2*, HDR+5, HDR+6, HDR+7
DIVPROB	INDEX+18~, INDEX+22*, INDEX+23
DIVREQK	DIVR+11!, DIVR+12*, QX!, R+1, R+2
DIVROOT	DIVR+14*, QX!, INDEX+6
DIVTAB	HDR+1~, HDR+5*, HDR+6
DIVTMP	DIVR+11!, QX!
DIVTXT	IER+1~, IER+4
DIVTXT(	IER1+3, IER1+5
DIVTXT(0	IER+4*
DIVTYPE	DIVR+11!, DIVR+14, DIVR+23, QX!, INDEX+28
DIVXRNM	INDEX+18~, INDEX+21*, INDEX+22, INDEX+24
DIVZ	DIVR+10*, QX+1!, P, S+1
DK	Q*, QX+1!
DQ	QX+1!, F*, F+1
DQI	DIVR+21, XEC, QX+1!
DR	E+1, QX+1!, R+1
DT	Q+15
DTOUT	QX+1!
DUOUT	QX+1!
E	DIVR+23, DIVR+24, Q, Q+11, Q+14, QX+1!, IX+1
I	Q+12~
I(	DA+4, L+4, IER1+10
I(0	X+2, 0+1, IER+11
IOF	LF+10
IOM	HDR+5, HDR+7, HDR+8
IOSL	LF+1
IOST	LF+4
J	Q+12~
J(0	Q
L	Q+12~
M	E+4, E+5, E+6, XEC!, XEC+1, Q, QX+1!, R+2, R+3, P+1* , S, S+1, F, F+1, DA+2, IX, V, V+1, V+2, V+3* , INDEX+13, INDEX+23, INDEX+24*, IER+4
O	Q+12~
P	QX+1!
POP	DIVR+5~, DIVR+7
Q	E+3, Q+12~, S, S+1, F+1, IX, V, INDEX+13, INDEX+23
S	E+2, Q+12~, S+1, V, V+1, V+3
T	DIVR+10, DIVR+14, DIVR+18, DIVR+19, DIVR+23, DIVR+24*, QX+1!, R+4
U	DIVR+9, DIVR+17, E+2, Q+15, DA+2, DA+4, V+1, V+2, V+3, IER1+2 , IER1+10
>> V	DIVR+9, X+1, X+2, DA+3, DA+4, 0+1, L, L+2, L+4, IER+10 , IER+11, IER1+6, IER1+10
W	DIVR+9*, QX+1!, X, IER+7
X	E+2, E+3, E+4, R+1, R+2, P, P+1, S, S+1, D* , D+1, F, F+1, X+1, X+2, DA, DA+4, 0+1, L, L+2 , L+4, IX, V, V+1, V+3, INDEX+13, INDEX+23, IER+1~, IER+10, IER+11 , IER1+1, IER1+10*, LF+5~
Y	E, E+2, E+3, E+4, XEC!, Q+14, Q+15, P, S, D* , D+1, 0+1, L, L+4*, LF+5~
Y(0	E+2
>> Z	DIVR+10
>> ZTQUEUED	Q+1, Q+11, LF+9
>> ZTREQ	Q+1*
>> ZTSTOP	LF+9*

Marked Items

Customize PDF page

Package: VA Fileman

Routine: DIVR

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items

Name	Comments	DBIA/ICR reference
INDEX	;Check new indexes
HDR	;Print header
DA
LF	;Issue a line feed or EOP read
0	;
IX
E
D
F
K	;
IER	;Print info about invalid indexes. (Modeled after DA subroutine above)
L
N	;
Q
P
S
R
V
X
XEC
QX
IER1	;If top level, write record info and message