select insert into statement

[Former Member]

select single vkbur vkgrp

from VBAK

into gs_itab-vkbur gs_itab-VKGRP

where VBELN = gs_itab-vgbel .

modify gt_itab from gs_itab .

************************************

I want to put the data of vkbur into field gs_itab-vkbur and the data of vkgrp into field gs_itab-VKGRP.

gs_itab is header for internal table gt_itab

CAN ANY ONE PROVIDE ME THE CORRECT CODE

[Former Member]

data: begin of t_vbak,

vkbur type vbak-vkbur,

vkgrp type vbak-vkgrp,

end of t_vbak.

select vkbur vkgrp

from VBAK

into table t_vbak

for all entries in gt_itab

where VBELN = gs_itab-vgbel .

loop at gt_itab into gs_itab.

read table t_vbak with key vkbur EQ gs_itab-vkbur.

if sy-subrc EQ 0.

gs_itab-vkgrp = t_vbak-vkgrp.

modify gt_itab from gs_itab

endif.

endloop

[Former Member]

award ponits and close thread if it s solved

[Former Member]

if want chang all the value in internal for vkbur vkgrp

This statment is wrong

select single vkbur vkgrp

from VBAK

into gs_itab-vkbur gs_itab-VKGRP

where VBELN = <b>gs_itab-vgbel</b> .(without loopin or reading the internal table how u can get this value)

modify gt_itab from gs_itab .

data v_vkbur like vbak-vkbur ,

v_vkgrp like vbak-v_grp.

Loop at gs_itab

select single vkbur vkgrp

from VBAK

into v_vkbur v_vkgrp

where VBELN = <b>gs_itab-vgbel</b>

if sy-subrc =0.

gs_itab-VKGRP = v_vkgrp.

gs_itab-vkbur = v_vkbur.

modify gs_itab.

clear v_vkgrp , v_vkbur.

endif.

endloop.

[Former Member]

Correct format of coding for your select is:

select single vkbur vkgrp
       from VBAK
       into (gs_itab-vkbur, gs_itab-VKGRP)  "<<< Change to this
       where VBELN = gs_itab-vgbel .
modify gt_itab from gs_itab .

Andrew