fun2 ex

CREATE OR REPLACE
FUNCTION del_inc(nin IN incidencias.numincidencia%TYPE) RETURN
VARCHAR IS

pepe VARCHAR(4000) := ' ';

BEGIN
  SELECT j.nombre || ' ' || j.demarcacion
  INTO pepe
  FROM  incidencias i, jugadores j
  WHERE i.numincidencia = nin AND i.codjugador = j.codjugador;
  
  DELETE
  FROM incidencias i
  WHERE i.numincidencia = nin;
  COMMIT;
  
  RETURN pepe;
  
  EXCEPTION
  WHEN NO_DATA_FOUND THEN
    RETURN 'NO EXISTE LA INCIDENCIA';

END del_inc;

/**Llamar a funcion **/
SET SERVEROUTPUT ON

BEGIN
DBMS_OUTPUT.PUT_LINE(del_inc(10000));

END;