Hi Friends,
iam facing one proble in this program iam not gettting ekko data and ekko-ebeln value . so ,please correct the program and send it to me . reards are helpful answers.
Thanks& regards,
Narasimha Rao.
PROGRAM ZAN_GOODS_RECEIPT.
*----
TABLES DECLARATION.
tables : likp,lips,ekko,ekpo.
*----
FORM STRUCTURE DECLARATION.
form f_head tables in_tab structure itcsy
data:l_ebeln(10) type n.
data: begin of l_ekgrp occurs 0,
ekgrp type ekko-ekgrp,
end of l_ekgrp.
read table in_tab with key name = 'EKKO-EBELN'.
if sy-subrc = 0.
l_ebeln = in_tab-value.
select ekgrp
from ekko
into table l_ekgrp
where ebeln = l_ebeln.
endif.
read table out_tab with key name = 'EKGRP'.
if sy-subrc = 0.
out_tab-value = l_ekgrp.
modify out_tab index 1.
endif.
endform.