Routine: VAFMON

Information

VAFMON ;ALB/CAW/GN - Returns income/dependents ; 2/19/03 3:35pm

Package	Total	Call Graph
Registration	2	$$LST^DGMTCOU1 ALL^DGMTU21

Package	Total	Caller Graph
Registration	2	DGPTUTL1 VAFHLZIR
Beneficiary Travel	1	DGBTE1

Name	Comments	DBIA/ICR reference
INCQ
INCOME(DFN,VADT,VASOURCE)	; ; Returns Income (veterans+spouse+dependents) ; First from the means test ; (Income+Net Worth-Deductible Expenses) ; If no means test then co-pay test ; (Income-Deductible Expenses) ; If no co-pay test then income screening ; (Income) ; If none of the above then total VA check amount
DEP(DFN,VADT)	;Total dependents for a patient
DEPQ

Name	Field # of Occurrence
$$LST^DGMTCOU1	INCOME+21, DEP+7
ALL^DGMTU21	INCOME+28, DEP+10

Name	Line Occurrences (* Changed, ! Killed)
^DGMT(408.21 - [#408.21]	INCOME+29, INCOME+30, INCOME+31
^DGMT(408.22 - [#408.22]	DEP+11
^DGMT(408.31 - [#408.31]	INCOME+22, DEP+8
^DPT - [#2]	INCOME+33

Name	Line Occurrences
DEPQ	DEP+9
INCQ	INCOME+19

Name	Field # of Occurrence
^(0	DEP+8

Name	Field # of Occurrence
DFN	INCOME~, INCOME+21, INCOME+28, INCOME+33, DEP~, DEP+7, DEP+10
DGDEP	INCOME+18~, DEP+4~
DGINC	INCOME+18~
DGINC(	INCOME+31
DGINC("S"	INCOME+30
DGINC("V"	INCOME+29
DGINR	INCOME+18~, DEP+4~
DGINR("V"	DEP+11
DGREL	INCOME+18~, DEP+4~, DEP+10
DGREL("S"	DEP+19, DEP+23, DEP+27, DEP+31
DT	DEP+5
I	INCOME+18~, INCOME+29, INCOME+30, INCOME+31*
U	INCOME+22, INCOME+23, INCOME+24, INCOME+33, DEP+8, DEP+11, DEP+12, DEP+19, DEP+23, DEP+27 , DEP+31
>> VACNT	INCOME+31*
VADEP	DEP+4~, DEP+6, DEP+8, DEP+9, DEP+11, DEP+12, DEP+19, DEP+23, DEP+27, DEP+31* , DEPQ
VADT	INCOME~, INCOME+19, INCOME+20, INCOME+21, INCOME+28, DEP~, DEP+5, DEP+7, DEP+10
VADX	INCOME+26~*, INCOME+28, INCOME+31
VAINCM	INCOME+18~, INCOME+19, INCOME+20, INCOME+22, INCOME+23, INCOME+24, INCOME+25, INCOME+29, INCOME+30, INCOME+31 , INCOME+32, INCOME+33, INCQ
VAMT	INCOME+18~, INCOME+21, INCOME+22, INCOME+24, INCOME+28, DEP+4~, DEP+7, DEP+8
VAMTDEP	DEP+4~, DEP+12*
VASOURCE	INCOME~, INCOME+23, INCOME+26, INCOME+32, INCOME+33
VAVIR0	DEP+4~, DEP+11*, DEP+12, DEP+19, DEP+23, DEP+27, DEP+31
VAVIRI	DEP+4~, DEP+11*
VAX	INCOME+18~, INCOME+29, INCOME+30, INCOME+31*
X	INCOME+18~, INCOME+22*, INCOME+23