STANDARD DATA DICTIONARY #80.5 -- DRG SURGICAL HIERARCHY FILE 9/29/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):