Função

Inicial - Banco de Códigos

CNH - Validar Carteira Naciona de Habilitação

Data de Inclusão: 02/09/2006 | Última Alteração: 02/09/2006
Tipo:Função | Enviada por: Moderador Oracle_br (moderador@oraclebr.com.br)

create or replace function F_VERIFICA_CNH
(NRO_CNH IN number )RETURN varchar2 IS
DV number;
DVR number;
BEGIN
DV := substr(nro_cnh,9,1);
select mod(
(2 * substr(nro_cnh,1,1))+
(3 * substr(nro_cnh,2,1))+
(4 * substr(nro_cnh,3,1))+
(5 * substr(nro_cnh,4,1))+
(6 * substr(nro_cnh,5,1))+
(7 * substr(nro_cnh,6,1))+
(8 * substr(nro_cnh,7,1))+
(9 * substr(nro_cnh,8,1)),11)
into dvr from dual ;
if dv = dvr then
return('S');
else
return('N');
end if;

END;
/
/* select F_VERIFICA_CNH(0418405915) from dual; */

-- Dorian - 03/2002 dsoutto@enetec.com.br