Hello John,

I wonder if you mean the value in the TSO LOGON screen

Command   ===>

You can find that value in "lwalgcmd"

ASXBPTR  = storage(224,4)
ASXB     = storage(d2x(c2d(ASXBPTR)+108),4)
LWA      = storage(d2x(c2d(ASXB)+20),4)
lwalgcmd = Strip(storage(d2x(c2d(LWA)+186),80))



On Mon, 24 Oct 2005 15:16:12 -0700, John Norgauer
<[EMAIL PROTECTED]> wrote:

>I would like to capture the CMDPROC member name in some kind of Z-type
>symbolic for a panel display.
>
>For example, on our ISPF primary option menu screen where we display the
>following:
>
<snip>
>
>CMDPROC  -  ISPPDF   <===== like to add this
>
>I would like to add the CMDPROC member name used for this logon session.
>
>Is this prossible?
>
>thanks
>
>
>
>John Norgauer


Regards
Bruce Hewson

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to