source:
WorldVistAEHR/trunk/r/INPATIENT_MEDICATIONS-PSJ-PSIV-PSG--PSGW/PSJPST50.m
Last change on this file was 613, checked in by , 15 years ago | |
---|---|
File size: 282 bytes |
Rev | Line | |
---|---|---|
[613] | 1 | PSJPST50 ;BIR/MV-POE POST INIT ;6 DEC 00 / 3:11 PM |
2 | ;;5.0; INPATIENT MEDICATIONS ;**50**;16 DEC 97 | |
3 | ; | |
4 | POE ;Queue IV conversion to re-allign OI | |
5 | Q:$$PATCH^XPDUTL("PSJ*5.0*50") | |
6 | S ZTDTH=$H,ZTRTN="CNIV^PSJUTL1()",ZTIO="",ZTDESC="Inpatient medications order conversion" | |
7 | D ^%ZTLOAD | |
8 | Q |
Note:
See TracBrowser
for help on using the repository browser.