topic Re: internal table in Application Development and Automation Discussions

internal table

Former Member — Thu, 15 May 2008 10:44:43 GMT

I have an internal table

I need to move selected records into another internal table

the criteria is to check bsid-xblnr and if two or more records have same xblnr then sum bsid-wrbtr

Record no bsid-xblnr bsid-wrbtr

1 111 10

2 111 20

3 111 5

I need to make this one record and move to another internal table

record no bsid-xblnr bsid-wrbtr

1 111 35

How can I do this

Re: internal table

Former Member — Thu, 15 May 2008 10:47:49 GMT

hi,

loop at itab.

at end of xblnr.

collect...

endat.

endloop.

regards,

madhumitha

Re: internal table

Former Member — Thu, 15 May 2008 10:48:33 GMT


loop at itab into wa.
  wa2-wrbtr = wa2-wrbtr + wa-wrbtr.
  wa2-xblnr = wa-xblnr.
  at new xblnr.
    append wa2 to itab2.
    clear wa2.
  endat.
endloop.

Re: internal table

prasanth_kasturi — Thu, 15 May 2008 10:49:12 GMT

hi,

do the following

loop at bsid.

at new xblnr.

sum.

move-corresponding bsid to <2nd itab>.

endat.

endloop.

check the following code

i populated the table according to your example, you query a SELECT statement according your need

TABLES : bsid.

DATA : BEGIN OF itab OCCURS 0,

xblnr LIKE bsid-xblnr,

wrbtr LIKE bsid-wrbtr,

END OF itab,

BEGIN OF itab1 OCCURS 0,

xblnr LIKE bsid-xblnr,

wrbtr LIKE bsid-wrbtr,

END OF itab1.

itab-xblnr = 111 .

itab-wrbtr = 10 .

APPEND itab.

CLEAR itab.

itab-xblnr = 111 .

itab-wrbtr = 20 .

APPEND itab.

CLEAR itab.

itab-xblnr = 111 .

itab-wrbtr = 5 .

APPEND itab.

CLEAR itab.

LOOP AT itab.

AT NEW xblnr.

SUM.

MOVE : itab-xblnr TO itab1-xblnr,

itab-wrbtr to itab1-wrbtr .

APPEND itab1.

endat.

ENDLOOP.

LOOP AT itab1.

WRITE : itab1-xblnr,

itab1-wrbtr.

ENDLOOP.

regards

prasanth

Re: internal table

Former Member — Thu, 15 May 2008 10:54:54 GMT

loop at bsid.

if xblnr = itab1-xblnr.

itab1-wrbtr1 = itab1-wrbtr + itab1-wrbtr.

else.

itab1-wrbtr1 = itab1-wrbtr.

endif.

dont use same as like what i told.

use the logic.

Re: internal table

Former Member — Thu, 15 May 2008 11:01:25 GMT

Hello,

Do this:


data: bsid2 like bsid[],
  ls_bsid like line of bsid.

sort bsid by xblnr.
loop at bsid into ls_bsid.
  collect ls_bsid into bsid2.
endloop.

Regards,

Re: internal table

Former Member — Thu, 15 May 2008 11:05:40 GMT

loop at itab.

itab1 = itab.

collect itab1.

clear itab.

endloop.

Regards,

madan.

Re: internal table

Former Member — Thu, 15 May 2008 11:14:40 GMT

Hi,

Use the below logic.

data: v_xblnr type bsid-xblnr,

v_count type bsid-wrbtr,.

v_flag.

read table itab index 1.

v_xblnr = itab-xblnr.

loop at itab.

if v_xblnr <> itab-xblnr.

v_xblnr = itab-xblnr.

itab1-wrbtr = v_count.

append itab1.

clear: itab1, v_count, v_flag.

endif.

v_count = v_count + itab-wrbtr.

if v_flag = ' '.

itab1-record = itab-record.

itab1-xblnr = itab-xblnr.

endif.

v_flag = 'X'.

endloop.

Re: internal table

asik_shameem — Thu, 15 May 2008 11:27:37 GMT

Do in this way.Here gt_itab will have final values.

LOOP AT gt_bsid INTO gw_bsid.
  COLLECT gw_bsid TO gt_itab.
ENDLOOP.