Ir para conteúdo
  • Cadastre-se

Daniel Simoes

Fundadores
  • Total de ítens

    27.620
  • Registro em

  • Última visita

  • Days Won

    767

Tudo que Daniel Simoes postou

  1. isso está errado... veja o parâmetro do evento: procedure TForm1.ACBrMTer1RecebeDados(const IP: AnsiString; const Recebido: AnsiString; var EchoMode: TACBrMTerEchoMode); // <--- AQUI begin EchoMode := mdeNone; // <-- DESLIGANDO, apenas para esses dados recebidos
  2. Já temos a página oficial do Dia do ACBr da 2a Edição... https://www.doity.com.br/diadoacbr O Primeiro Lote de vendas, será aberto apenas no dia 02/07/19... Mas no dia 12/06, abriremos a Pré-Venda: Um Lote limitado de ingressos, com um super desconto para os fãs do ACBr Clique Aqui, para receber o código de Desconto da Pré-Venda, no dia 12/06... Garanta a sua vaga na 2a Edição do Dia do ACBr, com um preço super especial
  3. A última versão é a Rio... mas comprando uma versão original, você pode baixar a ISO de qualquer edição, desde o Delphi 7 Ter muitos formulários, não é um problema... mas crie-os em tempo de execução (não deixe como Auto create)
  4. Use a força, leia aos fontes... Veja como fizemos no DANFCE, em EscPos http://svn.code.sf.net/p/acbr/code/trunk2/Fontes/ACBrDFe/ACBrNFe/DANFE/NFCe/EscPos/ACBrNFeDANFeESCPOS.pas Ou no Extrato do SAT http://svn.code.sf.net/p/acbr/code/trunk2/Fontes/ACBrSAT/Extrato/EscPos/ACBrSATExtratoESCPOS.pas
  5. Veja no Demo, como retornar, qualquer um dos Códigos... procedure TForm1.ACBrTEFD1DepoisConfirmarTransacoes( RespostasPendentes: TACBrTEFDRespostasPendentes); var I : Integer; begin for I := 0 to RespostasPendentes.Count-1 do begin with RespostasPendentes[I] do begin Memo1.Lines.Add('Confirmado: '+Header+' ID: '+IntToStr( ID ) ); // Lendo os campos mapeados // Memo1.Lines.Add( 'Rede: ' + Rede + ' NSU: ' + NSU + ' Parcelas: '+ IntToStr(QtdParcelas) + ' Parcelado por: '+ GetEnumName(TypeInfo(TACBrTEFDRespParceladoPor), integer(ParceladoPor) ) + ' É Débito: '+BoolToStr(Debito)+ ' É Crédito: '+BoolToStr(Credito)+ ' Valor: '+ FormatFloat('###,###,##0.00',ValorTotal)) ; // Lendo um Campo Específico // Memo1.Lines.Add('Campo 32: ' + LeInformacao(32,0).AsString ); // <---- AQUI end; end; end;
  6. Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.
  7. Use um Path relativo ou defina um parâmetro para onde encontrar a Imagem, em tempo de execução
  8. Veja essa página https://www.projetoacbr.com.br/forum/companies/category/2-consultores/
  9. Creio que sim... em um futuro próximo, teremos a ACBrLibBoleto... No momento a única opção seria o ACBrMonitorPLUS https://www.projetoacbr.com.br/acbr-monitor-plus/ https://acbr.sourceforge.io/ACBrMonitor/ComoimprimirumBoleto.html
  10. Se a comunicação com o SEFAZ não funcionar... nennhum outra operação será possível... Se o aparelho ficou muito tempo desconectado, pode ser que não tenha atualizado para o novo certificado da SEFAZ Verifique com o Fabricante, se a versão desse equipamento, não ocorre no problema de usar um certificado da Sefaz antigo... Se for esse o caso, apenas o Fabricante conseguiria inserir um novo certificado do SEFAZ no aparelho...
  11. Você mesmo gera o XML, na sua aplicação ? Ou você usa comandos e o formato INI Se usa o INI, favor anexar o comando e INI enviado, para geração do XML
  12. Não compreendi o seu Post... a biblioteca "ACBrPosPrinter32.dll" , é específica para Impressão em Impressoras de bobina, usando EscPos.... ela não gera Boletos...
  13. Veja os fontes da classe ACBrTEFDCliSitef.pas... ele não envia CNF se o mesmo já foi enviado.. { Já Finalizou este Documento por outra Transação ? } if (pos(DocumentoVinculado, fDocumentosProcessados) > 0) then exit; Basta você monitora o Log do ACBrTEFD ou do próprio SiTef, e verificar os comandos enviados e respostas recebidas...
  14. Pode ser que funcionasse por alguma "excesso". Na definição da porta... mas o RAW sempre foi necessário para usar Impressora de Spool
  15. Você deve desligar o EchoMode, na variável que é passada como referencia, no Evento... Veja um exemplo em:
  16. Não há a possibilidade de criar uma Porta Serial, Virtual e Remota ? https://docs.microsoft.com/en-us/previous-versions/windows/it-pro/windows-server-2008-R2-and-2008/cc770631(v=ws.11)
  17. veja em ACBrUtil.pas, o método "RoundABNT" http://svn.code.sf.net/p/acbr/code/tools/Diversos/ABNT NBR-5891 Regras de arredondamento e numeração decimal.pdf
  18. Simples.. O algoritmo de arredondamento é diferente... e o ECF usa esse tipo de arredondamento...
  19. Parece que a solução para isso, reside na correria configuração dessa Topologia em Windows TS.. ou seja uma limitação desse sistema... Mas não há algo que possamos fazer, nos fontes do ACBr
  20. Pelo jeito... você já sabe de tudo... não parece precisar de ajuda
  21. Se você não usar o Arredondamento da ABNT, sempre terá diferença em relação ao ECF
  22. Você usa o Arredondamento da ABNT, correto ?
  23. Segundo manual do fornecedor de Firmware da Bematech... estamos usando o comando correto svn.code.sf.net/p/acbr/code/tools/PosPrinter/Bematech/Manual%20comando%20direto%20-%20DPrint.pdf Pode alguma configuração no Driver Serial do Fabricante... ou algum ajuste nos parâmetros de Serial... Esse equipamento tem Serial Fisica, correto ? Nesse caso, recomendo usar um cabo serial...
  24. Tópico movido para a área "Object Pascal", por não ser um assunto coberto pelo SAC, ou ligado ao ACBr
×
×
  • 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.