Valdir Dill

De fato. Erro meu de Ctrl+C e Ctrl+V, rs.. O correto: SSLCryptLib := cryWinCrypt; SSLHttpLib := httpWinHttp; SSLXmlSignLib := xsLibXml2; Obrigado.

Bom dia, Está ocorrendo uma situação estranha: após emitir uma nota fiscal e, por consequência estabelecer uma conexão dos componente Acbr com o certificado digital, ao se encerrar nosso sistema, está abrindo a tela do Windows pedindo que se conecte o certificado (print anexo). Isso só ocorre se, após emitida a nota fiscal e antes de fechar o sistema, se desplugar o usb da leitora do certificado. Usamos : - Certificado A3 - ACBrNFe1.SSL.SSLType := LT_TLSv1_2; - ACBrNFe1.Configuracoes.Geral.SSLCryptLib := cryOpenSSL; - ACBrNFe1.Configuracoes.Geral.SSLHttpLib := httpOpenSSL; - ACBrNFe1.Configuracoes.Geral.SSLXmlSignLib := xsLibXml2; Pelo que entendi, algum procedimento precisa do token conectado, mas qual e quando? Isso é normal ou há alguma rotina (algum componente.free, não sei) que deveria ser feito e de repente não estamos fazendo? É claro que esse procedimento (desplugar o token) não é recomendável, mas nunca se sabe quando e o que o usuário faz. Então, quanto menos telas e erros forem apresentados a ele, melhor...

Bom dia, Ao executar um acbrNFe1.loadfromfile(arquivoanexo), ele está trazendo uns caracteres bem estranhos na stream. Fiz um teste com o conteúdo do xml no validador SEFAZ-RS e está ok. Fiz outro teste copiando o conteúdo e criando um novo arquivo (via bloco de notas) e salvei. Leu direitinho. Mas no arquivo original que meu cliente recebeu do fornecedor dele, não consegue ler. Imagino eu que seja problema do padrão com que o arquivo foi gravado. A dúvida é, como poderia interceptar isso ao tentar ler o arquivo e ver os dados da nota, ou seja, ao invés de dar um erro tipo "...argument out of range...", o sistema tentar confirmar se o arquivo é de fato válido. Obrigado. NFe35200201771935000215550030011388711141123558.xml

Agradeço a sugestão, mas não tenho como adotá-la porque preciso das informações antes de gravar no BD. Além disso, nos outros bancos a informações no arquivo de retorno vêm numa linha só. Aí, de toda forma precisaria de rotinas diferentes. A solução que encontrei foi essa. Deixo aqui para talvez ajudar alguém no futuro: for I := 0 to ACBrBoleto1.ListadeBoletos.Count - 1 do begin if (ACBrBoleto1.ListadeBoletos.Objects.OcorrenciaOriginal.Tipo in [toRetornoLiquidado, toRetornoLiquidadoSemRegistro, toRetornoDebitoTarifas]) then begin if ACBrBoleto1.ListadeBoletos.Objects.OcorrenciaOriginal.Tipo <> toRetornoDebitoTarifas then begin VNumBoleto := ACBrBoleto1.ListadeBoletos.Objects.NossoNumero; VValorRec := ACBrBoleto1.ListadeBoletos.Objects.ValorRecebido; end; if VBaixa.FTipoRet = cobSicred then //o sicred o retorno vem em duas linhas. begin for M := 0 to ACBrBoleto1.ListadeBoletos.Count - 1 do begin if (ACBrBoleto1.ListadeBoletos.Objects[M].OcorrenciaOriginal.Tipo = toRetornoDebitoTarifas) and (ACBrBoleto1.ListadeBoletos.Objects[M].NossoNumero = ACBrBoleto1.ListadeBoletos.Objects.NossoNumero) then VTotTarifas := ACBrBoleto1.ListadeBoletos.Objects[M].ValorDespesaCobranca; end; end else VTotTarifas := ACBrBoleto1.ListadeBoletos.Objects[M].ValorDespesaCobranca; end; end; end; Obrigado.

