*&---------------------------------------------------------------------*
*& Report ZTCXHTEST_RUNTIME_ANALYSIS
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT ZTCXHTEST_RUNTIME_ANALYSIS.
DATA: wa_carrid TYPE spfli-carrid,
wa_caonid TYPE spfli-connid,
wa_carrname TYPE scarr-carrname.
DATA: t1 TYPE i,
t2 TYPE i,
time TYPE i,
n TYPE i VALUE 1000.
DO n TIMES.
GET RUN TIME FIELD t1.
SELECT carrid connid FROM spfli
INTO (wa_carrid, wa_caonid) WHERE cityfrom = 'SINGAPORE'.
SELECT carrname FROM scarr
INTO wa_carrname WHERE carrid = wa_carrid.
ENDSELECT.
ENDSELECT.
GET RUN TIME FIELD t2.
time = time + t2 - t1.
ENDDO.
WRITE: 'runtime:', time.
abap GET RUN TIME f 程序性能分析
猜你喜欢
转载自caoxuhuan.iteye.com/blog/927492
今日推荐
周排行