Anta att du har skapat en procedur för att utföra en enskild uppgift med annan logik och du vill kontrollera exakt vilken procedur som fungerar bra. Se exemplet nedan:
deklarera
i PLS_INTEGER;
BEGIN
--test 1
Ora_Prof.Create_Timer('test1');
Ora_Prof.Start_Timer('test1');
yourprogramunitwithsomelogic;
Ora_Prof.Stop_Timer('test1');
meddelande('Test 1 tid tagit '||Ora_Prof.Elapsed_Time('test1'), kvittera);
Ora_Prof.Destroy_Timer('test1');
-- test 2
Ora_Prof.Create_Timer('test2');
Ora_Prof.Start_Timer('test2');
din programenhet med en annan logik;
Ora_Prof.Stop_Timer('test2');
message('Test 2 tid taget '||Ora_Prof.Elapsed_Time('test2'),acknowledge);
message('Test 2 tid tagit '||Ora_Prof .Elapsed_Time('test2'),acknowledge);
Ora_Prof.Destroy_Timer('test2');
END;
Det kommer att ge resultatet i millisekunder och nu kan du analysera vilket program som fungerar bra.
Se även:
Skapa, stoppa, starta om timer i Oracle Forms
Justera Oracle Forms PLSQL-kod med hjälp av timer
