Routine: DGDEP1

Package	Total	Call Graph
Registration	3	INIT^DGDEP $$ACTIVE^DGMTU11 $$SETSTR^VALM1
VA Fileman	1	^DIE

Package	Total	Caller Graph
Registration	1	DGDEPE

Entry Points

Name	Comments	DBIA/ICR reference
DOB(DA,X)	;CHECK EFFECTIVE DATE AGAINST DOB
EN	; Effective Dates
LSTDEP(DGDEP)	;List Dependents
EDIT	; Edit Effective Dates ; values for DGFLG: ; DGFLG = 1 IVM effective date
ONE(CNT)	; List one dependent ; Modified for SSN VERFICIATION STATUS DG5.3688 BAJ 11/22/2005
SET(X)	;Set up array
EDITQ
ENQ
EXIT	;

External References

Name	Field # of Occurrence
INIT^DGDEP	EDITQ
$$ACTIVE^DGMTU11	DOB+16
^DIE	EDIT+9
$$SETSTR^VALM1	ONE+5, ONE+6, ONE+7, ONE+8, ONE+9, ONE+10, ONE+12, ONE+19, ONE+21, ONE+22 , ONE+25, ONE+27, ONE+32, ONE+33, ONE+34, ONE+35, ONE+38, ONE+39, ONE+45, ONE+46 , ONE+47, ONE+48, ONE+49, ONE+50, ONE+56, ONE+57, ONE+60, ONE+61, ONE+65, ONE+66 , ONE+67, ONE+72, ONE+73, ONE+78, ONE+79

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Cannot edit when viewing a means test." Line Location: EN+2
Function Call: WRITE	Prompt: !,"Not while viewing" Line Location: EN+3
Function Call: WRITE	Prompt: !,"Cannot inactivate veteran" Line Location: EN+5
Function Call: WRITE	Prompt: !!,"Cannot edit date added by IVM." Line Location: EDIT+10
Function Call: WRITE	Prompt: !!,"There has to be an effective date for this person." Line Location: EDIT+12
Function Call: WRITE	Prompt: !," <<EFFECTIVE DATE may not precede Date Of Birth>>",*7 Line Location: DOB+4
Function Call: WRITE	Prompt: !," <<EFFECTIVE DATE may not precede Veteran Date Of Birth>>",$C(7) Line Location: DOB+9
Function Call: WRITE	Prompt: !," <<EFFECTIVE DATE may not be greater than Veteran Date Of Death>>",$C(7) Line Location: DOB+14
Function Call: WRITE	Prompt: !," <<EFFECTIVE DATE must be a date prior to Spouse Inactivation Date>>",$C(7) Line Location: DOB+17
Routine Call	DIE Line Location: EDIT+9

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DGPR(408.12 - [#408.12]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGPR(408.12 - [#408.12]	EDIT+11, DOB+2, DOB+7
^DIC(5 - [#5]	ONE+71
^DPT - [#2]	DOB+8, DOB+12
^TMP("DGMTEP"	SET+1*, EXIT+1!, EDITQ+1!

Label References

Name	Line Occurrences
EDIT	EN+4, EDIT+12
EDITQ	EDIT+10
EN	EN+5
ENQ	EN+2, EN+3
ONE	LSTDEP+2, EDITQ+1
SET	ONE+13, ONE+28, ONE+36, ONE+40, ONE+41, ONE+51, ONE+58, ONE+62, ONE+80

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ACTIVE	EN+7*, EN+8
CNT	LSTDEP+1~, LSTDEP+2, ONE~, ONE+6, ONE+8, ONE+10, ONE+12, ONE+17, ONE+20, ONE+24 , ONE+26, ONE+27, ONE+30, ONE+33, ONE+35, ONE+37, ONE+46, ONE+47, ONE+49, ONE+50 , ONE+54, ONE+56, ONE+57, ONE+60, ONE+61, ONE+64, ONE+65, ONE+66, ONE+67, ONE+70 , ONE+71, ONE+72, ONE+73, ONE+76, ONE+77, ONE+78, ONE+79
DA	EDIT+4~, EDIT+7*, DOB~, DOB+2, DOB+7, DOB+16
DATE	EN+6, EN+7, EDIT+4~, EDIT+11, EDIT+12
DEP	LSTDEP+1~, ONE+29, ONE+30, ONE+31, ONE+33, ONE+35, ONE+37
DGDEP	LSTDEP~, EDIT+6, EDITQ!
DGDEP(	LSTDEP+2, ONE+6, ONE+8, ONE+10, ONE+12, ONE+17, ONE+20, ONE+24, ONE+26*, ONE+27 , ONE+30, ONE+33, ONE+35, ONE+37, ONE+46, ONE+47, ONE+49, ONE+50, ONE+54, ONE+56 , ONE+57, ONE+60, ONE+61, ONE+64, ONE+65, ONE+66, ONE+67, ONE+70, ONE+71, ONE+72 , ONE+73, ONE+76, ONE+77, ONE+78, ONE+79, EDIT+6, EDIT+11
DGDEP(1	EN+6, EN+7
DGEDIT	EDIT+4~, EDIT+5*
DGEE	EDIT+4~
DGERR	EN+5!, EN+8*
DGFILE	DOB+1~, DOB+2*, DOB+3
DGFLG	EDIT+5*, EDIT+10, EDITQ!
DGLN	ONE+3~, ONE+42, ONE+82, SET+1, SET+2
DGMNTEXT	ONE+18~, ONE+20*, ONE+21, ONE+22
>> DGMTACT	EN+2
>> DGMTI	EN+2, EN+3
>> DGPR	EDIT+6*, EDIT+7
>> DGRPV	EN+3
>> DGW	EN+5, EDIT+6, EDIT+11, EDITQ+1
DIC	EDIT+4~
DIE	EDIT+4~, EDIT+7*
DR	EDIT+4~, EDIT+7*
DR(2	EDIT+8*
NODE	DOB+1~, DOB+7*, DOB+8, DOB+11, DOB+12
STATVAL	ONE+68~, ONE+69, ONE+71, ONE+72, ONE+77
U	ONE+6, ONE+8, ONE+10, ONE+12, ONE+17, ONE+20, ONE+24, ONE+26, ONE+27, ONE+33 , ONE+35, ONE+37, ONE+46, ONE+47, ONE+49, ONE+50, ONE+54, ONE+56, ONE+57, ONE+60 , ONE+61, ONE+64, ONE+65, ONE+66, ONE+67, ONE+70, ONE+71, ONE+72, ONE+73, ONE+76 , ONE+77, ONE+78, ONE+79, EN+7, EDIT+6, EDIT+11, DOB+2, DOB+3, DOB+8, DOB+11 , DOB+12
>> VALMBCK	EN+1, ENQ
>> VALMCNT	ONE+42, ONE+82
X	ONE+5, ONE+6, ONE+7, ONE+8, ONE+9, ONE+10, ONE+12, ONE+13, ONE+16, ONE+19* , ONE+21, ONE+22, ONE+25, ONE+27, ONE+28, ONE+32, ONE+33, ONE+34, ONE+35, ONE+36 , ONE+38, ONE+39, ONE+40, ONE+44, ONE+45, ONE+46, ONE+47, ONE+48, ONE+49, ONE+50* , ONE+51, ONE+55, ONE+56, ONE+57, ONE+58, ONE+59, ONE+60, ONE+61, ONE+62, ONE+63* , ONE+65, ONE+66, ONE+67, ONE+72, ONE+73, ONE+78, ONE+79, ONE+80, SET~, SET+1 , DOB~, DOB+3, DOB+5, DOB+8, DOB+11, DOB+13, DOB+15, DOB+16, DOB+18, DOB+20
X1	DOB+1~, DOB+2, DOB+3, DOB+12, DOB+13
Y	EDIT+4~
ZIPPOS	ONE+68~, ONE+77*, ONE+78

Customize PDF page

Package: Registration

Routine: DGDEP1

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: