Jump to content

dev botao

Valor Informado na Forma de Pagamento com troco


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

Recommended Posts

eu to com uma situação com o Cliente, ele pediu pra exibir o valor do troco (imagem em anexo) que eu fiz informando a propriedade vTroco e funciona bem, o problema é que a venda é 0,50 e o cliente entrega 5,00 em dinheiro e tem o troco de 4,50.. é possivel informar na forma de pagamento so 5,00, apresentar o valor que o cliente passou para o caixa?

WhatsApp Image 2017-08-01 at 14.25.35.jpeg

eu uso o FastReport

Edited by dorivansousa
Link to comment
Share on other sites

Eu tinha o mesmo problema com isso.

Em um tópico que não me lembro mais um usuário passou uma solução temporária. Fiz como ele sugeriu

procedure TACBrNFeFRClass.CarregaPagamento;
var
  i: Integer;
begin
  with cdsPagamento do
  begin
    Close;
    CreateDataSet;
    for i := 0 to NFe.Pag.Count - 1 do
    begin
      Append;
      with FNFe.Pag[i] do
      begin
        FieldByName('tPag').AsString  := FormaPagamentoToDescricao( tPag );
        FieldByName('vPag').AsFloat   := vPag;
        // ver tpIntegra
        FieldByName('CNPJ').AsString  := FormatarCNPJ(CNPJ);
        FieldByName('tBand').AsString := BandeiraCartaoToDescStr( tBand );
        FieldByName('cAut').AsString  := cAut;
      end;
      Post;
    end;

    // acrescenta o troco
    if vTroco > 0 then
    begin
      // Deixar aki para Teste
      Last;
      Edit;
      FieldByName('vPag').AsFloat   := FieldByName('vPag').AsFloat + vTroco;
      Post;

      Append;
      FieldByName('tPag').AsString  := 'Troco R$';
      FieldByName('vPag').AsFloat   := vTroco;
      Post;
      {Append;
      FieldByName('tPag').AsString  := 'Troco R$';
      FieldByName('vPag').AsFloat   := vTroco;
      Post;}
    end;
  end;
end;

Não sei se seria a melhor opção, porem ao realizar uma compra semana passada a nfce que recebi era assim. Tinha troco na nota mas ele me mostrou o qto eu paguei.

Somente lembrando que essa alteração irá sair somente na DANFE. rsrrs

Edited by Andre Luiz Oliveira
Link to comment
Share on other sites

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

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.