PM57519: MFS REVERSAL UTILITY GENERATES INCORRECT DBCS LITERALS

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• This APAR is forward fit of MFS Reversal Utilities V1R1 APAR
  PK70451 and PK73162 to fix the following problems:
  
  1. When MFS Reversal Utility reverses MFS library with DBCS
  literal and the literal is divided into continuation line at
  DBCS part, definition of the literal in generated MFS source
  seems to be broken and is not editable.
  
  2. When MFS Reversal Utility reverses MFS library with EGCS
  literal, definition of the literal in generated MFS source is
  incorrect.
  
  3. When MFS Reversal Utility reverses MFS library with DBCS
  mixed literal field that ends with x'0F', there is a case that
  an unnecessary extra byte is added to the end of the field
  depending on the content on the internal buffer.
  

Local fix

• N/A
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: IMS Library Integrity Utilities for z/OS,    *
  *                 Version 2 Release 1 (FMID=H27P210) users who *
  *                 use the MFS Reversal utility or the MFS      *
  *                 Compare utility.                             *
  ****************************************************************
  * PROBLEM DESCRIPTION: 1. When MFS Reversal Utility and MFS    *
  *                         Compare utility handles an MFS       *
  *                         library member with DBCS literal and *
  *                         the literal is divided into          *
  *                         continuation line at a DBCS          *
  *                         character, definition of the literal *
  *                         in generated MFS source seems to be  *
  *                         broken and is not editable.          *
  *                                                              *
  *                      2. When MFS Reversal Utility and MFS    *
  *                         Compare utility handles an MFS       *
  *                         library member with EGCS literal,    *
  *                         definition of the literal in         *
  *                         generated MFS source is incorrect.   *
  *                                                              *
  *                      3. When MFS Reversal Utility and MFS    *
  *                         Compare utility handles an MFS       *
  *                         library member with DBCS and EBCDIC  *
  *                         mixed literal field that ends with   *
  *                         x'0F', there is a case that an       *
  *                         unnecessary extra byte is added to   *
  *                         the end of the field depending on    *
  *                         the content on the internal buffer.  *
  ****************************************************************
  * RECOMMENDATION: Apply the maintenance for this APAR.         *
  ****************************************************************
  This APAR is forward fit of MFS Reversal Utilities V1R1 APAR
  PK70451 and PK73162 to fix the following problems:
  
  1. When MFS Reversal Utility or MFS Compare Utility handles an
     MFS library member for any devices which has a DBCS literal
     field divided into continuation line at a DBCS character
     using DFLD or MFLD statement, SO/SI characters are not
     inserted in definition of the literal in generated MFS
     source. So DBCS characters are not enclosed within SO/SI
     characters at each line in the generated MFS source and it
     seems to be broken and is not editable.
  
  2. When MFS Reversal Utility or MFS Compare Utility handles an
     MFS library member for 3270 device which has an EGCS literal
     field using DFLD statement, the literal is not enclosed
     within SO/SI characters nor in the form of G' ', so the
     generated MFS source is incorrect and can not be used for
     input of IMS utility to generate MFS library.
  
  3. When MFS Reversal Utility or MFS Compare Utility handles an
     MFS library member which has a DBCS and EBCDIC mixed literal
     field that ends with x'0F' using DFLD or MFLD statement,
     scanning continues beyond the literal field and when x'7D'
     (single quote) is found, an extra byte is added to the field.
  

Problem conclusion

• The following modules and macros have been modified to fix the
  problems.
  
  DSB, FABVBLDS, FABVCSRC, FABVMID, FABVMOD,FABVSC1O, FABV3270
  
  ========================
  = DOCUMENTATION CHANGE =
  ========================
  IMS Library Integrity Utilities for z/OS Version 2 Release 1
  User's Guide (Document Number: SC19-2479-01) should be changed
  as follows.
  ================================================================
  --------------------------------------------------------------
  10.0 MFS Reversal utility
   10.7 Important notes about the generated source
  << Add the following description. >>
  
  |If a literal definition that includes DBCS characters is
  |divided into continuation line at the first byte of a DBCS
  |character on second or the later line, the first byte of a DBCS
  |character is placed at column 71 and next line starts with
  |the second byte of a DBCS character. So DBCS characters are
  |not enclosed within SO and SI but this is conforming to the
  |continuation rules of MFS and can be used for the subsequent
  |processing by IMS MFS Language Utility without modification.
  
  --------------------------------------------------------------
  11.0 MFS Compare utility
   11.3 Keywords used in comparisons
  << Change the following description. >>
  
   DFLD
  |  'LITERAL'
       specifies a literal character string to be presented to
       the device
  |  G'LITERAL'
  |    specifies an EGCS literal character string to be presented
  |    to the device
  

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:

  UK76181

Modules/Macros

•    FABVBLDS FABVCSRC FABVMID  FABVMOD  FABVSC1O
  FABV3270
  

Fix information

• Fixed component name

  IMS LIBR INTEG

• Fixed component ID

  5655I4200

Applicable component levels

• R210 PSY UK76181

     UP12/02/18 P F202

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.