Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping
Routine: GMRV2ENV

GMRV2ENV.m

Go to the documentation of this file.

GMRV2ENV ;HIRMFO/FT-Environment check for GMRV*4*1 ;6/5/97 13:13

 ;;4.0;Vitals/Measurements;**1,7**;Apr 25, 1997

EN1 ; check if v4.0 installed

 I +$$VERSION^XPDUTL("GMRV")'>3 S XPDABORT=1 D BMES^XPDUTL("GEN. MED. REC. - VITALS v4.0 must be installed first.")

--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HGMRV2ENV   267     printed  Oct 16, 2024@17:56:37                                                                                                                                                                                                     Page 2

GMRV2ENV  ;HIRMFO/FT-Environment check for GMRV*4*1 ;6/5/97 13:13

 +1       ;;4.0;Vitals/Measurements;**1,7**;Apr 25, 1997

EN1       ; check if v4.0 installed

 +1        IF +$$VERSION^XPDUTL("GMRV")'>3

               SET XPDABORT=1

               DO BMES^XPDUTL("GEN. MED. REC. - VITALS v4.0 must be installed first.")

 +2        QUIT