rendered paste bodySET SERVEROUTPUT ON;
-- Esercizio 1
DECLARE
var1 VARCHAR (20) := 'ESAME';
var2 VARCHAR (20) := 'DI';
var3 VARCHAR (20) := 'SISTEMI';
var4 VARCHAR (20) := 'INFORMATIVI';
BEGIN
DBMS_OUTPUT.PUT_LINE('' || var1 || ' ' || var2 || ' ' || var3 || ' ' || var4 || '');
END;
-- Esercizio 2
CREATE FUNCTION "CF2Nome" (codicefiscale Fornitori.CFF%TYPE) IS
DECLARE
nome Fornitori.NomeF%TYPE;
BEGIN
SELECT NomeF INTO nome
FROM Fornitori
WHERE CFF = codicefiscale;
DBMS_OUTPUT.PUT_LINE('Nome fornitore: ' || nome || '');
EXCEPTION
WHEN NO_DATA_FOUND THEN
DBMS_OUTPUT.PUT_LINE('Nessun fornitore per: ' || codicefiscale || '');
END;