VEPERENT ;DAOU/DLF;Add/Edit Pharmacy location
;;1.0; EHR - Electronic Health Record;****; 05/18/2005
;
START D DT^DICRW
S DIC="^VEPER(19904.3,",DIC(0)="AEMQZ",DIC("A")="Select a Pharmacy: " D ^DIC
Q