Automatic Screen Refresh

[PAUL DIACONESCU]

It is what we are doing, a push find every xx seconds.
In order to get out of that we use an input to a system variable, with a 
time-out.
After we check the value of the system-variable. If it is not blank, it 
means that the user hit any letter on the keyboard. In this case, we stop 
the loop, and prompt the user (request) for an other value (a new find).
It's working fine in powerhouse, but in axiant it loops.

exemple:
RUN COMMAND 'SETVAR ZFIND,""'
RUN COMMAND 'INPUT ZFIND WAIT=30' NOWARN ON ERROR CONTINUE
LET T-DUMMY = GETSYSTEMVAL("ZFIND")
IF T-DUMMY <> ''  "
   THEN
   REQUEST ITEM-NO
ELSE
   PUSH FIND
ETC...

;------------
All that just to simulate a missing powerhouse command, something like: 
'REQUEST ITEM-NO WAIT 30', which will wait for an user input in ITEM-NO for 
30 seconds, after it gets back to the logic of the program.

_________________________________________________________________
MSN Messenger : discutez en direct avec vos amis !  
http://messenger.fr.msn.ca/