"Thomas Conley" <[EMAIL PROTECTED]> wrote in message news:<[EMAIL PROTECTED]>...
> ----- Original Message -----
> From: "Mark Zelden" <[EMAIL PROTECTED]>
> Newsgroups: bit.listserv.ibm-main
> Sent: Thursday, March 30, 2006 4:14 PM
> Subject: Re: Did you know RRS had ISPF panels?
>
>
> > >Did you know RRS had panels?
> >
> > TSO %RRS
> >
> >
> > PROC 0
> > ISPEXEC LIBDEF ISPMLIB DATASET ID('SYS1.SBLSMSG0')
> > ISPEXEC LIBDEF ISPPLIB DATASET ID('SYS1.SBLSPNL0')
> > ISPEXEC LIBDEF ISPTLIB DATASET ID('SYS1.SBLSKEL0')
> > ALTLIB ACTIVATE APPLICATION(CLIST) DATASET('SYS1.SBLSCLI0')
> > ISPEXEC SELECT PANEL(ATRFPCMN) NEWAPPL(RRSP) PASSLIB +
> > SCRNAME(RRS)
> > ALTLIB DEACTIVATE APPLICATION(CLIST)
> > ISPEXEC LIBDEF ISPMLIB
> > ISPEXEC LIBDEF ISPPLIB
> > ISPEXEC LIBDEF ISPTLIB
> >
> >
> > Haven't looked at Tom's Conley's dynamic ISPF "stuff" in a long
> > time since I use all my own "stuff", but I would think he has
> > this in there.
> >
>
> Mark is correct, @RRS:
>
> /* rexx */ >
> /*trace i*/ >
> /*********************************************************************/ > /*
> This exec invokes IBM's RRS dialog. */ >
> /*********************************************************************/ >
> parse arg ztrail >
> address tso "ALTLIB ACT APPL(CLIST) DA('SYS1.SBLSCLI0')" >
> address ispexec "LIBDEF ISPMLIB DATASET ID('SYS1.SBLSMSG0') STACK" >
> address ispexec "LIBDEF ISPPLIB DATASET ID('SYS1.SBLSPNL0') STACK" >
> address ispexec "LIBDEF ISPTLIB DATASET ID('SYS1.SBLSTBL0') STACK" >
> address ispexec "SELECT PANEL(ATRFPCMN) OPT("ztrail") NEWAPPL(RRSP)", >
> "PASSLIB SCRNAME(RRS)" >
> address ispexec "LIBDEF ISPMLIB" >
> address ispexec "LIBDEF ISPPLIB" >
> address ispexec "LIBDEF ISPTLIB" >
> address tso "ALTLIB DEACT APPL(CLIST)" >
> Regards,
> Tom Conley
>
I read it in the manual during RRS setup.
I added the following to the ISPF command table:
RRS ||0||SELECT PANEL(ATRFPCMN) NEWAPPL(RRSP)||RRS Resource Recovery System.
RRS on the commandline launches the application.
Kees.
**********************************************************************
For information, services and offers, please visit our web site:
http://www.klm.com. This e-mail and any attachment may contain confidential and
privileged material intended for the addressee only. If you are not the
addressee, you are notified that no part of the e-mail or any attachment may be
disclosed, copied or distributed, and that any other action related to this
e-mail or attachment is strictly prohibited, and may be unlawful. If you have
received this e-mail by error, please notify the sender immediately by return
e-mail, and delete this message. Koninklijke Luchtvaart Maatschappij NV (KLM),
its subsidiaries and/or its employees shall not be liable for the incorrect or
incomplete transmission of this e-mail or any attachments, nor responsible for
any delay in receipt.
**********************************************************************
----------------------------------------------------------------------
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
