Automatic Screen Refresh

[Peter Bateman]

Paul:

i believe Mikael is right.
To cause Axiant thin client to wait 30 seconds.
You could run the following in a separate display thread.
You could test a JCW or a SYSTEM variable to see if you need
to change the selection criteria.
Toggle between the

TEMPORARY USERJCW_NAME character size 8 RESET AT STARTUP
TEMPORARY WAIT FLOAT SIZE 4 INITIAL 30.0
  TEMPORARY FOREVER initial 1
  WHILE ( FOREVER = 1 )
  BEGIN
  IF ( USERJCW <> JCW ( USERJCW_NAME ) )
     THEN BEGIN
              ACCEPT NEW_KEY
             END

  GET DATA
  DISPLAY DATA
  INFO " " now
  DO EXTERNAL 'PAUSE'  ( WAIT )
  END
  PROCEDURE INITIALIZE
  BEGIN
; You need to uniquely identify the session
;
  GET USERJCW via UNIQUE_KEY using UNIQUE_KEY
  LET USERJCW_NAME = USERJCW_NAME of USERJCW
  END

Good luck,
Peter

_________________________________________________________________
http://join.msn.com/?pgmarket=en-ca&page=byoa/prem&xAPID=1994&DI=1034&SU=http://hotmail.com/enca&HL=Market_MSNIS_Taglines