luis_rs

Bingo !! Tinha acabado de ter feito isso. Ia vir aqui ja responder isso. Valeu !!!

Bom dia. Tinha instalado o ACBR no meu Delphi XE 10.2 rodando sem problemas. Fiz um upgrade da minha máquina e tive que reinstalar tudo. Ao instalar pelo Instalador do Trunk2 tudo ocorre sem problemas, porém quando abro o Delphi, algumas bpls carregam e outras dá erro. Diz que não consegue encontrar o módulo. O que pode ser? Valeu !!

Desde as ultimas atualizações do ACBR, quando tento enviar uma NFS-e, aparece um prompt do windows para confirmar o certificado. Clico ok, mas o sistema trava e não envia nem retorna nada. Usando o programa com ACBR um pouco mais antigo, envia normalmente sem esse prompt. Segue tela e codigo. Valeu !! vNumRPS := nf; ACBrNFSe1.notasfiscais.Clear; ACBrNFSe1.Configuracoes.WebServices.AguardarConsultaRet := 30; ACBrNFSe1.Configuracoes.WebServices.AjustaAguardaConsultaRet := True; ACBrNFSe1.Configuracoes.WebServices.TimeOut:=30; ACBrNFSe1.Configuracoes.WebServices.Tentativas := 10; ACBrNFSe1.Configuracoes.WebServices.IntervaloTentativas := 1000; AlimentaComponente(vNumRPS); ACBrNFSe1.Gerar(StrToInt(vNumRPS)); sNomeArq := ACBrNFSe1.notasfiscais.Items[0].NomeArq; ACBrNFSe1.notasfiscais.Clear; ACBrNFSe1.notasfiscais.LoadFromFile(sNomeArq); ACBrNFSeDANFSeFR1.MostrarPreview := false; ACBrNFSe1.notasfiscais.ImprimirPDF; ACBrNFSeDANFSeFR1.MostrarPreview := True;

Ajustando no código resolveu. Porém deveria vir um valor aceitável no componente. ACBrNFSe1.Configuracoes.WebServices.AguardarConsultaRet := 20; ACBrNFSe1.Configuracoes.WebServices.AjustaAguardaConsultaRet := True; ACBrNFSe1.Configuracoes.WebServices.Tentativas := 10; ACBrNFSe1.Configuracoes.WebServices.IntervaloTentativas := 1000;

Depois de corrigir bastante coisa no código para o Trunk 2, ao tentar gerar várias NFSe pelo meu sistema, após enviar e gerar ok a primeira nota, na segunda gerou mas o componente deu erro de tempo limite. Verificando no site oficial , a nota foi gerada, mas não tive retorno dela dando erro te tempo, sendo que não houve demora na reposta. Se alguém puder ajudar, já estou a vários dias tentando enviar NF e cobrança para meus clientes e está difícil. Valeu !!

Isso, Fast Report

Atualizando o ACBR hoje, o erro anterior não aparece mais e consegui finalmente gerar as NFse. Continua dando o erro Convert String into Double, quando rodado dentro da IDE, mas fora não apresenta. Valeu !!

Oi Italo !! Obrigado pela ajuda. O componente não estava para consultar após o envio. Reparei que o erro apresenta somente rodando pelo delphi, rodando direto pelo executável o erro não aparece. Consegui fazer funcionar no modo de Homologação, quando troco para produção, a nota é gerada (verifico no site oficial), mas me dá um erro tempo limite de operação atingido. Mas vem muito rápido esse erro, não dá tempo de ter retorno do webservice.

Comigo não funciona ! Dá erro de conversão string into double

Após migrar para o trunk2 e fazer uma séries de correções, ao gerar a NFse, ela é gerada (consulto no site oficial e está lá), porém está me retornando nome do arquivo em branco pelo ACBR. vNumRPS := nf; ACBrNFSe1.notasfiscais.Clear; AlimentaComponente(vNumRPS); ACBrNFSe1.Enviar(StrToInt(vNumRPS), imprimir); sNomeArq := ACBrNFSe1.notasfiscais.Items[0].NomeArq; //nome em branco ------ Mudando para Gerar ao invés de enviar funciona. Porém depois me dá erro ao imprimir PDF (ERRO Convert String into Double) vNumRPS := nf; ACBrNFSe1.notasfiscais.Clear; AlimentaComponente(vNumRPS); ACBrNFSe1.Gerar(StrToInt(vNumRPS)); //ACBrNFSe1.Enviar(StrToInt(vNumRPS), imprimir); sNomeArq := ACBrNFSe1.notasfiscais.Items[0].NomeArq; ACBrNFSe1.notasfiscais.Clear; ACBrNFSe1.notasfiscais.LoadFromFile(sNomeArq); ACBrNFSeDANFSeFR1.MostrarPreview := false; ACBrNFSe1.notasfiscais.ImprimirPDF; // ERRO Convert String into Double

Estou tendo o mesmo problema em instalar no Delphi 10. Mandei compilar todos os projetos e deu erro no GNRE Desmarque esse pacote e instalou tudo sem erros. Mas ao inciar o Delphi, deu erro em vários pacotes dizendo que não encontrava sendo que estão na pasta. Marcando para copiar as dll, resolveu !

Boa tarde, como configuro para que o componente utilize a versão 1.04 do CTE? Obrigado