ICD1882P ;ALB/JDG - YEARLY DRG UPDATE;8/9/2010
;;18.0;DRG Grouper;**82**;Oct 20, 2000;Build 21
;
;This routine will kick off Routines needed for
;FY 2016 updates to the DRG Grouper.
;
Q
;
EN ; start update
D PRE^ICD1882A ;
Q
EN2 ; continue update
D INACTDRG^ICD1882O ;inactivate DRGs
D DRG^ICD1882X ;changes for DRGS
; ********************************************************************************
; *****routines ICD1872F-K contain the DRG info needed for the Grouper update*****
; ********************************************************************************
D POST^ICD1882A ;
Q
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HICD1882P 622 printed Dec 13, 2024@01:49:20 Page 2
ICD1882P ;ALB/JDG - YEARLY DRG UPDATE;8/9/2010
+1 ;;18.0;DRG Grouper;**82**;Oct 20, 2000;Build 21
+2 ;
+3 ;This routine will kick off Routines needed for
+4 ;FY 2016 updates to the DRG Grouper.
+5 ;
+6 QUIT
+7 ;
EN ; start update
+1 ;
DO PRE^ICD1882A
+2 QUIT
EN2 ; continue update
+1 ;inactivate DRGs
DO INACTDRG^ICD1882O
+2 ;changes for DRGS
DO DRG^ICD1882X
+3 ; ********************************************************************************
+4 ; *****routines ICD1872F-K contain the DRG info needed for the Grouper update*****
+5 ; ********************************************************************************
+6 ;
DO POST^ICD1882A
+7 QUIT
