CASE STATEMENT ERRORS

Question

Hi all,
I have created a PLSQL code which is as follows:
create or replace procedure case_statement is
pi constant number(9, 7) := 3.1415927;
area number(14, 2);
cursor rad_cursor is
select * from radius_vals;
rad_val rad_cursor%rowtype;
begin
open rad_cursor;
loop
fetch rad_cursor
into rad_val;
exit when rad_cursor%notfound;
area := pi * power(rad_val.radius, 2);
case
when rad_val.radius = 3 then
insert into areas_case values (rad_val.radius, area);
when rad_val.radius = 4 then
insert into areas_case values (rad_val.radius, area);
when rad_val.radius = 10 then
insert into areas_case values (0, 0);
else
raise CASE_NOT_FOUND;
end case;
end loop;
close rad_cursor;
end case_statement;
When I execute this code I get these error messages:
ORA - 06592: CASE not found while executing CASE statement.
ORA - 06512: at "SCOTT.CASE_STATEMENT" line 24
ORA - 06512: at line 3
How do I resolve this problem?

Answer 1

How do I resolve this problem? Well your code raise CASE_NOT_FOUND in the else clause. So either do something different rad_val.radius is not equal to any of the tested values or give your code an exception handler.
Cheers, APC