Да предположим, че сте създали процедура за изпълнение на една задача с различна логика и искате да проверите точно коя процедура се представя добре. Вижте примера по-долу:
declare
i PLS_INTEGER;
BEGIN
--test 1
Ora_Prof.Create_Timer('test1');
Ora_Prof.Start_Timer('test1');
вашият програмен модул сsomelogic;
Ora_Prof.Stop_Timer('test1');
message('Test 1 Time taken '||Ora_Prof.Elapsed_Time('test1'), acknowledge);
Ora_Prof.Destroy_Timer('test1');
-- тест 2
Ora_Prof.Create_Timer('test2');
Ora_Prof.Start_Timer('test2');
вашият програмен модул с друга логика;
Ora_Prof.Stop_Timer('test2');
message('Време за извършен тест 2 '||Ora_Prof.Elapsed_Time('test2'),acknowledge);
message('Време за тест 2 '||Ora_Prof .Elapsed_Time('test2'),acknowledge);
Ora_Prof.Destroy_Timer('test2');
END;
Това ще даде резултата за милисекунди и сега можете да анализирате коя програма работи добре.
Вижте също:
Създаване, спиране, повторно стартиране на таймер в Oracle Forms
Настройте PLSQL кода на Oracle Form с помощта на таймер
