IBM Support

PK82044: incorrect numeric to character coversion

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • In EGL I defined one variable type NUMERIC with value 1234:
    
    
    
    numNumeric num(7) = 1234;
    
    
    
    Then I add some value (let's say 90,000) to this variable assign
    ing the
    result to a variable type CHAR:
    
    
    
    resNumeric char(7) = 90000 + numNumeric;
    
    
    
    When running this thru EGL Debugger, the result is 91234 (that's
     fine)
    but running the EGL cobol generated on CICSZOS runtime, the resu
    lt
    is 91234.0 (decimal with zero fill, that's weird).
    

Local fix

Problem summary

  • A new temporary variable is allocated with the type of the
    numeric binary expression and the calculation is done. Then
    the result from the temporary variable is used to do the
    concatenate. This allows the process to properly concatenate
    the value based on the expression's real numeric type.
    

Problem conclusion

  • Software updated in 7512
    

Temporary fix

Comments

APAR Information

  • APAR number

    PK82044

  • Reported component name

    RBD EGL FOR COB

  • Reported component ID

    5724S5001

  • Reported release

    750

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt

  • Submitted date

    2009-03-06

  • Closed date

    2009-04-13

  • Last modified date

    2009-04-13

  • 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

    RBD EGL FOR COB

  • Fixed component ID

    5724S5001

Applicable component levels

  • R750 PSN

       UP

[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSMQ79","label":"Rational Business Developer"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"7.5","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]

Document Information

Modified date:
13 April 2009