PK20105: COBOL/CICS INTEGRATED TRANSLATOR MSGIGYPS0088-S FOR "LENGTH" IF EXEC DLI .... FIELDLENGTH (LENGTH OF AAA, LENGTH OF BBB) SYNTAX.

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• IGYPS0088-S results when using the integrated translator.
  When using the separate translate process it all works.
  CICS COBOL3 or COBOL2 option gives the same failure.
  CICS passes back bad code when the code is in this format:
       EXEC DLI GU USING .......
  ....... FIELDLENGTH (LENGTH OF AAA,
                       LENGTH OF BBB OF CCCC) ...
  The CoProcessor receives this expansion back from CICS:
                 Move LENGTH OF AAA,
                          LENGTH OF BBB OF CCCC
              to dfhb0020   ...........
  and gets this error:
  IGYPS0088-S THE "MOVE" STATEMENT WAS INVALID.  EXPECTED
              "TO", BUT FOUND "LENGTH".  THE STATEMENT
              WAS DISCARDED.
  If the CICS Translator is used, the expansion is
                 Move LENGTH OF AAA to dfhb0020
                 Move LENGTH OF BBB OF CCCC to dfhb0021 ....
  
  and that works when the separate Ent COBOL compiler is
  used later.
  

Local fix

• Error is with the COBOL/CICS Integrated Translator, but not the
  CICS Pre-Translator. Using the separate Translate process works.
  *
  *
  ADDITIONAL SEARCHWORDS:
  MSGIGYPS0088 IGYPS0088
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: All.                                         *
  ****************************************************************
  * PROBLEM DESCRIPTION: Message IGYPS0088-S can be issued       *
  *                      when using the Integrated Translator    *
  *                      to process a COBOL program that         *
  *                      contains EXEC DLI calls.                *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  A COBOL application is coded with an EXEC DLI call that has a
  FIELDLENGTH parameter specified with two length variables
  separated by a comma and a following space. The translation
  and compilation fails with message IGYPS0088-S and the
  statement was discarded.
  This is because the comma that separates the two variables is
  not being recognized as a separator and so both variables are
  being passed to the compile together rather than separately.
  
  Additional Keywords: TRIGSFND ATOMTYPE semicolon
  

Problem conclusion

• DFHEXM00 has been changed to set TRIGSFND flag on for EXEC DLI
  calls. This will indicate that a comma which separates variables
  within parameters should be regarded as an end of value
  character.
  

Temporary fix

• FIX AVAILABLE BY PTF ONLY
  

Comments

APAR Information

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

  PK15730

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

  UK12362

Modules/Macros

•    DFHEIM00 DFHEXM00
  

Fix information

• Fixed component name

  CICSTS 3.1 Z/OS

• Fixed component ID

  5655M1500

Applicable component levels

• R400 PSY UK12362

     UP06/03/10 P F603

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.