- ICD1872P ;ALB/JDG - YEARLY DRG UPDATE;8/9/2010
- ;;18.0;DRG Grouper;**72**;Oct 20, 2000;Build 4
- ;
- ;This routine will kick off Routines needed for
- ;FY 2014 updates to the DRG Grouper.
- ;Depending on the year and type of updates needed, not
- ;all of the routines will be needed.
- ;
- Q
- ;
- EN ; start update
- D DRG^ICD1872A ;changes for DRGS
- ; ********************************************************************************
- ; *****routines ICD1872F-K contain the DRG info needed for the Grouper update*****
- ; ********************************************************************************
- ;D DIAG^ICD1872B ; UPDATES FOR NEW DIAGNOSIS CODES (no updates for FY2014)
- ;D PRO^ICD1872C ; UPDATES FOR NEW PROCEDURE CODES
- ; ************************************************************************************************
- ; *****for FY2014 four new procedure codes are being added via patch's ICD*18.0*73/LEX*2.0*93*****
- ; ************************************************************************************************
- ;D DIAG^ICD1872D ; UPDATES TO EXISTING DIAGNOSIS CODES IF ANY (no updates for FY2014)
- ;D PRO^ICD1872E ; UPDATES TO EXISTING PROCEDURE CODES IF ANY (no updates for FY2014)
- D INACTDRG^ICD1872O ; INACTIVATE DRGs (no updates for FY2014; inactivated DRG119 since it was missed in FY2007)
- Q
- --- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HICD1872P 1335 printed Feb 18, 2025@23:15:31 Page 2
- ICD1872P ;ALB/JDG - YEARLY DRG UPDATE;8/9/2010
- +1 ;;18.0;DRG Grouper;**72**;Oct 20, 2000;Build 4
- +2 ;
- +3 ;This routine will kick off Routines needed for
- +4 ;FY 2014 updates to the DRG Grouper.
- +5 ;Depending on the year and type of updates needed, not
- +6 ;all of the routines will be needed.
- +7 ;
- +8 QUIT
- +9 ;
- EN ; start update
- +1 ;changes for DRGS
- DO DRG^ICD1872A
- +2 ; ********************************************************************************
- +3 ; *****routines ICD1872F-K contain the DRG info needed for the Grouper update*****
- +4 ; ********************************************************************************
- +5 ;D DIAG^ICD1872B ; UPDATES FOR NEW DIAGNOSIS CODES (no updates for FY2014)
- +6 ;D PRO^ICD1872C ; UPDATES FOR NEW PROCEDURE CODES
- +7 ; ************************************************************************************************
- +8 ; *****for FY2014 four new procedure codes are being added via patch's ICD*18.0*73/LEX*2.0*93*****
- +9 ; ************************************************************************************************
- +10 ;D DIAG^ICD1872D ; UPDATES TO EXISTING DIAGNOSIS CODES IF ANY (no updates for FY2014)
- +11 ;D PRO^ICD1872E ; UPDATES TO EXISTING PROCEDURE CODES IF ANY (no updates for FY2014)
- +12 ; INACTIVATE DRGs (no updates for FY2014; inactivated DRG119 since it was missed in FY2007)
- DO INACTDRG^ICD1872O
- +13 QUIT