topic Re: Internal Table in Application Development and Automation Discussions

Internal Table

Former Member — Thu, 05 Jul 2007 12:33:28 GMT

Hi,

I have two fields in the Internal table. Serial No, Description .

How can we find out in an internal table that there more than one record in the Internal table for a particular rserial no ?

Is it possible by using read ? . By using loop we can do it . But with out loop is there any another method ?

Bye,

Satya.

Re: Internal Table

Former Member — Thu, 05 Jul 2007 12:35:34 GMT

sy-tabix .

reward points if it is usefull

Girish

Re: Internal Table

Former Member — Thu, 05 Jul 2007 12:36:49 GMT

Hi,

Say you have data in ITAB.

now,

jtab[] = itab[].

delete jtab where serial no <> 1.

describe jtab lines line_count.

if line_count > 1.

more than 1 record.

endif.

Reward if useful.

Re: Internal Table

Former Member — Thu, 05 Jul 2007 12:36:55 GMT

How can we find out by sy-tabix ?

Can you please expain ?

Bye,

satya.

Re: Internal Table

Former Member — Thu, 05 Jul 2007 12:37:53 GMT

Yes..,

sort itab by serialno.

delete adjacent duplicates from itab comparing serialno.

if sy-subrc eq 0.

More than one record for same serial number----

else.

No multiple records-------

endif.

reward all helpful answers !!

regards,

sai ramesh

Re: Internal Table

Former Member — Thu, 05 Jul 2007 12:38:06 GMT

Use this one:

data: l_line type i,

l_line2 type i.

i_test2[] = i_test1[].

Describe table i_test1 lines l_line.

delete adjacent duplicates i_test1 comparing serial no.

Describe table i_test2 lines l_line2.

if i_l_line1 > l_line2.

"serial has more than one record

endif.

with this method u can find out how many records in your internal table.

Message was edited by:

Memeo

Re: Internal Table

Former Member — Thu, 05 Jul 2007 12:38:35 GMT

would u like to know are there repeated values

what are the values repeating?

IF the first case,

U can know, by comparing no of times triggering using At new and no of lines there in the I.Table, using describe statement.

Reward me if useful.

Re: Internal Table

Former Member — Thu, 05 Jul 2007 12:39:58 GMT

Hi,

This is only for particular record. But I have so many records in the internal table. For Every record I have to check it . Then Performance will decrese. Apart from this is there any another method ?

Bye,

Satya.

Re: Internal Table

Former Member — Thu, 05 Jul 2007 12:40:13 GMT

data : count type i.

count = 0.

itab_temp[] = itab[].

do 2 times.
read table itab_temp with key SNO = '001'.
if sy-sybrc eq 0.
count = count + 1.
delete  itab_temp.
endif.
enddo.

if count GT 1.

duplicate entry exists.

endif.

Re: Internal Table

LeonardoAraujo — Thu, 05 Jul 2007 12:40:20 GMT

A couple of ways:

sort and then delete adjacent duplicates would make sure you have no duplicates at all.

if you need to find the duplicates you could have made a read before inserting into it for example.

If you cannot and just want to evaluate your data, do the following:

sort ITAB.

loop at itab into wa_itab.

l_index = sy-tabix + 1.

read table itab into wa_duplicate_itab index l_index.

if sy-subrc = 0.

if wa_itab-serialnum = wa_duplucate_itab-serialnum.

append wa_duplicate_itab to duplicate_itab.

endif.

endloop.

This is a high performance approach: select with index.

Leonardo De Araujo

Re: Internal Table

Former Member — Thu, 05 Jul 2007 12:40:43 GMT

Hello,

Try this and reward if found helpfull.

Regards,

rakesh.


declare old_srno value 0.
sort your internal table by serial number.

loop at itab into wrk_area.
if old_srno = wrk_area-srno.
flg = 1.
endif.
old_srno = wrk_srno.
endloop.

Re: Internal Table

Former Member — Thu, 05 Jul 2007 12:44:58 GMT

You gotto use loop, what you can do is use WHERE in loop, i don't think its easy to find duplicate records using read

Re: Internal Table

Former Member — Thu, 05 Jul 2007 12:45:21 GMT

can we use two fields in delete adjacent duplicate comparin field1 feild 2 ?

bye,

satya.

Re: Internal Table

Former Member — Thu, 05 Jul 2007 12:49:25 GMT

yes you can use

DELETE ADJACENT DUPLICATES FROM ITAB COMPARING F1 F2.

Re: Internal Table

Former Member — Thu, 05 Jul 2007 12:53:37 GMT

delete adjacent duplicates returns sy-subrc ...

if it deletes at least one record then sy-subrc eq 0.

sort itab by serialno.

delete adjacent duplicates from itab comparing serialno.

if sy-subrc eq 0.

More than one record for same serial number----

else.

No multiple records-------

endif.

Please do remember to close the thread when ur problem is solved and reward all helpful answers !!!

regards,

sai ramesh

Re: Internal Table

Former Member — Thu, 05 Jul 2007 13:00:03 GMT

Loop at itab.

loop at itab where sernr = itab-sernr.

endloop.