source: FOIAVistA/trunk/r/PHARMACY_DATA_MANAGEMENT-PSS/PSSYSP.m@ 761

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

initial load of FOIAVistA 6/30/08 version

File size: 288 bytes
Line 
1PSSYSP ;BIR/WRT-Pharmacy system site parameters routine ;09/02/97
2 ;;1.0;PHARMACY DATA MANAGEMENT;**20,38,87,120**;9/30/97;Build 4
3 ; IV IDENTIFIER
4 ;D ENIVID^PSSHL1
5 ; CHANGE TYPE OF ORDER (FINISH) FROM OERR
6 W ! S DIE="^PS(59.7,",DR="13;14;16;16.1;16.2",DA=1 D ^DIE
7 K DIE,DA,DR W !
8 Q
Note: See TracBrowser for help on using the repository browser.