declare
l_processname varchar2(128 char) := 'PROCESS_01';
begin
UC_PROGRESSBAR_PKG.start_process(p_process_name => l_processname,
p_maxval => 100);
for i in 1..10
loop
-- Pause for 0.5 second.
UC_PROGRESSBAR_PKG.set_status(p_process_name => l_processname,
p_value => i*10,
p_process_text => 'completed');
if i > 5
then
UC_PROGRESSBAR_PKG.error_process(p_process_name => l_processname
,p_process_error => 'PROCESS Error in 6th loop record.');
exit;
end if;
sys.DBMS_SESSION.sleep(0.5);
end loop;
end;