- LRHYUTL ;VA/DALOI/HOAK - UNIVERSAL UTILITY ; 13-Aug-2013 09:16 ; MKK
- ;;5.2;LAB SERVICE;**405,1033**;NOV 01, 1997
- ;
- ; This routine is used to enhance display processes for Vista.
- ;
- ;
- GRAFON ;
- D GSET^%ZISS
- QUIT
- GRAFOFF ;
- W IOG0 D GKILL^%ZISS
- QUIT
- SCRNON ;
- N X,Y
- D ENS^%ZISS
- QUIT
- SCRNOFF ;
- N X,Y
- D KILL^%ZISS
- ;
- QUIT
- LRHYUTL ;VA/DALOI/HOAK - UNIVERSAL UTILITY ; 13-Aug-2013 09:16 ; MKK
- +1 ;;5.2;LAB SERVICE;**405,1033**;NOV 01, 1997
- +2 ;
- +3 ; This routine is used to enhance display processes for Vista.
- +4 ;
- +5 ;
- GRAFON ;
- +1 DO GSET^%ZISS
- +2 QUIT
- GRAFOFF ;
- +1 WRITE IOG0
- DO GKILL^%ZISS
- +2 QUIT
- SCRNON ;
- +1 NEW X,Y
- +2 DO ENS^%ZISS
- +3 QUIT
- SCRNOFF ;
- +1 NEW X,Y
- +2 DO KILL^%ZISS
- +3 ;
- +4 QUIT