PH38457: Loss of precision for DECIMAL data with setcolumnvalue() in CM procedures

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Customer is performing data masking of data using a Column Map
  Procedure (CM PROC).
  When the setcolumnvalue() is performed for DECIMAL columns, the
  resulting value may exhibit loss of precision on the lowest
  decimal digit/position.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All Optim users working with CM PROCs and    *
  *                 DECIMAL data.                                *
  ****************************************************************
  * PROBLEM DESCRIPTION: Some DECIMAL values may experience loss *
  *                      of precision during CM PROC processing. *
  ****************************************************************
  When the setcolumnvalue() is performed for DECIMAL columns, the
  resulting value may exhibit loss of precision. The loss may
  affect one or more decimal digits depending on the precision of
  the decimal data.
  

Problem conclusion

• Optim processing will be adjusted to avoid loss of precision
  with DECIMAL data up to precision of 17.
  
  Note that DECIMAL values are represented as DOUBLE FLOAT within
  CM PROCs (Lua chunks) and loss of precision can not be avoided
  for some values when the precision of the DECIMAL PACKED data
  exceeds the precision of a DOUBLE FLOAT.
  

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:

Modules/Macros

• FOP1OSFN FOP9APIM FOPCFPMN FOPCRDB  FOPCXLIB FOPHSTM  FOPIBDPK
  FOPIBIND FOPIDBNM FOPIDMTB FOPIGRNT FOPIIXNM FOPINS2  FOPISGNM
  FOPITABL FOPITSNM FOPITSPC FOPIX000 FOPIX001 FOPK04   FOPMAIN
  FOPMARCN FOPMCBMN FOPMCENU FOPMCMAI FOPMCMMN FOPMCOLA FOPMCOLP
  FOPMDBMN FOPMDPRC FOPMECMN FOPMMCMR FOPMMJBS FOPMMUNU FOPMMUTL
  FOPODPP  FOPOMN   FOPRS10  FOPRS3   FOPRS9   FOPTBIPK FOPTDBN1
  FOPTDMTX FOPTGRNT FOPTIX00 FOPTIXNM FOPTSGNM FOPTTABL FOPTTSPC
  FOPTX001 FOPTXBND FOPTXBPK FOPTXSNM FOPZFMMN FOPZMAIN
  

Fix information

• Fixed component name

  OPTIM MOVE FOR

• Fixed component ID

  5655V0700

Applicable component levels

• RB70 PSY UI76359

     UP21/07/22 P F107

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.