topic Re: ERR in ITAB in Application Development and Automation Discussions

ERR in ITAB

Former Member — Tue, 18 Jul 2006 05:19:11 GMT

LOOP AT imseg_mkpf_e ASSIGNING <ls_imseg_mkpf_e>.

AT END OF matnr.

READ TABLE itab_mbew WITH KEY matnr = <ls_imseg_mkpf_e>-matnr.

if sy-subrc = '0'.

itab_mbew-max_qty = <ls_imseg_mkpf_e>-lbkum.

<ls_imseg_mkpf_e>-s_stock = <ls_imseg_mkpf_e>-lbkum - sum_s + sum_h.

itab_mbew-s_stock = <ls_imseg_mkpf_e>-s_stock.

itab_mbew-e_stock = <ls_imseg_mkpf_e>-e_stock.

modify itab_mbew.

endif.

ENDAT.

ENDLOOP.

i get dump on this line

READ TABLE

why????

Re: ERR in ITAB

naimesh_patel — Tue, 18 Jul 2006 05:23:21 GMT

Hello,

What type of dump, do you get ?

Regards,

Naimesh

Re: ERR in ITAB

Former Member — Tue, 18 Jul 2006 05:29:01 GMT

err in abap statement with internal table

Re: ERR in ITAB

Former Member — Tue, 18 Jul 2006 05:36:38 GMT

Do you have any delete statements just before the read? It would help if you could provide the code just before the read statement too.

If there are any delete statements, ensure you give a CONTINUE statement after the same.

Sudha

Re: ERR in ITAB

Former Member — Tue, 18 Jul 2006 05:38:14 GMT

i have this befoer

DELETE ADJACENT DUPLICATES FROM imseg_mkpf_e COMPARING ALL FIELDS.

Re: ERR in ITAB

Former Member — Tue, 18 Jul 2006 05:39:50 GMT

Hi Rani,

<ls_imseg_mkpf_e>-s_stock = <ls_imseg_mkpf_e>-lbkum - sum_s + sum_h.

Rather than writing the above line of code you pass lbkum - sum_s + sum_h in a variable and passit to as shown below

<ls_imseg_mkpf_e>-s_stock = <ls_imseg_mkpf_e>-variablename.

Regards,

Azaz Ali.

Re: ERR in ITAB

Former Member — Tue, 18 Jul 2006 05:42:19 GMT

HI,

Error is because of AT END OF Statement.

DOnt use AT END OF if you are looping using fieldsymobls.

Since AT END OF will convert all character field to * and intializes qty field, this will get direclty reflected in your internal table since you are usinn fieldsymbols.

SO if you want to use AT END OF then remove fieldsymbol and use a normal work area.

it can be because of

MODIFY IT_MBEW.

instead MODIFY IT_MBEW INDEX SY-TABIX.

Message was edited by: Sharath kumar R

Re: ERR in ITAB

Former Member — Tue, 18 Jul 2006 05:48:24 GMT

Can u plz give the Declarations of itab and Field symbols..

also let me know what is the Dump statement u are getting???

Re: ERR in ITAB

Former Member — Tue, 18 Jul 2006 05:54:32 GMT

here is the all code

declaration.

DATA : BEGIN OF imseg_mkpf OCCURS 0,

werks like mseg-werks,

matnr like mseg-matnr,

lbkum like mseg-lbkum,

shkzg like mseg-SHKZG,

menge like mseg-menge,

s_stock like mardh-labst,

e_stock like mardh-labst,

min_qty like mardh-labst,

max_qty like mardh-labst,

END OF imseg_mkpf.

DATA : cl_itab LIKE m_itab OCCURS 0 WITH HEADER LINE.

DATA : itab_mseg LIKE imseg_mkpf OCCURS 0 WITH HEADER LINE.

DATA : imseg_mkpf_e LIKE imseg_mkpf OCCURS 0 WITH HEADER LINE.

DATA : itab_mseg_e LIKE imseg_mkpf OCCURS 0 WITH HEADER LINE.

DATA : itab_mseg_li LIKE imseg_mkpf OCCURS 0 WITH HEADER LINE.

DATA : itab_merge LIKE imseg_mkpf OCCURS 0 WITH HEADER LINE.

DATA : itab_mbew LIKE imseg_mkpf OCCURS 0 WITH HEADER LINE.

DATA : xsum(1).

LOOP AT imseg_mkpf_e. " ASSIGNING <ls_imseg_mkpf_e>.

clear flag.

AT NEW matnr.

READ TABLE itab_mbew WITH KEY matnr = imseg_mkpf_e-matnr.

IF sy-subrc = '0'.

itab_mbew-min_qty = imseg_mkpf_e-lbkum.

ENDIF.

ENDAT.

IF imseg_mkpf_e-shkzg = 'S'.

sum_s = sum_s + imseg_mkpf_e-menge.

ELSEIF imseg_mkpf_e-shkzg = 'H'.

sum_h = sum_h + imseg_mkpf_e-menge.

ENDIF.

AT END OF matnr.

imseg_mkpf_e-s_stock = imseg_mkpf_e-lbkum - sum_s + sum_h.

flag = 'X'.

ENDAT.

IF flag = 'X'.

READ TABLE itab_mbew WITH KEY matnr = imseg_mkpf_e-matnr.

IF sy-subrc = '0'.

itab_mbew-max_qty = imseg_mkpf_e-lbkum.

imseg_mkpf_e-s_stock = imseg_mkpf_e-lbkum - sum_s + sum_h.

itab_mbew-s_stock = imseg_mkpf_e-e_stock - sum_s + sum_h.

itab_mbew-e_stock = imseg_mkpf_e-e_stock.

MODIFY itab_mbew.

ENDIF.

ENDLOOP.

Re: ERR in ITAB

Former Member — Tue, 18 Jul 2006 05:56:43 GMT

i get dump on modify itab_mbew

Re: ERR in ITAB

Former Member — Tue, 18 Jul 2006 05:58:19 GMT

then you should use.

MODIFY IT_MBEW.

instead MODIFY IT_MBEW INDEX SY-TABIX.

Re: ERR in ITAB

Former Member — Tue, 18 Jul 2006 05:59:39 GMT

Hi rani,

You declare itab_mbew as work area.

Then modify itab from wa would work.

Azaz.

Re: ERR in ITAB

naimesh_patel — Tue, 18 Jul 2006 06:03:39 GMT

Hello,

Use Modify statement with some where condition. like modify itab_mbew where matnr = l_matnr.

Because you are not using workarea of itab_mbew anywhere in the loop.

Regards,

Naimesh

Re: ERR in ITAB

Former Member — Tue, 18 Jul 2006 06:16:08 GMT

Hi Rani,

Store the SY-TABIX after the READ statement in one variable and then modify using INDEX option in READ.


<b>DATA : indx TYPE sy-tabix.</b>

IF flag = 'X'.
  READ TABLE itab_mbew WITH KEY matnr = imseg_mkpf_e-matnr.

  IF sy-subrc = '0'.

<b>    indx = sy-tabix.</b>

    itab_mbew-max_qty = imseg_mkpf_e-lbkum.
* imseg_mkpf_e-s_stock = imseg_mkpf_e-lbkum - sum_s + sum_h.
    itab_mbew-s_stock = imseg_mkpf_e-e_stock - sum_s + sum_h.
* itab_mbew-e_stock = imseg_mkpf_e-e_stock.

<b>    MODIFY itab_mbew INDEX indx.

    CLEAR indx.</b>

  ENDIF.
ENDIF.

Regards,

Arun Sambargi.