PI87380: CORRECT INVALID CHARACTERS IN PARTS

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Correct invalid characters in parts, which need to be corrected
  as part of IMS modernization.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: ALL IMS V13 USERS                            *
  ****************************************************************
  * PROBLEM DESCRIPTION: Unprintable characters in IMS code      *
  *                      can potentially triggers errors         *
  *                      and issues when importing from EBCDIC   *
  *                      into a different encoding standard.     *
  ****************************************************************
  * RECOMMENDATION: INSTALL CORRECTIVE SERVICE FOR APAR/PTF      *
  ****************************************************************
  This APAR will remove unprintable characters in IMS code which
  were causing translation errors when importing IMS code into a
  different encoding standard.  As part of working on this APAR,
  some parts with minor syntax errors were discovered and are also
  being corrected in this APAR.
  

Problem conclusion

• GEN:
  KEYWORDS:
  
  *** END IMS KEYWORDS ***
  The following parts were updated to remove or replace
  unprintalbe characters which cause translation errors.
  BPEPARSE Removed unprintable chars from comments
  CSLDDRDA Removed unprintable chars from comments
  CSLDRDA0 Removed unprintalbe chars from comments
  DBFEPSTT Removed 'invisible' bad character corrputing
           imported file
  DFSGBL   Removed unprintable chars from EOL comments
  DFSPSCH0 Removed unprintable chars from comments
  DFSSAM2  Changes tilly to x'15'
  DFSSAM3  Changes tilly to x'15'
  DFSSAM4  Changes tilly to x'15'
  DFSSAM5  Changes tilly to x'15'
           split line due to change from tilly to x'15'
  DFSSAM6  Changes tilly to x'15'
           split line due to change from tilly to x'15'
  DFSSAM7  Changes tilly to x'15'
            split line due to change from tilly to x'15'
  DFSUT180 Removed unprintalbe char from EOL comments
  DFSUT190 Removed unprintalbe char from EOL comments
  DFSZDI00 Removed unprintalbe char from comments
  DFS3DCVC Removed unprintalbe char from EOL comments
  MFSGBL   Removed unprintalbe char from EOL comments
  DFSDN090 Changes tilly to x'15'
           split line due to change from tilly to x'15
  DFSIXOR3 Removed a period which caused a syntax error
  DFSIXOR4 Removed a period which caused a syntax error
  
  The following parts contained errors which caused compilitation
  errors are being corrected with this APAR.
  CQSTRACE  'Deleted line comment' was copied from ASM to
            PLX section creating syntax error.
            Changed comment line from '*' to '!'.
  CSLDDSCB  Added two missing closing paranthases which triggered
            a compile error
  DBFARDB0  Recompile for DMAC changes
  DBFDMAC   Corrected equate to use prefix variable DMAC name
            *-&AA.FSEQ
  DBFHDC2S  Added fast exit with RC=24 to force error if not
            modified by user
  DFSADSCT  Commented out lines triggering a compile error, these
            lines are not needed
  DFSBRLSB  BRLBEXLP was missing from macro - added
  DFSLUMX0  Was missing SCDTRAOD on REFS statement - added
  DSPGDB    DSPGDB_FmGDBflags0_F1_80 was duplicated and not
            updated for F1_40 and F1_20
  DSPSCIIV  'GBLC  IXUVSMHQ' was missing, which defined some used
            variables
  DFSPAT    corrected sytax error caused by missing 'based'
            declaration
  

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:

  UI54319 UI54320

Modules/Macros

• CQSTRACE CSLDRDA0 DBFARDB0 DBFDMAC  DBFHDC2S
  DFSADSCT DFSBRLSB DFSDN090 DFSGBL   DFSIXOR3 DFSIXOR4 DFSLUMX0
  DFSPSCH0 DFSSAM2  DFSSAM3  DFSSAM4  DFSSAM5  DFSSAM6  DFSSAM7
  DFSUT180 DFSUT190 DFSZDI00 DFS3DCVC DSPSCIIV MFSGBL
  

Fix information

• Fixed component name

  IMS V13

• Fixed component ID

  5635A0400

Applicable component levels

• R300 PSY UI54319

     UP18/03/14 P F803

• R302 PSY UI54320

     UP18/03/14 P F803

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.