topic Re: Remove duplicate entries from Internal Table in Application Development and Automation Discussions

Remove duplicate entries from Internal Table

Former Member — Wed, 30 Apr 2008 08:54:21 GMT

Hi,

There is an internal table with following records

SNO TAXAMOUNT MWSKZ

1450044 2 D5

1450044 8 SS

1450044 2 SW

1450044 8 SS

Now i want to remove the dupliactes entries from his internal table without sorting . How to do that??

Re: Remove duplicate entries from Internal Table

Sm1tje — Wed, 30 Apr 2008 08:56:39 GMT

If you really want it without sorting, then create a copy of original internal table and cross check both internal tables.

Re: Remove duplicate entries from Internal Table

Former Member — Wed, 30 Apr 2008 08:57:30 GMT

Hi,

You can write

delete adjacent duplicates from internal table name comparing SNO TAXAMOUNT MWSKZ.

this would delete the duplicates.

Thanks,

Guru.

**Reward if helpful

Re: Remove duplicate entries from Internal Table

Former Member — Wed, 30 Apr 2008 08:57:59 GMT

and how to cross check both internal table? Kindly code it.

Re: Remove duplicate entries from Internal Table

kiran_k8 — Wed, 30 Apr 2008 08:58:34 GMT

Anurodh,

Deleting adjacent duplicates without sorting will get you wrong result.It is a must to sort the internal table before using delete adjacent duplicates.

SORT itab ASCENDING BY kunrg.

DELETE ADJACENT DUPLICATES FROM itab COMPARING kunrg.

K.Kiran.

Re: Remove duplicate entries from Internal Table

anversha_s — Wed, 30 Apr 2008 09:00:21 GMT

hi,

Suppose your internal table name is ITAB1.

do like this.

itab2[] = itab1[].

sort itab2.

delete adjacent duplicates from itab2 comparing SNO TAXAMOUNT MWSKZ.

Regards,

Anversha

Re: Remove duplicate entries from Internal Table

Former Member — Wed, 30 Apr 2008 09:00:42 GMT

No ur code does not remove duplicates. I already tried it

Re: Remove duplicate entries from Internal Table

Former Member — Wed, 30 Apr 2008 09:02:11 GMT

hi without sorting you can delete entries in this way:

loop at itab into wa1.

count = 0.

loop at itab into wa2.

if wa2 = wa1 .

count = count + 1.

if count > 1.

delete itab from wa1.

endif.

endloop.

reward if useful.

Re: Remove duplicate entries from Internal Table

Former Member — Wed, 30 Apr 2008 09:09:31 GMT

say tne internal table u used is itab.

now do this:

itab1[] = itab[].

sort itab1 by SNO TAXAMOUNT .

delete adjacent duplicates from itab1 comparing SNO TAXAMOUNT .

loop at itab.

read table itab1 with key SNO = itab-SNO

TAXAMOUNT = itab1-TAXAMOUNT .

if sy-subrc = 0.

else.

< processaccordingly>

endif.

endloop.

Re: Remove duplicate entries from Internal Table

Former Member — Wed, 30 Apr 2008 09:10:38 GMT

Hi,

this code may help.

DATA : BEGIN OF ls_table ,

SNO(7),

TAXAMOUNT(1),

MWSKZ(2),

END OF ls_table .

DATA : lt_table like ls_table OCCURS 0 WITH HEADER LINE .

DATA : lv_tabix like sy-tabix.

lt_table-SNO = '1450044' .

lt_table-TAXAMOUNT = '2' .

lt_table-MWSKZ = 'D5' .

APPEND lt_table.

lt_table-SNO = '1450044' .

lt_table-TAXAMOUNT = '8' .

lt_table-MWSKZ = 'SS' .

APPEND lt_table.

lt_table-SNO = '1450044' .

lt_table-TAXAMOUNT = '2' .

lt_table-MWSKZ = 'SW' .

APPEND lt_table.

lt_table-SNO = '1450044' .

lt_table-TAXAMOUNT = '8' .

lt_table-MWSKZ = 'SS' .

APPEND lt_table.

LOOP AT lt_table.

lv_tabix = sy-tabix.

READ TABLE lt_table WITH KEY SNO = lt_table-SNO

TAXAMOUNT = lt_table-TAXAMOUNT

MWSKZ = lt_table-MWSKZ .

if sy-subrc eq 0.

if lv_tabix ne sy-tabix.

DELETE lt_table.

endif.

ENDLOOP.

Re: Remove duplicate entries from Internal Table

Former Member — Wed, 30 Apr 2008 09:12:05 GMT

Your code gives dump error.

Re: Remove duplicate entries from Internal Table

Former Member — Wed, 30 Apr 2008 09:14:18 GMT

hi,

write a simple code.

DELETE ADJACENT DUPLICATES FROM ITAB.

Re: Remove duplicate entries from Internal Table

Former Member — Wed, 30 Apr 2008 09:18:45 GMT

Hi ,

try this code,

itab1[] = itab[].

loop at itab1 into wa_itab1

l_tabix = sy-tabix.

delete itab where ( compare ur fields with wa_itab1 fields ) and index <> l_tabix.

endloop.

reward points if usful.

regards,

muralidhar.

Re: Remove duplicate entries from Internal Table

Former Member — Wed, 30 Apr 2008 09:26:13 GMT

hi use this delete statement in previous code

delete table itab from wa1.

reward if useful.