Skip to Content
0
Former Member
Nov 24, 2006 at 07:27 PM

Can some one explain each line of this abap code

156 Views

Hi..

I got this code from a document, where they try to add account group (LFA1-KTOKK) to 0VENDOR_ATTR. I have no idea of ABAP syntax. Can some one tell me the meaning of each line of code.

-


Tables: LFA1. "vendor master data table

data: l_tabix like sy-tabix.

case i_CHABASNM.

*Enhancement of Vendor Master Record

WHEN '0VENDOR'.

case i_datasource.

WHEN '0VENDOR_ATTR'.

data: l_s_BIW_LFA1_S like BIW_LFA1_S.

loop at i_t_data into l_s_BIW_LFA1_S.

l_tabix = sy-tabix.

select single * from lfa1 where LIFNR = l_s_BIW_LFA1_S-LIFNR.

if sy-subrc = 0.

l_s_BIW_lfa1_s-ZZacctgrp = lfa1-ktokk.

modify i_t_data from l_s_BIW_lfa1_s index l_tabix.

endif.

endloop.

endcase.

endcase.

-


Thanks in advance.