New fields update with CRM_ORDER_SAVE BAdI - not working

Question

Dear Experts,
I ask your help in connection updating custom generated fields in Opportunity. In the Webclient UI i added a new field to Opportunity - Total Expected Value, and a Currency for it automatically generated.
The enhancement ID is YEXT00001 and the field name is YYFLD000002 and YYFLD000003 for the currency. I do not added these fields for the opportunity details view, I only want to use them to extend the search criteria for opportunities.
Now the fields are available in the search criteria, and I implemented the BADI CRM_ORDER_SAVE and in it I update these new fields with the value of the original fields of Total Expected Value, but unfortunately my BADI is not updating the field.
Here is my code:
METHOD if_ex_order_save~change_before_update.
  DATA lt_header_guid TYPE crmt_object_guid_tab.
  DATA lt_cumulat_h TYPE crmt_cumulat_h_wrkt.
  DATA ls_cumulat_h TYPE crmt_cumulat_h_wrk.
  DATA lt_orderadm_h TYPE crmt_orderadm_h_wrkt.
  DATA ls_orderadm_h TYPE crmt_orderadm_h_wrk.
  DATA lt_pricing TYPE crmt_pricing_wrkt.
  DATA ls_pricing TYPE crmt_pricing_wrk.
  DATA lt_opport_h TYPE crmt_opport_h_wrkt.
  DATA ls_opport_h TYPE crmt_opport_h_wrk.
  DATA lv_log_handle TYPE balloghndl.
  DATA ls_req_obj TYPE crmt_object_name.
  DATA lt_req_obj TYPE crmt_object_name_tab.
  DATA lt_opport_h_m   TYPE crmt_opport_h_comt.
  DATA ls_opport_h_m   TYPE crmt_opport_h_com.
  DATA ls_field_names TYPE crmt_input_field_names.
  DATA ls_input_fields TYPE crmt_input_field.
  DATA lt_input_fields TYPE crmt_input_field_tab.
  DATA lt_saved_objects TYPE crmt_return_objects.
  APPEND iv_guid TO lt_header_guid.
  ls_req_obj = 'CUMULAT_H'.
  INSERT ls_req_obj INTO TABLE lt_req_obj.
  ls_req_obj = 'OPPORT_H'.
  INSERT ls_req_obj INTO TABLE lt_req_obj.
  ls_req_obj = 'ORDERADM_H'.
  INSERT ls_req_obj INTO TABLE lt_req_obj.
  ls_req_obj = 'PRICING'.
  INSERT ls_req_obj INTO TABLE lt_req_obj.
  CALL FUNCTION 'CRM_ORDER_READ_OW'
   EXPORTING
     it_header_guid                    = lt_header_guid
*   IT_ITEM_GUID                      =
*   IV_MODE                           =
*   IV_ONLY_SPEC_ITEMS                =
     it_requested_objects              = lt_req_obj
*   IV_NO_AUTH_CHECK                  = FALSE
*   IV_COLLECT_EXCEPTIONS             = FALSE
*   IT_ITEM_USAGE_RANGE               =
*   IV_SUBITEM_DEPTH                  = -1
*   IT_OBJECT_FILTER                  =
*   IV_ONLY_CHANGED_OBJ               = FALSE
*   IV_STATUS_H_CHECK_RELEVANCE       = FALSE
   IMPORTING
     et_pricing                        = lt_pricing
     et_orderadm_h                     = lt_orderadm_h
     et_cumulat_h                      = lt_cumulat_h
     et_opport_h                       = lt_opport_h
    CHANGING
      cv_log_handle                     = lv_log_handle
* EXCEPTIONS
*   DOCUMENT_NOT_FOUND                = 1
*   ERROR_OCCURRED                    = 2
*   DOCUMENT_LOCKED                   = 3
*   NO_CHANGE_AUTHORITY               = 4
*   NO_DISPLAY_AUTHORITY              = 5
*   NO_CHANGE_ALLOWED                 = 6
*   OTHERS                            = 7
  READ TABLE lt_orderadm_h INTO ls_orderadm_h INDEX 1.
  READ TABLE lt_opport_h INTO ls_opport_h INDEX 1.
  READ TABLE lt_pricing INTO ls_pricing INDEX 1.
  CHECK ls_orderadm_h-process_type = 'Y002' OR ls_orderadm_h-process_type = 'YH02'.
  READ TABLE lt_cumulat_h INTO ls_cumulat_h INDEX 1.
  SELECT SINGLE currency FROM crmd_pricing
    INTO ls_opport_h_m-yyfld000003
    WHERE guid = ls_pricing-guid.
  ls_opport_h_m-yyfld000002 = ls_cumulat_h-net_value_man.
  ls_opport_h_m-ref_guid = ls_opport_h-guid.
  APPEND ls_opport_h_m TO lt_opport_h_m.
  ls_input_fields-ref_guid = iv_guid.
  ls_input_fields-ref_kind = 'A'.
  ls_input_fields-objectname = 'OPPORT_H'.
  ls_field_names-fieldname = 'YYFLD000002'.
  APPEND ls_field_names TO ls_input_fields-field_names.
  ls_field_names-fieldname = 'YYFLD000003'.
  APPEND ls_field_names TO ls_input_fields-field_names.
  APPEND ls_input_fields TO lt_input_fields.
  CALL FUNCTION 'CRM_ORDER_MAINTAIN'
    EXPORTING
      it_opport_h       = lt_opport_h_m
    CHANGING
      ct_input_fields   = lt_input_fields
      cv_log_handle     = lv_log_handle
    EXCEPTIONS
      error_occurred    = 1
      document_locked   = 2
      no_change_allowed = 3
      no_authority      = 4
      OTHERS            = 5.
  IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  ENDIF.
ENDMETHOD.
Edited by: Gabor Antal on Jun 17, 2010 3:48 PM

Answer 1

Hi,
Put the code in method PREPARE or CHECK_BEFORE_SAVE. CRM_ORDER_MAINTAIN iwill throw an exceptionNO_CHANGE_ALLOWED when used in metho CHANGE_BEFORE_UPDATE.
Check this recent thread,
Re: Updating Order in ORDER_SAVE using BOL
Regards,
Arun