Ir para conteúdo
  • Cadastre-se

Diego Foliene

Consultores
  • Total de ítens

    5.308
  • Registro em

  • Última visita

  • Days Won

    155

Tudo que Diego Foliene postou

  1. Por favor: Qual é a versão da IDE que está utilizando? Este seu arquivo XML é o que foi gerado automaticamente pelo componente ou você armazenou a string e salvou por conta? Você possui modificações locais em seus fontes? Qual é a codificação dos arquivos em seus fontes? Fiz novos testes em meu ambiente. Realmente, nas linhas mencionadas a string fica como demonstrada, mas testando em meu ambiente, o XML salvo pelo componente fica com a string correta. Consultando a nota no portal de homologação também está correta a string. Precisamos entender qual se há alguma diferença ou particularidade que resultou na geração desses arquivos de forma diferente.
  2. Verificando, enquanto não houver uma resolução definitiva, por favor, defina a opção para RetirarAcentos com o valor True.
  3. Sim, as configurações foram mantidas as mesmas, apenas a rotina foi modificada. O SMTP utilizado foi o do GMail. O XML utilizado foi gerado o próprio programa exemplo também(você pode utilizar o botão GerarNFe para criar ele).
  4. Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.
  5. Isso é o valor no watch list do Delphi e está relacionado a codificação nativa da própria IDE. Veja se no arquivo XML de fato está correto. Em anexo um XML de carta de correção que transmiti com caracteres acentuados(ocultei algumas informações). 11011035240818XXXXXXXXXX3955003000000007145776201506-procEventoNFe.xml
  6. Em outro teste, modifiquei a rotina para carregar um mesmo XML de forma que o componente fica com 51 notas no count. procedure TfrmACBrNFe.btnEnviarEmailClick(Sender: TObject); var Para, Acabou: String; dtI, dtF: TDateTime; CC: Tstrings; i: Integer; begin Para := ''; if not(InputQuery('Enviar Email', 'Email de destino', Para)) then exit; ACBrNFe1.DANFE := ACBrNFeDANFeRL1; ACBrNFe1.NotasFiscais.Clear; OpenDialog1.Title := 'Selecione a NFe'; OpenDialog1.DefaultExt := '*-nfe.XML'; OpenDialog1.Filter := 'Arquivos NFe (*-nfe.XML)|*-nfe.XML|Arquivos XML (*.XML)|*.XML|Todos os Arquivos (*.*)|*.*'; OpenDialog1.InitialDir := ACBrNFe1.Configuracoes.Arquivos.PathSalvar; if OpenDialog1.Execute then begin for i:=0 to 50 do ACBrNFe1.NotasFiscais.LoadFromFile(OpenDialog1.FileName); end; if ACBrNFe1.NotasFiscais.Count = 0 then exit; CC := TStringList.Create; try //CC.Add('[email protected]'); // especifique um email valido //CC.Add('[email protected]'); // especifique um email valido ConfigurarEmail; dtI := Now; ACBrNFe1.NotasFiscais.Items[0].EnviarEmail(Para , edtEmailAssunto.Text , mmEmailMsg.Lines , True // Enviar PDF junto , CC // Lista com emails que serao enviado copias - TStrings , nil // Lista de anexos - TStrings ); dtF := Now; ShowMessage('DataI:' + FormatDateTime('hh:nn:ss:zzz', dtI) + sLineBreak + 'DataF:' + FormatDateTime('hh:nn:ss:zzz', dtF)); finally CC.Free; end; end; Novamente este foi meu resultado: Todos mantendo um tempo entre 4 a 6 segundos.
  7. Por favor, qual é o motor de relatórios que está utilizando o Fortes ou o Fast? Pode disponibilizar o XML que está utilizando para testes? Se julgar que o mesmo tenha dados sensíveis e não possa ser disponibilizado direto aqui, envie para [email protected] com o link do tópico no corpo do e-mail para posterior identificação. Apenas para contextualizar: Modifiquei rotina do programa exemplo da NF-e deixando ela desta forma: procedure TfrmACBrNFe.btnEnviarEmailClick(Sender: TObject); var Para, Acabou: String; dtI, dtF: TDateTime; CC: Tstrings; begin Para := ''; if not(InputQuery('Enviar Email', 'Email de destino', Para)) then exit; ACBrNFe1.DANFE := ACBrNFeDANFeRL1; ACBrNFe1.NotasFiscais.Clear; while Acabou <> 'N' do begin OpenDialog1.Title := 'Selecione a NFe'; OpenDialog1.DefaultExt := '*-nfe.XML'; OpenDialog1.Filter := 'Arquivos NFe (*-nfe.XML)|*-nfe.XML|Arquivos XML (*.XML)|*.XML|Todos os Arquivos (*.*)|*.*'; OpenDialog1.InitialDir := ACBrNFe1.Configuracoes.Arquivos.PathSalvar; if OpenDialog1.Execute then begin //ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromFile(OpenDialog1.FileName); end; (InputQuery('Adicionar mais uma nota?', 'Continuar', Acabou)); end; if ACBrNFe1.NotasFiscais.Count = 0 then exit; CC := TStringList.Create; try //CC.Add('[email protected]'); // especifique um email valido //CC.Add('[email protected]'); // especifique um email valido ConfigurarEmail; dtI := Now; ACBrNFe1.NotasFiscais.Items[0].EnviarEmail(Para , edtEmailAssunto.Text , mmEmailMsg.Lines , True // Enviar PDF junto , CC // Lista com emails que serao enviado copias - TStrings , nil // Lista de anexos - TStrings ); dtF := Now; ShowMessage('DataI:' + FormatDateTime('hh:nn:ss:zzz', dtI) + sLineBreak + 'DataF:' + FormatDateTime('hh:nn:ss:zzz', dtF)); finally CC.Free; end; end; Fazendo um teste carregando um XML com dados fictícios que continha um item o resultado foi: Executando a rotina novamente, mas carregando agora 4 arquivos XML o resultado foi: Veja que em ambos os casos a diferença foi mínima. Mesmo passando só um arquivo, levou 4 segundos.
  8. Vou fazer um teste em meu ambiente para confirmar, um momento, por favor.
  9. Bom dia! Este 02 não é um valor válido, você precisa inserir o código da UF correto.
  10. Bom dia. Efetuado um teste registrando uma carta de correção com config definida como true e como false. Em ambos os casos foi registrada com sucesso. Removida a linha 908 que chumba a configuração como True na revision 35117
  11. Bom dia! Fiz um teste em meu ambiente e acredito que o problema esteja na função de conversão que está utilizando. Como ela é antiga(veja que está como deprecated), por favor, use eSStrToTpMotCessBenefEX
  12. Bom dia. É gerado um PDF para cada NFe presente na lista, isso vai agregar no tempo total. EDIT: Perdão, o comportamento mencionado foi testando a rotina de impressão isoladamente. Fiz novo teste com a rotina de e-mail e é gerado somente um arquivo.
  13. Bom dia! Por favor, veja se consegue abrir os links de ProRecepcionar e HomRecepcionar em seu navegador: [3106200] ; Atualizado em 31/10/2023 Nome=Belo Horizonte UF=MG Provedor=BHISS ProRecepcionar=https://bhissdigitalws.pbh.gov.br/bhiss-ws/nfse HomRecepcionar=https://bhisshomologaws.pbh.gov.br/bhiss-ws/nfse Veja se eles abrem um tela como está:
  14. Bom dia! A portaria não necessariamente revoga o SAT. O SAT não vai deixar de existir. Ela libera a contingência off-line para NFC-e. Ele precisa estar credenciado para emissão de NFC-e, precisa do IdCSC e do CSC. Se já tiver está informação, pode emitir a NFC-e normal, como também pode continuar com o SAT. Não há mais vínculo da NFC-e com o SAT. Uma portaria anterior derrubou a necessidade de ter um SAT ativo para credenciar para emitir NFC-e, mas você ainda precisava do SAT para usar como contingência. Agora com esta última portaria você não precisa mais do SAT para usar em contingência. Lembrando que por ser PRO, você tem acesso liberado aos cursos disponibilizados pelo ACBr e um deles é o Implementando a Contingência Offline da NFCe
  15. Você definiu false para a propriedade? Se sim, entendo que o comportamento está correto. Acompanhe o valor da propriedade de veja como ele fica posteriormente.
  16. Atualmente estamos na 1.4.0.269, consegue fazer um teste com ela?
  17. Fiz alguns testes, mas não enfrentei o mesmo comportamento. No momento em que cai na linha do FiltrarTextoXML o RetirarAcentos está respeitando o que eu defini. Por favor, verifique em sua rotina se essa configuração não é alterada em nenhum momento posteriormente a está definição e antes de entrar nas rotinas internas do componente para gerar o XML. Debugue a rotina a partir do break-point indicado no print usando o step-into e veja se o valor passado coincide com o que definiu:
  18. Se você utiliza as classes de alto nível que disponibilizamos, nuget ou vai testar com o programa exemplo é interessante atualizar os mesmos para o caso de ter alguma modificação. Mas no geral sim, basta substituir a dll na sua aplicação.
  19. Boa tarde! Um detalhe que foi lembrado pelos demais consultores, estamos atualmente na versão 1.2.1.312 da Lib do boleto. No seu log consta que a versão utilizada é a 1.2.1.309. Por favor, pode atualizar a lib e realizar novo teste com a versão mais atual da Lib?
  20. Boa tarde! Neste tópico um colega compartilha um exemplo de docker no qual diz ter conseguido utilizar: Em anexo envio também o dockerfile que originalmente constava neste tópico: (me parece que o download está indisponível nele) Dockerfile
  21. Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.
  22. Boa tarde. Sim, no exemplos que temos disponíveis em nosso SVN, por exemplo, é assim. Se não ocorrer nenhum problema sim, ele vai usar essa mesma instância. Se você preferir, você também pode criar uma instância a cada ação, mas precisa lembrar de finalizar ela. Vamos supor que eu quero seguir a abordagem em que crio um instância para cada ação e eu vou adicionar em minha aplicação um botão que vai carregar as informações de um boleto que ao clicar vai carregar um ini na lib e imprimir. O código do botão vai ser os métodos em ordem: BOLETO_Inicializar; BOLETO_IncluirTitulos; BOLETO_Imprimir; BOLETO_Finalizar; Veja que eu inicializei a biblioteca, fiz o que queria e finalizei ela.
  23. Confirme a versão do ACBrMonitorPLUS que está usando, por favor.
  24. Está apresentando este erro para você agora ou você conseguiu transmitir a nota com sucesso?
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...