Re: RCVF WAIT(*NO)

Juris Krikis Jr wrote:

> Well, actually, what I wanted to do was to perform a read on a display
>
> file and continue the execution of a program _even_ if there is no
> input
> available (if there is - process the input)... For example, one would
> want to do such a thing if one would want to display a running (or
> should I say `ticking`?) clock to a user _until_ the user presses, for
>
> example, PF03. I didn't know that was possible (because all programs I
>
> had seen didn't have any automatical refresh - they usually put it on
> PF05, like WRKACTJOB) until I saw one CL program which did that. I did
>
> RTVCLSRC (or whatever stands for `Retrieve CL Program Source Code`)
> and
> saw that all it does is one RCVF WAIT(*NO). I started looking for a
> similar function in RPG... And couldn't find it... Still haven't found
>
> it... Any ideas?
>
>                      Thanks in advance, Juris.
>
> P.S. Could someone of you give a brief description of panel groups?
> * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
> * *
> * This is the RPG/400 Discussion Mailing List!  To submit a
> new         *
> * message, send your mail to "RPG400-L@midrange.com".  To
> unsubscribe   *
> * from this list send email to MAJORDOMO@midrange.com and
> specify       *
> * 'unsubscribe RPG400-L' in the body of your message.  Questions
> should *
> * be directed to the list owner / operator:
> david@midrange.com          *
> * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
> * *
> umidr

  Try to use in display file keyword INVITE and when you create display
file specify maximum record  wait time parameter, it means number if
seconds that program waits for file resources or you can specify *IMMED,
it means program does not wait and required immediate alocation of
resources.
In RPG program use WRITE operation and as operand use display format
name, if you want to get some information from screen use READ operation
and as operand use the name of display file.

jaro

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the RPG/400 Discussion Mailing List!  To submit a new         *
* message, send your mail to "RPG400-L@midrange.com".  To unsubscribe   *
* from this list send email to MAJORDOMO@midrange.com and specify       *
* 'unsubscribe RPG400-L' in the body of your message.  Questions should *
* be directed to the list owner / operator: david@midrange.com          *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *