Page 1 of 1

How to set library search order in ISRDDN

PostPosted: Mon Apr 29, 2013 1:33 pm
by marshall25
hi all,

as i know, we can use 'tso isrddn' to check the libraries, but i have question if there are 2 same named panelid in diferent ISPPLIBs

for example:
SYS001 SHR,KEEP > ISPPLIB SYS.PLIB
PRIM11 SHR,KEEP > MY.PLIB

if panel01 both in SYS.PLIB and MY.PLIB, and i have program with load PRG01 which used "LIBDEF ISPPLIB DATASET ID('SYS.LIB') STACK" to defined ISPPLIB before panel display, can i to define a application-level panel library(ISPPUSER) before LIBDEF? And please show me example, thanks

Re: How to set library search order in ISRDDN

PostPosted: Mon Apr 29, 2013 9:52 pm
by Pedro
Examples and everything else is in the manual.

See the ISPF Services manual. Under LIBDEF, there is a section for "Application data element search order"

Re: How to set library search order in ISRDDN

PostPosted: Tue Apr 30, 2013 8:10 am
by marshall25
hi Pedro,

it worked if i defined the ISPPUSR and LIBDEF in one rexx like

"ALLOCATE DATASET('MY.PLIB') FILE(ISPPUSR) SHR"
ADDRESS ISPEXEC
"LIBDEF ISPPLIB DATASET ID('SYS.PLIB') STACK"
'display panel(PANEL01)'
"LIBDEF ISPPLIB"
/*

but it is not work if the PANEL01 be issued in PRG01 like

"ALLOCATE DATASET('MY.PLIB') FILE(ISPPUSR) SHR"
ADDRESS ISPEXEC "SELECT PGM(PRG01) NEWAPPL(DSS) "

the display PANEL01 statement in PRG01 which cannot find the source,only compiled load can find.
i want to let the PRG01 to display my panel first

Re: How to set library search order in ISRDDN

PostPosted: Tue Apr 30, 2013 8:40 pm
by Pedro
The manual clearly states:
To allow the user to continue to define user-level libraries that are to be searched first,
these new ddnames must be specified in ALLOCATE commands before ISPF is invoked: <the list includes ISPPUSER>

The key is to allocate 'before ISPF is invoked'

I am surprised that this works:
"ALLOCATE DATASET('MY.PLIB') FILE(ISPPUSR) SHR"
ADDRESS ISPEXEC
"LIBDEF ISPPLIB DATASET ID('SYS.PLIB') STACK"
'display panel(PANEL01)'
"LIBDEF ISPPLIB"

Re: How to set library search order in ISRDDN

PostPosted: Thu May 02, 2013 7:18 am
by marshall25
Do you have any idea about my question? Pedro

[quote][/quote]"ALLOCATE DATASET('MY.PLIB') FILE(ISPPUSR) SHR"
ADDRESS ISPEXEC "SELECT PGM(PRG01) NEWAPPL(DSS) "

the display PANEL01 statement in PRG01 which cannot find the source,only compiled load can find.
i want to let the PRG01 to display my panel first

Re: How to set library search order in ISRDDN

PostPosted: Thu May 02, 2013 6:15 pm
by Pedro
Do you have any idea about my question?

I think you are asking how to use ISPPUSR.

My answer was that you need to allocate ISPPUSR before starting ISPF. Do you have any idea about my answer, Marshall25?

This is gibberish. Please explain:
which cannot find the source,only compiled load can find.

Re: How to set library search order in ISRDDN

PostPosted: Fri May 03, 2013 7:26 am
by marshall25
see, i have a rexx which will execute PRG01, but i cannot find the program PRG01, and the panel display was executed in PRG01, now i want to edit this panel used my PLIB