topic plz chk the code wats wrong in it in Application Development and Automation Discussions

plz chk the code wats wrong in it

Former Member — Fri, 08 Dec 2006 11:51:20 GMT

i m having itab with vbeln

and ztable with objnr and ordsent.

where objnr and vbeln are equal

so now when i find objnr EQ vbeln i have to modify the ztable-ordsent = ' '.

i have writen the followin code

LOOP AT lt_ztsd2marc INTO ls_ztsd2marc.

READ TABLE ct_success INTO ls_success WITH KEY ordnr =

ls_ztsd2marc-ordnr.

IF sy-subrc EQ 0.

ls_ztsd2marc-ordsent = ' '.

MODIFY TABLE lt_ztsd2marc FROM ls_ztsd2marc TRANSPORTING ordsent .

MODIFY ztsd2marc FROM TABLE lt_ztsd2marc.

IF sy-subrc EQ 0.

MESSAGE s112(z2).

ENDIF.

ENDLOOP.

its updating it in work area but the changes are not gettin reflected in the internal table and not even in my ztable ztsd2marc.

plz tell me wat is wrong in this code?

Re: plz chk the code wats wrong in it

Former Member — Fri, 08 Dec 2006 11:57:24 GMT

Hi Neha ,

What is the value of SY-SUBRC when you modify the internal table and table.

Regards

Arun

Re: plz chk the code wats wrong in it

Manohar2u — Fri, 08 Dec 2006 11:58:22 GMT

You should not use

MODIFY table with in the loop

try with

modity itab.

and after endloop then update your z table

Message was edited by:

Manohar Reddy K

Re: plz chk the code wats wrong in it

Former Member — Fri, 08 Dec 2006 11:59:44 GMT

Hello,

Try using stmt like below :

MODIFY TABLE lt_ztsd2marc FROM ls_ztsd2marc

& use commit work after z table updation.

Thanks.

Re: plz chk the code wats wrong in it

Former Member — Fri, 08 Dec 2006 12:05:13 GMT

Give

Modify itab -> Modifying internal table

Modify ztable -> Modifying Table

Regards

Haritha.

Re: plz chk the code wats wrong in it

jayanthi_jayaraman — Fri, 08 Dec 2006 12:05:59 GMT

Hi,

Replace

MODIFY TABLE lt_ztsd2marc FROM ls_ztsd2marc TRANSPORTING ordsent .

MODIFY ztsd2marc FROM TABLE lt_ztsd2marc.

by this single statement

MOdify lt_ztsd2marc from ls_ztsd2marc transporting ordsent where ordnr = ls_ztsd2marc-ordnr.

Re: plz chk the code wats wrong in it

Former Member — Fri, 08 Dec 2006 12:06:17 GMT

LOOP AT lt_ztsd2marc INTO ls_ztsd2marc.

READ TABLE ct_success INTO ls_success WITH KEY ordnr =

ls_ztsd2marc-ordnr.

IF sy-subrc EQ 0.

ls_ztsd2marc-ordsent = ' '.

MODIFY TABLE lt_ztsd2marc FROM ls_ztsd2marc TRANSPORTING ordsent

where ordnr = ls_ztsd2marc-ordnr .

**MODIFY ztsd2marc FROM TABLE lt_ztsd2marc.

update ztsd2marc set ordsent = it_ztsd2marc-orsent

where ordnr = it_ztsd2marc-ordnr.

IF sy-subrc EQ 0.

MESSAGE s112(z2).

ENDIF.

ENDLOOP.

Re: plz chk the code wats wrong in it

Former Member — Fri, 08 Dec 2006 12:26:23 GMT

hi..

jus try the code below.. it'll def give the solution to ur question.

i've jus modified little of ur code that u posted.

LOOP AT lt_ztsd2marc INTO ls_ztsd2marc.

READ TABLE ct_success INTO ls_success WITH KEY ordnr =

ls_ztsd2marc-ordnr.

IF sy-subrc EQ 0.

ls_ztsd2marc-ordsent = ' '.

MODIFY TABLE lt_ztsd2marc FROM ls_ztsd2marc TRANSPORTING ordsent

where ordnr = ls_ztsd2marc-ordnr .

**MODIFY ztsd2marc FROM TABLE lt_ztsd2marc.

update ztsd2marc set ordsent = it_ztsd2marc-orsent

where ordnr = it_ztsd2marc-ordnr.

IF sy-subrc EQ 0.

MESSAGE s112(z2).

ENDIF.

ENDLOOP.

all the best