Skip to Content
0
Former Member
Apr 21, 2008 at 01:45 PM

Performance issue

12 Views

Hi,

Is there any way to improve Performance other than the loop statement..

FORM first_working_day.

DATA: save40(1).

CLEAR: firstday, save40.

LOOP AT it_p0041 INTO wa_p0041.

CLEAR f_date.

DO 12 TIMES

VARYING f_date FROM wa_p0041-dar01 NEXT wa_p0041-dar02.

IF f_date-dar EQ '40'.

firstday = f_date-dat.

save40 = 'X'.

ENDIF.

ENDDO.

ENDLOOP.

IF save40 IS INITIAL.

PERFORM error_list USING 'PA0041' text-e09.

ENDIF.