IBM Support

PI70752: IGYPG3327-U CODE GENERATION PROCESSING ENCOUNTERED AN ERROR

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • The compiler produces an internal compiler error when trying to
    compile the provided test case with optimization.
    
    ===== COMPILE COMMAND:
    cob2 -q64 -q"OPTIMIZE" TST_CCSXF45.cbl
    
    ===== TESTCASE:
    $ cat TST_CCSXF45.cbl
           cbl APOST ADDR(64) ARITH(EXTEND) CALLINT(DESC) NOCICS
    DYNAM
           cbl ARITH(compat)
           cbl FLAG(I,I) LIST  MAP
           cbl NOPROFILE NOSEQ NOSSRANGE NOSQL NOTEST WSCLEAR(32)
    NOXREF
           id division.
           program-id. TST_CCSXF45.
           data division.
           working-storage section.
           01  my-data.
             05 ws-bytes  pic x(8).
             05 ws-bits   pic x.
             05 ws-name   pic x(8).
           PROCEDURE DIVISION.
               display ' '
    
               move x'49' to ws-bits.
               move low-values to ws-bytes.
               move 'ws-bits' to ws-name.
               call 'HEXDISPLAY' using ws-name, ws-bits,
                                 value length of ws-bits.
               call 'CCSXF5' using ws-bits ws-bytes.
               display 'CCSXF5 results:'
               move 'ws-bytes' to ws-name.
               call 'HEXDISPLAY' using ws-name, ws-bytes,
                                 value length of ws-bytes.
               move x'00' to ws-bits.
               call 'CCSXF4' using ws-bits ws-bytes.
               display 'CCSXF4 results:'
               move 'ws-bits' to ws-name.
               call 'HEXDISPLAY' using ws-name, ws-bits,
                                 value length of ws-bits.
               goback.
    $
    
    
    ===== ACTUAL OUTPUT:
    $ cob2 -q64 -q"OPTIMIZE" TST_CCSXF45.cbl
    PP 5724-Z87 IBM COBOL for AIX  4.1.1 in progress ...
    LineID  Message code  Message text
            IGYPG3070-U
        28  IGYPG3327-U   Code generation processing encountered an
    error in the
                          intermediate code (rc=        1).  Contact
    your IBM
                          service representative.
    Messages    Total    Informational    Warning    Error    Severe
    Terminating
    Printed:       2
    2
    End of compilation 1,  program TST_CCSXF45,  highest severity:
    Unrecoverable.
    Return code 16
    $
    
    
    ===== EXPECTED OUTPUT:
    Should compile clean
    

Local fix

  • N/A
    

Problem summary

  • USERS AFFECTED:
    COBOL users who use optimization maybe affected by this issue.
    
    PROBLEM DESCRIPTION:
    The compiler produces a 'IGYPG3327-U Code generation processing
    encountered an error' when compiling a testcase at optimizaiton.
    
    We are creating a 12 byte descriptor for each internal
    arguments.
    One field of this 12 byte descriptor is described to be 4 bytes,
    but we are trying to store an 8-byte value into it (because of
    -q64).
    
    This appears to work when no optimization; but fails with
    optimization.
    
    Also, for several fields of a structure (along with the whole
    structure) have there address taken, but the address taken flag
    is not set.
    

Problem conclusion

  • The above mentioned issues have been resolved.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PI70752

  • Reported component name

    COBOL FOR AIX

  • Reported component ID

    5724Z8700

  • Reported release

    510

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2016-10-17

  • Closed date

    2016-10-17

  • Last modified date

    2016-10-17

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

    PI65505

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

Fix information

  • Fixed component name

    COBOL FOR AIX

  • Fixed component ID

    5724Z8700

Applicable component levels

  • R510 PSY

       

[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SS6SGM","label":"COBOL for AIX"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"510","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]

Document Information

Modified date:
19 October 2021