Good morning:
I created a timer form that does a countdown. Once a given amount of time
passes the calling program closes the form and continues on its merry way.
The form works exactly as intended except that if the computer is in screen
saver mode the program stays paused until I log back into the R:BASE
session.
Here's the code that runs the form:
SET VAR VDB TEXT = (CVAL('DATABASE'))
IF VDB <> 'ZANEDATA' AND #TIME BETWEEN '06:00:00' AND '06:10:00' THEN
CLEAR VAR V%TIME, VSECS, VDISPLAY
SET VAR VCRNT_TIME TIME = .#TIME
SET VAR VTRGT_TIME TIME = (RTIME(6,10,0))
SET VAR VSECS INTEGER = (.VTRGT_TIME - .VCRNT_TIME)
SET VAR VDISPLAY INTEGER = .VSECS
EDIT USING COUNTDOWN
CLEAR VAR V%TIME, VSECS, VDISPLAY, VDB
ENDIF
And here's the EEP in the form:
WHILE #TIME < .VTRGT_TIME THEN
SET VAR VSECS INTEGER = (.VTRGT_TIME - .#TIME)
SET VAR VDISPLAY INTEGER = .VSECS
RECALC VARIABLES
SKIP TO VDISPLAY
ENDWHILE
CLOSEWINDOW
RETURN
Is there some way around the screen saver issue or have I done something
wrong?
As always any assistance is greatly appreciated.
Thanks - Mike Ramsour
Confidentiality Notice
This message is intended exclusively for the individual or entity to which it
is
addressed and may contain privileged, proprietary, or otherwise private
information.
If you are not the named addressee, you are not authorized to read, print,
retain,
copy or disseminate this message or any part of it. If you have received this
message in error, please notify the sender immediately by e-mail and delete all
copies of the message.
