Numerator in Unit of Measure

Question

Hi All,
We are updating the Unit of meaure using Function Module CRMXIF_PRODUCT_MATERIAL_SAVE. It is creation material successfullly & changing all attributes of products except the Numerator or Denominator of alternative Unit of Measure..
How to change Numerator or Denominatior of existing products...
Thanks in Advance
Regards
Sushil

Answer 1

I have this report which does the same..code is given below.
REPORT  ZCRM_PRODUCT_UOM_ALTERNATIVE                                     .
                              PARAMETER                              *
parameter: p_pr_gr type CRMM_PR_SALESG-PROD_PR_GROUP value check.
                              D A T A                                *
data: ls_unit type COMM_PR_UNIT.
data: ls_product type comm_product.
data: ls_zmodelinfo type zmodelinfo.
data: lt_product type table of comm_product with header line.
Get all the Product which have UNIT as Category
select * into corresponding fields of ls_product
                         from comm_product as prd
                         inner join COMM_PRPRDCATR as cat
                         on prdproduct_guid = catPRODUCT_GUID
                         where CATEGORY_ID = 'UNIT'.
****************29.06.2006******************
*For Product Price Group
      data: ls_pr_group type CRMM_PR_SALESG.
      clear ls_pr_group .
      SELECT single *
          INTO corresponding fields of ls_pr_group
          FROM COMM_PR_FRG_Rod AS M INNER JOIN CRMM_PR_SALESG AS P
                 ON MFRAGMENT_GUID = PFRG_GUID
          WHERE M~PRODUCT_GUID = ls_product-PRODUCT_GUID.
check ls_pr_group-PROD_PR_GROUP = p_pr_gr.
**********End*29.06.2006******************
Get SALEABLE AREA for the Product and put it in table COMM_PR_UNIT
  select single ZZ0012 into corresponding fields of ls_zmodelinfo
                       from comm_pr_frg_rel as frg
                       inner join zmodelinfo as zmod
                       on frgFRAGMENT_GUID = zmodFRG_GUID
                       where PRODUCT_GUID = ls_product-PRODUCT_GUID.
  clear ls_unit.
  ls_unit-PRODUCT_GUID = ls_product-PRODUCT_GUID.
  ls_unit-UNIT = 'FT2'.
  ls_unit-NUMERATOR = 1.
  ls_unit-DENOMINATOR = ls_zmodelinfo-ZZ0012.
  ls_unit-LOGSYS = 'PCRCLNT300'.
  modify COMM_PR_UNIT from ls_unit.
insert COMM_PR_UNIT from ls_unit.
  append ls_product to lt_product.
  clear ls_unit.
  clear ls_product.
endselect.
Print all the products that have been changed
loop at lt_product into ls_product.
  write:/ ls_product-product_id.
  clear ls_product.
endloop.
Julius