source: FOIAVistA/trunk/r/PHARMACY_DATA_MANAGEMENT-PSS/PSSCHENV.m@ 1590

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

initial load of FOIAVistA 6/30/08 version

File size: 499 bytes
Line 
1PSSCHENV ;BIR/WRT-CMOP-Host environment check routine ; 09/02/97 8:28
2 ;;1.0;PHARMACY DATA MANAGEMENT;;9/30/97
3 ; ENVIRONMENTAL CHECK ROUTINE-CMOP HOST
4START I ^XMB("NETNAME")'["CMOP-" S XPDQUIT=1 Q
5 S XQABT1=$H
6 I ^XMB("NETNAME")?1"CMOP-".E
7 E S XPDABORT=2 Q
8VERSION I '$D(^PS(59.7,1,10)) W !,"Install Aborted. You do not have NDF V. 3.15 loaded." S XPDQUIT=2
9 I $D(^PS(59.7,1,10)),$P(^PS(59.7,1,10),"^",1)<3.15 W !,"Install Aborted. You do not have NDF V. 3.15 or greater loaded." S XPDQUIT=2
10 Q
Note: See TracBrowser for help on using the repository browser.