recreate exception ex_fail_01 'failed value: @1, severity: @1';
recreate exception ex_fail_02 'failed value: @1, severity: @1';
recreate exception ex_fail_03 'failed value: @1, severity: @1';
recreate table fails_log(dts timestamp default 'now', fail_name varchar(31));
commit;

execute block as
declare n int;
begin
  n = rand()*10;
  if (n < 3 ) then exception ex_fail_01 using (n, 1);
  else if (n < 7) then exception ex_fail_02 using (n, 2);
  else exception ex_fail_03 using (n, 3);
when exception ex_fail_01 do
  in autonomous transaction do insert into fails_log(fail_name) values('ex_fail_01');
when exception ex_fail_02 do
  in autonomous transaction do insert into fails_log(fail_name) values('ex_fail_02');
when exception ex_fail_03 do
  in autonomous transaction do insert into fails_log(fail_name) values('ex_fail_03');
end

when exception ex_fail_01 do
  in autonomous transaction do insert into fails_log(fail_name) values( current_exception );