Hi. i used Function module to change Characteristic values of a sales order

Question

hi. i used Function module to change Characteristic values of a sales order..
but sales order's Characteristic values didn't change.
And the Function module doesn't occur any log message.
please tell me wrong code, and how to solve this problem.
if i have wrong method, what data can i pass to change the characteristic values
DATA: LT_E1CUVAL    TYPE TABLE OF E1CUVAL.
  DATA: WA_E1CUVAL    TYPE E1CUVAL.
  DATA: LS_CFG_HEAD   LIKE CUXT_CUCFG_S,
        LS_INSTANCES  LIKE CUXT_CUINS_S,
        LS_VALUES     LIKE CUXT_CUVAL_S,
        LS_E1CUCFG    LIKE E1CUCFG,
        LS_E1CUINS    LIKE E1CUINS,
        LS_E1CUVAL    LIKE E1CUVAL,
        LS_PROFILE    LIKE E1CUCOM,
        LS_VBAP       LIKE VBAP,
        L_CUOBJ       LIKE INOB-CUOBJ,
        L_ATINN       LIKE CABN-ATINN.
  DATA: LT_INSTANCES  LIKE CUXT_CUINS_S OCCURS 0,
        LT_PART_OF    LIKE CUXT_CUPRT_S OCCURS 0,
        LT_VALUES     LIKE CUXT_CUVAL_S OCCURS 0,
        LT_VAR_KEYS   LIKE CUXT_CUVK_S  OCCURS 0,
        LT_KSML       LIKE KSML         OCCURS 0 WITH HEADER LINE,
        BEGIN OF LT_CLINT OCCURS 0,
          CLINT  LIKE KSSK-CLINT,
        END OF LT_CLINT.
  DATA: LT_CUIB       LIKE CUIB_CUOBJ_S OCCURS 0 WITH HEADER LINE.
  DATA: E_ROOT_INSTANCE           TYPE     CUXT_INSTANCE_NO.
  DATA: EV_ROOT_PERSIST_ID     TYPE     IBEXTINST_DATA-EXT_INST_ID.
  DATA: EV_CFG_HAS_CHANGED     TYPE     XFELD.
  DATA: EV_HANDLE_APPL_LOG     TYPE     BALLOGHNDL.
  DATA: L_CUOBJ_NEW           TYPE CUOBJ.
  DATA: L_OWNER               TYPE IBXX_BUSINESS_OBJECT.
  REFRESH LT_E1CUVAL.
  CLEAR LS_VBAP.
  SELECT SINGLE CUOBJ INTO CORRESPONDING FIELDS OF LS_VBAP
                            FROM VBAP WHERE VBELN = I_VBELN
                                        AND POSNR = I_POSNR.
  IF SY-SUBRC <> 0.
    RAISE INSTANCE_NOT_FOUND.
  ENDIF.
  REFRESH LT_CUIB. CLEAR LT_CUIB.
  LT_CUIB-INSTANCE = LS_VBAP-CUOBJ.
  APPEND LT_CUIB.
  CALL FUNCTION 'CUCB_INITIALIZER'
    EXPORTING
      IT_INSTANCES = LT_CUIB[].
  CALL FUNCTION 'CUXI_GET_SINGLE_CONFIGURATION'
    EXPORTING
      I_ROOT_INSTANCE              = LS_VBAP-CUOBJ
    IMPORTING
      E_CFG_HEAD                   = LS_CFG_HEAD
      ES_PROFILE                   = LS_PROFILE
      ET_RETURN                    = ET_RETURN
    TABLES
      E_TAB_INSTANCES              = LT_INSTANCES
      E_TAB_PART_OF                = LT_PART_OF
      E_TAB_VALUES                 = LT_VALUES
      E_TAB_VAR_KEYS               = LT_VAR_KEYS
    EXCEPTIONS
      INVALID_INSTANCE             = 1
      NO_ROOT_INSTANCE             = 2
      INSTANCE_IS_A_CLASSIFICATION = 3
      INTERNAL_ERROR               = 4
      NO_PROFILE_FOUND             = 5
      INVALID_DATA                 = 6
      OTHERS                       = 7.
  IF SY-SUBRC <> 0.
    CASE SY-SUBRC.
      WHEN 1.
        RAISE INSTANCE_NOT_FOUND.
      WHEN 3.
        RAISE INSTANCE_IS_A_CLASSIFICATION.
      WHEN OTHERS.
        RAISE INVALID_DATA.
    ENDCASE.
  ELSE.
    LOOP AT LT_VALUES INTO LS_VALUES.
      IF    LS_VALUES-CHARC = 'SAP_MILLCA_PACKAGING'
         OR LS_VALUES-CHARC = 'PD_CA_PACKING_DM'.
        LS_VALUES-VALUE = '7100010'. "This is test data
        MODIFY LT_VALUES FROM LS_VALUES.
      ELSE.
        DELETE LT_VALUES WHERE CHARC = LS_VALUES-CHARC.
      ENDIF.
      CLEAR LS_VALUES.
    ENDLOOP.
  ENDIF.
