STANDARD DATA DICTIONARY #80.5 -- DRG SURGICAL HIERARCHY FILE 3/24/25 PAGE 1 STORED IN ^ICDRS( (1 ENTRY) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 18.0) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- This is the Surgical Hierarchy file. It is populated with data from CMS (Centers for Medicare and Medicaid Services). The data is used to determine the DRG (Diagnosis Related Group) by MDC (Major Diagnostic Category) in surgical order of importance. DD ACCESS: @ RD ACCESS: @ WR ACCESS: @ DEL ACCESS: @ LAYGO ACCESS: @ AUDIT ACCESS: @ CROSS REFERENCED BY: EFFECTIVE DATE(B) 80.5,.01 EFFECTIVE DATE 0;1 DATE (Required) INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:X<1 X LAST EDITED: MAY 24, 2012 HELP-PROMPT: (No range limit on date) DESCRIPTION: Effective Date for these rules CROSS-REFERENCE: 80.5^B 1)= S ^ICDRS("B",$E(X,1,30),DA)="" 2)= K ^ICDRS("B",$E(X,1,30),DA) 80.5,1 MDC 1;0 POINTER Multiple #80.51 80.51,.01 MDC 0;1 POINTER TO MAJOR DIAGNOSTIC CATEGORY FILE (#80.3) (Required) (Multiply asked) LAST EDITED: MAY 24, 2012 HELP-PROMPT: ENTER A MAJOR DIAGNOSTIC CODE DESCRIPTION: This is a pointer to file #80.3 - Major Diagnostic Categories CROSS-REFERENCE: 80.51^B 1)= S ^ICDRS(DA(1),1,"B",$E(X,1,30),DA)="" 2)= K ^ICDRS(DA(1),1,"B",$E(X,1,30),DA) 80.51,1 DRG 2;0 POINTER Multiple #80.511 80.511,.01 DRG 0;1 POINTER TO DRG FILE (#80.2) (Required) (Multiply asked) LAST EDITED: MAY 24, 2012 HELP-PROMPT: ENTER A DRG CODE DESCRIPTION: This is a pointer to file #80.2 - DRG CROSS-REFERENCE: 80.511^B 1)= S ^ICDRS(DA(2),1,DA(1),2,"B",$E(X,1,30),DA)="" 2)= K ^ICDRS(DA(2),1,DA(1),2,"B",$E(X,1,30),DA) 80.511,1 ORDER 0;2 NUMBER INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1.N) X LAST EDITED: MAY 25, 2012 HELP-PROMPT: Type a number between 1 and 9999, 0 decimal digits. DESCRIPTION: Specifies the order of surgical importance of this DRG. CROSS-REFERENCE: 80.511^C 1)= S ^ICDRS(DA(2),1,DA(1),2,"C",$E(X,1,30),DA)="" 2)= K ^ICDRS(DA(2),1,DA(1),2,"C",$E(X,1,30),DA) FILES POINTED TO FIELDS DRG (#80.2) DRG:DRG (#.01) MAJOR DIAGNOSTIC CATEGORY (#80.3) MDC:MDC (#.01) INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):