source: FOIAVistA/trunk/r/HEALTH_LEVEL_SEVEN-HL/HLOPRE.m@ 794

Last change on this file since 794 was 628, checked in by George Lilly, 15 years ago

initial load of FOIAVistA 6/30/08 version

File size: 499 bytes
Line 
1HLOPRE ;ALB/CJM-Pre-install check for HLO patches ;07/17/2007
2 ;;1.6;HEALTH LEVEL SEVEN;**134,136,137**;Oct 13, 1995;Build 21
3 ;Per VHA Directive 2004-038, this routine should not be modified.
4 ;
5CHECK ;
6 ;
7 N WORK
8 L +^HLTMP("PROCESS MANAGER"):0
9 I '$T D ABORT Q
10 D CHKDEAD^HLOPROC1(.WORK)
11 I $O(^HLTMP("HL7 RUNNING PROCESSES",""))'="" D ABORT
12 L -^HLTMP("PROCESS MANAGER")
13 Q
14ABORT ;
15 S XPDABORT=1
16 D BMES^XPDUTL("HLO processes are still running and prevent this installation from completing")
17 Q
Note: See TracBrowser for help on using the repository browser.