PSXBPRE ;BIR/HTW-CMOP Pre-Initialization [ 08/17/95  10:32 AM ]
 ;;1.0;CONSOLIDATED MAIL OUTPATIENT PHARMACY;**2**;10 May 95
EN I ^XMB("NETNAME")'?1"CMOP-".E W !,"CMOP Medical Center installation" K DIFQ W !!,"Finished.  No updating has occurred..."
 Q
 
--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HPSXBPRE   257     printed  Sep 23, 2025@19:19:31                                                                                                                                                                                                      Page 2
PSXBPRE   ;BIR/HTW-CMOP Pre-Initialization [ 08/17/95  10:32 AM ]
 +1       ;;1.0;CONSOLIDATED MAIL OUTPATIENT PHARMACY;**2**;10 May 95
EN         IF ^XMB("NETNAME")'?1"CMOP-".E
               WRITE !,"CMOP Medical Center installation"
               KILL DIFQ
               WRITE !!,"Finished.  No updating has occurred..."
 +1        QUIT