Quantcast
Channel: SCN: Message List
Viewing all articles
Browse latest Browse all 8902

Re: How to remove dupliate rows with condition?

$
0
0

Hi Caroline K

 

Try like this

 

TYPES : BEGIN OF ty_final,
         a TYPE string,
         b TYPE string,
         c TYPE string,
         d TYPE string,
         e TYPE string,
         END OF ty_final.


DATA : it_final   TYPE TABLE OF ty_final,
        it_final_1 TYPE TABLE OF ty_final,
        wa_final   TYPE ty_final,
        wa_final_1   TYPE ty_final.

wa_final-a = '13057513'.
wa_final-b = 'A'.
wa_final-c = ''.
wa_final-d = ''.
wa_final-e = ''.
APPEND wa_final TO it_final.
CLEAR wa_final.

wa_final-a = '13057514'.
wa_final-b = 'B'.
wa_final-c = ''.
wa_final-d = ''.
wa_final-e = ''.
APPEND wa_final TO it_final.
CLEAR wa_final.

wa_final-a = '13057515'.
wa_final-b = 'P'.
wa_final-c = ''.
wa_final-d = ''.
wa_final-e = ''.
APPEND wa_final TO it_final.
CLEAR wa_final.


wa_final-a = '13057516'.
wa_final-b = 'S'.
wa_final-c = ''.
wa_final-d = ''.
wa_final-e = ''.
APPEND wa_final TO it_final.
CLEAR wa_final.

wa_final-a = '13057517'.
wa_final-b = 'S'.
wa_final-c = 'X'.
wa_final-d = '3/1/2013'.
wa_final-e = '1/31/2014'.
APPEND wa_final TO it_final.
CLEAR wa_final.

wa_final-a = '13057517'.
wa_final-b = 'S'.
wa_final-c = ''.
wa_final-d = ''.
wa_final-e = ''.
APPEND wa_final TO it_final.
CLEAR wa_final.

wa_final-a = '13057517'.
wa_final-b = 'S'.
wa_final-c = 'X'.
wa_final-d = '2/1/2014'.
wa_final-e = '5/31/2014'.
APPEND wa_final TO it_final.
CLEAR wa_final.


wa_final-a = '13068299'.
wa_final-b = 'S'.
wa_final-c = ''.
wa_final-d = ''.
wa_final-e = ''.
APPEND wa_final TO it_final.
CLEAR wa_final.

wa_final-a = '13057519'.
wa_final-b = 'S'.
wa_final-c = ''.
wa_final-d = ''.
wa_final-e = ''.
APPEND wa_final TO it_final.
CLEAR wa_final.

wa_final-a = '13057519'.
wa_final-b = 'S'.
wa_final-c = 'X'.
wa_final-d = '9/1/2013'.
wa_final-e = '6/30/2014'.
APPEND wa_final TO it_final.
CLEAR wa_final.


it_final_1 = it_final.

DELETE it_final_1 WHERE  C = ''.

SORT : IT_FINAL BY A B C.
SORT : IT_FINAL_1 BY A B C.

lOOP AT IT_FINAL INTO WA_FINAL.
IF wa_final-c ne 'X'.
READ TABLE IT_FINAL_1 INTO WA_FINAL_1 WITH KEY A = WA_FINAL-A
                                                B = WA_FINAL-B.
IF SY-SUBRC = 0.
DELETE IT_FINAL.
ENDIF.
ENDIF.
ENDLOOP.

CLEAR WA_FINAL.

lOOP AT IT_FINAL INTO WA_FINAL.
wRITE : / WA_FINAL-A,
           WA_FINAL-B,
           WA_FINAL-C,
           WA_FINAL-D,
           WA_FINAL-E.
ENDLOOP.




Viewing all articles
Browse latest Browse all 8902

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>