Routine: DGRPXR

Package	Total	Call Graph
VA Fileman	10	E^DIE0 (,0,F,M,N,UNIQFERR,Z)^DIE17 Z^DIE2 ^DIE3 (AST,NOSCR)^DIED QQ^DIEQ ^DIK $$GETTMP^DIKC1 ^DIR RW^DIR2
Registration	7	AUTOUPD^DGENA2 (EV,VAGE)^DGLOCK POS^DGLOCK1 EN^DGMTCOR EN^DGRP7CC ADGRU^DGRUDD01 AVAFC^VAFCDD01
IHS Patient	1	(KILL,SET)^AUPNDWXR
Income Verification Match	1	EVENT^IVMPLOG

Entry Points

External References

Name	Field # of Occurrence
KILL^AUPNDWXR	C1+14
SET^AUPNDWXR	C1S+14
AUTOUPD^DGENA2	C1+8, C1S+8, C2+10, C2S+10
EV^DGLOCK	X1
VAGE^DGLOCK	X1
POS^DGLOCK1	X3
EN^DGMTCOR	C1+2, C1S+2
EN^DGRP7CC	C1+4, C1S+4
ADGRU^DGRUDD01	C1+12, C1S+12
E^DIE0	I+1, 1+5, 2+5, 3+5
^DIE17	RD
0^DIE17	4
F^DIE17	2, 3
M^DIE17	T
N^DIE17	RP, 1+5, 2+5, 3+5
UNIQFERR^DIE17	Z
Z^DIE17	X
Z^DIE2	RD+1
^DIE3	T
AST^DIED	P
NOSCR^DIED	P
QQ^DIEQ	QS
^DIK	C2+4
$$GETTMP^DIKC1	BEGIN+1
^DIR	SET+2
RW^DIR2	O+1
EVENT^IVMPLOG	C3+8, C3S+8
AVAFC^VAFCDD01	C1+10, C1S+10, C3+6, C3S+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: W Line Location: W+0
Function Call: WRITE	Prompt: !?DL+DL-2,DLB_": " Line Location: W+0
Function Call: WRITE	Prompt: W Line Location: O+0
Function Call: WRITE	Prompt: Y Line Location: O+0
Function Call: WRITE	Prompt: !?9 Condition for execution: $X>45 Line Location: O+0
Function Call: WRITE	Prompt: " (No Editing)" Line Location: O+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: TR+0
Function Call: WRITE	Prompt: $C(7) Line Location: TR+0
Function Call: WRITE	Prompt: " "_X Line Location: RD+2
Routine Call	DIR Line Location: SET+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	T, R, R+1
^DD("DD"	R+2
^DD("KEY" - [#.31]	N
^DD(2	C1S+6, C2+4, C2S+4, C3S+4
^DIC(8 - [#8]	C2S+4
^DIE(2409	BEGIN+2
^DISV(	RD+2, Z*
^DPT - [#2]	DE, C1S+6, C2S+4, C3S+4
^DPT("AEL"	C2+8!, C2S+8*
^DPT("APOS"	C3+2!, C3S+2*
^XUSEC("DG ELIGIBILITY"	X1

Label References

Name	Line Occurrences
$$KEYCHK	Z
@(	B, V
A	N, Z, Y, RP, 1+5, 2+5, 3+5
B	QS
BEGIN	DGRPXR+1
C1F1	C1S
C1S	C1
C2F1	C2S
C2S	C2
C3F1	C3S
C3S	C3
D	RD, RD+1, P+1, QS
DE	DGRPXR+1, 2, 3
N	Y
NKEY	N
O	Y, RP
P	T
PR	RE, I+1
QS	RD, NKEY
R	R, R+1
RD	Y, I, I+1, 1+6, 2+6, 3+6
RP	PR, R, R+1
SAVEVALS	Z
SET	T
TR	RE
V	T, P+1
W	O, RE
X	N, T+1, P, Y
Z	P+1, 2+6

Naked Globals

Name	Field # of Occurrence
^(	DE+1, DE+2, RD+2, R, R+1, C1S+6
^("F"	SAVEVALS*
^("ODS"	C3S+4
^("VET"	DE+3
^(0	R, R+1, C2S+4
^(12.1	T

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DE+1, DE+2, DE+3, T, R+2, SET+2*
%Z	DE+1, DE+2, DE+3*, DE+4!
>> D	N, D*
>> D0	BEGIN+3, C1S+6, C2+4, C2S+4*, C3S+4
>> D1	C2S+4*
>> DA	DE, BEGIN+3, C1+2, C1+4, C1+8, C1+10, C1+12, C1+14, C1S+2, C1S+4 , C1S+8, C1S+10, C1S+12, C1S+14, X1, C2+4*, C2+8, C2+10, C2S+4, C2S+8 , C2S+10, C3+2, C3+6, C3+8, C3S+2, C3S+6, C3S+8, X3
>> DA(1	C2+4*
DB	DE!, C1!, C1S!, C2!, C2S!, C3!, C3S!
DB(	T, P, X, SET, SET+1, 1+5, 2+5, 3+5*
>> DC	RP
DDER	T, T+1!, SET+2
DE	DE!
DE(	O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK, 1+1* , 1+5, 2+1, 2+5, 3+1*, 3+5
DE(1	DE+3*, C1, C1+1, C1+3, C1+5, C1+7, C1+9, C1+11, C1+13
DE(2	DE+2*, C2, C2+1, C2+3, C2+5, C2+7, C2+9
DE(3	DE+1*, C3, C3+1, C3+3, C3+5, C3+7
>> DFN	C1+2, C1+4, C1S+2, C1S+4, X1, X3
DG	DE!, PR, R, R+1*, R+2, 2, 3
DG(	Z*, C1S, C1S+1, C1S+3, C1S+5, C1S+7, C1S+9, C1S+11, C1S+13, C2S , C2S+1, C2S+3, C2S+5, C2S+7, C2S+9, C3S, C3S+1, C3S+3, C3S+5, C3S+7
DGMTCOR	C1+2!, C1S+2!
>> DGRPX	2+3
>> DIC	DE, P, C1+1, C1+3, C1+5, C1+7, C1+9, C1+11, C1+13, C1S+1 , C1S+3, C1S+5, C1S+7, C1S+9, C1S+11, C1S+13, C2+1, C2+3, C2+5, C2+7 , C2+9, C2S+1, C2S+3, C2S+5, C2S+7, C2S+9, C3+1, C3+3, C3+5, C3+7 , C3S+1, C3S+3, C3S+5, C3S+7
>> DIC("S"	T, Z!
>> DIC(0	P*
>> DICRREC	BEGIN+2*
>> DIE	DE*, P, C1+1, C1+3, C1+5, C1+7, C1+9, C1+11, C1+13, C1S+1 , C1S+3, C1S+5, C1S+7, C1S+9, C1S+11, C1S+13, C2+1, C2+3, C2+5, C2+7 , C2+9, C2S+1, C2S+3, C2S+5, C2S+7, C2S+9, C3+1, C3+3, C3+5, C3+7 , C3S+1, C3S+3, C3S+5, C3S+7
DIEBADK	BEGIN+1!
DIEFIRE	BEGIN+1!
>> DIEL	DE*
>> DIEZ	BEGIN+3*
DIEZAR	BEGIN+1~, BEGIN+2*
DIEZRXR	BEGIN+1~
DIEZTMP	SAVEVALS, SAVEVALS+1, SAVEVALS+2, BEGIN+1~*
>> DIFLD	N, T, D, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 1, 2, 3*
DIIENS	SAVEVALS, SAVEVALS+1, SAVEVALS+2, BEGIN+1~, BEGIN+3*
DIK	C2+4*!
DIK(0	C2+4*
DIQUIET	SET+1~*
DIR	SET~
DIR("V"	SET*
DIR(0	SET*
>> DIU	C1S+6, C2S+4, C3S+4*
DIV	C1S+6, C2+4!, C2S+4!, C3S+4
DIV(0	C2+4, C2S+4
DIV(1	C2+4
DIXR	BEGIN+1~
>> DL	DE*, W
DLAYGO	P*, Z!
>> DLB	W, RD+2, Z, D, 1, 2, 3*
>> DNM	BEGIN*
>> DP	DE*, N, T, SAVEVALS, SAVEVALS+1, SAVEVALS+2
>> DPTX	X1
>> DQ	O+2, A, B, RE, T, P, P+2, V, X, D , Y, PR, RP, SET, SET+1, SAVEVALS, BEGIN, 1+5, C1S, C1S+1 , C1S+3, C1S+5, C1S+7, C1S+9, C1S+11, C1S+13, 2, 2+5, C2S, C2S+1 , C2S+3, C2S+5, C2S+7, C2S+9, 3, 3+5, C3S, C3S+1, C3S+3, C3S+5 , C3S+7
>> DQ(	A!, P+2, D*, PR
DTIME	TR, BEGIN+3*
>> DTOUT	TR*
>> DU	DE, P, D, PR, SET, 1, 1+2, 2, 2+2, 3 , 3+2*
DUZ	RD+2, Z, X1
>> DV	O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y , PR, RP, I, 1, 1+5, 2, 2+5, 3*, 3+5
>> DW	Z, D, SAVEVALS+1, KEYCHK, 1, 1+1, 2, 2+1, 2+5, 3* , 3+1
>> DZ	QS*
>> I(0	C2S+4
>> I(1	C2S+4
U	DE+1, DE+2, DE+3, TR, P, P+2, Z, D, R, R+1 , SET, BEGIN+3*, C1S+6, C2S+4, C3S+4
>> VAFCF	C1+10, C1S+10, C3+6, C3S+6
X	O+2, TR, N, RD, RD+1, RD+2, T, P, P+1!, P+2* , Z, X+1, QS, Y, PR, R, R+1, R+2, RP, I+1 , SET+2, NKEY, 1+3, 1+4, 1+5, C1+1, C1+3, C1+5, C1+7, C1+9* , C1+11, C1+13, C1S, C1S+1, C1S+3, C1S+5, C1S+6, C1S+7, C1S+9, C1S+11 , C1S+13, X1, 2+3, 2+4, 2+5, 2+6, C2+1, C2+3, C2+4, C2+5 , C2+7, C2+8, C2+9, C2S, C2S+1, C2S+3, C2S+4, C2S+5, C2S+7, C2S+8 , C2S+9, 3+3, 3+4, 3+5, C3+1, C3+2, C3+3, C3+5, C3+7, C3S , C3S+1, C3S+2, C3S+3, C3S+4, C3S+5, C3S+7*
Y	O, O+1, O+2, P, Y, PR, R, R+1, R+2, SET+2 , 1+4, 1+5, C1S+6!, 2+4, 2+5, C2S+4!, 3+4*, 3+5, C3S+4!
Y(0	SET+2
Y(1	C1S+6, C3S+4
Y(102	C2S+4*
YS	V!
>> ZTQUEUED	X, NKEY

Marked Items

Customize PDF page

Package: Registration

Routine: DGRPXR

Information

Source Information

Call Graph

Call Graph Total: 19

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items

Name	Comments	DBIA/ICR reference
DE
C3F1
PR
1
BEGIN
SET
RP
TR
RD
RE
3
2
4
X2
C2
C1
X1
KEYCHK()
C3
A
B
D
C2S
I
X3
O
N
C2F1
P
R
T
W
V
Y
X
Z
QS
NKEY
C1S
C1F1
C3S
SAVEVALS

Name	Field # of Occurrence
$T(@(3)	D
$T(ADGRU^DGRUDD01	C1+12, C1S+12
$T(AVAFC^VAFCDD01	C1+10, C1S+10, C3+6, C3S+6