Ver Mensaje Individual
  #1 (permalink)  
Antiguo 23/03/2010, 10:09
PRINCIPIPTO
 
Fecha de Ingreso: marzo-2010
Mensajes: 2
Antigüedad: 10 años, 8 meses
Puntos: 0
ayuda URGENTE!!!! POR FA

vereis tengo este ejercicio y no consigo depurarlo dice as:

diseñar una funcion llamada da_medico k dado el cod paciente devuelva el nombre de algun medico k lo visito, si no tiene visitas devolvera sin medico y en caso de no encontrarse devolvera no hay paciente no utilizar cursores explicitos


tengo esto

CREATE OR REPLACE FUNCTION DA_MEDICO(CODP IN VISITAS.P#%TYPE,
MED IN OUT MEDICOS.NOMBRE%TYPE)
RETURN VARCHAR
IS
MED2 MEDICOS.NOMBRE%TYPE;
BEGIN
SELECT NOMBRE INTO MED2 FROM MEDICOS WHERE M# IN(SELECT M# FROM VISITAS WHERE P#=CODP);
MED:=MED2;
EXCEPTION
WHEN NO_DATA_FOUND THEN
DBMS_OUTPUT.PUT_LINE('NO HAY PACIENTE');
WHEN OTHERS THEN
DBMS_OUTPUT.PUT_LINE('SIN MEDICO');
END;
/

DECLARE
ME MEDICOS.NOMBRE%TYPE;
BEGIN
DA_MEDICO('&CODP',ME);
DBMS_OUTPUT.PUT_LINE(ME.NOMBRE);
END;
/

k esta mal¿?¿

gracias