Ayuda con validacion de rut

[jaimealvarez]

hola amigos de foros del web quisiera pedirles un gran favor en la me dieron una tarea de validar el rut o sea debo ingresar el rut y q me diga si es correcto o no no quiero q yo ingrese el rut y este me devuelva el digito verificador eso no es por otra parte encontre un codigo en esta misma seccion pero me arroja errores esta es la funcion :

create or replace function "VALIDARUT"
(p_dig_rut in VARCHAR2,
p_rut in VARCHAR2)
return VARCHAR2
is

v_rut varchar2(10) := substr(lpad(p_rut,9,'0'),1,10);
v_res number(2);
v_val varchar2(10);
v_dig varchar2(1);
begin
v_res := 11 - mod(to_number(substr(v_rut,1,1)) * 4 + to_number(substr(v_rut,2,1)) * 3 + to_number(substr(v_rut,3,1)) * 2 + to_number(substr(v_rut,4,1)) * 7 + to_number(substr(v_rut,5,1)) * 6 + to_number(substr(v_rut,6,1)) * 5 + to_number(substr(v_rut,7,1)) * 4 + to_number(substr(v_rut,8,1)) * 3 + to_number(substr(v_rut,9,1)) * 2, 11);
if v_res = 10 then
v_dig := 'K';
elsif v_res = 11 then
v_dig := '0';
else
v_dig := ltrim(v_res);
end if;

if v_dig = p_dig_rut then
v_val:='SI';
else
v_val:='NO';
end if;

return v_val;
exception
when others then
return 'NO';


y al crear la funcion en sql me aparece q tiene errores este mensaje

Function created with compilation errors. y le aplico a show errors y me dice no errors ayuda plisss porfavor desde ya muchas gracias...