Antag, at du har oprettet en procedure for at udføre en enkelt opgave med forskellig logik, og du vil kontrollere præcis, hvilken procedure der fungerer godt. Se nedenstående eksempel:
erklær
i PLS_INTEGER;
BEGIN
--test 1
Ora_Prof.Create_Timer('test1');
Ora_Prof.Start_Timer('test1');
yourprogramunitwithsomelogic;
Ora_Prof.Stop_Timer('test1');
besked('Test 1 tid taget '||Ora_Prof.Elapsed_Time('test1'), anerkend);
Ora_Prof.Destroy_Timer('test1');
-- test 2
Ora_Prof.Create_Timer('test2');
Ora_Prof.Start_Timer('test2');
din programenhed med en anden logik;
Ora_Prof.Stop_Timer('test2');
message('Test 2 tid taget '||Ora_Prof.Elapsed_Time('test2'),acknowledge);
message('Test 2 tid taget '||Ora_Prof .Elapsed_Time('test2'),acknowledge);
Ora_Prof.Destroy_Timer('test2');
END;
Det vil give resultatet i millisekunder, og nu kan du analysere, hvilket program der fungerer godt.
Se også:
Oprettelse, stop, genstart af timer i Oracle Forms
Juster Oracle Forms PLSQL-kode ved hjælp af timeren