Bom, eu uso o Acbr para ler o arquivo e, nos demais bancos funciona beleza, mas especificamente com o Sicredi não está dando certo. O problema é que o arquivo Sicredi vem as informações em duas linhas, enquanto que os demais bancos vem tudo numa única linha Veja como estou fazendo e por favor me diga se estou fazendo errado ou se poderia ser melhor. ACBrBoleto1.NomeArqRetorno := 'RetornoSicredi.CRT'; ACBrBoleto1.DirArqRetorno := 'C:\Retornos\; ACBrBoleto1.LerRetorno(); for I := 0 to DM.ACBrBoleto1.ListadeBoletos.Count - 1 do if ACBrBoleto1.ListadeBoletos.Objects.OcorrenciaOriginal.Tipo in [toRetornoLiquidado, toRetornoLiquidadoSemRegistro] then begin ShowMessage(FloatToStr(ACBrBoleto1.ListadeBoletos.Objects.ValorRecebido)); ShowMessage(FloatToStr(ACBrBoleto1.ListadeBoletos.Objects.ValorDespesaCobranca + ACBrBoleto1.ListadeBoletos.Objects.ValorOutrasDespesas)); end; Nesse loop acima, o valor das tarifas será 0. Mas apenas no caso do Sicredi. Nos demais bancos (pelo menos os que uso), traz o valor certo. Isso porque o Sicredi traz duas linhas para cada boleto no arquivo de retorno, uma para o valor recebido e outra a tarifa. Aí eu teria que fazer algo mais ou menos assim: if ACBrBoleto1.ListadeBoletos.Objects.OcorrenciaOriginal.Tipo in [ttoRetornoDebitoTarifas] then begin ShowMessage(FloatToStr(ACBrBoleto1.ListadeBoletos.Objects.ValorDespesaCobranca + ACBrBoleto1.ListadeBoletos.Objects.ValorOutrasDespesas)); end; ou seja varrer a lista novamente. Obrigado.

Bom dia, Analisando o arquivo de retorno SICREDI (arquivo anexo), notei que cada título vem com duas linhas de retorno. Uma para os dados da baixa em si e outra linha para a tarifa. Eu particularmente nunca tinha notado isso, até porque outros bancos não é assim, ou seja, o valor da tarifa vem na mesma linha da baixa, o que logicamente facilita muito a leitura. Pergunto: 1 - Isso (duas linhas) é algo novo no layout do retorno SICREDI ou sempre foi assim? 2 - Como tratar isso na varredura para obter os títulos baixados e também a tarifa de baixa de cada um, tenho que varrer o arquivo duas vezes, uma vez para capturar os dados da baixa em si e outro loop para ver a tarifa de cada um dos títulos baixados? Qual a sugestão? Obrigado RetornoSicredi.CRT

Bom dia, Ainda não, mas seguirei sua dica e tentarei. Obrigado.

Bom dia, Só atualizar os Schemas. Use os arquivo que estão no svn que resolve. Abraços.

Bom dia, Entendi. Mas não é o caso. Não tem nada de adicional. Basicamente são componentes nativos e Acbr. De toda forma agradeço a dica. Vamos continuar tentando, rs... Obrigado.

Bom dia, De antemão, já peço desculpas pelo off topic, mas talvez tenha alguma relação com componentes Acbr e não custa tentar, rs... É o seguinte: de uns tempos para cá nossa aplicação, quando é encerrada, ela demora uns 20 a 30 segundos (às vezes até mais que isso) para fechar a tela e encerrar de fato. O mais curioso é que essa demora no fechamento só acontece se a aplicação ficou aberta por um tempo superior a 2 minutos. Se, por exemplo, abrir a aplicação e fechá-la após 30 segundos, fecha rapidinho. Já tentei executar application.terminate, halt, ...em mais de um local (onclose, desstroy, ...), mas nada teve efeito. Tirei inclusive tudo que é rotina do onClose, onDestroy e onClosequery do formulario principal e nada. Tudo que tenha relação com tempo (timers, por exemplo) foi desabilitado, mas não surtiu efeito. Imagino eu que talvez possa ser algum (ou alguns) compoenentes que são destruídos pela aplicação e essa destruição gere esse tempo longo, não sei. Não teria muita lógica, pois, se fosse isso, mesmo que a aplicação ficasse só 20 segundos "no ar", isso também deveria ocorrer. O grande problema é que não sei mais o que debugar para tentar descobrir onde (qual rotina) exatamente que acontece essa demora. Se alguém tiver alguma sugestão/dica, agradeceria muito, pois já estou tentando achar uma solução há meses... Usamos Delphi Rio 10.3.3. Mas já ocorria em versão anterior. Obrigado!

