STANDARD DATA DICTIONARY #27.17 -- CATASTROPHIC DISABILITY REASONS FILE 6/27/25 PAGE 1
STORED IN ^DGEN(27.17, (193 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.3)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
THIS FILE SHOULD NOT BE MODIFIED BY USERS! Per the Enrollment Phase II SRS (section 6.8.1.2), this file has been added to store the
acceptable reasons why a veteran may be classified as catastrophically disabled.
IDENTIFIED BY: ICD OR CPT CODE (#3), HL7 TRANSMISSION VALUE (#8)[R]
POINTED TO BY: CD STATUS DIAGNOSES field (#.01) of the CD STATUS DIAGNOSES sub-field (#2.396) of the PATIENT File (#2)
CD STATUS PROCEDURES field (#.01) of the CD STATUS PROCEDURES sub-field (#2.397) of the PATIENT File (#2)
CD STATUS CONDITIONS field (#.01) of the CD STATUS CONDITIONS sub-field (#2.398) of the PATIENT File (#2)
CD DESCRIPTORS field (#.01) of the CD DESCRIPTORS sub-field (#2.401) of the PATIENT File (#2)
CD REASON field (#.01) of the CD REASON sub-field (#2.409) of the CD HISTORY DATE sub-field (#2.399) of the PATIENT
File (#2)
CROSS
REFERENCED BY: NAME(B), HL7 TRANSMISSION VALUE(C)
27.17,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>80!($L(X)<3)!'(X'?1P.E) X
LAST EDITED: JUN 21, 1999
HELP-PROMPT: Answer must be 3-80 characters in length.
CROSS-REFERENCE: 27.17^B
1)= S ^DGEN(27.17,"B",$E($TR(X,"abcdefghijklmnopqrstuvwxyz","ABCDEFGHIJKLMNOPQRSTUVWXYZ"),1,30),DA)
=""
2)= K ^DGEN(27.17,"B",$E($TR(X,"abcdefghijklmnopqrstuvwxyz","ABCDEFGHIJKLMNOPQRSTUVWXYZ"),1,30),DA)
27.17,1 TYPE 0;2 SET (Required)
'P' FOR PROCEDURE;
'D' FOR DIAGNOSIS;
'C' FOR CONDITION;
'DE' FOR DESCRIPTOR;
LAST EDITED: SEP 10, 2014
HELP-PROMPT: Enter the correct type.
DESCRIPTION: This field contains the type of CATASTROPHIC DISABILITY REASON. The PATIENT file uses this set of
codes to screen out Diagnoses, Procedures, Conditions and Descriptors in its fields .396, .397,
.398 and .401.
UNEDITABLE
NOTES: TRIGGERED by the ICD OR CPT CODE field of the CATASTROPHIC DISABILITY REASONS File
27.17,3 ICD OR CPT CODE 0;3 VARIABLE POINTER
FILE ORDER PREFIX LAYGO MESSAGE
80 10 ICDDI n ICD Diagnostic Code
80.1 20 ICDOP n ICD Operation/Procedure
81 30 ICPT n CPT Procedure
LAST EDITED: JAN 30, 2012
HELP-PROMPT: Select an appropriate Diagnostic/Procedure code, if applicable.
DESCRIPTION: If the type is "PROCEDURE" then this must be a CPT Code or an ICD Operation/Procedure. If the type
is "DIAGNOSIS" then this must be an ICD Diagnosis. If the type is "CONDITION" then this field must
be blank.
If this field contains an ICD Diagnosis or Procedure code then the ICD VERSION field (#9) must
point to the correct ICD VERSION.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: ^^TRIGGER^27.17^1
1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^DGEN(27.17,D0,0)):^(0),1:"") S X=$P(Y(1),U,2),X=X S
DIU=X K Y X ^DD(27.17,3,1,1,1.1) S DIH=$G(^DGEN(27.17,DIV(0),0)),DIV=X S $P(^(0),U,2)=DIV,DIH=27.1
7,DIG=1 D ^DICR
1.1)= S X=DIV N DGP S DGP=$P($P(^DGEN(27.17,DA,0),U,3),";",2) S X=$S(DGP="ICD9(":"D",DGP="ICD0(":"P
",DGP="ICPT(":"P",1:"")
2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^DGEN(27.17,D0,0)):^(0),1:"") S X=$P(Y(1),U,2),X=X S
DIU=X K Y S X="" S DIH=$G(^DGEN(27.17,DIV(0),0)),DIV=X S $P(^(0),U,2)=DIV,DIH=27.17,DIG=1 D ^DICR
3)= Do not Delete.
CREATE VALUE)= N DGP S DGP=$P($P(^DGEN(27.17,DA,0),U,3),";",2) S X=$S(DGP="ICD9(":"D",DGP="ICD0(":"
P",DGP="ICPT(":"P",1:"")
DELETE VALUE)= @
FIELD)= TYPE
This trigger populates the TYPE field to the correct value for any Diagnosis or Procedure code
entered.
CROSS-REFERENCE: ^^TRIGGER^27.17^9
1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^DGEN(27.17,D0,0)):^(0),1:"") S X=$P(Y(1),U,9),X=X S
DIU=X K Y X ^DD(27.17,3,1,2,1.1) S DIH=$G(^DGEN(27.17,DIV(0),0)),DIV=X S $P(^(0),U,9)=DIV,DIH=27.1
7,DIG=9 D ^DICR
1.1)= S X=DIV N DGP,DGIEN S DGP=$P($P(^DGEN(27.17,DA,0),U,3),";",2),DGIEN=+$P(^DGEN(27.17,DA,0),U,3
) S X=$S(DGP="ICD9(":$$CSI^ICDEX(80,DGIEN),DGP="ICD0(":$$CSI^ICDEX(80.1,DGIEN),1:"")
2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^DGEN(27.17,D0,0)):^(0),1:"") S X=$P(Y(1),U,9),X=X S
DIU=X K Y S X="" S DIH=$G(^DGEN(27.17,DIV(0),0)),DIV=X S $P(^(0),U,9)=DIV,DIH=27.17,DIG=9 D ^DICR
3)= Do Not Delete
CREATE VALUE)= N DGP,DGIEN S DGP=$P($P(^DGEN(27.17,DA,0),U,3),";",2),DGIEN=+$P(^DGEN(27.17,DA,0),U,
3) S X=$S(DGP="ICD9(":$$CSI^ICDEX(80,DGIEN),DGP="ICD0(":$$CSI^ICDEX(80.1,DGIEN),1:"")
DELETE VALUE)= @
FIELD)= ICD VERSION
This trigger updates the ICD VERSION field to the correct value.
27.17,4 AFFECTED LIMB 1;0 SET Multiple #27.174 (Add New Entry without Asking)
DESCRIPTION: This set of codes determines to which limbs the procedure could apply. A procedure cannot be
entered for a limb that's not mentioned here.
27.174,.01 AFFECTED LIMB 0;1 SET (Multiply asked)
'RUE' FOR Right Upper Extremity;
'RLE' FOR Right Lower Extremity;
'LUE' FOR Left Upper Extremity;
'LLE' FOR Left Lower Extremity;
'BLE' FOR Bilateral Lower Extremity;
'BUE' FOR Bilateral Upper Extremity;
LAST EDITED: JAN 03, 2012
DESCRIPTION: For ICD Procedure Codes and CPT Codes, this field is used to define the acceptable extremities to
which the code could apply. This field will also be used for V codes in the future. The field
is not used for ICD Diagnostic codes.
CROSS-REFERENCE: 27.174^B
1)= S ^DGEN(27.17,DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^DGEN(27.17,DA(1),1,"B",$E(X,1,30),DA)
27.17,5 TEST SCORE RANGE 2;E1,245 FREE TEXT
INPUT TRANSFORM: K:$L(X)>250!($L(X)<1) X
LAST EDITED: MAY 20, 1999
HELP-PROMPT: Answer must be 1-250 characters in length.
DESCRIPTION: This field contains a MUMPS condition on the variables SCORE (patient's score on the test) and PERM
(permanent status indicator). If this condition is true, then the patient meets the Catastrophic
Disability requirements for this test.
WRITE AUTHORITY: @
27.17,6 HELP TEXT 3;0 WORD-PROCESSING #27.176 (NOWRAP)
DESCRIPTION: This field contains help text that will be displayed to the user when entering data in the PATIENT
file (field #.398) for this condition.
LAST EDITED: MAY 19, 1999
27.17,7 VALIDATION 4;E1,245 FREE TEXT
INPUT TRANSFORM: K:$L(X)>250!($L(X)<1) X
LAST EDITED: MAY 20, 1999
HELP-PROMPT: Answer must be 1-250 characters in length.
DESCRIPTION: This field contains a MUMPS condition on the variable X to determine if a test score entered by the
user is valid or not. For example if you specify X>10 here, then the user won't be able to enter a
TEST SCORE in the CD CONDITIONS field of the PATIENT file whose value is not greater than 10.
WRITE AUTHORITY: @
27.17,8 HL7 TRANSMISSION VALUE 0;4 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X
LAST EDITED: MAY 24, 1999
HELP-PROMPT: Answer must be 1-30 characters in length.
DESCRIPTION: This is the value that should be sent in HL7 messages (ZCD segment) for this catastrophic
disability reason.
CROSS-REFERENCE: 27.17^C
1)= S ^DGEN(27.17,"C",$E(X,1,30),DA)=""
2)= K ^DGEN(27.17,"C",$E(X,1,30),DA)
This cross-reference will facilitate lookup when HL7 messages are being processed.
27.17,9 ICD VERSION 0;9 POINTER TO ICD CODING SYSTEMS FILE (#80.4)
LAST EDITED: JAN 25, 2012
HELP-PROMPT: Select the appropriate coding system for this entry.
DESCRIPTION: Indicate the correct version of the ICD code for this entry.
If the type "PROCEDURE" then indicate the correct version of ICD Operation/Procedure
If the type is "DIAGNOSIS" then indicate the correct version of ICD Diagnosis.
If the type is "CONDITION" then this field must be blank
UNEDITABLE
NOTES: TRIGGERED by the ICD OR CPT CODE field of the CATASTROPHIC DISABILITY REASONS File
27.17,10 LONG DESCRIPTION 5;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>130!($L(X)<3) X
LAST EDITED: DEC 14, 2011
HELP-PROMPT: Answer must be 3-130 characters in length.
DESCRIPTION:
Enter the long description to be used for Diagnosis or Procedure codes.
FILES POINTED TO FIELDS
CPT (#81) ICD OR CPT CODE (#3)
ICD CODING SYSTEMS (#80.4) ICD VERSION (#9)
ICD DIAGNOSIS (#80) ICD OR CPT CODE (#3)
ICD OPERATION/PROCEDURE (#80.1) ICD OR CPT CODE (#3)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
CAPTIONED USER #0
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):