++APAR(ASZ3052). /*-----------------------------------------------------

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 1999.

ASZ3052 990127 61VLLC HL ISPZIP  V101 SUGG OK    ISPZIP   990127 w__-PMD
Cust request support for LIBDEF allocation of ISPPLIB dataset.

_PROBLEM DESCRIPTION:

The customer wants to use the ISPF LIBDEF feature for ISPZIP panels.
ISPZIP does not support specification of panel libraries via LIBDEF.

_PROBLEM SUMMARY:

*** PLIB ***

Currently ISPZIP loads some of its own panel templates directly from the
library allocated to ddname ISPPLIB.  This means that LIBDEF cannot be
used to identify a panel library for ISPZIP.

ISPZIP also uses ISPF display services in such a way that a panel
library defined via LIBDEF will be effective.  It is only the ISPZIP
internal panel definitions that ISPZIP loads directly that LIBDEF is
ineffective for.

*** TLIBs and CLIBs ***

LIBDEF *can* used successfully for the TLIB and CLIB datasets that
ISPZIP uses as these are accessed indirectly through ISPF.

*** LLIB ***

LIBDEF ISPLLIB cannot effectively be used for ISPZIP because ISPZIP
issues MVS LOAD and LINK supervisor calls for other program load modules

 Quoting ISPF Dialog Management Guide and Reference under LIBDEF - User
 Link Libraries:

The LIBDEF library definitions are not searched by MVS member searches
caused by the execution of ATTACH, LINK, LOAD, or XCTL macros within the
selected program (SELECT PGM), or on the selection of authorized
programs or commands.  The LIBDEF library definitions are searched for
selected commands (SELECT CMD).


USERS AFFECTED: All users who wish to operate ISPZIP using LIBDEFs.

_PROBLEM CONCLUSION

ASE's intent is that ISPZIP will fully support the use of LIBDEF.  While
we cannot do that in the short term we can offer a bypass which may
assist customers immediately with the panel library:

When this APAR fix has been applied, ISPZIP will accept the
specification of a pre-allocated panel library ddname.  Normally this
defaults to ISPPLIB.  Assuming you are using a CLIST or REXX to handle
the invokation of ISPZIP then you need to do the following:

   ALLOC F(IZIPPLIB) DA(your.ISPZIP.panels) SHR REUS
   ISPEXEC LIBDEF ISPPLIB LIBRARY ID(IZIPPLIB)
   ISPEXEC LIBDEF ISPTLIB DATASET ID('your.ISPZIP.tlib')
   ISPEXEC LIBDEF ISPCLIB DATASET ID('your.ISPZIP.clib')
   ISPEXEC SELECT PGM(IZIPISPF) PARM(PLIBDD=IZIPPLIB)
   FREE F(IZIPPLIB)      /* undo the ALLOC */

When operated in this way, ISPZIP loads its own internal panel templates
from the library ddname specified via PLIBDD=, eg. IZIPPLIB above.
When ISPZIP invokes the ISPF DISPLAY service and names a real ISPF panel
ISPF will use the same ddname to locate its panel library.

After ASZ3052 is applied, if the PLIBDD= keyword is not specified then
it will default to ISPPLIB, just as before ASZ3052.

RECOMMENDATION: Apply apar fix ASZ3052

NEED FURTHER HELP?  CALL ASE FOR ASSISTANCE or email HELP@ASE.COM.AU

       */
++VER(Z038) FMID(ASEX100).
++ZAP(ASEXDSDM).
NAME ASEXDSDM
IDRDATA ASZ3052
VER 060C 4110BD14,41000004
VER 1ED0 BED0
REP 060C 4110BED0,41000006
REP 1ED0 D7D3C9C2C4C4         "PLIBDD"