Ir para conteúdo
  • Cadastre-se

dev botao

Cielo Premias Subtotal X Total


Ver Solução Respondido por Daniel Simoes,
  • Este tópico foi criado há 4285 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro
Postado

Uma duvida

 

uma venda de 40,00 coloque 10,00 acrescimo

ficou um total de 50,00

 

entao acionei um CRT de 50,00  que min retornou

5,00 real de desconto,

 

entao ficou assim

 

subtotal 40,00

acrecimo de 5,00  ( 10,00 acrecimo -  5,00 desconto cielo premier)

----------------

45,00

45,00 cartao

0,00   troco

 

NO ECF ta assim,

 

vou ter que passar esses valores para o soft, e mostra para o cliente na tela do soft,

porque na tela do meu soft ta assim

total

50,00   (40 + 10 acrecimo)

50,00   RECEBIDO CRT

0,00    TROCO

 

 

É OBRIGATORIO ?

  • Fundadores
Postado

Pode ser que o homologador perceba que a informação da Tela está diferente da do Cupom e solicite a correção...

 

Você poderia exibir o Desconto retornado pelo TEF (é como eu faço)... ou redesenhar na tela todos recebimentos de acordo com o que o ECF imprimiu

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.

  • Membros Pro
Postado

Blz

Usei

ShowMessage( FloatToStr( RespostasPendentes.ValorTotal ) );

 

 

 

 

procedure TForm1TEFD.ACBrTEFD1DepoisConfirmarTransacoes(
   RespostasPendentes: TACBrTEFDRespostasPendentes);
var
  I : Integer;
begin
  for I := 0 to RespostasPendentes.Count-1  do
  begin
     with RespostasPendentes do
     begin
        Memo1.Lines.Add('Confirmado: '+Header+' ID: '+IntToStr( ID ) );

        Memo1.Lines.Add( 'Rede: '  + Rede +
                         ' NSU: '  + NSU  +
                         ' Valor: '+ FormatFloat('###,###,##0.00',ValorTotal)) ;
        Memo1.Lines.Add('Campo 11: ' + LeInformacao(11,0).AsString );

        ShowMessage( FloatToStr( RespostasPendentes.ValorTotal ) ); ///------------------EU
     end;
  end;
 

 

 

para ver o total, mais so min mostra quando termina de imprimir tudo,

tem algum evento que eu possa pega o toal para modifica a tela do soft,

depois que confirma o cartao?

  • Fundadores
  • Solution
Postado

Você pode ler o RespostaPendente[N].ValorTotal da última RespostaPendente logo após a resposta do método CRT...

 

Algo como:

if ACBrTEFD1.CRT(....) then
begin
  ACBrTEFD1.RespostasPendentes[ACBrTEFD1.RespostasPendentes.Count-1].ValorTotal;
end ; 

 

O próprio evento OnComandaECFPagamento recebe o ValorTotal que deve ser impresso...

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.

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