Re: Automatic Update of Display Window

To write a record but not require the user to press
the ENTER key, the DDS keyword INVITE allows a screen
to redisplay without using the EXFMT opcode.  
The WRITE opcode is used instead.       


Dan Rasch - because if the human species concentrated on the really 
important things in life, there would be a shortage of fishing poles!


On Tue, 15 May 2001, Falconberry, Ron G. wrote:

> Is there a way to display a window in an interactive job where the window
> data is automatically updated without the user having to press any keys?
> 
> We have converted a submitted RPGLE program to run interactively.  To
> indicate to the user that the program is functioning and not just locked up,
> I wanted to display a popup window which automatically displays some data
> from the transaction being currently processed.  When the program ends, the
> window also closes and the previous screen is redisplayed.  Unfortunately,
> everything I have tried either forces the user to press Enter before the
> program continues or the program runs to completion without any window being
> displayed at all.
> 
> Is there a way to do this using a window - or even a regular screen - or am
> I running down a dead-end street?  I am open to alternative ideas.
> 
> Ron Falconberry
> pgrgf@mail.directins.com
> (615) 360-4527
> 
> +---
> | This is the Midrange System Mailing List!
> | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
> | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
> | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator: david@midrange.com
> +---
> 

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---