OW45770: VER DSNAMEFM FAILS ON 15 CHARACTER DATASET NAME MISSING A TRAILING QUOTE

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Panels using the VER DSNAMEFN function, including the edit
  entry panel isredm01 will give msgispp215 incorrect qualifier
  when the field contains a data set name of 15 characters
  including the initial quote when the data set name is missing
  the trailing quote.
  This only fails for when the panel is called from a compiled
  program, and not from CLIST.
  Sample program and panel included below:
  Panel DSNAMEFN:
  )ATTR DEFAULT(%@_)    /* panel dsnamefm */
  )BODY cmd()
  %Test field%===>_XDSN
          %        ----+----1----+----2----+----3----+----4----+--
  @       lastdsn:%&lastdsn
          %        ----+----1----+----2----+----3----+----4----+--
  )PROC
   VER (&XDSN,DSNAMEFM)
   &LASTDSN = &XDSN
  )END
  Driving program (simply displays the panel until END key).
  OW45770  CSECT ,
           STM   14,12,12(13)
           LR    12,15
           USING OW45770,12
           ST    13,SAVEAREA+4
           LA    14,SAVEAREA
           ST    14,8(,13)
           LR    13,14
  *   CALL ISPEXEC(23,'DISPLAY PANEL(DSNAMEFM)');
  DISPLAY  L     15,=V(ISPEXEC)
           LA    1,ADDRLST1
           BALR  14,15
           LTR   15,15
           BZ    DISPLAY
           L     13,4(,13)
           LM    14,12,12(13)
           BR    14
  ADDRLST1 DC    A(F23,X'80000000'+DSNAMEFM)
  SAVEAREA DS    18F
  F23      DC    F'23'
  DSNAMEFM DC    CL23'DISPLAY PANEL(DSNAMEFM)'
           END
  .
  Enter a name such as 'SYS1.AB.CDEFGHI
  press enter and get error message.
  (message sometimes varies, failure only occurs on 1st attempt)
  (failure sometimes occurs with data set names of different
  lengths as well)
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All ISPF users                               *
  ****************************************************************
  * PROBLEM DESCRIPTION: VERify DSNAMEFM fails on 15             *
  *                      character data set names that           *
  *                      are missing a trailing quote.           *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  VER DSNAMEFM fails on 15 character data set names
  missing trailing quotes.  Note: Failure can also
  occur with DSNAMEPQ (when missing trailing closing
  parenthesis and quote) and DSNAMEQ (when missing
  trailing quote).
  

Problem conclusion

• ISPF was not picking up the correct length of the
  data set name after the trailing parenthesis or quote
  was added.  Code has be changed to pick up the new
  length of the data set name with the closing
  parenthesis/and or quote added.
  

Temporary fix

Comments

APAR Information

• APAR is sysrouted FROM one or more of the following:

• APAR is sysrouted TO one or more of the following:

  UW73453 UW73454

Modules/Macros

• ISPDPV
  

Fix information

• Fixed component name

  ISPF V4 OS390

• Fixed component ID

  565504201

Applicable component levels

• RA02 PSY UW73454

     UP00/09/20 P F009

• R802 PSY UW73453

     UP00/09/20 P F009

Fix is available

• Select the PTF appropriate for your component level. You will be required to sign in. Distribution on physical media is not available in all countries.