Ir para conteúdo
  • Cadastre-se

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

Recommended Posts

  • Moderadores
Postado

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
  • Fundadores
Postado

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.

  • Moderadores
Postado

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
  • Moderadores
Postado

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

 

  • Consultores
Postado

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.
  • Este tópico foi criado há 2941 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.