Re: How do I get VARPG Program to repaint?

[weiss@xxxxxxxxxx]

Hi Jim,
as long as VARPG stays in an Action subroutine the runtime doesn't  return
control to the event handler and the app seems to be frozen.

There is an attribute in the  *component part called DoEvents, that will
allow to interrupt the processing of an Action Subroutine. It will cause
the Event handler to catch up with events that have occurred in the
meantime and then continue process where it interrupted the action
subroutine.

Here is how to code it:
     C                   eval      %setatr('*component':'*component':
     C                             'doevents')=1


This will slow down your processing of the file, so be careful how often
you use this, I wouldn't use it after every record read, maybe every 100th
or so, depends how many you have to process.



Claus Weiss Visual AD tools, email: weiss@ca.ibm.com
Dept 522 IBM Canada Lab tie 969-3987 Phone(905)413-3987 FAX(905)413-4850
Greetings from Toronto
WDT/400 homepage: ibm.com/software/ad/wdt400
WDT/400 newsgroup: news://news.software.websphere.studio400     |   VARPG
newsgroup: news://news.software.ibm.com/ibm.software.varpg,