PI70799: RBD LENGTHERR IF CICS PRINT FORMS HAS A LINE WITH MORE THAN 131 CHARACTERS

Rational Business Developer Fix Pack 2 (9.0.1.2) for 9.0.1
Rational Business Developer Fix Pack 2 (9.1.1.2) for 9.1.1
Rational Business Developer Fix Pack 2 (9.5.1.1) for 9.5

APAR status

• Closed as program error.

Error description

• In RBD 9.1.0, if the user's CICS Print form is such that one
  output line exceeds
  131 characters, a LENGTHERR occurs at runtime.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED:                                              *
  * Users that have print forms with a width > 132 characters    *
  * and also have a print line that contains more than 132       *
  * characters.                                                  *
  ****************************************************************
  * PROBLEM DESCRIPTION:                                         *
  * A CICS lengtherr error will occur if a user codes a print    *
  * form that has a width > 132 characters and also a print line *
  * whose sum of the fields and literals in that print line is   *
  * also > 132 characters. The cause of the lengtherr error is   *
  * because the generated cobol control block for the print form *
  * had hardcoded the length as 133, even though the form width  *
  * could be more. The EGL runtime logic used that length field  *
  * as the maximum size to read in the CICS queue with, causing  *
  * the lengtherr.                                               *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  

Problem conclusion

• The generator has been updated to increase the size of the
  control block field to be the width + 1, with a minimum of 133.
  

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:

Fix information

• Fixed component name

  RATL BUS DEV

• Fixed component ID

  5724S5000

Applicable component levels

• R901 PSY

     UP

• R911 PSY

     UP

• R950 PSY

     UP