'''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'  Documento VB Script                                  '
'  Francisco C Paulino - Tofinha - fcptofinha@globo.com '
'  06/11/2002                                           '
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'  Validar Campos CPF_CNPJ
function ValidarCampos()
	if  ConfereCIC(form_int.CPF_CNPJ_INT) then
		form_int.submit 
	end if
end function
'Fim Validar CPF_CNPJ
''''''''''''''''''''''''''''''''''''''''''
' Função Verificar CPF_CNPJ
'Chamada= onBlur="VerificaCPF_CNPJ_INT()"
function VerificaCNPJ_INT()
    
   if Len(cadastro.item("cpf").value) > 0 then 	
	
	if  ConfereCIC(cadastro.cpf) then
	
			if Len(cadastro.item("cpf").value) > 14 then

			end if
	
		end if	

   end if
			
end function

' Fim da Função Verificar CPF_CNPJ
''''''''''''''''''''''''''''''''''''''''''