Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | Found Entries | All

Print Page as PDF

Global: ^DGMT(408.22

Package: Enrollment Application System

Global: ^DGMT(408.22

Information

FileMan FileNo	FileMan Filename	Package
408.22	INCOME RELATION	Enrollment Application System

Description

This file contains the income relation type data for a veteran and any applicable relations. This relation type information is used in registration and means test.

Directly Accessed By Routines, Total: 48

Package	Total	Routines
Registration	46	DG1010P6 DG272PT DG284PT DG311PIR DG311PTR DG488 DG53426D DG53591A DG53591B DG53618 DG53P624 DGDEP0 DGDEP3 DGDEP5 DGMTDD2 DGMTDD3 DGMTDEL1 DGMTHLP DGMTP1 DGMTR DGMTSC3 DGMTSC31 DGMTSC3V DGMTSCC DGMTSCU2 DGMTU11 DGMTU2 DGMTU21 DGMTU22 DGMTU3 DGMTU4 DGMTUTL2 DGMTV DGMTXD DGMTXD1 DGMTXM DGMTXM1 DGMTXX21 DGMTXX22 DGRP9 DGRPEIS1 DGRPEIS2 DGRPTL3 DGRTRIG VAFHLZIR VAFMON
Scheduling	2	SDPPMT1 SDPPMT2

Accessed By FileMan Db Calls, Total: 18

Package	Total	Routines
Registration	18	DG488 DG53296D DG53358D DG53426D DG53618 DG53P624 DGDEP2 DGMTDEL1 DGMTSC1 DGMTSC11 DGMTSCU3 DGMTU11 DGMTU2 DGMTXD DGMTXD1 DGMTXM DGRPEIS2 DGYRCOV

Pointer To FileMan Files, Total: 3

Package	Total	FileMan Files
Enrollment Application System	2	INDIVIDUAL ANNUAL INCOME(#408.21)[.02] ANNUAL MEANS TEST(#408.31)[31]
Registration	1	VA PATIENT(#2)[.01]

Fields, Total: 14

Field #	Name	Loc	Type	Details
.01	PATIENT	0;1	POINTER TO VA PATIENT FILE (#2)	**********************REQUIRED FIELD********************** VA PATIENT(#2) LAST EDITED: `AUG 05, 1998` HELP-PROMPT: `Enter in this field the patient associated with this income relation.` DESCRIPTION: Enter in this field the patient associated with this income relation. CROSS-REFERENCE: `408.22^B` 1)= S ^DGMT(408.22,"B",$E(X,1,30),DA)="" 2)= K ^DGMT(408.22,"B",$E(X,1,30),DA) This cross-reference allows look-up by patient. CROSS-REFERENCE: `408.22^AMT1^MUMPS` 1)= S:$P(^DGMT(408.22,DA,0),U,2)&($P($G(^DGMT(408.22,DA,"MT")),U)) ^DGMT(408.22,"AMT",$P(^DGMT(408.22,DA,"MT"),U),X,$P(^DGMT(408.22,DA,0),U,2),DA)="" 2)= K ^DGMT(408.22,"AMT",+$P($G(^DGMT(408.22,DA,"MT")),U),X,+$P(^DGMT(408.22,DA,0),U,2),DA) This cross reference is for the means test. It is indexed by means test, patient, individual annual income pointer, IFN.
.02	INDIVIDUAL ANNUAL INCOME	0;2	POINTER TO INDIVIDUAL ANNUAL INCOME FILE (#408.21)	**********************REQUIRED FIELD********************** INDIVIDUAL ANNUAL INCOME(#408.21) OUTPUT TRANSFORM: `D NAM^DGMTDD2` LAST EDITED: `AUG 05, 1998` HELP-PROMPT: `Enter in this field the individual whose income is associated with this income relation.` DESCRIPTION: Enter in this field the individual whose income is associated with this income relation. UNEDITABLE CROSS-REFERENCE: `408.22^AIND` 1)= S ^DGMT(408.22,"AIND",$E(X,1,30),DA)="" 2)= K ^DGMT(408.22,"AIND",$E(X,1,30),DA) This cross-reference can be used to sort by individual annual income by internal entry number. CROSS-REFERENCE: `408.22^AMT2^MUMPS` 1)= S:$P($G(^DGMT(408.22,DA,"MT")),U) ^DGMT(408.22,"AMT",$P(^DGMT(408.22,DA,"MT"),U),+$P(^DGMT(408.22,DA,0),U),X,DA)="" 2)= K ^DGMT(408.22,"AMT",+$P($G(^DGMT(408.22,DA,"MT")),U),+$P(^DGMT(408.22,DA,0),U),X,DA) This cross reference is for the means test. It is indexed by means test, patient, individual annual income pointer, IFN.
.05	MARRIED LAST CALENDAR YEAR	0;5	SET	**********************REQUIRED FIELD********************** '1' FOR YES; '0' FOR NO; INPUT TRANSFORM: `D MAR^DGMTDD2:'X` LAST EDITED: `SEP 13, 2005` HELP-PROMPT: `Enter 'YES' in this field if the veteran's marital status was either married or separated on Dec 31st last year. Otherwise, enter 'NO'.` DESCRIPTION: Enter 'YES' in this field if the veteran's marital status was either married or separated on Dec 31st of last calendar year. Otherwise, enter 'NO'. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `^^TRIGGER^408.22^.06` 1)= X ^DD(408.22,.05,1,1,1.3) I X S X=DIV S Y(1)=$S($D(^DGMT(408.22,D0,0)):^(0),1:"") S X=$P(Y(1),U,6),X=X S DIU=X K Y S X="" X ^DD(408.22,.05,1,1,1.4) 1.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(1)=$C(59)_$S($D(^DD(408.22,.05,0)):$P(^(0),U,3),1:"") S X=$P($P(Y(1),$C(59)_Y(0)_":",2),$C(59),1)="NO" 1.4)= S DIH=$S($D(^DGMT(408.22,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,6)=DIV,DIH=408.22,DIG=.06 D ^DICR:$N(^DD(DIH,DIG,1,0))>0 2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X X ^DD(408.22,.05,1,1,79.2) S X=X="" I X S X=DIV S Y(1)=$S($D(^DGMT(408.22,D0,0)):^(0),1:"") S X=$P(Y(1),U,6),X=X S DIU=X K Y S X="" X ^DD(408.22,.05,1,1,2.4) 2.4)= S DIH=$S($D(^DGMT(408.22,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,6)=DIV,DIH=408.22,DIG=.06 D ^DICR:$N(^DD(DIH,DIG,1,0))>0 79.2)= S Y(2)=$C(59)_$S($D(^DD(408.22,.05,0)):$P(^(0),U,3),1:""),Y(1)=$S($D(^DGMT(408.22,D0,0)):^(0),1:"") S X=$P($P(Y(2),$C(59)_$P(Y(1),U,5)_":",2),$C(59),1) CREATE CONDITION)= MARRIED="NO" CREATE VALUE)= @ DELETE CONDITION)= MARRIED="" DELETE VALUE)= @ FIELD)= LIVES WITH PATIENT This triggered cross-reference will update the 'Lived With Patient' field (#.06). If the patient is not married, the 'Lived With Patient' field is deleted for the patient. CROSS-REFERENCE: `408.22^AIX5^MUMPS` 1)= I $D(^DGMT(408.22,DA,0)),'$P(^(0),U,5) D FUN^DGMTDD2:'$P(^(0),U,8),SP^DGMTDD2 2)= I $D(^DGMT(408.22,DA,0)),$P(^(0),U,5)="" D FUN^DGMTDD2:'$P(^(0),U,8),SP^DGMTDD2 This mumps cross-reference work like a "trigger" cross-reference. If the patient was not married and did not have any dependent children, any corresponding funeral and burial expenses on file for the year are deleted. Also, if the veteran is no longer married the spouse's corresponding income and net worth on file for the year will be deleted. CROSS-REFERENCE: `408.22^AENR05^MUMPS` 1)= D E40822^DGRTRIG(DA) 2)= D E40822^DGRTRIG(DA) 3)= DO NOT DELETE This cross-reference is used to notify HEC of changes that may affect enrollment.
.06	LIVED WITH PATIENT	0;6	SET	'1' FOR YES; '0' FOR NO; INPUT TRANSFORM: `D LIV^DGMTDD2` LAST EDITED: `SEP 13, 2005` DESCRIPTION: Enter whether the veteran and relation lived together last calendar year. EXECUTABLE HELP: `D LIVHLP^DGMTDD2` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` TRIGGERED by the MARRIED LAST CALENDAR YEAR field of the INCOME RELATION File CROSS-REFERENCE: `^^TRIGGER^408.22^.07` 1)= X ^DD(408.22,.06,1,1,1.3) I X S X=DIV S Y(1)=$S($D(^DGMT(408.22,D0,0)):^(0),1:"") S X=$P(Y(1),U,7),X=X S DIU=X K Y S X="" X ^DD(408.22,.06,1,1,1.4) 1.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(1)=$C(59)_$S($D(^DD(408.22,.06,0)):$P(^(0),U,3),1:"") S X=$P($P(Y(1),$C(59)_Y(0)_":",2),$C(59),1)="YES" 1.4)= S DIH=$S($D(^DGMT(408.22,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,7)=DIV,DIH=408.22,DIG=.07 D ^DICR:$N(^DD(DIH,DIG,1,0))>0 2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X X ^DD(408.22,.06,1,1,79.2) S X=X="" I X S X=DIV S Y(1)=$S($D(^DGMT(408.22,D0,0)):^(0),1:"") S X=$P(Y(1),U,7),X=X S DIU=X K Y S X="" X ^DD(408.22,.06,1,1,2.4) 2.4)= S DIH=$S($D(^DGMT(408.22,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,7)=DIV,DIH=408.22,DIG=.07 D ^DICR:$N(^DD(DIH,DIG,1,0))>0 79.2)= S Y(2)=$C(59)_$S($D(^DD(408.22,.06,0)):$P(^(0),U,3),1:""),Y(1)=$S($D(^DGMT(408.22,D0,0)):^(0),1:"") S X=$P($P(Y(2),$C(59)_$P(Y(1),U,6)_":",2),$C(59),1) CREATE CONDITION)= LIVES WITH PATIENT="YES" CREATE VALUE)= @ DELETE CONDITION)= LIVES WITH PATIENT="" DELETE VALUE)= @ FIELD)= AMOUNT CONTRIBUTED TO SPOUSE This triggered cross-reference will update the 'Amount Contributed to Spouse' field (#.07). If the patient is married and lived with his or her spouse, the 'Amount Contributed to Spouse' field is deleted for the patient. CROSS-REFERENCE: `^^TRIGGER^408.22^.1` 1)= X ^DD(408.22,.06,1,2,1.3) I X S X=DIV S Y(1)=$S($D(^DGMT(408.22,D0,0)):^(0),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X="" X ^DD(408.22,.06,1,2,1.4) 1.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(1)=$C(59)_$S($D(^DD(408.22,.06,0)):$P(^(0),U,3),1:"") S X=$P($P(Y(1),$C(59)_Y(0)_":",2),$C(59),1)="YES" 1.4)= S DIH=$S($D(^DGMT(408.22,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,10)=DIV,DIH=408.22,DIG=.1 D ^DICR:$N(^DD(DIH,DIG,1,0))>0 2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X X ^DD(408.22,.06,1,2,79.2) S X=X="" I X S X=DIV S Y(1)=$S($D(^DGMT(408.22,D0,0)):^(0),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X="" X ^DD(408.22,.06,1,2,2.4) 2.4)= S DIH=$S($D(^DGMT(408.22,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,10)=DIV,DIH=408.22,DIG=.1 D ^DICR:$N(^DD(DIH,DIG,1,0))>0 79.2)= S Y(2)=$C(59)_$S($D(^DD(408.22,.06,0)):$P(^(0),U,3),1:""),Y(1)=$S($D(^DGMT(408.22,D0,0)):^(0),1:"") S X=$P($P(Y(2),$C(59)_$P(Y(1),U,6)_":",2),$C(59),1) CREATE CONDITION)= LIVES WITH PATIENT="YES" CREATE VALUE)= @ DELETE CONDITION)= LIVES WITH PATIENT="" DELETE VALUE)= @ FIELD)= CONTRIBUTE TO SUPPORT This triggered cross-reference will update the 'Contribute to Support' field (#.1). If the patient had a dependent child which lived with him or her, the 'Contributed to Support' field is deleted for the child. CROSS-REFERENCE: `408.22^AENR06^MUMPS` 1)= D E40822^DGRTRIG(DA) 2)= D E40822^DGRTRIG(DA) 3)= DO NOT DELETE This cross-reference is used to notify HEC of changes that may affect enrollment.
.07	AMOUNT CONTRIBUTED TO SPOUSE	0;7	NUMBER	INPUT TRANSFORM: `S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99999)!(X<0) X D AMT^DGMTDD2:$D(X)` LAST EDITED: `SEP 13, 2005` HELP-PROMPT: `Type a Dollar Amount between 0 and 99999, 2 Decimal Digits` DESCRIPTION: `This response must be a number.` If the veteran did not live with his or her spouse, enter in this field the amount the veteran contributed to his or her spouse last calendar year. If the amount the veteran contributed is less than $600, then the spouse will not be considered a dependent for financial assessment. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` TRIGGERED by the LIVED WITH PATIENT field of the INCOME RELATION File CROSS-REFERENCE: `408.22^AIX7^MUMPS` 1)= I $D(^DGMT(408.22,DA,0)),'$P(^(0),U,6),$P(^(0),U,7)<600 D SP^DGMTDD2 2)= I $D(^DGMT(408.22,DA,0)),'$P(^(0),U,6),$P(^(0),U,7)="" D SP^DGMTDD2 This mumps cross-reference works like a "trigger" cross-reference. If the patient did not contribute at least $600 to the spouse, any corresponding income and net worth on file for the year are deleted. CROSS-REFERENCE: `408.22^AENR07^MUMPS` 1)= D E40822^DGRTRIG(DA) 2)= D E40822^DGRTRIG(DA) 3)= DO NOT DELETE This cross-reference is used to notify HEC of changes that may affect enrollment.
.08	DEPENDENT CHILDREN	0;8	SET	'1' FOR YES; '0' FOR NO; INPUT TRANSFORM: `D DEP^DGMTDD2:'X` LAST EDITED: `SEP 13, 2005` HELP-PROMPT: `Enter in this field whether the veteran had dependent children last calendar year.` DESCRIPTION: `Enter in this field whether the veteran had any UNMARRIED children or stepchildren under the age of 18 or between the ages of 18 and 23 and attending school, or any unmarried children over the age of 17 who became` permanently incapable of self-support before reaching the age of 18 last calendar year. School attendance does not have to be full-time but it should be regular. The child can be enrolled in high school, college, or vocational school. If the worksheet is being completed during a break between regular school terms, consider the child to be attending school if the veteran indicates that the child plans to enroll in the next regular term (excluding summer sessions). If the child is under the age of 18, the child does not have to be attending school. DO NOT INCLUDE FOSTER CHILDREN. If the veteran says 'YES', all dependent children must be entered for the means test thresholds to be properly determined. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `408.22^AIX8^MUMPS` 1)= I $D(^DGMT(408.22,DA,0)),$P(^(0),U,8)=0,'$P(^(0),U,5) D FUN^DGMTDD2 2)= I $D(^DGMT(408.22,DA,0)),$P(^(0),U,8)="",'$P(^(0),U,5) D FUN^DGMTDD2 This mumps cross-reference works like a "trigger" cross-reference. If the patient did not have any dependent children and was not married, any corresponding funeral and burial expenses on file for the year are deleted. CROSS-REFERENCE: `408.22^AENR08^MUMPS` 1)= D E40822^DGRTRIG(DA) 2)= D E40822^DGRTRIG(DA) 3)= DO NOT DELETE This cross-reference is used to notify HEC of changes that may affect enrollment.
.09	INCAPABLE OF SELF-SUPPORT	0;9	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `SEP 13, 2005` HELP-PROMPT: `Enter in this field whether the child is unmarried, over the age of 17, and became permanently incapable of self-support before reaching the age of 18.` DESCRIPTION: Enter in this field whether the child is unmarried, over the age of 17, and became permanently incapable of self-support before reaching in age of 18. CROSS-REFERENCE: `408.22^AENR09^MUMPS` 1)= D E40822^DGRTRIG(DA) 2)= D E40822^DGRTRIG(DA) 3)= DO NOT DELETE This cross-reference is used to notify HEC of changes that may affect enrollment.
.1	CONTRIBUTED TO SUPPORT	0;10	SET	'1' FOR YES; '0' FOR NO; INPUT TRANSFORM: `D CON^DGMTDD2` LAST EDITED: `SEP 13, 2005` HELP-PROMPT: `Enter in this field a Yes or No to indicate whether the veteran contributed any dollar amount to the child's support last calendar year.` DESCRIPTION: `Enter in this field a Yes or No to indicate whether the veteran contributed any dollar amount to the child's support last calendar year. The contributions do not have to be in regular set amounts. For example, a veteran` who paid a child's school tuition or medical bills would be contributing to the child's support. EXECUTABLE HELP: `D HLPCS^DGRPU` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` TRIGGERED by the LIVED WITH PATIENT field of the INCOME RELATION File CROSS-REFERENCE: `408.22^AENR1^MUMPS` 1)= D E40822^DGRTRIG(DA) 2)= D E40822^DGRTRIG(DA) 3)= DO NOT DELETE This cross-reference is used to notify HEC of changes that may affect enrollment.
.11	CHILD HAD INCOME	0;11	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `SEP 13, 2005` HELP-PROMPT: `Enter in this field whether the child had income last calendar year.` DESCRIPTION: Enter in this field whether the child had income last calendar year. Income payable to another person as guardian or custodian of the child is considered to be the child's income. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `^^TRIGGER^408.22^.12` 1)= X ^DD(408.22,.11,1,1,1.3) I X S X=DIV S Y(1)=$S($D(^DGMT(408.22,D0,0)):^(0),1:"") S X=$P(Y(1),U,12),X=X S DIU=X K Y S X="" X ^DD(408.22,.11,1,1,1.4) 1.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(1)=$C(59)_$S($D(^DD(408.22,.11,0)):$P(^(0),U,3),1:"") S X=$P($P(Y(1),$C(59)_Y(0)_":",2),$C(59),1)="NO" 1.4)= S DIH=$S($D(^DGMT(408.22,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,12)=DIV,DIH=408.22,DIG=.12 D ^DICR:$N(^DD(DIH,DIG,1,0))>0 2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X X ^DD(408.22,.11,1,1,79.2) S X=X="" I X S X=DIV S Y(1)=$S($D(^DGMT(408.22,D0,0)):^(0),1:"") S X=$P(Y(1),U,12),X=X S DIU=X K Y S X="" X ^DD(408.22,.11,1,1,2.4) 2.4)= S DIH=$S($D(^DGMT(408.22,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,12)=DIV,DIH=408.22,DIG=.12 D ^DICR:$N(^DD(DIH,DIG,1,0))>0 79.2)= S Y(2)=$C(59)_$S($D(^DD(408.22,.11,0)):$P(^(0),U,3),1:""),Y(1)=$S($D(^DGMT(408.22,D0,0)):^(0),1:"") S X=$P($P(Y(2),$C(59)_$P(Y(1),U,11)_":",2),$C(59),1) CREATE CONDITION)= CHILD HAS INCOME="NO" CREATE VALUE)= @ DELETE CONDITION)= CHILD HAS INCOME="" DELETE VALUE)= @ FIELD)= INCOME AVAILABLE TO YOU This triggered cross-reference will update the 'Income Available to You' field (#.12). If the patient had a dependent child whose income was not available to him or her, the 'Income Available to You' field is deleted for the child. CROSS-REFERENCE: `408.22^AIX11^MUMPS` 1)= I $D(^DGMT(408.22,DA,0)),$P(^(0),U,11)=0 D INC^DGMTDD2 2)= I $D(^DGMT(408.22,DA,0)),$P(^(0),U,11)="" D INC^DGMTDD2 This mumps cross-reference works like a "trigger" cross-reference. If the patient had a child with no income, any corresponding income or educational expenses on file for the year are deleted. CROSS-REFERENCE: `408.22^AENR11^MUMPS` 1)= D E40822^DGRTRIG(DA) 2)= D E40822^DGRTRIG(DA) 3)= DO NOT DELETE This cross-reference is used to notify HEC of changes that may affect enrollment.
.12	INCOME AVAILABLE TO YOU	0;12	SET	'1' FOR YES; '0' FOR NO; INPUT TRANSFORM: `D AVL^DGMTDD2` LAST EDITED: `SEP 13, 2005` HELP-PROMPT: `Enter in this field whether the child's income was available to the veteran last calendar year.` DESCRIPTION: `Enter in this field whether the child's income was available to the veteran last calendar year. The child's income is deemed to be available if it can be used to pay expenses of the veteran's household. For example, a` Social Security check payable to the veteran's estranged spouse as custodian of the child is probably not available to the veteran. On the other hand, a Social Security check on behalf of the child payable to someone living in the veteran's household is probably available. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` TRIGGERED by the CHILD HAD INCOME field of the INCOME RELATION File CROSS-REFERENCE: `408.22^AIX12^MUMPS` 1)= I $D(^DGMT(408.22,DA,0)),$P(^(0),U,12)=0,$P(^(0),U,11) D INC^DGMTDD2 2)= I $D(^DGMT(408.22,DA,0)),$P(^(0),U,12)="",$P(^(0),U,11) D INC^DGMTDD2 This mumps cross-reference works like a "trigger" cross-reference. If the patient had a child whose income was not available to him or her, any corresponding income or educational expenses on file for the year are deleted. CROSS-REFERENCE: `408.22^AENR12^MUMPS` 1)= D E40822^DGRTRIG(DA) 2)= D E40822^DGRTRIG(DA) 3)= DO NOT DELETE This cross-reference is used to notify HEC of changes that may affect enrollment.
.13	NUMBER OF DEPENDENT CHILDREN	0;13	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>30)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `SEP 13, 2005` HELP-PROMPT: `Type a Number between 0 and 30, 0 Decimal Digits` DESCRIPTION: `This field is computed by the system. Dependent children include any unmarried children or stepchildren who are under the age of 18 or between the ages of 18 and 23 and attending school, or any unmarried children over the` age of 17 who became permanently incapable of self-support before reaching the age of 18. CROSS-REFERENCE: `408.22^AENR13^MUMPS` 1)= D E40822^DGRTRIG(DA) 2)= D E40822^DGRTRIG(DA) 3)= DO NOT DELETE This cross-reference is used to notify HEC of changes that may affect enrollment.
.18	CHILD 18-23 IN SCHOOL	0;18	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `SEP 13, 2005` EXECUTABLE HELP: `D HLP1823^DGRPU` CROSS-REFERENCE: `408.22^AENR18^MUMPS` 1)= D E40822^DGRTRIG(DA) 2)= D E40822^DGRTRIG(DA) 3)= DO NOT DELETE This cross-reference is used to notify HEC of changes that may affect enrollment.
.19	AMOUNT CONTRIBUTED TO CHILD	0;19	NUMBER	INPUT TRANSFORM: `S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99999)!(X<0) X` LAST EDITED: `JAN 24, 2005` HELP-PROMPT: `Type a Dollar Amount between 0 and 99999, 2 Decimal Digits` DESCRIPTION: `Enter in this field the dollar amount that the veteran contributed to the child's support last calendar year. The contributions do not have to be in regular set amounts. For example, a veteran who paid a child's school` tuition or medical bills would be contributing to the child's support.
31	ANNUAL MEANS TEST	MT;1	POINTER TO ANNUAL MEANS TEST FILE (#408.31)	ANNUAL MEANS TEST(#408.31) LAST EDITED: `MAR 02, 1995` CROSS-REFERENCE: `408.22^AMT^MUMPS` 1)= S:$P(^DGMT(408.22,DA,0),U,2) ^DGMT(408.22,"AMT",X,+$P(^DGMT(408.22,DA,0),U),+$P(^DGMT(408.22,DA,0),U,2),DA)="" 2)= K ^DGMT(408.22,"AMT",X,+$P(^DGMT(408.22,DA,0),U),+$P($G(^DGMT(408.22,DA,0)),U,2),DA) This cross reference is for the means test. It is indexed by means test, patient, individual annual income pointer, IFN.

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | Found Entries | All