source: FOIAVistA/trunk/r/GEN_MED_OTHER-GMV/GMVUT2.m@ 677

Last change on this file since 677 was 628, checked in by George Lilly, 15 years ago

initial load of FOIAVistA 6/30/08 version

File size: 399 bytes
Line 
1GMVUT2 ;HOIFO/YH,RM,FT-ENTRY TO GATHER PATIENT VITAL/MEASURMENT DATA ;12/27/01 10:45
2 ;;5.0;GEN. MED. REC. - VITALS;;Oct 31, 2002
3 ;
4 ; This routine uses the following IAs:
5 ; #1246 - WIN^DGPMDDCF (supported)
6 ;
7INACT42(GMWLOC) ; THIS PROCEDURE WILL CALL SUPPORTED ENTRY POINT WIN^DGPMDDCF
8 ; TO DETERMINE IF WARD LOCATION (GMWLOC) IS INACTIVE.
9 N X,D0,DGPMOS
10 S D0=GMWLOC D WIN^DGPMDDCF
11 Q X
Note: See TracBrowser for help on using the repository browser.