HLOP143.m

HLOP143 ;ALB/CJM-Pre & Post install ;06/16/2009

 ;;1.6;HEALTH LEVEL SEVEN;**143**;Oct 13, 1995;Build 3

 ;Per VHA Directive 2004-038, this routine should not be modified.

 ;

PRE ;

 ;

 N WORK

 L +^HLTMP("PROCESS MANAGER"):0

 I '$T D ABORT Q

 D CHKDEAD^HLOPROC1(.WORK)

 I $O(^HLTMP("HL7 RUNNING PROCESSES",""))'="" D ABORT

 L -^HLTMP("PROCESS MANAGER")

 Q

ABORT ;

 S XPDABORT=1

 D BMES^XPDUTL("HLO processes are still running and prevent this installation from completing")

 Q

--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---HLOP143   491     printed  Sep 23, 2025@19:34:54                                                                                                                                                                                                      Page 2

HLOP143   ;ALB/CJM-Pre & Post install ;06/16/2009

 +1       ;;1.6;HEALTH LEVEL SEVEN;**143**;Oct 13, 1995;Build 3

 +2       ;Per VHA Directive 2004-038, this routine should not be modified.

 +3       ;

PRE       ;

 +1       ;

 +2        NEW WORK

 +3        LOCK +^HLTMP("PROCESS MANAGER"):0

 +4        IF '$TEST

               DO ABORT

               QUIT 

 +5        DO CHKDEAD^HLOPROC1(.WORK)

 +6        IF $ORDER(^HLTMP("HL7 RUNNING PROCESSES",""))'=""

               DO ABORT

 +7        LOCK -^HLTMP("PROCESS MANAGER")

 +8        QUIT 

ABORT     ;

 +1        SET XPDABORT=1

 +2        DO BMES^XPDUTL("HLO processes are still running and prevent this installation from completing")

 +3        QUIT