Victor H. Gonzales - Panda

Bom dia, Isso parece DLL da OPENSSL faltando, verifique se elas estão na raiz do executável.

Boa tarde, Tenta trocar a assinatura para <ACBrNFSe>.Configuracoes.Geral.SSLXmlSignLib := xsMsXML; e veja se não apresenta erros. Não se aplica ao provedor GINFES, mas existem outros provedores que utilizam essa configuração. Abraços

Boa tarde @Italo Jurisato Junior, [Provedor GINFES] Emissão [OK] Cancelamento [OK] Tudo certo na emissão do documento e cancelamento do mesmo utilizando este novo arquivo enviado 20/05/2019 - 16:17. Obrigado pela ajuda forte abraço!

Boa tarde @Italo Jurisato Junior, positivo, irei fazer o teste agora [Configurações]: Provedor : GINFES; Cidade São José do Rio Preto - SP <ACBrNFSe>.Configuracoes.Geral.SSLLib := libWinCrypt; <ACBrNFSe>.Configuracoes.Geral.SSLXmlSignLib := xsLibXml2; <ACBrNFSe>.SSL.SSLType := LT_all;

Boa Tarde, @Italo Jurisato Junior Primeiramente obrigado pela ajuda, os testes com o arquivo paliativo informado neste tópico, alterou a mensagem de erro, o sistema para o provedor GINFES retornou a mensagem "Assinatura invalida.". Os arquivos de schemas e ini estão atualizados pelo repositório svn. Log: Data/Hora............: 20/05/2019 15:59:29 Mensagem.............: Assinatura invalida. Informar assinatura correta no documento XML. Classe Exceção.......: EACBrDFeException Formulário...........: fMovimentacao Unit.................: Vcl.Menus Controle Visual......: Nome Usuario.........: Gonzales Nome Computador......: DVLOP-01 Versão Windows.......: Windows 7 / Windows Server 2008 R2 Versão Aplicação.....: 2019.5.16.1710 (007CEA82) [00BCFA82] ACBrDFe.TACBrDFe.GerarException$qqrx20System.UnicodeStringp25System.Sysutils.Exception (Line 632, "ACBrDFe.pas" + 11) + $0 (007D75C3) [00BD85C3] ACBrDFeWebService.TDFeWebService.GerarException$qqrx20System.UnicodeStringp25System.Sysutils.Exception (Line 531, "ACBrDFeWebService.pas" + 1) + $C (00DB9667) [011BA667] ACBrNFSeWebServices.TWebServices.Envia$qqr20System.UnicodeString (Line 5470, "ACBrNFSeWebServices.pas" + 19) + $13 (00DBC3B6) [011BD3B6] ACBrNFSe.TACBrNFSe.Enviar$qqr20System.UnicodeStringo (Line 443, "ACBrNFSe.pas" + 10) + $C (00DBC2AB) [011BD2AB] ACBrNFSe.TACBrNFSe.Enviar$qqrio (Line 427, "ACBrNFSe.pas" + 1) + $14 (02158A11) [02559A11] uMovimentacao.TfMovimentacao.GerarNFSe$qqrv (Line 7621, "uMovimentacao.pas" + 299) + $20 (02164893) [02565893] uMovimentacao.TfMovimentacao.mniSalvareProcessarDocumentoClick$qqrp14System.TObject (Line 9332, "uMovimentacao.pas" + 173) + $3 (00273BCE) [00674BCE] Vcl.Menus.TMenuItem.Click$qqrv (Line 2541, "Vcl.Menus.pas" + 19) + $8 (002764CD) [006774CD] Vcl.Menus.TPopupList.MainWndProc$qqrr24Winapi.Messages.TMessage (Line 4618, "Vcl.Menus.pas" + 2) + $5 (000E5D00) [004E6D00] System.Classes.StdWndProc$qqsp6HWND__uiuiui (Line 17187, "System.Classes.pas" + + $0 Forte Abraço! 1590-rps.xml 1558368208-env-lot.xml 1558368208-env-lot-soap.xml 1558368208-rec.xml 1558368208-rec-soap.xml

xsLibXML2 : Nenhum elemento encontrado, é o mesmo erro que eu estou encontrando. xsMsXML : Classe não registrada é falta da DLL registrada (msxml5.dll); Copiar as DLL (msxml5.dll , msxml5r.dll) que encontra-se na raiz do sistema SIGE para a pasta System32 / SysWOW64 do Windows Abrir o prompt de comando (CMD) com previlégios de administrador Clicar no botão iniciar do windows digite no campo de pesquisa CMD clique com o botão direito sobre o resultado da pesquisa clique em executar como administrador no prompt de comando digitar %systemroot%\SysWoW64\regsvr32 msxml5.dll Pressionar a tecla enter aguardar a mensagem de confirmação

Boa tarde comunidade ACBr, Estou enfrentando um problema após atualizar a suite ACBr para versão 17029 - 16/05/2019 10:24, o sistema de NFSe ao tentar enviar a nota fiscal apresenta o erro : Nenhum Elemento Encontrado, o erro ocorre quando se utiliza o SSLXmlSignLIB = xsLibXML2, caso utilizar o xsMsXML o sistema autoriza e recebe os retornos todos, o problema é apenas ao utilizar o xsLibXML2; [Configurações]: Provedor : GINFES; Cidade São José do Rio Preto - SP <ACBrNFSe>.Configuracoes.Geral.SSLLib := libWinCrypt; <ACBrNFSe>.Configuracoes.Geral.SSLXmlSignLib := xsLibXml2; <ACBrNFSe>.SSL.SSLType := LT_all; [abaixo segue o log que a minha aplicação gerou]: Data/Hora............: 16/05/2019 14:17:26 Mensagem.............: Nenhum elemento encontrado Classe Exceção.......: EACBrDFeException Formulário...........: fMovimentacao Unit.................: Vcl.Menus Controle Visual......: Nome Usuario.........: Gonzales Nome Computador......: DVLOP-01 Versão Windows.......: Windows 7 / Windows Server 2008 R2 Versão Aplicação.....: 2019.5.16.1000 (0070A152) [00B0B152] ACBrDFeXsLibXml2.TDFeSSLXmlSignLibXml2.AdicionarNode$qqrrp14Libxml2.xmlDocx20System.UnicodeString20System.UnicodeString (Line 665, "ACBrDFeXsLibXml2.pas" + 18) + $0 (00708E13) [00B09E13] ACBrDFeXsLibXml2.TDFeSSLXmlSignLibXml2.Assinar$qqrx20System.UnicodeStringt1t1t1t1t1t1 (Line 203, "ACBrDFeXsLibXml2.pas" + 44) + $28 (007A3D14) [00BA4D14] ACBrDFeSSL.TDFeSSL.Assinar$qqrx20System.UnicodeStringt1t1t1t1t1t1 (Line 1120, "ACBrDFeSSL.pas" + 20) + $26 (00D7368F) [0117468F] ACBrNFSeNotasFiscais.TNotasFiscais.AssinarLote$qqr20System.UnicodeStringt1t1ot1t1t1 (Line 688, "ACBrNFSeNotasFiscais.pas" + 15) + $24 (00DACD1B) [011ADD1B] ACBrNFSeWebServices.TNFSeEnviarLoteRPS.DefinirDadosMsg$qqrv (Line 2768, "ACBrNFSeWebServices.pas" + 168) + $56 (007D600C) [00BD700C] ACBrDFeWebService.TDFeWebService.Executar$qqrv (Line 201, "ACBrDFeWebService.pas" + 6) + $5 (00DB95F8) [011BA5F8] ACBrNFSeWebServices.TWebServices.Envia$qqr20System.UnicodeString (Line 5467, "ACBrNFSeWebServices.pas" + 16) + $8 (00DBC366) [011BD366] ACBrNFSe.TACBrNFSe.Enviar$qqr20System.UnicodeStringo (Line 443, "ACBrNFSe.pas" + 10) + $C (00DBC25B) [011BD25B] ACBrNFSe.TACBrNFSe.Enviar$qqrio (Line 427, "ACBrNFSe.pas" + 1) + $14 (021589B8) [025599B8] uMovimentacao.TfMovimentacao.GerarNFSe$qqrv (Line 7621, "uMovimentacao.pas" + 299) + $1B (0216483B) [0256583B] uMovimentacao.TfMovimentacao.mniSalvareProcessarDocumentoClick$qqrp14System.TObject (Line 9332, "uMovimentacao.pas" + 173) + $3 (00273BCE) [00674BCE] Vcl.Menus.TMenuItem.Click$qqrv (Line 2541, "Vcl.Menus.pas" + 19) + $8 (002764CD) [006774CD] Vcl.Menus.TPopupList.MainWndProc$qqrr24Winapi.Messages.TMessage (Line 4618, "Vcl.Menus.pas" + 2) + $5 (000E5D00) [004E6D00] System.Classes.StdWndProc$qqsp6HWND__uiuiui (Line 17187, "System.Classes.pas" + + $0 Grato desde já.

Boa tarde, @Daniel Simoes Uma sugestão para próximos eventos da ACBr, é a pensar com carinho na parte de logística, sugiro o evento ser em São Paulo Capital, pois é mais fácil chegar em um HUB nacional, do que em uma cidade que nem aeroporto fácil tem, tendo que ir até VCP e pegar um carro até Sorocaba. Forte abraço

Positivo, convenio de 7 o Único problema que tive foi no retorno para ler o mesmo utilizando (lercedenteretorno = true), mas fiz um paliativo enquanto a moderação não verifica se pode ou não implementar isso no compomente...

checa se não é alguma informação que você está passando errado, exemplo carteira 017 e passar 17 ou a variação 019 e era 19, dai a string está ficando fora de posição, algo do gênero, isso são exemplos, teria que verificar campo a campo teu para validar se todos estão corretos; Checa todos os campos antecessores se estão com o domínio correto, uso banco do brasil com CNAB400 e não tenho esse problema

Boa tarde, Estou com um arquivo de retorno do Branco do Brasil convenio 7 posições, e ao utilizar o parametro leCedenteRetorno o sistema não está identificando o convenio e está caindo no processamento de 6 posições e não está realizando o processamento do retorno; Na unit ACBrBancoBrasil na procedure TACBrBancoBrasil.LerRetorno400(ARetorno: TStringList) realizei algumas modificações que submeto a moderação avaliar; procedure TACBrBancoBrasil.LerRetorno400(ARetorno: TStringList); var TamConvenioMaior6: Boolean; rConvenioLider : String; begin if ACBrBanco.ACBrBoleto.LeCedenteRetorno then begin if NaoEstaZerado(StrToInt64Def(Copy(ARetorno[0],41,6),0)) then rConvenioLider := Trim(Copy(ARetorno[0],41,6))//CBR643 convenio 6 posicoes else rConvenioLider := Copy(ARetorno[0],150,7); //CBR643 convenio 7 posicoes ACBrBanco.ACBrBoleto.Cedente.Convenio := rConvenioLider; end; TamConvenioMaior6:= Length(trim(ACBrBanco.ACBrBoleto.Cedente.Convenio)) > 6; if TamConvenioMaior6 then LerRetorno400Pos7(ARetorno) else LerRetorno400Pos6(ARetorno); end; Desde já muito obrigado; ACBrBancoBrasil.pas

Boa tarde, Surgiu a demanda na hora da exportação do boleto utilizando fastreport em PDF o sistema gerar com o nome personalizado, exemplo (número da carteira, data hora, nome do cliente,etc) personalizável por parte do consumidor (parametrizável nas configuração do sistema); Desta forma somente usando o filtro fiPDF estava conseguindo chegar no resultado desejado, mas com isso eu não conseguia fazer a pré-visualização, ele gerava o trabalho de pdf diretamente. Então utilização filtro fiNENHUM : 1) Na exportação estava vindo como padrão desmarcado para embarcar as fontes no pdf, assim gerando em alguns máquinas problemas de abertura do arquivo do boleto no leitor de pdf, por mais que no componente acbrboleto estive-se marcado para embarcar; 2) Devido a demanda da personalização do nome do arquivo por runtime e a utilização do filtro fiNENHUM, pois preciso deixar o trabalho de impressora e a pessoa exportar manualmente, precisei alterar o arquivo ACBrBoletoFCFR. ficando as linhas 334 : fiNenhum: begin if (MostrarPreview) and (not FModoThread) then begin frxPDFExport.Keywords := frxPDFExport.Title; frxPDFExport.Background := IncorporarBackgroundPdf;//False diminui 70% do tamanho do pdf frxPDFExport.EmbeddedFonts := IncorporarFontesPdf; frxReport.Engine.Report.FileName := NomeArquivo; //nome do arquivo a ser exportado frxReport.ShowReport(false) end else frxReport.Print; end; Estou enviando o arquivo para apreciação e verificação da moderação; Grato desde já; ACBrBoletoFCFR.pas

