source:
WorldVistAEHR/trunk/r/MENTAL_HEALTH-YS-RUCL-YI-YT/YS31POST.m
Last change on this file was 623, checked in by , 15 years ago | |
---|---|
File size: 359 bytes |
Rev | Line | |
---|---|---|
[623] | 1 | YS31POST ;DALCIOFO/MJD-PATCH YS*5.01*31 POST RTN. ;09/23/97 |
2 | ;;5.01;MENTAL HEALTH;**31**;Dec 30, 1994 | |
3 | ; | |
4 | ; Unless the site has modified this file the zero node | |
5 | ; for file #601 MH INSTRUMENT should look like: | |
6 | ; ^YTT(601,0) = MH INSTRUMENT^601^233^88 | |
7 | S:$P(^YTT(601,0),U,3)="225" $P(^YTT(601,0),U,3)=233 | |
8 | S $P(^YTT(601,0),U,4)=$P(^YTT(601,0),U,4)+8 | |
9 | ; | |
10 | QUIT |
Note:
See TracBrowser
for help on using the repository browser.