++APAR(WR39113) /*
* PE ZAP:         WR39113
*
* ZAP RELEASED:   October 10, 2006
*
* VERSION:        Version 1 Release 2.0
*
* SYMPTOM:        Quick Free/Redefine misses deletion
*
* USERS AFFECTED: All users.
*
* PROBLEM DESCRIPTION: A quick Free and Redefine can cause
*                 LDMF to miss that the source data set has
*                 been deleted.
*
* SOLUTION:       Apply PE ZAP WR39113
*
* 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(WR39113S)
*
*/.
++VER(Z038) FMID(LDM1200) PRE(WR38935 WR38936 WR38156 WR38937 WR37645
                              WR39037 WR38931).
++VER(Z038) FMID(LDM1100) PRE(LD11606 WR38935 WR38936 WR38156 WR38937
                              WR37645 WR39037 WR38931).
++ZAP(LDMFMAIN) .
  NAME LDMFMAIN LDMFSSLM
  VER  9110 C080,C082
  VER  91AE 5850,8080
  VER  9246 9200,D6C5
  REP  9110 5850,8080,41A0,0001,BF1F,F014,077E
  REP  911E BF1F,50F4,078E,BFAF,1028,07FE
  REP  912A 9200,D6C5,12AA,4780,C28E,07FE
  REP  91AE 45E0,C080
  REP  9246 45E0,C09A
  IDRDATA WR39113
  NAME LDMFMAIN LDMFFIX
  VER 001F 00
  REP 001F 01
  IDRDATA WR39113