>I hope this is what you mean.
Hello, no,
Because it's for a specific panel
I need it for all panels
As   RETRIEVE , RETP , RETF   doing so

Just bounce the text
On the current panel on it

for example after command 
tso xyzrexx 
'my-text' will appear on the input field panel


On Thu, 6 Jan 2022 18:15:50 +1100, Peter Vels <[email protected]> wrote:

>On Wed, 5 Jan 2022 at 19:16, Weizman arbel <[email protected]> wrote:
>
>> Hello ,
>>  How to do this from rexx
>> As   RETRIEVE , RETP , RETF   doing so
>>
>>
>> thanks ,
>>   weizman.
>>
>
>Try this:
>
>Rexx:
>
>/* Rexx */
>address ISPEXEC
>/* First, show panel with blank command line */
>'display panel(weizman)'
>/* Now change the value of the command line */
>wa = 'Can you see me?'
>'display panel(weizman)'
>/* Change it again */
>wa = 'Yes I can!'
>'display panel(weizman)'
>exit
>
>Panel:
>)ATTR
>)BODY CMD(WA)
>     +Fun experiment
>+Command ===>_WA
>+
>+Hit ENTER again
>)INIT
>)PROC
>)END
>
>I hope this is what you mean.
>Regards,
>Peter
>
>----------------------------------------------------------------------
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to [email protected] with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to