STANDARD DATA DICTIONARY #80.3 -- MAJOR DIAGNOSTIC CATEGORY FILE 3/24/25 PAGE 1 STORED IN ^ICM( (30 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 14.0) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- This file contains Major Diagnostic Categories as used in PTF coding. DD ACCESS: @ RD ACCESS: d WR ACCESS: @ DEL ACCESS: @ LAYGO ACCESS: @ POINTED TO BY: MDC field (#1) of the MAJOR DIAGNOSTIC CATEGORY sub-field (#80.072) of the ICD DIAGNOSIS File (#80) MAJOR DIAGNOSTIC CATEGORY field (#.01) of the MAJOR DIAGNOSTIC CATEGORIES sub-field (#80.1711) of the DRG GROUPER sub-field (#80.171) of the ICD OPERATION/PROCEDURE File (#80.1) *MDC# field (#5) of the DRG File (#80.2) MDC# field (#.05) of the EFFECTIVE DATE sub-field (#80.266) of the DRG File (#80.2) MDC field (#.01) of the MDC sub-field (#80.51) of the DRG SURGICAL HIERARCHY File (#80.5) MAJOR DIAGNOSTIC CATEGORY field (#5) of the TEMPORARY DIAGNOSES File (#80.7) MAJOR DIAGNOSTIC CATEGORY field (#.01) of the MAJOR DIAGNOSTIC CATEGORY sub-field (#80.82) of the TEMPORARY PROCEDURES File (#80.8) MDC# field (#5) of the TEMPORARY DRG FILE File (#80.9) MDC field (#.01) of the MDC sub-field (#82.1116) of the BLOCK sub-field (#82.111) of the DRG PROCEDURE CODE COMBINATIONS File (#82.11) MDC field (#.01) of the MDC sub-field (#82.1216) of the BLOCK sub-field (#82.121) of the DRG DIAGNOSIS CODE COMBINATIONS File (#82.12) CROSS REFERENCED BY: NAME(B), DISORDER/PROCEDURE(C) 80.3,.001 NUMBER NUMBER INPUT TRANSFORM: K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: OCT 29, 1990 HELP-PROMPT: Type a Number between 1 and 99, 0 Decimal Digits DESCRIPTION: corresponds to the MDC #. 80.3,.01 NAME 0;1 (Required) MAJOR DIAGNOSTIC CATEGORY INPUT TRANSFORM: K:$L(X)>30!(+X=X)!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X HELP-PROMPT: NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION DESCRIPTION: Name of the MDC. CROSS-REFERENCE: 80.3^B 1)= S ^ICM("B",$E(X,1,30),DA)="" 2)= K ^ICM("B",$E(X,1,30),DA) 80.3,1 DISORDER/PROCEDURE 1;0 Multiple #80.31 (Add New Entry without Asking) DESCRIPTION: Disorder/procedure associated with this MDC. 80.31,.01 DISORDER/PROCEDURE 0;1 FREE TEXT (Multiply asked) INPUT TRANSFORM: K:X[""""!(X'?.ANP)!($A(X)=45) X I $D(X) K:$L(X)>50!($L(X)<1) X LAST EDITED: MAR 21, 1983 HELP-PROMPT: ANSWER MUST BE 1-50 CHARACTERS IN LENGTH CROSS-REFERENCE: 80.3^C 1)= S ^ICM("C",$E(X,1,30),DA(1),DA)="" 2)= K ^ICM("C",$E(X,1,30),DA(1),DA) CROSS-REFERENCE: 80.31^B^MUMPS 1)= S ^ICM(DA(1),1,"B",X,DA)="" 2)= K ^ICM(DA(1),1,"B",X,DA) 80.31,1 SURGERY 0;2 SET '1' FOR YES; DESCRIPTION: Flag set to 1 if this is surgery 80.31,2 DRGa 0;3 NUMBER INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 999 DESCRIPTION: DRG associated with. 80.31,3 DRGb 0;4 NUMBER INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 999 DESCRIPTION: DRG associated with. 80.31,4 DRGc 0;5 NUMBER INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 999 DESCRIPTION: DRG associated with. 80.31,5 DRGd 0;6 NUMBER INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 999 DESCRIPTION: DRG associated with. 80.31,6 DRGe 0;7 NUMBER INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 999 DESCRIPTION: DRG associated with. 80.31,7 DRGf 0;8 NUMBER INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: MAR 17, 1983 HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 999 DESCRIPTION: DRG associated with. 80.31,99 MUMPS CODE 1;0 Multiple #80.32 (Add New Entry without Asking) DESCRIPTION: This field contains MUMPS code used for considering age, c/c and other DRG determining factors. 80.32,.01 MUMPS CODE 0;E1,200 FREE TEXT (Multiply asked) INPUT TRANSFORM: K:$L(X)>250!($L(X)<1) X HELP-PROMPT: ANSWER MUST BE 1-250 CHARACTERS IN LENGTH DESCRIPTION: This field contains MUMPS code used for considering age, c/c and other DRG determining factors. DELETE AUTHORITY: @ WRITE AUTHORITY: @ INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):