Boa tarde, Existe como "manipular" o campo mensagem0 para passar uma mensagem de ambiente, exemplo imprimir o literal "NFSe emitida em ambiente de homologação" no danfse; Só a fim de evitar circulação de documentos impróprios, similar ao que temos hoje com a NFe onde sai impresso quando o documento está transmitido para ambiente de homologação; Desde já obrigado; Fraterno abraço;

Bom dia @licerio Eu estou pensando em ir para VCP de Azul, lá tem um ônibus que faz a ligação entre as cidades da própria companhia Azul, foi o melhor que achei até o momento; Também não conheço muito bem o trecho, mas é o mais próximo que cheguei; Ou ir até VCP ou GRU e ir de taxi/ônibus até Sorocaba;

Mesma situação em São José do Rio Preto - SP E358 Falei tambem na GINFES em São Paulo (11) 2175-1145 Suporte, a mesma informa que está com problemas em seus servidores e ainda não sabe a extensão do problema, não há previsão de normalização.

Parabens pela iniciativa, final do ano estaremos lá

Bom dia, A Capcom foi descontinuada pela microsoft a muito tempo, por isso é recomendável remover, mas ela trabalha com STORE, funciona para certificados modelo A1 e A3; A OpenSSL tu vai conseguir trabalhar com arquivos PFX diretamente sem o uso das STORE; O Wincrypt tu vai conseguir trabalhar com STORE de certificados igual a capcom, tanto para modelo A1 e A3; eu particularmente eu removi toda a dependência do capcom e da openssl dos meus sistemas, portanto uso o (Wincrypt + MSXML), se usar (Wincrypt + libXML2 ) ele vai te pedir a dependência do OpenSSL Abraços

