- GMVUT2 ;HOIFO/YH,RM,FT-ENTRY TO GATHER PATIENT VITAL/MEASURMENT DATA ;12/27/01 10:45
- ;;5.0;GEN. MED. REC. - VITALS;;Oct 31, 2002
- ;
- ; This routine uses the following IAs:
- ; #1246 - WIN^DGPMDDCF (supported)
- ;
- INACT42(GMWLOC) ; THIS PROCEDURE WILL CALL SUPPORTED ENTRY POINT WIN^DGPMDDCF
- ; TO DETERMINE IF WARD LOCATION (GMWLOC) IS INACTIVE.
- N X,D0,DGPMOS
- S D0=GMWLOC D WIN^DGPMDDCF
- Q X
- --- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HGMVUT2 410 printed Mar 13, 2025@21:04:45 Page 2
- GMVUT2 ;HOIFO/YH,RM,FT-ENTRY TO GATHER PATIENT VITAL/MEASURMENT DATA ;12/27/01 10:45
- +1 ;;5.0;GEN. MED. REC. - VITALS;;Oct 31, 2002
- +2 ;
- +3 ; This routine uses the following IAs:
- +4 ; #1246 - WIN^DGPMDDCF (supported)
- +5 ;
- INACT42(GMWLOC) ; THIS PROCEDURE WILL CALL SUPPORTED ENTRY POINT WIN^DGPMDDCF
- +1 ; TO DETERMINE IF WARD LOCATION (GMWLOC) IS INACTIVE.
- +2 NEW X,D0,DGPMOS
- +3 SET D0=GMWLOC
- DO WIN^DGPMDDCF
- +4 QUIT X
