HBHCP25.m

HBHCP25 ;ALB/KG - HBHC ICD10 CLASS I REMEDIATION PRE/POST-INSTALL ;6/1/2012

 ;;1.0;HOSPITAL BASED HOME CARE;**25**;NOV 01, 1993;Build 45

 ;

 Q

 ;

PRE ;

 ;Delete Output Transform from HBHC PATIENT file (#631)

 D BMES^XPDUTL("Deleting Output Transform from HBHC PATIENT file (#631).")

 K ^DD(631,18,2)

 K ^DD(631,18,2.1)

 K ^DD(631,46,2)

 K ^DD(631,46,2.1)

 Q

--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---HBHCP25   371     printed  Dec 13, 2024@01:58:06                                                                                                                                                                                                      Page 2

HBHCP25   ;ALB/KG - HBHC ICD10 CLASS I REMEDIATION PRE/POST-INSTALL ;6/1/2012

 +1       ;;1.0;HOSPITAL BASED HOME CARE;**25**;NOV 01, 1993;Build 45

 +2       ;

 +3        QUIT 

 +4       ;

PRE       ;

 +1       ;Delete Output Transform from HBHC PATIENT file (#631)

 +2        DO BMES^XPDUTL("Deleting Output Transform from HBHC PATIENT file (#631).")

 +3        KILL ^DD(631,18,2)

 +4        KILL ^DD(631,18,2.1)

 +5        KILL ^DD(631,46,2)

 +6        KILL ^DD(631,46,2.1)

 +7        QUIT