PM60718: IMPLICIT CAST TO DECIMAL128 IS WRONG

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Implicit cast to Decimal128 is wrong as shown below:
  
  Compile command:
  ---------------
  xlc t.c -qarch=9 -qdfp
  
  Testcase:
  --------
  
  #define _XOPEN_SOURCE_EXTENDED 1
  #include <stdio.h>
  #include <stdlib.h>
  #include <string.h>
  #define __STDC_WANT_DEC_FP__
  #include <math.h>
  #include <float.h>
  #include <decimal.h>
  
  void main(void){
  
          double                  dbl1 = 3.14f;
          _Decimal128     dec128_1 = dbl1;
          printf("        <_Decimal128 Vaule> (%DDf)\n",
  dec128_1);
          return;
  }
  
  Actual Output:
  --------------
  <_Decimal128 Vaule> (0.000000)
  
  Expected Output:
  ---------------
  <_Decimal128 Vaule> (3.140000)
  

Local fix

• N/A
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: User of converting between DFP and floating  *
  *                 point arch(8) and up.                        *
  ****************************************************************
  * PROBLEM DESCRIPTION: Converting between DFP and floating     *
  *                      point with arch(8) and up results in    *
  *                      abend.                                  *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  

Problem conclusion

• Apply provided service.
  

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:

  PM65012

Modules/Macros

•    CCNETBY
  

Fix information

• Fixed component name

  C/C++ FOR MVS

• Fixed component ID

  56551210A

Applicable component levels

• R770 PSY UK77246

     UP12/04/13 P F204

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.