topic Re: Internal Table in Application Development and Automation Discussions

Internal Table

Former Member — Thu, 21 Feb 2008 12:18:23 GMT

Hi Iam having a internal table t_plan which contains records like this way

t_plan

stlnr aennr

1000

1001 51246

1002 51247

1002

1003 12456

1003

i Want to delete adjacent duplicates comparing with stlnr ?

How to do this ?

I want ouput lik this :

1000

1001 51246

1002 51247

1003 12456

Regs ,

Murthy

Re: Internal Table

Former Member — Thu, 21 Feb 2008 12:19:54 GMT

see this code.

u can delete duplicates from ur records like this.

DATA: BEGIN OF connection,

cityfrom TYPE spfli-cityfrom,

cityto TYPE spfli-cityto,

distid TYPE spfli-distid,

distance TYPE spfli-distance,

END OF connection.

DATA connection_tab LIKE SORTED TABLE OF connection

WITH NON-UNIQUE KEY cityfrom cityto

distid distance.

SELECT cityfrom cityto distid distance

FROM spfli

INTO TABLE connection_tab.

DELETE ADJACENT DUPLICATES FROM connection_tab.

Re: Internal Table

Former Member — Thu, 21 Feb 2008 12:21:43 GMT

try this


sort table t_plant by stlnr.
delete adjacent duplicates from t_plant comparing stlnr.

<REMOVED BY MODERATOR>

Edited by: Alvaro Tejada Galindo on Feb 21, 2008 3:27 PM

Re: Internal Table

Former Member — Thu, 21 Feb 2008 12:27:12 GMT

Hi,

You can do as below :


sort t_plan by stlnr.

delete adjacent duplicates from t_plan comparing stlnr.

Thanks,

Sriram Ponna.

Re: Internal Table

Former Member — Thu, 21 Feb 2008 12:28:28 GMT

good

check this report and use accordingly.

REPORT zintoperations.

TYPES:BEGIN OF itab,

num TYPE i,

name(10) TYPE c,

amt TYPE i,

END OF itab.

DATA : wa_itab TYPE itab,

it_itab TYPE STANDARD TABLE OF itab.

DATA : v_lines TYPE i.

wa_itab-num = 1.

wa_itab-name = 'nag'.

wa_itab-amt = 1000.

APPEND wa_itab TO it_itab.

wa_itab-num = 1.

wa_itab-name = 'nag'.

wa_itab-amt = 2000.

APPEND wa_itab TO it_itab.

wa_itab-num = 1.

wa_itab-name = 'nag'.

wa_itab-amt = 1500.

APPEND wa_itab TO it_itab.

wa_itab-num = 2.

wa_itab-name = 'sri'.

wa_itab-amt = 500.

APPEND wa_itab TO it_itab.

wa_itab-num = 2.

wa_itab-name = 'sri'.

wa_itab-amt = 600.

APPEND wa_itab TO it_itab.

wa_itab-num = 2.

wa_itab-name = 'sri'.

wa_itab-amt = 700.

APPEND wa_itab TO it_itab.

wa_itab-num = 3.

wa_itab-name = 'ganesh'.

wa_itab-amt = 1200.

APPEND wa_itab TO it_itab.

wa_itab-num = 3.

wa_itab-name = 'ganesh'.

wa_itab-amt = 1300.

APPEND wa_itab TO it_itab.

wa_itab-num = 3.

wa_itab-name = 'ganesh'.

wa_itab-amt = 1400.

APPEND wa_itab TO it_itab.

wa_itab-num = 4.

wa_itab-name = 'suresh'.

wa_itab-amt = 900.

APPEND wa_itab TO it_itab.

wa_itab-num = 4.

wa_itab-name = 'suresh'.

wa_itab-amt = 300.

APPEND wa_itab TO it_itab.

LOOP AT it_itab INTO wa_itab.

WRITE:/ sy-tabix, wa_itab-num , wa_itab-name , wa_itab-amt.

ENDLOOP.

DELETE ADJACENT DUPLICATES FROM it_itab COMPARING num.

LOOP AT it_itab INTO wa_itab.

modify it_itab from wa_itab.

WRITE:/ sy-tabix, wa_itab-num , wa_itab-name , wa_itab-amt.

ENDLOOP.

thanks

mrutyun^

Re: Internal Table

former_member195698 — Thu, 21 Feb 2008 20:33:10 GMT

Hi,

You should use

sort table t_plant by stlnr aennr descending.

delete adjacent duplicates from t_plant comparing stlnr.

You have to sort the table with field AENNR as descending so that the Records with AENNR as SPACE come at the end and are deleted when you do sort and delete.

Regards,