Por telefone na elgin, falaram que isso deve sair nos meses 07/08-2018

Boa tarde, A distribuição da DFe até a parte do resumo funciona normalmente, mas na etapa 4 que tem que registrar o evento para a distribuição da nota fiscal vir completa é onde ocorre o erro CSTAT 282 - Rejeicao: Certificado Transmissor sem CNPJ, como é o fluxo normal para a nota fiscal quando PJ; Deveria ter uma forma de recuperar esses XML de PF igual é o de PJ; Não estou falando que a ACBr está com erro, visto que isso é retorno do WS; Obrigado XMLs.rar

Boa tarde @Daniel Simoes A implementação atendeu com excelência, pelo que vi na implementação irá atender quem usa a diretiva desativada xsMsXML e quem usa a diretiva LIBXML2 irá utilizar xsLibXML2, desta forma resolvendo o problema para ambos os lados. Muito obrigado pelo tempo despendido analisando o caso e procurando uma melhor solução para o incidente elencado; Forte abraço

Boa tarde @Daniel Simoes, Cheguei agora na empresa estava em viagem, estarei realizando os testes e te passo o feedback em sequencia; Muito obrigado

Boa noite, Na ultima atualização que realizei do componente da acbr, ao abrir o projeto está gerando problemas de configuração, na instalação do ACBr está desmarcado para utilizar CAPCOM e OPENSSL. verifiquei que na alteração 14804 feita por @Daniel Simoes [*] TGeralConf.SSLLib, modificado para que quando tiver o valor "libWinCrypt", assuma a seguinte configuração: SSLCryptLib := cryWinCrypt; SSLHttpLib := httpWinHttp; SSLXmlSignLib := xsLibXml2; Modificando o uso de xsMsXml para xsLibXml2 (por: DSA) Quando o componente está utilizando a diretiva desatilitar OPENSSL, está gerando uma exceção ao utilizar o sslLib (LibWinCrypt), onde o mesmo tenta inserir no componente a assinatura xsLibXML2, eu acredito que o arquivo ACBrDFeSSL na procedure TDFeSSL.SetSSLXmlSignLib(xsLibXml2), alem de estar com a mensagem de erro (raise) indicando que está usando o xsXMLSec, acredito que não se aplica a diretiva {$IfNDef DFE_SEM_OPENSSL} neste caso Obrigado

consegui usando a unit original sem a alteração o efeito desejado com a ajuda do @Régys Silveira <ACBrNFe>.Configuracoes.Arquivos.OrdenacaoPath.Clear; Obrigado

@hleorj mesmo com as propriedades "false" ele continua criando na estrutura cnpj + nfe. o if (csDesigning in ComponentState) then fica com valor csFreeNotification, e não gera aonde foi determinado no pathpdf. não é para gerar na estrutura cnpj + tipoDocumento, e sim onde declarar o pathpdf, se as propriedades separar cnpj, tipo de documento estivessem true, ai concordo com sua afirmação, mas neste caso como no post inicial, você pode verificar que as propriedades estão como false, para separação de arquivos.