Ir para conteúdo
  • Cadastre-se

dev botao

ACBrTEFD + Bemafi32.dll + Impressora Fiscal


Gr@c@
  • Este tópico foi criado há 2745 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Moderadores

Tenho um aplicativo desenvolvido já homologado usando a Bemafi32.dll. 

Preciso adequar o CliSiTef com o uso do ACBrTEFD (sem usar o ACBrECF). Alguem tem um exemplo do uso do ACBrTEFD com bemafi32? Consigo efetuar a transação até mensagem Transação OK,porém não consigo imprimir o comprovante (impressora fiscal) e a transação é cancelada. Creio que o erro esteja no tratamento dos eventos.

  • Curtir 1
Link para o comentário
Compartilhar em outros sites

  • Fundadores

Sim, é possível usar as DLLs... o seu erro provavelmente está em não sinalizar de forma adequada, qual o Retorno do ECF...

Repare que todos os eventos, tem um parâmetro de Retorno... ele deve ser preenchido de maneira a passar para o TEFD a informação que ele pediu...

Na dúvida, estude os fontes do TEFDDemo

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

  • Moderadores

Falta de atenção mesmo: o fato é que o ACBrTEFD envia o indice da forma de pagamento como parametro e a função da bemafi32 requer o nome da forma como parametro. 

procedure TFrm_ECFPrincipal.ACBrTEFD1ComandaECFAbreVinculado(COO,
  IndiceECF: String; Valor: Double; var RetornoECF: Integer);
begin
(**
  try
     Memo1.Lines.Add( 'ACBrTEFD1ComandaECFAbreVinculado, COO:'+COO+
        ' IndiceECF: '+IndiceECF+' Valor: '+FormatFloat('0.00',Valor) ) ;
     ACBrECF1.AbreCupomVinculado( COO, IndiceECF, Valor );
     RetornoECF := 1 ;
  except
     RetornoECF := 0 ;
  end;
**)
  try
    mmProcesso.Lines.Add( 'ACBrTEFD1ComandaECFAbreVinculado,'+
                          ' COO:'       +COO+
                          ' IndiceECF: '+IndiceECF+
                          ' Valor: '    +FormatFloat('0.00',Valor) );
    RetornoECF := Bematech_FI_AbreComprovanteNaoFiscalVinculado(PChar(IndiceECF), ====> aqui tem que ser o nome da forma de pagamento
                                                                PChar(FormatFloat('0.00',Valor)),
                                                                PChar(COO));
  except
    RetornoECF := 0 ;
  end;
end;

 

  • Curtir 4
Link para o comentário
Compartilhar em outros sites

  • Moderadores

Qual o procedimento correto após aparecer essa tela? Chamar automaticamente a tela ADM para que o usuário imprima o ultimo comprovante, o sistema deve imprimir ultimo cupom automaticamente, não deixar usuário realizar outras operações?tef.png

 

Link para o comentário
Compartilhar em outros sites

  • Consultores

Se me lembro bem do roteiro, não fazer nada...

  • Curtir 1

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 2745 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • 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.