FORM userexit_move_field_to_vbap.
*Автоматичское определение склада в заказе на основе настроек для определения склада в поставке.
*spro-оперативная логистика-отгрузка-комплектование-определение складов комплектования-присвоение складов.
  DATA: xraube LIKE mara-raube.
  SELECT SINGLE raube
         INTO xraube
         FROM mara
         WHERE
         matnr = vbap-matnr.
  SELECT SINGLE lgort
         INTO vbap-lgort
         FROM tvkol
         WHERE vstel = vbap-vstel AND
               werks = vbap-werks AND
               raube = xraube.
  IF sy-subrc = 0.
    MESSAGE s899  WITH 'Склад автоматически определен' '(см user-exit MV45AFZZ,' 'FORM USEREXIT_MOVE_FIELD_TO_VBAP)'.
  ENDIF.

ENDFORM.                    "USEREXIT_MOVE_FIELD_TO_VBAP