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

Reply via email to