- PSXAPRE ;BIR/WPB-CMOP Pre-Initialization [ 07/12/95 2:31 PM ]
- ;;1.0;CONSOLIDATED MAIL OUTPATIENT PHARMACY;**1**;10 May 95
- EN I ^XMB("NETNAME")?1"CMOP-".E W !,"Host factility installation" K DIFQ Q
- Q
- --- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HPSXAPRE 206 printed Dec 13, 2024@01:43:19 Page 2
- PSXAPRE ;BIR/WPB-CMOP Pre-Initialization [ 07/12/95 2:31 PM ]
- +1 ;;1.0;CONSOLIDATED MAIL OUTPATIENT PHARMACY;**1**;10 May 95
- EN IF ^XMB("NETNAME")?1"CMOP-".E
- WRITE !,"Host factility installation"
- KILL DIFQ
- QUIT
- +1 QUIT