++APAR(WR39037) /*
* PE ZAP:         WR 39037
*
* ZAP RELEASED:   October 3, 2006
*
* VERSION:        Version 1 Release 2.0
*
* SYMPTOM:        Generic candidate volumes are not processed
*                 correctly.
*
* USERS AFFECTED: All users.
*
* PROBLEM DESCRIPTION: Generic candidate volumes cause an
*                 error in READDSCB to fail with
*                 ESNP221E "Offline volume" error.
*
* SOLUTION:       Apply PE ZAP WR 39037.
*
* PREREQ:         Applies to V1.2 Base (PTF Level LD11606).
*
* All statements in this member are input to SMPPTFIN
*
* //SMPPTFIN DD DISP=SHR,DSN=hlq.LDM120.BASE.ZAPS(WR39037S)
*
*/.
++VER(Z038) FMID(LDM1200) PRE(WR38935 WR38936 WR38156 WR38937
                              WR37645).
++VER(Z038) FMID(LDM1100) PRE(LD11606 WR38935 WR38936 WR38156
                              WR38937 WR37645).
++ZAP(EMCSNAPI) .
  NAME EMCSNAPI EXTENTS
  VER  23DC 95FF,1008,4780,C08C,9140,1008,4710,C582
  VER  28DC 47F0,C08C
  REP  23DC 5C40,4040,4040,D505,7006,C07C,4780,C582
  REP  28DC 47F0,C082
  IDRDATA WR39037
++ZAP(LDMFRMAN) .
  NAME LDMFRMAN EXTENTS
  VER  23DC 95FF,1008,4780,C08C,9140,1008,4710,C582
  VER  28DC 47F0,C08C
  REP  23DC 5C40,4040,4040,D505,7006,C07C,4780,C582
  REP  28DC 47F0,C082
  IDRDATA WR39037
++ZAP(EMCTFU) .
  NAME EMCTFU EXTENTS
  VER  23DC 95FF,1008,4780,C08C,9140,1008,4710,C582
  VER  28DC 47F0,C08C
  REP  23DC 5C40,4040,4040,D505,7006,C07C,4780,C582
  REP  28DC 47F0,C082
  IDRDATA WR39037
++ZAP(TFUSUBT) .
  NAME TFUSUBT EXTENTS
  VER  23DC 95FF,1008,4780,C08C,9140,1008,4710,C582
  VER  28DC 47F0,C08C
  REP  23DC 5C40,4040,4040,D505,7006,C07C,4780,C582
  REP  28DC 47F0,C082
  IDRDATA WR39037
++ZAP(LDMFMAIN) .
  NAME LDMFMAIN EXTENTS
  VER  23DC 95FF,1008,4780,C08C,9140,1008,4710,C582
  VER  28DC 47F0,C08C
  REP  23DC 5C40,4040,4040,D505,7006,C07C,4780,C582
  REP  28DC 47F0,C082
  IDRDATA WR39037
  NAME LDMFMAIN LDMFFIX
  VER 001E 00
  REP 001E 01
  IDRDATA WR39037