DECLARE
grade CHAR(1);
BEGIN
grade := 'B';
CASE
WHEN grade = 'A' THEN dbms_output.Put_line('Excellent');
WHEN grade = 'B' THEN dbms_output.Put_line('Very Good');
WHEN grade = 'C' THEN dbms_output.Put_line('Good');
WHEN grade = 'D' THEN dbms_output.Put_line('Fair');
WHEN grade = 'F' THEN dbms_output.Put_line('Poor');
ELSE dbms_output.Put_line('No such grade');
END CASE;
END;
-- rather than using the ELSE in the CASE, could use the following
-- EXCEPTION
-- WHEN CASE_NOT_FOUND THEN
-- DBMS_OUTPUT.PUT_LINE('No such grade');
/
Using the Searched CASE Statement
0 comments:
Post a Comment