Ir para conteúdo
  • Cadastre-se

Cleiver

Membros
  • Total de ítens

    201
  • Registro em

  • Última visita

Tudo que Cleiver postou

  1. Quando a impressão é direta ou visualização do Danf mostra os dados do item corretamente, mas quando chama a função ACBr.NotasFiscais.ImprimirPDF o total do item corta ou não imprime. Ao diminuir o tamanho da fonte do item imprime mas desalinhado dos outros dados principalmente se possuir desconto. segue imagens em anexo
  2. Fiz teste em produção e homologação, só não fiz teste com o exemplo, mais tarde vou fazer novamente o teste e posto aqui
  3. Amarildo, sim já fiz essa configuração, e resolveu o meu problema, só postei para que todos fique sabendo que se estiver como libOpenSSL esta trazendo zeros no últimos caracteres, e anteriormente estava trazendo corretamente, rotina que já uso a muito tempo com essa configuração.
  4. sim, eu analiso para guardar em banco, essa rotina estava funcionando nas versões anteriores
  5. sim, eu uso via arquivo PFX, mas sempre utilizei a opção CertNumeroSerie para conferir se é o certificado correto porque alguém pode trocar o arquivo.
  6. Boa tarde, Quando as configurações esta setada para libOpenSSL o numero de serie do certificado esta retornado os 4 ultimos caracteres com zeros, mas se a configuração estiver para libWinCrypt retorna correto. ACBr.Configuracoes.Geral.SSLLib := TSSLLib(libWinCrypt); ACBr.Configuracoes.Certificados.Senha := Senha; ACBr.SSL.CertNumeroSerie; att. Cleiver
  7. Italo, Bom dia, No momento não lembro direito mas me parece que foi 573.
  8. Juliomar, segue em anexo unit. linha alterada 1270 abs ACBrNFeNotasFiscais.pas
  9. Nas ValidarRegrasdeNegocios quando o estado permite NFCe conjugada como o estado do PI, a regra esta apresentado critica mas não esta levando em consideração do desconto do item serviço porque esta pegando o valor da base de calculo. regra atual. fsvServ := fsvServ + Imposto.ISSQN.vBC; //VERIFICAR regra correta fsvServ := fsvServ + Imposto.ISSQN.vBC + Imposto.ISSQN.vDescIncond; //VERIFICAR
  10. Bom dia, Italo, Deu certo apos atualização, obrigado
  11. Bom dia, na atualização de hoje esta faltando a unit pnfsNFSeW_Siat.pas
  12. apaguei a pasta e atualizei novamente e deu certo, obrigado
  13. sim, só faço atualização completa
  14. mesmo marcando continua o erro
  15. Apos atualizar os fonte esta apresentando o erro na instalação Compiling package D:\Delphi 2010\ACBrTrunck2\Pacotes\Delphi\synapse\ACBr_synapse.dpk "C:\Program Files (x86)\Embarcadero\RAD Studio\7.0\bin\dcc32.exe" "D:\Delphi 2010\ACBrTrunck2\Pacotes\Delphi\synapse\ACBr_synapse.dpk" Embarcadero Delphi for Win32 compiler version 21.0 Copyright (c) 1983,2009 Embarcadero Technologies, Inc. D:\Delphi 2010\ACBrTrunck2\Fontes\Terceiros\synalist\synautil.pas(2040) Error: E2003 Undeclared identifier: 'SynaFpc' D:\Delphi 2010\ACBrTrunck2\Fontes\Terceiros\synalist\synautil.pas(2045) Error: E2029 'THEN' expected but identifier 'StrLComp' found abs. Cleiver
  16. obrigado
  17. Após atualização esta apresentando o seguinte erro: Compiling package D:\Delphi 2010\ACBrTrunck2\Pacotes\Delphi\ACBrDFe\ACBrNFSe\ACBr_NFSe.dpk "C:\Program Files (x86)\Embarcadero\RAD Studio\7.0\bin\dcc32.exe" "D:\Delphi 2010\ACBrTrunck2\Pacotes\Delphi\ACBrDFe\ACBrNFSe\ACBr_NFSe.dpk" Embarcadero Delphi for Win32 compiler version 21.0 Copyright (c) 1983,2009 Embarcadero Technologies, Inc. D:\Delphi 2010\ACBrTrunck2\Fontes\ACBrDFe\ACBrNFSe\PCNNFSe\pnfsLerListaNFSe.pas(1305) Error: E2018 Record, object or class type required D:\Delphi 2010\ACBrTrunck2\Fontes\ACBrDFe\ACBrNFSe\PCNNFSe\pnfsLerListaNFSe.pas(1376) Error: E2029 'END' expected but 'EXCEPT' found D:\Delphi 2010\ACBrTrunck2\Fontes\ACBrDFe\ACBrNFSe\PCNNFSe\pnfsLerListaNFSe.pas(1378) Error: E2125 EXCEPT or FINALLY expected D:\Delphi 2010\ACBrTrunck2\Fontes\ACBrDFe\ACBrNFSe\PCNNFSe\pnfsLerListaNFSe.pas(1381) Error: E2125 EXCEPT or FINALLY expected D:\Delphi 2010\ACBrTrunck2\Fontes\ACBrDFe\ACBrNFSe\PCNNFSe\pnfsLerListaNFSe.pas(1383) Error: E2029 'END' expected but end of file found D:\Delphi 2010\ACBrTrunck2\Fontes\ACBrDFe\ACBrNFSe\PCNNFSe\pnfsLerListaNFSe.pas(1383) Error: E2029 ';' expected but end of file found D:\Delphi 2010\ACBrTrunck2\Fontes\ACBrDFe\ACBrNFSe\ACBrNFSeWebServices.pas(47) Fatal: F2063 Could not compile used unit '..\..\..\..\Fontes\ACBrDFe\ACBrNFSe\PCNNFSe\pnfsLerListaNFSe.pas' Compilation failure Erro ao compilar o pacote "ACBr_NFSe.dpk". Abortando... Ocorreram erros na compilação dos pacotes. Me parece que esta utilizados recursos das versões mais nova do Delphi e estou utilizando o 2010. leitor.Arquivo.Contains abs Cleiver
  18. segue a dica que postei acima
  19. segue o que fiz nesse post
  20. Renata, Bom dia, segue a dica que postei acima, porque o meu sistema esta funcionando normalmente.
  21. se vc verificar na função LerXML na unit ACBrNFeNotasFiscais já existe uma regra igual a que acrescentei. o problema é que em todas as Tag esta retornando ( xmlns="http://www.portalfiscal.inf.br/nfe") <tpAmb xmlns="http://www.portalfiscal.inf.br/nfe">1</tpAmb> <verAplic xmlns="http://www.portalfiscal.inf.br/nfe">W-1.4.23</verAplic> <cStat xmlns="http://www.portalfiscal.inf.br/nfe">100</cStat> <xMotivo xmlns="http://www.portalfiscal.inf.br/nfe">Autorizado o uso da NF-e</xMotivo> <cUF xmlns="http://www.portalfiscal.inf.br/nfe">31</cUF> <dhRecbto xmlns="http://www.portalfiscal.inf.br/nfe">2019-09-26T09:02:59-03:00</dhRecbto>
  22. Essa solução foi aplicada seguindo o mesmo critério de retorno de uma nota, no meu caso a nota foi enviada só que tive problema de TimeOut quando fiz uma consulta analisado o retorno notei que vinha dados em cada tag que estava impedindo a alimentação correta do componente.
  23. Não esta fora, tem um retorno na consulta que esta impedindo a alimentação nos dados de retorno. abri um tópico com uma solução que resolveu aqui para min.
  24. Ao consulta uma NFC-e esta retornando em cada tag ' xmlns="http://www.portalfiscal.inf.br/nfe"' e provoca um erro no retorno dos dados. para resolver a solução foi acrescentar. function TNFeConsulta.TratarResposta: Boolean; FPRetWS := StringReplace(FPRetWS, ' xmlns="http://www.portalfiscal.inf.br/nfe"', '', [rfReplaceAll]); function TNFeRecepcao.TratarResposta: Boolean; AXML := StringReplace(AXML, ' xmlns="http://www.portalfiscal.inf.br/nfe"', '', [rfReplaceAll]); segue em anexo arquivos: ACBrNFeWebServices.pas 80800439-pro-lot.xml
  25. obrigado, sugeri eles a fazer a leitura pelo Código do evento e não pela descrição, enviei o xsd e o link do site da receita. pode fechar o topico abs.
×
×
  • 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...