Luiz Eduardo Bodo

[5103353] ; Atualizado em 06/03/2025 Nome=Confresa UF=MT Provedor=Fiorilli Versao=2.00 ProRecepcionar=http://confresa.sigaraguaia.com.br:8080/IssWeb-ejb/IssWebWS/IssWebWS ProLinkURL=http://confresa.sigaraguaia.com.br:8080/issweb/formGerarNF.jsf?nroNota=%NumeroNFSe%&codVerificacao=%CodVerif%&cnpj=%Cnpj%&hash=%ChaveAcesso% ta na mão!

Boa tarde pessoal, a prefeitura de confresa-mt alterou o provedor Coplan para Fiorilli.

Ontem foi terrível

Eu resolvi apenas atualizando os fontes, tinha alteração particular, apaguei atualizei e deu certo

boa tarde, estou com o mesmo problema emissão em SP

Obrigado Italo

Boa tarde amigos, venho informar que o provedor de Porto Alegre do Norte - MT esta setado para ISSIntel, mas atualmente o provedor correto é o Agili (https://agiliblue.agilicloud.com.br/portal/portoalegrenorte#/)

Obrigado por compartilhar lembrando que a receitaws não e uma fonte oficial, podendo conter divergências nos dados

Muito obrigado

como passar esse parametro?

obrigado pela dica Orlando, vou dar uma olhada.

esta api como o amigo Alexandre comentou realmente não é oficial, nao requer captcha apenas o endereço https://www.receitaws.com.br/v1/cnpj+CNPJAQUI lembrando que esta api limita 3 consultas por minuto.

Obrigado por esclarecer, realmente não tinha me atentado a este fato, de fato na base de dados da receitaws tem um atraso de pelo 1 mes em alguns cnpj que consultei aqui, mas nao sei se a data de atualizacao da base deles é realmente sincronizada com a receita federal. mas é funcional até certo ponto.

Sim utilizando a API free oficial, esta funcionando perfeitamente, de ontem pra hoje dei uma melhorada nela, encapsulando. segue a unit. Fiz uma função para chamar. function TfrmPessoas.ConsultarCNPJ(const CNPJ: string): TCNPJInfo; begin Result := TCNPJInfo.Create; try Result.Consultar(CNPJ); except on E: Exception do begin // Trate as exceções, se necessário. ShowMessage('Erro ao consultar CNPJ: ' + E.Message); Result.Free; // Libere a instância em caso de erro. Result := nil; // Defina o resultado como nulo em caso de erro. end; end; end; // MODO DE USAR... InfoCNPJ := ConsultarCNPJ(DM.TiraPontos(txtDocumento.Text)); // Substitua pelo CNPJ desejado. if InfoCNPJ.Achou = 'Sim' then begin // achou end else // não achou... espero ter ajudado, qualquer duvida ou melhorias é bem vinda... CNPJInfo.pas

Boa tarde pessoal, quem esta com problema na consulta do CNPJ, fiz uma função utilizando JSONResponse, simples e eficiente, estou utilizando delphi 10.3