In a recent note, Anonymous Jieryn said:

> Date:         Tue, 28 Jun 2005 01:23:17 +0000
> 
> i'd like to run a rexx script at logon time which utilizes ISPF
> services. my attempts so far have been fruitless. i've altered the
> logon proc to call &SYSUID..CLIST($LOGON) if it exists, or do nothing
> and quietly. inside my clist, i alter some of my concatenations and
> then finally call my rexx script. that script attempts to do things
> like:
> 
>  address ispexec '<some ISPF table command>'
> 
> which return with a -3; the books suggest i am not in the proper
> environment, and i can only assume this is because ISPF has not fully
> initialized for me?? the call to &SYSUID..CLIST($LOGON) is the very
> last thing to be performed in the logon proc (that is, it occurs after
> my ISPF concatenations have been initialized.
> 
You need to have two scripts, $LOGON to initialize all the
ISPF concatenations, then "address TSO 'ISPSTART CMD($LOGON2)'",
then in $LOGON2 do all your "address ISPEXEC".

(you can combine the two scripts if you pass a PARM and branch
on its value:

    address TSO 'ISPSTART CMD($LOGON SECOND-ENTRY)'

and branch depending on the value of arg(1).)

-- gil
-- 
StorageTek
INFORMATION made POWERFUL

----------------------------------------------------------------------
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