IBM Support

PH37185: INCORRECT OUTPUT: THE LAST LINE IN THE COPYBOOK WHICH IS MISSING THE NEWLINE CHARACTER IS DISCARDED.

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • Incorrect output: The last line in the COPYBOOK which is
    missing the newline character is discarded.  This can cause the
    compiler to fail with various problems such as missing data
    item definitions, etc..., depending upon the contents of the
    COPYBOOK file.
    
    This problem occurred when the read routine in the compiler
    indicated a premature EOF condition because a newline character
    was not found on the last line in the COPYBOOK file.  The last
    file line buffer was then discarded and not processed by the
    compiler.
    
    USERS AFFECTED: Users of Enterprise COBOL 6.3 or 6.2
    compiling programs using the cob2 command in USS that
    include one or more COPYBOOKs (also called COPY
    members or COPY texts) in which the last line does not
    include a newline character.
    

Local fix

  • Make sure all COPYBOOK file lines end with a newline character
    

Problem summary

  • ****************************************************************
    * USERS AFFECTED: Users of Enterprise COBOL 6.3 or 6.2         *
    *                 compiling programs using the cob2 command in *
    *                 USS that include one or more COPYBOOKs in    *
    *                 which the last line does not include a       *
    *                 newline character.                           *
    ****************************************************************
    * PROBLEM DESCRIPTION: Incorrect output: The last line in      *
    *                      the COPYBOOK which is missing the       *
    *                      newline character is discarded.  This   *
    *                      can cause the compiler to fail with     *
    *                      various problems such as missing data   *
    *                      item definitions, etc., depending on    *
    *                      the contents of the COPYBOOK file.      *
    ****************************************************************
    * RECOMMENDATION: Apply the provided PTF.                      *
    ****************************************************************
    This problem occurred when the read routine in
    the compiler indicated a premature EOF condition because a
    newline character was not found on the last line in the COPYBOOK
    file. The last file line buffer was then discarded and not
    processed by the compiler.
    

Problem conclusion

  • The compiler has been updated so that EOF is not returned
    when this last file line with the missing newline character has
    been read. So the buffer containing the last file line gets
    included from the COPYBOOK and the next read issued correctly
    indicates the EOF condition.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PH37185

  • Reported component name

    ENT COBOL FOR Z

  • Reported component ID

    5655EC600

  • Reported release

    630

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2021-05-12

  • Closed date

    2021-05-19

  • Last modified date

    2021-06-15

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

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

    PH38130

Modules/Macros

  • IGY8RWTU IGYCASMB IGYCCBE  IGYCCCRT IGYCCICS IGYCCSRV IGYCDGEN
    IGYCDIAG IGYCDMAP IGYCEN$0 IGYCEN$1 IGYCEN$2 IGYCEN$3 IGYCEN$4
    IGYCEN$5 IGYCEN$8 IGYCEN$D IGYCEN$R IGYCFGEN IGYCFREE IGYCINIT
    IGYCJA$0 IGYCJA$1 IGYCJA$2 IGYCJA$3 IGYCJA$4 IGYCJA$5 IGYCJA$8
    IGYCJA$D IGYCJA$R IGYCLIBR IGYCLSTR IGYCLVL0 IGYCLVL1 IGYCLVL2
    IGYCLVL3 IGYCLVL8 IGYCMALL IGYCOB2E IGYCOPI  IGYCOPT  IGYCOSCN
    IGYCPGEN IGYCRCTL IGYCRDPR IGYCRDSC IGYCREAL IGYCRWT  IGYCSCAN
    IGYCSIMD IGYCUE$0 IGYCUE$1 IGYCUE$2 IGYCUE$3 IGYCUE$4 IGYCUE$5
    IGYCUE$8 IGYCUE$D IGYCUE$R IGYCXREF IGYDRV   IGYEQCWI IGYMSGE
    IGYMSGK  IGYMSGT  IGYQCBE  IGYQSPLT IGYSIDE2 IGYZQEN6 IGYZQENU
    IGYZQJP6 IGYZQJPN
    

Fix information

  • Fixed component name

    ENT COBOL FOR Z

  • Fixed component ID

    5655EC600

Applicable component levels

  • R630 PSY UI75468

       UP21/05/29 P F105

  • R631 PSY UI75469

       UP21/05/29 P F105

  • R632 PSY UI75470

       UP21/05/29 P F105

  • R63H PSY UI75471

       UP21/05/29 P F105

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.

[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SS6SG3","label":"Enterprise COBOL for z\/OS"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"630","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]

Document Information

Modified date:
12 December 2023