Fórum rotina para calcular o valor unitario #423582

13/09/2012

0

Delphi

gostaria de saber se alguem pode me ajudar nessa rotina de cacular o valor unitario, é o seguinte tenho um produto tipo flores com varios preços diferente, mais porem com um unico codigo para todos, queria que ao digita o codigo do produto ae eu possa aterar o valor unitario e ao digitar a quantidade ja der o valor caculado em valor total e que seja exibido na DBGrid tipo assim ITEM CODIGO MERCADORIA QUATIDADE UNITARIO TOTAL
1 295 Flores 3 5,00 15,00


Maxwell

Maxwell

Responder

Posts

13/09/2012

Guilherme Costa

Cara eu gosto de trabalhar com ClientDataSet, dar uma olhada nesse link.

https://www.devmedia.com.br/internalcalc-curso-trabalhando-com-clientdataset-parte-9/5734
Responder

Gostei + 0

13/09/2012

Joel Rodrigues

Qual é exatamente sua dúvida? O que tem pronto, como está fazendo?
Responder

Gostei + 0

19/09/2012

Joel Rodrigues

e ai, como ficou? Obteve algum avanço?
Responder

Gostei + 0

19/09/2012

Claudia Nogueira

Eu colocaria na query que está ligada ao DataSource do DBGrid uma sentença SQL que traria o resultado do cálculo.
Mais ou menos da seguinte forma:

  IBQuery1.Close;
  IBQuery1.SQL.Text := 'SELECT CODIGO, NOME, QUANTIDADE, VALOR_UNITARIO, ' +
                       '       CAST(QUANTIDADE * VALOR_UNITARIO AS DOUBLE PRECISION) AS TOTAL ' +
                       '  FROM ITEM_ENTRADA_SAIDA ' +
                       ' WHERE (ID_ES =:ID_ES) ';
  IBQuery1.ParamByName('ID_ES').AsInteger := id_es;
  IBQuery1.Open;
Responder

Gostei + 0

20/09/2012

Maxwell

cmpanheiro é o seguinte estou usando o Rdprint pra imprimir minha nota de venda mais uso o papel Razão o micro cerrilhado, so que consigo inserir apenas 17 intens em uma folha e tenho qe fechar a nota e abrir outra nota para colocar os intens restantes, gostaria de saber se o amigo tem ideia de como posso abrir outro cabelaho e continuar na pagina seguinte,
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar