* PE ZAP:         PR 31308
*
* VERSION:        Version 1 Release 3.0 Base Level
*
* RELEASED:       May 14, 2007
*
* SYMPTOM:        RNAME length on RESERVE for catalog is incorrect when
*                 catalog name is less than 21 characters.
*
* USERS AFFECTED: All users.
*
* PROBLEM DESCRIPTION: The catalog address space uses an RNAME length
*                 of 20 when it issues a Reserve/ENQ for a catalog
*                 that has a name less than or equal to 20.  LDMF
*                 currently uses an RNAME length of 44 regardless of
*                 the catalog name length.  This zap corrects the
*                 problem by determining the length of the catalog
*                 name and using the appropriate RNAME length.
*
* SOLUTION:       Apply PE ZAP PR31308.
*
* Following DD statement required for program AMASPZAP
* //SYSLIB DD DSN=hlq.LDM130.LDMLLIB,DISP=SHR
*
* Following statements are required for the SYSIN DD statement
* //SYSIN  DD *
*
  NAME LDMFRMAN LDMFRMAN
  VER  03B2 922C,1001
  VER  03FA 922C,1001
  VER  08C8 922C,1001
  VER  0910 922C,1001
  VER  0954 922C,1001
  VER  1000 B008,B00A
  VER  1004 B00C,B00E
  VER  1008 B010,B012
  VER  100C B014,B016
  VER  1010 B018
  REP  03B2 4D40,B008
  REP  03FA 4D40,B008
  REP  08C8 4D40,B008
  REP  0910 4D40,B008
  REP  0954 4D40,B008
  REP  1000 922C,1001
  REP  1004 9540,D2C5
  REP  1008 A774,0004
  REP  100C 9214,1001
  REP  1010 0B04
  IDRDATA PR31308
*
* EACH FIX IS A ZAP; OFFSET IS FIXID-1, E.G. 0000 FOR FIX #1
* NON-ZERO VALUE MEANS FIX IS ON
*
* UPDATE FIX ID FOR STARTUP MESSAGE
  NAME LDMFMAIN LDMFFIX
  VER 0000 00
  REP 0000 01
  IDRDATA PR31308