&#50689;&#50629;&#51221;&#48372; &#53945;&#49457; &#48320;&#44221;
  CALL FUNCTION 'CUXI_SET_SINGLE_CONFIGURATION'
    EXPORTING
      I_CFG_HEADER                        = LS_CFG_HEAD
      I_ROOT_INSTANCE                     = LS_VBAP-CUOBJ
    I_PLANT                             =
    I_STRUCTURE_EXPLOSION_DATE          =
    I_STRUCTURE_EXPLOSION_APPL_ID       =
    I_LOGSYS                            =
      IS_PROFILE                          = LS_PROFILE
    IV_ONLY_SINGLE_LEVEL                =
    IV_HANDLE_APPL_LOG                  =
    IV_OBJECT_APPL_LOG                  = 'CIF'
    IV_SUBOBJECT_APPL_LOG               = 'T_CNFG'
    IMPORTING
      E_ROOT_INSTANCE                     = E_ROOT_INSTANCE
      EV_ROOT_PERSIST_ID                  = EV_ROOT_PERSIST_ID
      EV_CFG_HAS_CHANGED                  = EV_CFG_HAS_CHANGED
      EV_HANDLE_APPL_LOG                  = EV_HANDLE_APPL_LOG
      ET_RETURN                           = ET_RETURN
    TABLES
      I_TAB_INSTANCES                     = LT_INSTANCES
      I_TAB_PART_OF                       = LT_PART_OF
      I_TAB_VALUES                        = LT_VALUES
      I_TAB_VAR_KEYS                      = LT_VAR_KEYS
    I_TAB_BLOB                          =
    EXCEPTIONS
      NO_CONFIGURATION_DATA               = 1
      NO_ROOT_INSTANCE                    = 2
      INVALID_INSTANCE                    = 3
      INSTANCE_IS_A_CLASSIFICATION        = 4
      INTERNAL_ERROR                      = 5
      NO_PROFILE_FOUND                    = 6
      INVALID_DATA                        = 7
      OTHERS                              = 8
  IF SY-SUBRC <> 0.
    CASE SY-SUBRC.
      WHEN 1.
        RAISE NO_CONFIGURATION_DATA.
      WHEN 3.
        RAISE NO_ROOT_INSTANCE.
      WHEN 3.
        RAISE INVALID_INSTANCE .
      WHEN 3.
        RAISE INSTANCE_IS_A_CLASSIFICATION.
      WHEN 3.
        RAISE INTERNAL_ERROR.
      WHEN OTHERS.
        RAISE INVALID_DATA.
    ENDCASE.
  ENDIF.
  COMMIT WORK.
save configuration with next commit
  CLEAR: LS_INSTANCES.
  READ TABLE LT_INSTANCES INTO LS_INSTANCES INDEX 1.
L_OWNER-OBJECT_TYPE = LS_INSTANCES-OBJ_TYPE.
  L_OWNER-OBJECT_TYPE = 'PVS_POSVAR'.
  L_OWNER-OBJECT_KEY  = LS_INSTANCES-OBJ_KEY.
  CALL FUNCTION 'CUCB_CONFIGURATION_TO_DB'
    EXPORTING
      ROOT_INSTANCE         = LS_VBAP-CUOBJ
      ROOT_OBJECT           = L_OWNER
    IMPORTING
      NEW_INSTANCE          = L_CUOBJ_NEW
    EXCEPTIONS
      INVALID_INSTANCE      = 1
      INVALID_ROOT_INSTANCE = 2
      NO_CHANGES            = 3
      OTHERS                = 4.
  IF SY-SUBRC > 1 AND SY-SUBRC <> 3.
    CLEAR LS_VBAP-CUOBJ.
    RAISE INTERNAL_ERROR.
  ELSEIF SY-SUBRC = 1.
    LS_VBAP-CUOBJ = L_CUOBJ_NEW.
  ENDIF.
What's wrong?
help me to solve this problem.
Thanks a lot.

Answer 1

<b>SD_SALES_DOCUMENT_READ</b> Reads sales document header and business data: tables VBAK, VBKD and VBPA (Sold-to (AG), Payer (RG) and Ship-to (WE) parties)
<b>SD_SALES_DOCUMENT_READ_POS</b> Reads sales document header and item material: tables VBAK, VBAP-MATNR
<b>SD_DOCUMENT_PARTNER_READ</b> partner information including address. Calls SD_PARTNER_READ
<b>SD_PARTNER_READ</b> all the partners information and addresses
<b>SD_DETERMINE_CONTRACT_TYPE</b>
In: at least VBAK-VBELN
Exceptions: NO CONTRACT | SERVICE_CONTRACT | QUANTITY_CONTRACT
<b>SD_SALES_DOCUMENT_COPY</b>
<b>RV_ORDER_FLOW_INFORMATION</b> Reads sales document flow of sales document after delivery and billing
SD_SALES_DOCUMENT_SAVE create Sales Doc from the copied document
SD_SALES_DOCUMENT_ENQUEUE to dequeue use DEQUEUE_EVVBAKE
RV_DELIVERY_PRINT_VIEW Data provision for delivery note printing
SD_PACKING_PRINT_VIEW
SD_DELIVERY_VIEW Data collection for printing
called from RV_DELIVERY_PRINT_VIEW, SD_PACKING_PRINT_VIEW
RV_BILLING_PRINT_VIEW Data Provision for Billing Document Print
regards
vinod