DATA: it_header TYPE bapibus1006_head OCCURS 0 WITH HEADER LINE.
DATA: it_centr TYPE bapibus1006_central OCCURS 0 WITH HEADER LINE.
DATA: g_bp LIKE bapibus1006_head-bpartner.
DATA: g_cat LIKE bapibus1006_head-partn_cat VALUE 1 .
DATA: it_guid LIKE bus000___i OCCURS 0 WITH HEADER LINE.
DATA: it_custo LIKE bus000_eew OCCURS 0 WITH HEADER LINE.
DATA:BEGIN OF HEADDATA.
INCLUDE STRUCTURE BAPIMATHEAD.
DATA:END OF HEADDATA.
DATA:BEGIN OF PLANTDATA.
INCLUDE STRUCTURE BAPI_MARC.
DATA:END OF PLANTDATA.
DATA:BEGIN OF PLANTDATAX.
INCLUDE STRUCTURE BAPI_MARCX.
DATA:END OF PLANTDATAX.
READ TABLE XMKPF INDEX 1.
IF XMKPF-TCODE2 = MIGO_GR .
LOOP AT XMSEG.
DATA: it_header TYPE bapibus1006_head OCCURS 0 WITH HEADER LINE.
DATA: it_centr TYPE bapibus1006_central OCCURS 0 WITH HEADER LINE.
DATA: g_bp LIKE bapibus1006_head-bpartner.
DATA: g_cat LIKE bapibus1006_head-partn_cat VALUE 1 .
DATA: it_guid LIKE bus000___i OCCURS 0 WITH HEADER LINE.
DATA: it_custo LIKE bus000_eew OCCURS 0 WITH HEADER LINE.
