STANDARD DATA DICTIONARY #31 -- DISABILITY CONDITION FILE 9/29/25 PAGE 1
STORED IN ^DIC(31, (1076 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains the VA recognized Disability conditions as used when rating for compensation/pension.
IDENTIFIED BY: DX CODE (#2)
POINTED TO BY: RATED DISABILITIES (VA) field (#.01) of the RATED DISABILITIES (VA) sub-field (#2.04) of the PATIENT File (#2)
RATED DISABILITIES (VA) field (#3) of the ENROLLMENT RATED DISABILITY UPLOAD AUDIT File (#390)
*RELATED DISABILITIES field (#.01) of the *RELATED DISABILITIES sub-field (#396.61) of the AMIE EXAM File (#396.6)
*RELATED DISABILITIES field (#.01) of the *RELATED DISABILITIES sub-field (#396.701) of the 2507 BODY SYSTEM File
(#396.7)
CORRESPONDING MAS DISABILITY field (#.01) of the CORRESPONDING MAS DISABILITY sub-field (#662.06) of the PROS
DISABILITY CODE File (#662)
ENTRY field (#.02) of the LOCAL KEYWORD File (#8984.1)
ENTRY field (#.02) of the LOCAL SHORTCUT File (#8984.2)
CROSS
REFERENCED BY: LONG DESCRIPTION(AC), LONG DESCRIPTION(ADVB), NAME(B), DX CODE(C)
31,.001 NUMBER NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAR 20, 1986
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 9999
DESCRIPTION: This field contains the internal entry number for this disability condition. This number may be
used by various software packages. This must not be edited and entries must not be added or
deleted unless done through a software upgrade of the MAS package.
31,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>45!($L(X)<4)!'(X'?1P.E) X
LAST EDITED: MAR 12, 1992
HELP-PROMPT: ANSWER MUST BE 4-45 CHARACTERS IN LENGTH
DESCRIPTION:
VBA DISABILITY CODES MP-6,PART IV Supp 4.1 401.02f
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 31^B
1)= S ^DIC(31,"B",$E(X,1,30),DA)=""
2)= K ^DIC(31,"B",$E(X,1,30),DA)
31,1 ABBREVIATION 0;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>30!($L(X)<4) X
HELP-PROMPT: ANSWER MUST BE 4-30 CHARACTERS IN LENGTH
DESCRIPTION:
Enter an abbreviation, 4-30 characters.
31,2 DX CODE 0;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 9999
DESCRIPTION:
This field contains a numeric 0-9999. It is the diagnosis code number.
CROSS-REFERENCE: 31^C
1)= S ^DIC(31,"C",X,DA)=""
2)= K ^DIC(31,"C",X,DA)
31,3 SENSITIVE CONDITION PRINT NAME 0;4 FREE TEXT
INPUT TRANSFORM: K:$L(X)>32!($L(X)<4)!'(X'?1P.E) X
LAST EDITED: JUL 03, 1991
HELP-PROMPT: Answer must be 4-32 characters in length.
DESCRIPTION: In order to maintain sensitivity for certain diagnosis this field has been added. If it is filled
in, the .01 field for the diagnosis is not printed, but the SENSITIVE CONDITION PRINT NAME is,
instead.
31,10 LONG DESCRIPTION 1;1 FREE TEXT
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>200!($L(X)<1) X
LAST EDITED: MAR 07, 1994
HELP-PROMPT: Answer must be 1-200 characters in length.
DESCRIPTION:
This is the long description per the VBA Rating Schedule.
CROSS-REFERENCE: 31^ADVB^MUMPS
1)= S %="^DIC(31,""ADVB"",I,DA)" D S^XTLKWIC
2)= S %="^DIC(31,""ADVB"",I,DA)" D K^XTLKWIC
This is the MTLU cross reference lookup for the AMIE application.
CROSS-REFERENCE: 31^AC^MUMPS
1)= S ^DIC(31,"AC",$E(X,1,80),DA)=""
2)= K ^DIC(31,"AC",$E(X,1,80),DA)
This cross reference was created so that a lookup could be performed on it using IX or MIX. It was
created so that interactive FM could not use it. As a result users will not get confused at a
selection prompt.
31,20 RELATED ICD CODES ICD;0 POINTER Multiple #31.01 (Add New Entry without Asking)
LAST EDITED: NOV 08, 2011
DESCRIPTION: The Veterans Health Administration (VHA) has mapped the Veteran Benefits Administration (VBA) 4
digit RATED DISABILITIES (VA) code terminology to the ICD codes used for billing and reporting
purposes within VistA. This mapping will help automate the Service Connected (SC) decision for
outpatient encounters.
31.01,.01 RELATED ICD CODES 0;1 POINTER TO ICD DIAGNOSIS FILE (#80)
LAST EDITED: NOV 08, 2011
HELP-PROMPT: Select the ICD code associated with the VBA code.
DESCRIPTION:
ICD code associated with the VBA code.
TECHNICAL DESCR:
A pointer to the ICD DIAGNOSIS file #80.
CROSS-REFERENCE: 31.01^B
1)= S ^DIC(31,DA(1),"ICD","B",$E(X,1,30),DA)=""
2)= K ^DIC(31,DA(1),"ICD","B",$E(X,1,30),DA)
31.01,.02 ICD MATCH 0;2 SET
'0' FOR PARTIAL MATCH;
'1' FOR MATCH;
LAST EDITED: NOV 08, 2011
HELP-PROMPT: Enter 1 for a match or 0 for a partial match.
DESCRIPTION: If this ICD code is a true match for the VBA code then the value will be a 1. Otherwise it is a 0
indicating a partial match.
UNEDITABLE
FILES POINTED TO FIELDS
ICD DIAGNOSIS (#80) RELATED ICD CODES:RELATED ICD CODES (#.01)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
CAPTIONED USER #0
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):