Boa noite, Tivemos vários usuários que ao utilizar essa impressora em NFCe com mais de 50 itens, imprimia apenas até o item 50. A segundo eles (não chegamos a testar aqui em laboratório pois não temos esse modelo) é atualizar o Driver da impressora que o problema desaparece. Abraços.

Com certeza @Daniel Simoes. É um absurdo iniciar uma validação no começo de janeiro, época que quse todo mundo está em ferias e eventuais ajustes geram aquela correri...aiinda mais num prazo tao exiguo...

Também não achei nada no site da SEFAZ. Mas arquivo que enviei na abertura do post é o e-mail recebido por uma empresa de lá e que encaminhou a nós.

Boa tarde, A SEFAZ-MS está implementando a "Nota Fiscal Premiada" onde será necessário imprimir no Danfe algumas dezenas que concorrerem a prêmios e que o cliente recebe na NFCe. Prazo 31/12/2019. Em anexo o texto enviado pela SEFAZ aos contribuintes. ACBr já tem algo em mente sobre isso? Em princípio parece algo até relativamente simples de fazer. Acho que seria pegar o retorno, gravar isso no banco de dados do sistema e depois incluir no Danfe antes de imprimir. Como se fazia com o troco antes dessa tag fazer parte do XML da NFCe. Logicamente que o Acbr implementar seria melhor, pois ficaria uma padrão geral. Obrigado. SEFAZ_MS

Boa noite, Atualizado, testado e problema corrigido. Obrigado.

Sim, já fiz esses testes e nada mudou em nenhum dos casos. O .pdf também gera com o problema. Não sei se é coincidência ou não, mas isso começou depois que foram feitos alguns ajustes pelo @Daniel Simoes-> Estou anexando tanto o .pdf que gerei na impressora virtual, como o XML...Talvez lhes ajuda na análise. Obrigado. 41191113971229000115550010000000411972950890-nfe.xml NFe.pdf

Não entendi amigo. Qual diferença faria digitar ou colar um texto. É lógico que esse texto aí é apenas um exemplo. Não é um texto real, mas o problema é real.

Obrigado, mas eu já havia visto essas duas propriedades. Conforme está explicado no post, elas não tem a ver com essa questão de largura do quadro e sim com a altura e pular para outra página ou não. Mesmo assim, por desencargo, testei com ambas true e também como false. Não mudou nada em relação ao problema relatado. obrigado.

Bom dia, Estou tendo problema ao imprimir NFe 55, mais especificamente nos dados adicionais. O que ocorre é que no preview mostra corretamente, mas ao imprimir em papel, o texto das informações complementares ultrapassa o seu quadro e adentra no quadro "Reservado ao Fisco". Os prints anexos dá para ver bem isso. O que poderia ser isso? Configurações da impressora? Estranho pois é a mesma impressora e nada foi mudado nas configurações.

Bom dia, Fontes atualizados, testados e tudo funcionando. Show. Obrigado!

41191013971229000115550010000000841244429685-nfe.xml

Mudei para fpLimiteCaracteresLinha := 95; Verifiquei que nas rotinas ele copia 95 caracteres, mas na impressão isso não muda. Creio que tenha alguma coisa a ver com o TRLMemo lá no relatório.

Boa noite, Na impressão das informações adicionais, ao que parece, o Acbr está com alguma coisa errada no alinhamento. do texto. Notem que no print anexo, onde destaco a última linha, o texto "17/2015" que é jogado para a linha seguinte, teria espaço de sobra para imprimir na linha anterior. Isso por si só não seria um grande problema. Mas ocorre que esse espaço em branco que poderia ser utilizado, dependendo da nota, acaba gerando uma segunda página do Danfe desnecessariamente. Obs.: Não há nenhum um enter ou ";" após o "nacional n°". Imagino que a causa possa ser o tamanho do memo que abriga esse campo no Danfe seja menor do que o quadro físico no Danfe. Ou qual poderia ser a causa disso? Obrigado.

Boa tarde, Corrigido na 18034. Obrigado.

Boa tarde, É só você localizar esse arquivo novo na pasta dos fontes e adicionar esse path no library do Delphi. Abraços.