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

Re: performance tuning

$
0
0

Hi Mudit,

 

Please check the below code.

 

SORT I_CDHDR BY OBJECTCLAS OBJECTID CHANGENR.

SORT I_CDPOS BY OBJECTCLAS OBJECTID CHANGENR.


DATA : LV_IDX TYPE SY-TABIX.

 

LOOP AT I_CDPOS INTO WA_CDPOS.

       MOVE-CORRESPONDING WA_CDPOS TO WA_OUT.

       READ TABLE I_CDHDR INTO WA_CDHDR

                          WITH KEY OBJECTCLAS = WA_CDPOS-OBJECTCLAS

                                                 OBJECTID = WA_CDPOS-OBJECTID

                                              CHANGENR = WA_CDPOS-CHANGENR BINARY SEARCH.

       IF SY-SUBRC EQ 0.

         LV_IDX = SY-TABIX.

         LOOP AT I_CDHDR INTO WA_CDHDR FROM LV_IDX .

           IF WA_CDHDR-OBJECTCLAS = WA_CDPOS-OBJECTCLAS AND

                    WA_CDHDR-OBJECTID = WA_CDPOS-OBJECTID AND

                 WA_CDHDR-CHANGENR = WA_CDPOS-CHANGENR  .

             MOVE-CORRESPONDING WA_CDHDR TO WA_OUT.

             APPEND WA_OUT TO I_OUT.

             CLEAR WA_OUT.

           ELSE.

             CLEAR WA_OUT.

             EXIT.

           ENDIF.

         ENDLOOP.

       ELSE.

         CONTINUE.

       ENDIF.

     ENDLOOP.


Regards,

Jitendra


Viewing all articles
Browse latest Browse all 8430

Trending Articles



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