CALL METHOD zclbc_utils=>fill_bapix
      EXPORTING
        is_data     = me->ms_data-header
        is_old_data = me->ms_old_data-header
      CHANGING
        cs_datax    = ls_headerx.

    ls_headerx-updateflag = 'U'.

    CALL FUNCTION 'BAPI_SALESORDER_CHANGE'
      EXPORTING
        salesdocument    = me->m_vbeln
        order_header_in  = me->ms_data-header
        order_header_inx = ls_headerx
        simulation       = i_simulation
*       BEHAVE_WHEN_ERROR           = ' '
*       INT_NUMBER_ASSIGNMENT       = ' '
        logic_switch     = ls_log_switch
*       NO_STATUS_BUF_INIT          = ' '
      TABLES
        return           = lt_return
        order_item_in    = lt_item
        order_item_inx   = lt_itemx
        partners         = lt_partners
        partnerchanges   = lt_partchan
**       PARTNERADDRESSES =
**       ORDER_CFGS_REF   =
**       ORDER_CFGS_INST  =
**       ORDER_CFGS_PART_OF          =
**       ORDER_CFGS_VALUE =
**       ORDER_CFGS_BLOB  =
**       ORDER_CFGS_VK    =
**       ORDER_CFGS_REFINST          =
        schedule_lines   = lt_schedule
        schedule_linesx  = lt_schedulex
*       ORDER_TEXT       =
*       ORDER_KEYS       =
        conditions_in    = lt_condition
        conditions_inx   = lt_conditionx
        extensionin      = lt_extension
*       extensionex      =
*       NFMETALLITMS     =
      .

  ENDIF.

  LOOP AT lt_return TRANSPORTING NO FIELDS WHERE type CA 'XAE'.
    RAISE EXCEPTION TYPE zcx_mess_error
      EXPORTING
        bapi2t = lt_return.
  ENDLOOP.

..............................................................................

  IF i_commit IS NOT INITIAL.
    CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
      EXPORTING
        wait = 'X'.
  ENDIF.