ICD1862P ;ALB/JDG - YEARLY DRG UPDATE;8/9/2010 ; 10/5/11 3:21pm
;;18.0;DRG Grouper;**62**;Oct 20, 2000;Build 7
;
;This routine will kick off Routines needed for
;updates to the DRG Grouper.
;Depending on the type of updates needed.
;
Q
EN ; Start Update
D ICDUPDDX^ICD1862L ;Updates to existing diagnosis codes
D ICDUPDPX^ICD1862L ;Updates to existing procedure code identifiers
Q
ICD1862P ;ALB/JDG - YEARLY DRG UPDATE;8/9/2010 ; 10/5/11 3:21pm
+1 ;;18.0;DRG Grouper;**62**;Oct 20, 2000;Build 7
+2 ;
+3 ;This routine will kick off Routines needed for
+4 ;updates to the DRG Grouper.
+5 ;Depending on the type of updates needed.
+6 ;
+7 QUIT
EN ; Start Update
+1 ;Updates to existing diagnosis codes
DO ICDUPDDX^ICD1862L
+2 ;Updates to existing procedure code identifiers
DO ICDUPDPX^ICD1862L
+3 QUIT