Ir para conteúdo
  • Cadastre-se

dev botao

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

Recommended Posts

  • Membros Pro
Postado

Boa tarde,

Visto que no campo duplicatas, não vai aceitar mais outras formas de pagamento, estou implementando as para aparecer nas informações complementares, conforme sugestão de alguns colegas,

estou fazendo dessa forma:

parcela:= '';
     parcela:= #13#10 + 'Formas de Pagamento' + #13;
     Qry.First;
     while not Qry.Eof do begin

     if Qry.RecordCount = Qry.RecNo then
     parcela:= parcela + FormatFloat('00', StrToFloat( Qry.RecNo.ToString)) + '- ' +  Format('%-12s',[ copy(Qry.FieldByName('Forma').AsString,1,10) ]) + '- ' +  Format('%-12s',[ Qry.FieldByName('VENCIMENTO').AsString  ]) + '- ' + Format('%-10s',[ FormatFloat('0,.00', StrToFloat( Qry.FieldByName('valor').AsString )) ])  else
     parcela:= parcela + FormatFloat('00', StrToFloat( Qry.RecNo.ToString)) + '- ' +  Format('%-12s',[ copy(Qry.FieldByName('Forma').AsString,1,10) ]) + '- ' + Format('%-12s',[ Qry.FieldByName('VENCIMENTO').AsString  ]) + '- ' + Format('%-10s',[ FormatFloat('0,.00', StrToFloat( Qry.FieldByName('valor').AsString )) ]) +#13 ;

     Qry.Next;
     end;

 

então adiciono InfAdic.infCpl:= InfAdic.infCpl  + parcela;

porem a formatação fica um pouco bagunçada dentro das informações complementares.

O que posso estar fazendo errado?

 

Grato

 

danfe.PNG.b7eec8ad40a0e5fe3f826fa9c26acd3a.PNG

Postado
30 minutos atrás, rodrigoogioni disse:

Visto que no campo duplicatas, não vai aceitar mais outras formas de pagamento

Com as mudanças da nova NT, agora aceita outras formas de pagamento.

  • Membros Pro
Postado
27 minutos atrás, everson.turossi disse:

O tPag 14=Duplicata Mercantil vai ser excluído, e o grupo dup teve a descrição alterada para Grupo Parcelas, nDup passa a ser Número da Parcela e vDup vai ser Valor da Parcela.

Obrigado pela resposta, 

nao tinha visto mesmo.

Valeu

26 minutos atrás, leotelles disse:

Com as mudanças da nova NT, agora aceita outras formas de pagamento.

Obrigado pela resposta, 

nao tinha visto mesmo.

Valeu

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