- LRHYUTL ;DALOI/HOAK - UNIVERSAL UTILITY ;08/31/2005
- ;;5.2;LAB SERVICE;**405**;Sep 27, 1994;Build 93
- ;
- ; 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
- --- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HLRHYUTL 337 printed Feb 18, 2025@23:41:24 Page 2
- LRHYUTL ;DALOI/HOAK - UNIVERSAL UTILITY ;08/31/2005
- +1 ;;5.2;LAB SERVICE;**405**;Sep 27, 1994;Build 93
- +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