source:
WorldVistAEHR/trunk/r/MEDICINE-MC/MCARGEO.m@
789
| Last change on this file since 789 was 613, checked in by , 15 years ago | |
|---|---|
| File size: 241 bytes | |
| Rev | Line | |
|---|---|---|
| [613] | 1 | MCARGEO ;WISC/MLH-GI ENTER/EDIT-ORDER ENTRY/IMAGING HOOKS ;5/2/96 12:44 |
| 2 | ;;2.3;Medicine;**31**;09/13/1996 | |
| 3 | ORDER D:'$D(MCOEON) ORDER^MCPARAM Q:'$D(MCOEON) | |
| 4 | Q | |
| 5 | ORDER1 G IM:'$D(MCOEON) Q:'$D(^MCAR(MCFILE,MCARGDA)) Q:$D(DTOUT) | |
| 6 | IM D EN1^MCMAG Q |
Note:
See TracBrowser
for help on using the repository browser.
