PI67702: U4088 RC63 WHEN DOING A SORT WITH COBOL

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• A RETURN statement is executed a second time after AT END
  condition when using Enterprise COBOL V5
  

Local fix

• Use COBOL V4 or check program logic to ensure RETURN is not
  executed a second time
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users using Enterprise COBOL compiler        *
  *                 V5.1.1 or later releases with programs       *
  *                 using the SORT statement.                    *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: COBOL program abends with U4088 RC63    *
  *                      when control is inside a SORT RETURN    *
  *                      statement.                              *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  *                                                              *
  ****************************************************************
  It is a programming error to invoke the RETURN statement after
  a previous RETURN has returned the AT END condition. There is
  no more sorted records to be returned. The COBOL runtime
  library has been changed to tolerate this user error and
  terminate the SORT statement properly. All sorted records have
  been returned; the COBOL program can continue processing
  normally.
  

Problem conclusion

• = PROBLEM CONCLUSION =                          (max col 64 )<-|
  The COBOL runtime library has been changed to handle additional
  RETURN statements after the AT END condition.
  

Temporary fix

Comments

APAR Information

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

  PI63519

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

Modules/Macros

• IGZXLPKA
  

Fix information

• Fixed component name

  LE ENT COBOL LI

• Fixed component ID

  568819812

Applicable component levels

• R7A0 PSY UI40213

     UP16/08/25 P F608

• R790 PSY UI40214

     UP16/08/25 P F608

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.