Need help to do Perform

Hi ,

i have this code that return 7 times maybe i can do one perform

for all this code?

i new with this Topic

Regards

*---------first time-------*

  CONCATENATE : eff_per_begin+2(4)  eff_per_begin+0(2) INTO eff_per_begin,
                eff_per_end+2(4) eff_per_end+0(2)  INTO  eff_per_end.

  LOOP AT it_tab ASSIGNING <it_tab>
    WHERE dim0calmonth GE eff_per_begin
    AND   dim0calmonth LE  eff_per_end.
    APPEND <it_tab> TO efficiency_tab.
  ENDLOOP.

  LOOP AT efficiency_tab ASSIGNING <efficiency_tab>.
    MOVE-CORRESPONDING  <efficiency_tab> TO wa_eff_tmp.
    APPEND wa_eff_tmp TO eff_tmp.
    CLEAR wa_eff_tmp.
  ENDLOOP.

  LOOP AT eff_tmp INTO wa_eff_tmp.
    COLLECT wa_eff_tmp INTO eff_col.
  ENDLOOP.

*----------seconed-------*

  CONCATENATE : over_per_beg+2(4)  over_per_beg+0(2) INTO  over_per_beg,
                over_per_end+2(4) over_per_end+0(2)  INTO  over_per_end.

  LOOP AT it_tab ASSIGNING <it_tab>
    WHERE dim0calmonth GE over_per_beg
    AND   dim0calmonth LE over_per_end.
    APPEND <it_tab> TO overtime_tab.
  ENDLOOP.

  LOOP AT effi_tab ASSIGNING <effi_tab>.
    MOVE-CORRESPONDING  <effi_tab> TO wa_over_tmp.
    APPEND wa_over_tmp TO over_tmp.
    CLEAR wa_over_tmp.
  ENDLOOP.

  LOOP AT over_tmp INTO wa_over_tmp.
    COLLECT wa_over_tmp INTO over_col.
  ENDLOOP.

and so on.... 7 times

Regards