Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

Internal Table

Former Member
0 Likes
479

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

t_plan

stlnr aennr

1000

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

5 REPLIES 5
Read only

Former Member
0 Likes
463

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.

Read only

Former Member
0 Likes
463

Hi

or

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

Read only

Former Member
0 Likes
463

Hi,

You can do as below :


sort t_plan by stlnr.

delete adjacent duplicates from t_plan comparing stlnr.

Thanks,

Sriram Ponna.

Read only

Former Member
0 Likes
463

hi

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^

Read only

former_member195698
Active Contributor
0 Likes
463

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,

Aj