source:
WorldVistAEHR/trunk/r/SCHEDULING-SD-SC/SDOPC0.m@
1361
Last change on this file since 1361 was 613, checked in by , 15 years ago | |
---|---|
File size: 269 bytes |
Rev | Line | |
---|---|---|
[613] | 1 | SDOPC0 ;ALB/LDB - SEND BULLETIN IF DEP DATA FOR MT PT IS INCONSISTENT; 21 JUN 89@18:30 ;3/11/92 12:46 |
2 | ;;5.3;Scheduling;**20,42,132**;Aug 13, 1993 | |
3 | ; | |
4 | INPT ;Called from SDOPC1 to reset inpatient status | |
5 | I $D(^DPT(DFN,"S",SDVD1,0)),$P(^(0),U,2)="" S $P(^(0),U,2)="I" | |
6 | Q |
Note:
See TracBrowser
for help on using the repository browser.