Codice: Seleziona tutto
CREATE OR REPLACE PROCEDURE ricerca_per_cognome(cognome IN VARCHAR2) AS
dip_nome roberto.dipendente.nome%TYPE;
dip_cognome roberto.dipendente.cognome%TYPE;
dip_email roberto.dipendente.email%TYPE;
BEGIN
SELECT nome, cognome, email
INTO dip_nome, dip_cognome, dip_email
FROM DIPENDENTE
WHERE cognome = ricerca_per_cognome.cognome;
DBMS_OUTPUT.PUT_LINE('Trovato il seguente dipendente: ' || dip_cognome || ' ' || dip_nome || ' ' || dip_email);
EXCEPTION
WHEN NO_DATA_FOUND THEN
DBMS_OUTPUT.PUT_LINE('Nessun dipendente trovato con il dato ID');
WHEN TOO_MANY_ROWS THEN
DBMS_OUTPUT.PUT_LINE('Con il dato ID esistono diversi dipendenti');
END;
Codice: Seleziona tutto
ricerca_per_cognome.cognome
Roberto Basile