HU CREATE GOODS MOVEMENT

Lagerort Umbuchung

DATA: lt_move_to     TYPE hum_data_move_to_t,
      lv_event       TYPE huwbevent,
      lv_sysubrc     TYPE sysubrc,
      lt_move_msgs   TYPE huitem_messages_t,
      ls_move_msg    TYPE huitem_messages,
      lt_internal_id TYPE hum_venum_t.

lv_event = '0006'.
lt_move_to = VALUE #( ( lgort = iv_storloc_for_moveing ) ).
SELECT SINGLE venum FROM vekp INTO @DATA(lv_venum) WHERE exidv = @ls_get_hu_no-exidv.
lt_internal_id = VALUE #( ( venum = lv_venum ) ).

CALL FUNCTION 'HU_CREATE_GOODS_MOVEMENT'
 EXPORTING
  if_event       = lv_event
  it_move_to     = lt_move_to
  it_internal_id = lt_internal_id
 IMPORTING
  ef_posted      = lv_sysubrc
  es_message     = ls_move_msg
  et_messages    = lt_move_msgs.

IF NOT lv_sysubrc = 1.
 "error handling here
ENDIF.