STANDARD DATA DICTIONARY #408.12 -- PATIENT RELATION FILE 3/24/25 PAGE 1
STORED IN ^DGPR(408.12, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.3)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains all relations of a veteran, including the veteran himself/herself. Demographic data (name, SSN, date of birth,
and sex) can be found in either the PATIENT file (if the relation is a veteran) or in the INCOME PERSON file (if the relation is
not a veteran). A single individual may be entered in this file more than once of that individual is related to more than one
veteran. An example would be a spouse that was a veteran. One entry would exist for the veteran himself and one as the husband of
his veteran wife. This would also hold true for children of two veteran parents.
This file relates all relations for a veteran to the veteran. These relations are date sensitive and can be activated and
inactivated.
Data in this file is utilized by the income screening and means test portions of MAS. It should be edited through those
applications and not through direct access through VA FileMan.
DD ACCESS: @
RD ACCESS: d
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
IDENTIFIED BY: PERSON (#.03)[R]
POINTED TO BY: PATIENT RELATION field (#.02) of the INDIVIDUAL ANNUAL INCOME File (#408.21)
CROSS
REFERENCED BY: RELATIONSHIP(AENR02), IVM TEST(AIVM), PATIENT(B), PERSON(C)
408.12,.01 PATIENT 0;1 POINTER TO PATIENT FILE (#2) (Required)
LAST EDITED: JUL 02, 1993
DESCRIPTION: Enter the name of the patient to which this individual is related (even if it is the patient
himself/herself).
TECHNICAL DESCR: This field is used to group all relations to a patient for use in means test and income screening.
All active relatives are displayed in both modules and income data is collected for them.
DELETE TEST: 1,0)= I 1 W !,*7,"Relations cannot be deleted, they must be inactivated!!"
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 408.12^B
1)= S ^DGPR(408.12,"B",$E(X,1,30),DA)=""
2)= K ^DGPR(408.12,"B",$E(X,1,30),DA)
408.12,.02 RELATIONSHIP 0;2 POINTER TO RELATIONSHIP FILE (#408.11) (Required)
INPUT TRANSFORM: D REL^DGMTDD1 D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: SEP 13, 2005
HELP-PROMPT: Enter this persons relationship to the veteran.
DESCRIPTION: Enter in this field the persons relationship to the veteran. Choose only those that are
appropriate for the sex of the person entered. Self and Spouse will not be selectable or editable.
They are created automatically by the module. If there are already 19 child dependents associated
with the veteran this dependent may not be son, stepson, daughter or stepdaughter.
SCREEN: D REL^DGMTDD1
EXPLANATION: Only allows appropriate codes given sex of relation. Self and Spouse not editable or selectable.
Only 19 child Dependents allowed per veteran.
CROSS-REFERENCE: 408.12^AENR02^MUMPS
1)= D E40812^DGRTRIG(DA)
2)= D E40812^DGRTRIG(DA)
3)= DO NOT DELETE
This cross-reference is used to notify HEC of changes that may affect enrollment.
408.12,.03 PERSON 0;3 VARIABLE POINTER (Required)
FILE ORDER PREFIX LAYGO MESSAGE
2 1 P n Patient
408.13 2 I n Income Person
LAST EDITED: JUL 26, 1993
DESCRIPTION: Enter in this field the name of the relative. The entry must be either in the PATIENT file (for
those individuals that have been seen as patients in this facility) or the INCOME PERSON file.
TECHNICAL DESCR: This is a variable pointer to the PATIENT and INCOME PERSON files. If the relative has been a
patient, this should point to an entry in the PATIENT file. Otherwise, the entry should be found
in the INCOME PERSON file.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 408.12^C
1)= S ^DGPR(408.12,"C",$E(X,1,30),DA)=""
2)= K ^DGPR(408.12,"C",$E(X,1,30),DA)
408.12,75 EFFECTIVE DATE E;0 DATE Multiple #408.1275
DESCRIPTION: This multiple contains data on when an individual became a dependent and a non-dependent. First, a
date must be selected and then it must be determined whether on that date the relative became
active or became a non-dependent. This information is used in the means test and income screening
modules for purposes of income collection. Only those persons that are active relatives of a
patient will require income collection.
408.1275,.01 EFFECTIVE DATE 0;1 DATE (Required)
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1!'$$DOB^DGDEP1(DA(1),X) X I Y>DT W !,"Future dates not allowed." K X
LAST EDITED: SEP 13, 2005
HELP-PROMPT: This date should be a precise date with month and day specified.
DESCRIPTION: Enter the date on which the relative either became active (date of birth for a child or marriage
date for a spouse, for example) or the date the relative became inactive (date of death, date of
divorce, or date child became 18, for example).
DELETE TEST: 1,0)= I '$O(^DGPR(408.12,DA(1),"E",$O(^DGPR(408.12,DA(1),"E",0))))!($G(DGEDIT)&$P(^(DA,0),U,3)) W
!,*7,"Cannot delete "_$S($P(^(0),U,3):"IVM",1:"last")_" EFFECTIVE DATE!"
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE:408.1275^B
1)= S ^DGPR(408.12,DA(1),"E","B",$E(X,1,30),DA)=""
2)= K ^DGPR(408.12,DA(1),"E","B",$E(X,1,30),DA)
CROSS-REFERENCE:408.1275^AID^MUMPS
1)= S ^DGPR(408.12,DA(1),"E","AID",-X,DA)=""
2)= K ^DGPR(408.12,DA(1),"E","AID",-X,DA)
CROSS-REFERENCE:408.1275^AENR01^MUMPS
1)= D E40812^DGRTRIG($G(DA(1)))
2)= D E40812^DGRTRIG($G(DA(1)))
3)= DO NOT DELETE
This cross-reference is used to notify HEC of changes that may affect enrollment.
408.1275,.02 ACTIVE 0;2 SET (Required)
'1' FOR YES;
'0' FOR NO;
LAST EDITED: JAN 14, 1992
DESCRIPTION: If this change in status makes the dependent effective, enter 1 for active. If the change in
status makes an active dependent no longer dependent, enter 0 here.
408.1275,.03 FILED BY IVM 0;3 SET
'1' FOR YES;
LAST EDITED: DEC 20, 1994
HELP-PROMPT: If 'Yes' then this date has been filed by the IVM Center
408.1275,.04 IVM TEST 0;4 POINTER TO ANNUAL MEANS TEST FILE (#408.31)
LAST EDITED: DEC 20, 1994
DESCRIPTION:
This is a pointer to the IVM test.
CROSS-REFERENCE:408.12^AIVM
1)= S ^DGPR(408.12,"AIVM",$E(X,1,30),DA(1),DA)=""
2)= K ^DGPR(408.12,"AIVM",$E(X,1,30),DA(1),DA)
This cross referenced is used for the IVM test when an effective date is added.
FILES POINTED TO FIELDS
ANNUAL MEANS TEST (#408.31) EFFECTIVE DATE:IVM TEST (#.04)
INCOME PERSON (#408.13) PERSON (#.03)
PATIENT (#2) PATIENT (#.01)
PERSON (#.03)
RELATIONSHIP (#408.11) RELATIONSHIP (#.02)
INPUT TEMPLATE(S):
DGMT EFFECTIVE DATE DEC 20, 1994@14:13 USER #0
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):