ACBrCEP - Erro ao pesquisar Cep único

[Jéter Rabelo Ferreira]

Bom dia.

Ao efetuar uns testes com o ACBrCEP (wsRepublicaVirtual), eu verifiquei que não retornava o Cep de cidade com Cep único.

Eu efetuei uma pequena correção que corrige esse problema.

Segue anexo o arquivo corrigido.

Atenciosamente

Jéter Rabelo Ferreira

ACBrCEP.pas

[Régys Silveira]

Acertado, testado e enviado para o SVN.

Obrigado pela ajuda.

[ricardomendes]

Bom dia.

Estou tento problemas em alguns clientes na busca de cep.

segue as imagens dos erros

Fico no aguardo.

[Régys Silveira]

Ocorreram mudanças no CEPLivre, agora ele possui um sistema de assinaturas, estaremos revisando a utilização dele.

Tente a consulta com as outras opções de consulta de CEP.

[ricardomendes]

Eu tentei...utilizar os demais....

O unico que conseguiu achar os ceps foi o do webservice da republica virtual... porem ainda não tem os dados pertencentes ao IBGE e quando eu mando buscar o cep, ele traz o endereço...so que o CEP fica em branco....

Eu estou tentando fazer um teste com outro webservice....vou deixar disponivel os fontes para consultar....talvez o pessoal consiga me ajudar e assim disponibilizar isso no componente, porem ele aceita apenas 20 consultas diarias.

funcionamento

adicione a uses wscep

para consultar ficaria assim, mas ele aceita os metodos...conforme o link

http://www.bases4you.com/wscep.php

procedure proProcuraCEP(pCEP:string);

var

vUsuario, vSenha, vCEP, vEndereco, vBairro, vCidade, vUF: Widestring;

begin

if (pCEP<> '') then

begin

vCep := pCEP;

GetcepwsdlPortType.ConsultarCEP(vUsuario, vSenha, vCEP, vEndereco, vBairro, vCidade, vUF);

edtEndereco.text := vEndereco;

edtBairro.Text := vBairro;

edtCidade.Text := vCidade;

edtUF.Text := vUF;

edtCEP.Text := pCEP

end;

end;

CEP.zip

[Régys Silveira]

Enviei a correção para o CEP Livre, lembrando que agora para utilizá-lo é necessário efetuar uma assinatura para obter a chave de acesso, informações sobre assinatura são por conta do serviço CEP Livre e estão disponíveis no site deles.

Eu testei aqui com uma assinatura gratuita e está funcionando corretamente, qualquer erro reportem.

[Danny]

Bom dia pessoal,

Ao disparar a pesquisa para o WS via componente no retorno os campos vem com caracteres estranhos, além de virem com asterisco no início e no final.

Porém se digitar diretamente no browser (ex: http://ceplivre.com.br/consultar/cep//13012-100/csv) o retorno vem normal.

Debuguei para tentar solucionar o problema, porém não consegui descobrir o problema.

Alguém sabe o que pode estar ocorrendo?

Obrigado.

[Régys Silveira]

Eu fiz testes aqui e pesquisou normal. Tem certeza que não é nada ai no teu computador, talvez o ACBr esteja com arquivos em conflito de versão.

[Régys Silveira]

Eu fiz testes aqui e pesquisou normal. Tem certeza que não é nada ai no teu computador, talvez o ACBr esteja com arquivos em conflito de versão.

[Danny]

Obrigado pelo retorno.

Com base no que você mencionou executei procedimeto de apagar toda a pasta ACBr. Criei uma nova pasta ACBr e baixei tudo novamente do https://acbr.svn.sourceforge.net/svnroot/acbr/trunk

Também excluir o pacote ACBrTCP do delphi e inclui novamente depois que foi feito o download. Fiz o novo teste e o problema persistiu. Os campos com caracteres que tem acentuação são os que dão problema, além dos asteriscos no início e final.

Será que executei o procedimento correto para reparar o problema que ocorre?

Obrigado.

[Daniel Simoes]

Apliquei uma possível correção... Testei no D7 e no Lazarus e em ambos a acentuação foi exibida corretamente...

[Danny]

Daniel, testei no D2006 e o problema resolvido.

Vi a alteração que você fez na HTTPGet do ACBrSocket.pas. Eu provavelmente demoraria uma eternidade para chegar nisso.

A acentuação foi resolvida, mas o asterisco no início e final ainda persiste, porém é simples reparar isso na aplicação.

Muito obrigado.

[Daniel Simoes]

Danny,

Não compreendi o problema dos asteriscos... você pode me mandar um PrintScreen ?

[Danny]

Claro que sim.

Na imagem em anexo tem 2 caixas. A caixa da direita é relativo ao retorno da pesquisa para o WS república virtual e o da esquera é do WS da CEPLivre.

Note a diferença no retorno do CEPLivre que tem os asteriscos no início e final de cada campo.

Espero que isso esclareça um pouco mais o que mencionei.

Qualquer dúvida vamos nos falando.

Obrigado.

[Régys Silveira]

São " (aspas) e não asteriscos no início e fim, correto?

[Danny]

Ops, descupa minha falha.

São aspas duplo e não asterisco como eu havia mencionado.

Obrigado pela correção.

[Régys Silveira]

Vou fazer alguns testes aqui, qualquer coisa posto a correção.

[Régys Silveira]

Enviei o acerto para remoção das aspas do CepLivre, atualize teu ACBr e verifique por favor.

[Danny]

Obrigado Régys,

Atualizado, testado e 100% resolvido.

Agora vou alterar a aplicação de modo que não valide mais essa situação das aspas.

Abraços!

[mayque vilas boas]

Gostaria de saber se alguem utiliza a consulta com o webservice dos correios e se é possivel eles descontinuarem com essa consulta via webservice, pois a mesma já tinha no office e foi descontinuada pois devido a demanda pesava noos servidores deles.

 

att

 

Muito obrigado

[datilas]

Gostaria de saber se alguem utiliza a consulta com o webservice dos correios e se é possivel eles descontinuarem com essa consulta via webservice, pois a mesma já tinha no office e foi descontinuada pois devido a demanda pesava noos servidores deles.

 

att

 

Muito obrigado

a consulta com wscorreios não acontece por webservice o que o componente faz é dar um get na pagina dos correios e extrai as informações necessárias,

caso aja alguma mudança na pagina dos correios teremos problemas, mas com um grupo tao grande assim acho difícil que ele seja descontinuado, caso tenha algum problema voce pode alterar os fontes e enviar para os moderadores analisarem e subir para o svn,

(eu particulamente utilizo o wscorreios por ser mais atual e com informação mais segura que os outros, afinal são os correios que controlam os ceps).

[Danny]

Boa noite pessoal.

Ao consultar o CEP pelos correios não é gerada a exceção para minha aplicação.

Fiz uma pequena alteração e resolveu o problema.

Segue a unit em anexo.

Obrigado.

ACBrCEP.pas

[Daniel Simoes]

Obrigado... já está no SVN....

 

[Claudenir Monteiro]

Estou usando delphi xe5 para compilar o acbr. Fiz a instalação certtinha. Quando passo o mouse sobre o componente, mostra 32/64 bits. O problema é quando vou compilar em 64 bits da erro. O Delphi não acha o caminho da ACBR,

[Daniel Simoes]

2.2 - Permaneça no assunto - Quando tiver uma dúvida diferente do assunto no tópico, poste em novo tópico. Não use algo equivalente a "aproveitando o gancho... [dúvida não relacionada com o tópico aqui]". Favor leia as regras do fórum.