Ir para conteúdo
  • Cadastre-se

Daniel Simoes

Fundadores
  • Total de ítens

    27.067
  • Registro em

  • Última visita

  • Days Won

    759

Tudo que Daniel Simoes postou

  1. Incrível vocês não perceberem, que a grande vantagem do INI é não depender de código compilado de forma estática... Distribua o INI com a sua aplicação, e com isso você tem a possibilidade de editar os endereços em Run-Time, sem necessidade de recompilar a aplicação... ACBrNFe1.Configuracoes.Arquivos.IniServicos := 'C:\SeuPath\ACBrNFeServicos.ini' ; @fabricio.syncode Já enviei para o SVN, a modificação no .INI Obrigado pela ajuda...
  2. Não dá parte dos mantenedores do ACBr
  3. Quem gera o XML de resposta é o SAT... Verifique se o regime da Empresa no SAT/SEFAZ, está diferente do que você imagina....
  4. Estava escrito errado (corrigi) ACBr\Fontes\ACBrComum\ACBr.inc
  5. Waldir... se se tratar apenas do "LeftStr"... acho que o mais simples é substitui-lo por "Copy"
  6. Edson, Tenho respostas positivas de que a versão atual dos fontes no SVN, funciona... Não vejo necessidade de modificação nas Units do DFe ou Capicom
  7. Fiquei curioso a respeito das Warnings "W1000 Symbol '%s' is deprecated"... não deve ser difícil eliminá-las... Mas fique a vontade de analisá-las quando tiver um tempo livre... Ainda lhe devo uma resposta a respeito das modificações no TEFD... Foi muito bom contar com a sua ajuda... essas Warnings me incomodavam a um bom tempo... (e ainda sobrou vários de convrsão de String) O SVN já está de volta....
  8. Bem melhor... obrigado pela ajuda Waldir... já está no SVN...
  9. Quem imprime o QRCode é a impressora... o SAT não tem nenhuma relação direta com isso...
  10. Obrigado pela contribuição... Já está no SVN, com pequenos ajustes...
  11. Segundo as informações dessa página... http://docwiki.embarcadero.com/RADStudio/Seattle/en/W1010_Method_'%25s'_hides_virtual_method_of_base_type_'%25s'_%28Delphi%29 o "Reintroduce" é uma das maneiras de suprimir essa Warning... Mas no nosso caso, o método redeclarado com o "reintroduce", tem parâmetros diferentes, do original... Será que falta uma declaração de "overload" ?
  12. Lembrando que você pode distribuir o INI com a sua aplicação (sem depender do Resource)... e com isso, ganhar a possibilidade de modificar as URLs em RunTime
  13. Imprima da mesma maneira que vc imprime em qq impressora do Windows...
  14. Trata-se de uma impressora NÃO fiscal... Você pode imprimir qualquer coisa nela....
  15. Mesmo com a adição de "Reintroduce" como está nos fontes atuais... o Delphi acusa um warning ? Se SIM, qual é a msg ? procedure Assign(DeGeralConf: TGeralConf); reintroduce; virtual; PS: Noto que você não tem muita preocupação com a edentação dos fontes... (não vejo um padrão, e não está nos semelhate ao dos fontes atuais..) No inicio do ACBr usávamos 3 espaços.. atualmente tentamos seguir as recomendações do Delphi Team
  16. Enviei commit para os demais casos... Acredito que tudo está ok agora... no SVN...
  17. Parece correto... pois o problema.. irá ocorrer na chamada de "ACBrAnsiToUTF8", que chama o método do "LConvEncoding.ConvertEncoding"... e esse método do Lazarus, se receber o parâmetro como "ANSI", irá tentar descobrir qual é o Encoding do sistema operacional... que no seu caso, resultará em UTF8 Ou seja, o método " LConvEncoding.ConvertEncoding" não faz nada...se o parâmetro de "FromEncoding" for "ansi" Correção já está no SVN...
  18. Obrigado pela contribuição... Efetuei algumas modificações na implementação, para ficar semelhante aos demais métodos...
  19. Hummm.. o problema pode estar na ACBrUtil... ela não deve estar conseguindo detectar qual o Encoding de ANSI para ser usado com essa distribuição Pode ser ainda, algo relacionado ao FPC 2.6.4... Verifique, qual é o retorno do método a seguir: {$IfDef FPC} function GetSysANSIencoding: String; begin Result := {$IfDef NOGUI}GetConsoleTextEncoding{$Else}GetDefaultTextEncoding{$EndIf}; if Result = EncodingUTF8 then Result := 'cp1252'; // Usando página de código ANSI padrão para o Brasil end; {$EndIf} (deve ser algo diferente de UTF8)
  20. OK... já no SVN... obrigado mais uma vez...
  21. Não existe isso... os XMLs são diferentes... NFCe = NFe <> CFe
  22. Vai depender muito, de qual Gerenciador TEF você está usando... melhor se basear na documentação do Integradora
  23. Obrigado Waldir... modificações já estão noSVN
  24. Por favor ative as linhas de Debug em ACBrSocket.pas // DEBUG // 773 RespHTTP.SaveToFile('c:\temp\HttpResp.txt'); 774 HTTPSend.Headers.SaveToFile('c:\temp\HeaderResp.txt'); Isso irá salvar em arquivo, a exata resposta do Servidor, e o Header do HTTP... com isso poderemos compreender o que pode estar ocorrendo...
×
×
  • 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.