*----------------------------------------------------------------------*
*   INCLUDE ZXWOCU07 (К моменту сохранения)                            *
*----------------------------------------------------------------------*

*"*"Lokale Schnittstelle:
*"  IMPORTING
*"     VALUE(CAUFVD_IMP) LIKE  CAUFVD STRUCTURE  CAUFVD
*"     VALUE(TRTYP) LIKE  TC10-TRTYP
*"  EXPORTING
*"     REFERENCE(RELEASE_ORDER) TYPE  XFLAG
  ...
  data:  lt_caufv_bt type standard table of caufvdb,
         ls_caufv_bt type caufvdb.

  field-symbols: <fs_caufv_bt> type table.

  assign: ('(SAPLCOBH)caufv_bt[]') to <fs_caufv_bt>.
  if sy-subrc = 0.

    lt_caufv_bt[] = <fs_caufv_bt>[].

    read table lt_caufv_bt into ls_caufv_bt
                           with key mandt = sy-mandt
                                    aufnr = CAUFVD_IMP-aufnr.
    if sy-subrc = 0.
* ...
*    Здесь работает ваша логика по определению МВЗ
* ...
      move: <ВашеМВЗ> to ls_caufv_bt-kostl.
      modify <fs_caufv_bt> from ls_caufv_bt index sy-tabix.

    endif.

  endif.

  ...