REPORT ztest_inforecord.
TABLES :eina.
DATA: l_activity TYPE c.
* IF r1 = 'X'.
* l_activity = 'H'.
* ELSE.
* l_activity = 'V'.
* ENDIF.
DATA : it_eina TYPE eina OCCURS 0,
wa_eina TYPE eina,
wa_eina_new TYPE eina,
wa_eine TYPE eine,
it_eine TYPE eine OCCURS 0,
wa_eine_new TYPE eine.
DATA : it_head TYPE mestxh OCCURS 0.
DATA : it_line TYPE mestxl OCCURS 0.
TYPES : BEGIN OF ltype_tab,
lifnr TYPE eina-lifnr,
matnr TYPE eina-matnr,
infnr TYPE eina-infnr,
netpr TYPE eine-netpr,
END OF ltype_tab.
DATA : it_tab TYPE TABLE OF ltype_tab,
st_tab LIKE LINE OF it_tab.
st_tab-lifnr = '21075'.
st_tab-matnr = '0000