ICD1855P ;ALB/JDG - YEARLY DRG UPDATE;8/9/2010 ; 10/5/11 3:21pm
;;18.0;DRG Grouper;**55**;Oct 20, 2000;Build 20
;
;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 ICDDX^ICD1855L ;Updates to existing diagnosis codes
D ICDPX^ICD1855L ;Updates to existing procedure code identifiers
D ICDPX1^ICD1855L ;Updates to existing procedure codes Major O.R. procedure
Q
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HICD1855P 478 printed Oct 16, 2024@17:49:41 Page 2
ICD1855P ;ALB/JDG - YEARLY DRG UPDATE;8/9/2010 ; 10/5/11 3:21pm
+1 ;;18.0;DRG Grouper;**55**;Oct 20, 2000;Build 20
+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 ICDDX^ICD1855L
+2 ;Updates to existing procedure code identifiers
DO ICDPX^ICD1855L
+3 ;Updates to existing procedure codes Major O.R. procedure
DO ICDPX1^ICD1855L
+4 QUIT
