Fórum Preço de Venda através da margem #469161

07/02/2014

0

Galera eu tenho um campo chamado margem onde existe um percentual digital, e tenho o preço de custo do produto, como faço para calcular o preço de venda no delphi, eu tenho esses dois valores a margem e o custo.

tentei assim:
CdsProdutos.FieldByName('PROD_VALOR_VENDA').AsFloat :=
   ((CdsProdutos.FieldByName('PROD_VALOR_COMPRA').AsFloat + CdsProdutos.FieldByName('PROD_MARGEM_LUCRO').AsFloat)/100)+
   CdsProdutos.FieldByName('PROD_VALOR_COMPRA').AsFloat;

mas não deu certo
Sidney Abreu

Sidney Abreu

Responder

Posts

07/02/2014

Leandro Chiodini

Bom dia


CdsProdutos.FieldByName('PROD_VALOR_VENDA').AsFloat :=
	(CdsProdutos.FieldByName('PROD_VALOR_COMPRA').AsFloat + ((CdsProdutos.FieldByName('PROD_MARGEM_LUCRO').AsFloat/100)*CdsProdutos.FieldByName('PROD_VALOR_COMPRA').AsFloat))
Responder

Gostei + 0

07/02/2014

Marco Salles

Acho que poderia simplificar utilizando a Propriedade distribuitiva da Multiplicação

with CdsProdutos.do
FieldByName('PROD_VALOR_VENDA').AsFloat :=
                    FieldByName('PROD_VALOR_COMPRA').AsFloat*(1+FieldByName('PROD_MARGEM_LUCRO').AsFloat/100);


[]sds
Responder

Gostei + 0

07/02/2014

Sidney Abreu

Obrigado amigos, deu certo! abraço
Responder

Gostei + 0

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

Aceitar