Re: CMOD User Exit Variable ABAP Logic Optimizing

Hi,

Write a code like below..

LOOP AT IT_TPCTR INTO WA_IT_TPCTR.
*Read - 1
      READ TABLE IT_STORES INTO WA_IT_STORES
         WITH KEY /BIC/ZSDXSEGMT = WA_IT_TPCTR-/BIC/ZSDXSEGMT.
      IF SY-SUBRC = 0.
        L_S_RANGE-LOW = WA_IT_TPCTR-PROFIT_CTR.
        INSERT L_S_RANGE INTO TABLE E_T_RANGE.

    else.
      READ TABLE IT_STORES INTO WA_IT_STORES
        WITH KEY /BIC/ZSDXSEGMT = WA_IT_TPCTR-/BIC/ZSDXSUBSG.
      IF SY-SUBRC = 0.
        L_S_RANGE-LOW = WA_IT_TPCTR-PROFIT_CTR.
        INSERT L_S_RANGE INTO TABLE E_T_RANGE.

                else.

      READ TABLE IT_STORES INTO WA_IT_STORES
        WITH KEY /BIC/ZSDXSEGMT = WA_IT_TPCTR-/BIC/ZSDXBUSA.
      IF SY-SUBRC = 0.
        L_S_RANGE-LOW = WA_IT_TPCTR-PROFIT_CTR.
        INSERT L_S_RANGE INTO TABLE E_T_RANGE.
     
                    else.
      READ TABLE IT_STORES INTO WA_IT_STORES
         WITH KEY /BIC/ZSDXSEGMT = WA_IT_TPCTR-/BIC/ZSDXCTRCT.
      IF SY-SUBRC = 0.
        L_S_RANGE-LOW = WA_IT_TPCTR-PROFIT_CTR.
        INSERT L_S_RANGE INTO TABLE E_T_RANGE.
    
                              else.
      READ TABLE IT_STORES INTO WA_IT_STORES
        WITH KEY /BIC/ZSDXSEGMT = WA_IT_TPCTR-/BIC/ZSDXSITE.
      IF SY-SUBRC = 0.
        L_S_RANGE-LOW = WA_IT_TPCTR-PROFIT_CTR.
        INSERT L_S_RANGE INTO TABLE E_T_RANGE.
      ENDIF.

endif.

endif.

endif.

endif.
    ENDLOOP.

Regards,

Arivazhagan S