Instrukcja warunkowa CASE
Instrukcję CASE możemy stosować zamiast IF-THEN_ELSIF w niektórych przypadkach, jest ona bardziej czytelna i podobno bardziej wydajna. Ja w swojej praktyce instrukcję CASE stosowałem w przypadku tworzenia menu. Poniżej zademonstruję przykład żeby lepiej wytłumaczyć tą instrukcję.
DECLARE
litera CHAR(1);
BEGIN
litera := ‘A’;
CASE litera
WHEN ‘P’ THEN DBMS_OUTPUT.PUT_LINE(’Litera P jest w wyrazie PIES’);
WHEN ‘I’ THEN DBMS_OUTPUT.PUT_LINE(’Litera P jest w wyrazie PIES’);
WHEN ‘E’ THEN DBMS_OUTPUT.PUT_LINE(’Litera P jest w wyrazie PIES’);
WHEN ‘S’ THEN DBMS_OUTPUT.PUT_LINE(’Litera P jest w wyrazie PIES’);
ELSE DBMS_OUTPUT.PUT_LINE(’Litery: ‘ || litera ||’nie ma w wyrazie PIES’);
END CASE;
END;
/
Ten programik sprawdza czy podana przez nas litera jest w wyrazie PIES, jeżeli tak to daje na odpowiedni komunikat, jeżeli nie to informuje nas o tym że nie ma tej litery w wyrazie PIES.