Please find my code......
CASE ok_code.
WHEN 'SAVE'.
LOOP AT it_data INTO wa_data.
READ TABLE it_data1 INTO wa_data1 INDEX sy-tabix.
* LOOP AT it_data1 INTO wa_data1.
* wa_data1-mandt = sy-mandt.
gs_data-rmcode = wa_data-rmcode.
gs_data-matnr = wa_data-matnr.
gs_data-werks = zsemi-werks.
gs_data-specg = wa_data-specg.
gs_data-cost = wa_data-cost.
gs_data-solid = wa_data-solid.
gs_data-resin = wa_data-resin.
gs_data-crossl = wa_data-crossl.
gs_data-pigment = wa_data-pigment.
gs_data-extendl = wa_data-extendl.
gs_data-catalyst = wa_data-catalyst.
gs_data-solvent = wa_data-solvent.
gs_data-aerosil = wa_data-aerosil.
gs_data-wax = wa_data-wax.
gs_data-anti = wa_data-anti.
gs_data-other = wa_data-other.
gs_data-costm = wa_data-costm.
gs_data-variance = wa_data-variance.
gs_data-verpr = wa_data-verpr.
gs_data-fgdes = zsemi-fgdes.
gs_data-docnum = zsemi-docnum.
gs_data-ersda = zsemi-ersda.
gs_data-pbw = wa_data1-pbw.
gs_data-pbv = wa_data1-pbv.
gs_data-tcost = wa_data1-tcost.
gs_data-control = wa_data1-control.
gs_data-contri = wa_data1-contri.
gs_data-gcost = wa_data1-gcost.
gs_data-pbvcost = wa_data1-pbvcost.
gs_data-pbwcost = wa_data1-pbwcost.
MODIFY zsemi FROM gs_data.
CLEAR gs_data.
ENDLOOP.
* INSERT into zsemi values gs_data.
* MODIFY zsemi FROM gs_data.
* IF sy-subrc = 0.
* COMMIT WORK.
* ENDIF.