funcion con oracle

[FNX_NET]

function validaRut( p_rut varchar2, p_dig varchar2)return varchar2
is
v_rut varchar2(10) := sustr(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';
end validaRut;


Y ME MANDA ESTE ERROR
ORA-00900: sentencia SQL no válida