source:
WorldVistAEHR/trunk/r/INPATIENT_MEDICATIONS-PSJ-PSIV-PSG--PSGW/PSJPST50.m@
1533
| Last change on this file since 1533 was 613, checked in by , 16 years ago | |
|---|---|
| File size: 282 bytes | |
| Rev | Line | |
|---|---|---|
| 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.
