Routine: DGVPTDV4

Package	Total	Call Graph
HINQ	1	SCRHD^DVBHUTIL
VA Fileman	1	EN^DIQ1

Entry Points

Name	Comments	DBIA/ICR reference
EN	;Entry point from the edit template.
TR
DVBHS6	;ALB/JLU;Screen six of the HINQ screens;

External References

Name	Field # of Occurrence
EN^DIQ1	EN+7
SCRHD^DVBHUTIL	EN+9

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,?6,"Amount Earned Annual Income (SPOUSE): " Line Location: EN+12
Function Call: WRITE	Prompt: $S($D(DVBSPENC):"$"_DVBSPENC,1:"") Line Location: EN+13
Function Call: WRITE	Prompt: !,?1,"Amount of Annual Social Security (SPOUSE): " Line Location: EN+14
Function Call: WRITE	Prompt: $S($D(DVBSPSSA):"$"_DVBSPSSA,1:"") Line Location: EN+15
Function Call: WRITE	Prompt: !,?2,"Type of other Annual Retirement (SPOUSE): " Line Location: EN+16
Function Call: WRITE	Prompt: V Line Location: EN+17
Function Call: WRITE	Prompt: !,"Amount of other Annual Retirement (SPOUSE): " Line Location: EN+18
Function Call: WRITE	Prompt: $S($D(DVBSPETO):"$"_DVBSPETO,1:"") Line Location: EN+19
Function Call: WRITE	Prompt: !,?4,"Amount of other Annual Income (SPOUSE): " Line Location: EN+20
Function Call: WRITE	Prompt: $S($D(DVBSPINC):"$"_DVBSPINC,1:"") Line Location: EN+21
Function Call: WRITE	Prompt: !!,?4,"Amount of Earned Annual Income (PAYEE): " Line Location: EN+22
Function Call: WRITE	Prompt: $S($D(DVBEINC):"$"_DVBEINC,1:"") Line Location: EN+23
Function Call: WRITE	Prompt: !!!,DVBON,"[1]",DVBOFF Line Location: EN+31
Function Call: WRITE	Prompt: ?4,"Receiving Soc. Sec. (PAYEE):" Line Location: EN+32
Function Call: WRITE	Prompt: ?33,DVBDIQ(2,DFN,.36225,"E") Line Location: EN+34
Function Call: WRITE	Prompt: ?48,$S($D(DVBSSA):$S(DVBSSA:"YES",1:"NO"),1:"NO") Line Location: EN+35
Function Call: WRITE	Prompt: !,DVBON,"[2]",DVBOFF Line Location: EN+37
Function Call: WRITE	Prompt: ?4,"Other Annual" Line Location: EN+38
Function Call: WRITE	Prompt: !,?13,"Retirement (PAYEE):" Line Location: EN+39
Function Call: WRITE	Prompt: ?26,DVBDIQ(2,DFN,.36285,"E") Line Location: EN+40
Function Call: WRITE	Prompt: ?48,V Line Location: EN+41
Function Call: WRITE	Prompt: !,DVBON,"[3]",DVBOFF Line Location: EN+43
Function Call: WRITE	Prompt: ?4,"Amount Other Annual" Line Location: EN+44
Function Call: WRITE	Prompt: !,?13,"Retirement (PAYEE):" Line Location: EN+45
Function Call: WRITE	Prompt: ?26,"$",$S(+DVBDIQ(2,DFN,.3628,"E"):DVBDIQ(2,DFN,.3628,"E"),1:0) Line Location: EN+46
Function Call: WRITE	Prompt: ?48,$S($D(DVBRETO):"$"_DVBRETO,1:"") Line Location: EN+47
Function Call: WRITE	Prompt: !,DVBON,"[4]",DVBOFF Line Location: EN+49
Function Call: WRITE	Prompt: ?4,"Amount Other Annual" Line Location: EN+50
Function Call: WRITE	Prompt: !,?17,"Income (PAYEE):" Line Location: EN+51
Function Call: WRITE	Prompt: ?26,"$",$S(+DVBDIQ(2,DFN,.3629,"E"):DVBDIQ(2,DFN,.3629,"E"),1:0) Line Location: EN+52
Function Call: WRITE	Prompt: ?48,$S($D(DVBOINC):"$"_DVBOINC,1:"") Line Location: EN+53

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA	EN+5*
>> DFN	EN+3, EN+5, EN+34, EN+40, EN+46, EN+52
>> DIC	EN+5*
>> DIQ	EN+5*
>> DIQ(0	EN+5*
>> DR	EN+6*
>> DVBDIQ(2	EN+34, EN+40, EN+46, EN+52
>> DVBEINC	EN+23
>> DVBJS	EN+10*
>> DVBLIT1	EN+31, EN+37, EN+43, EN+49
>> DVBOFF	EN+31, EN+37, EN+43, EN+49
>> DVBOINC	EN+53
>> DVBON	EN+31, EN+37, EN+43, EN+49
>> DVBRETO	EN+47
>> DVBRETT	EN+41
>> DVBSCRN	EN+9*
>> DVBSPENC	EN+13
>> DVBSPETO	EN+19
>> DVBSPINC	EN+21
>> DVBSPRET	EN+17
>> DVBSPSSA	EN+15
>> DVBSSA	EN+35
>> DVBX(1	EN+2!, EN+4*, EN+8!
>> LP2	EN+3*
>> V	EN+17, EN+41, TR*
>> X	EN+3*
>> X(1	EN+4, EN+8*
Y	EN+1~

Customize PDF page

Package: Registration

Routine: DGVPTDV4

Information

Source Information

Call Graph

Call Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Label References

Local Variables

Legend: