on 03-08-2011 7:21 AM
Hi gurus,
my codes like this. BUt Although ı have just 1000 records in my internal table,
it works so slow. What may be the problem? Do you have any idea?
Thanks in advance.....
LOOP AT object_tab ASSIGNING <gs_object_tab>.
**********************************************************************
object_tab_son-qmnum = <gs_object_tab>-qmnum.
object_tab_son-tplnr = <gs_object_tab>-tplnr.
object_tab_son-pltxt = <gs_object_tab>-pltxt.
object_tab_son-qmtxt = <gs_object_tab>-qmtxt.
object_tab_son-equnr = <gs_object_tab>-equnr.
object_tab_son-eqtxt = <gs_object_tab>-eqtxt.
object_tab_son-ausvn = <gs_object_tab>-ausvn.
object_tab_son-ausbs = <gs_object_tab>-ausbs.
object_tab_son-auztv = <gs_object_tab>-auztv.
object_tab_son-auztb = <gs_object_tab>-auztb.
object_tab_son-msaus = <gs_object_tab>-msaus.
object_tab_son-mzeit = <gs_object_tab>-mzeit.
object_tab_son-qmdat = <gs_object_tab>-qmdat.
object_tab_son-qmdab = <gs_object_tab>-qmdab.
object_tab_son-ERDAT = <gs_object_tab>-ERDAT.
object_tab_son-AEDAT = <gs_object_tab>-AEDAT.
object_tab_son-ERZEIT = <gs_object_tab>-ERZEIT.
object_tab_son-AEZEIT = <gs_object_tab>-AEZEIT.
object_tab_son-aufnr = <gs_object_tab>-aufnr.
" object_tab_son-abctx = <gs_object_tab>-abctx.
" object_tab_son-abckz = <gs_object_tab>-abckz.
object_tab_son-QMZAB = <gs_object_tab>-QMZAB.
WA_TIME = <gs_object_tab>-auztv + 59.
if ( <gs_object_tab>-qmdat < <gs_object_tab>-ausvn ) or
( <gs_object_tab>-qmdat eq <gs_object_tab>-ausvn and <gs_object_tab>-mzeit < WA_TIME ).
DELETE object_tab where qmnum eq <gs_object_tab>-qmnum.
CONTINUE.
endif.
******************************************************************
"***************************************************
deger = 0.
deger2 = 0.
deger3 = 0.
*************************************************"BAKIM SURESI
CALL FUNCTION 'SWI_DURATION_DETERMINE'
EXPORTING
START_DATE = <gs_object_tab>-ERDAT
END_DATE = <gs_object_tab>-AEDAT
START_TIME = <gs_object_tab>-ERZEIT
END_TIME = <gs_object_tab>-AEZEIT
IMPORTING
DURATION = zaman1.
deger = zaman1 / 60 / 60.
object_tab_son-ZZTIMEDIFF2 = deger.
object_tab_son-ZUNIT2 = 'H'.
*****************************************************"BEKLEME SURESI
CALL FUNCTION 'SWI_DURATION_DETERMINE'
EXPORTING
START_DATE = <gs_object_tab>-QMDAT
END_DATE = <gs_object_tab>-ERDAT
START_TIME = <gs_object_tab>-MZEIT
END_TIME = <gs_object_tab>-ERZEIT
IMPORTING
DURATION = zaman2.
deger2 = zaman2 / 60 / 60.
object_tab_son-ZZTIMEDIFF1 = deger2.
object_tab_son-ZUNIT1 = 'H'.
*********************************************
"""""""""""""""""""""""""""""""""""""""""""GECIKME SURESI
CALL FUNCTION 'SWI_DURATION_DETERMINE' "GECIKME SURESI
EXPORTING
START_DATE = <gs_object_tab>-ausvn
END_DATE = <gs_object_tab>-QMDAT
START_TIME = <gs_object_tab>-auztv
END_TIME = <gs_object_tab>-mzeit
IMPORTING
DURATION = zaman3.
deger3 = zaman3 / 60 / 60.
object_tab_son-ZZTIMEDIFF5 = deger3.
object_tab_son-ZUNIT5 = 'H'.
"""""""""""""""""""""""""""""""""""""""""""Toplam Çalu0131u015Fu0131lan Süre
SELECT single aufnr sum( ismnw ) from afru INTO shared_tab
WHERE aufnr eq <gs_object_tab>-aufnr group by aufnr.
object_tab_son-ZZTIMEDIFF4 = shared_tab-ismnw / 60.
object_tab_son-ZUNIT4 = 'H'.
"*****************************************"Toplam Aru0131za Suresi
object_tab_son-ZZTIMEDIFF3 = deger + deger2.
object_tab_son-ZUNIT3 = 'H'.
ENDLOOP.
PERFORM DISPLAY_DATA.
Hi,
Execute this code and post the STAD record relevant to the run so we can see where the program is spending most of his time.
Cheers,
Maurício
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.