Cálculo de Porcentagem de Valores

Delphi

18/08/2005

Olá Pessoal tudo bem?

Por favor...preciso de um help de vcs .

Estou implmentando no evento onCalcFields de um clientdataset sem sucesso. Um Cálculo de 3 campos e no 4º campo saíria o Valor de Venda do produto. Seria mais ou menos assim:

Valor de Custo + Outros Custos * Margem de Lucro = Valor de Venda

Alguém aí pode me dar uma luz

Agradeço antecipadamente.

Ediberto


Edibertoalves

Edibertoalves

Curtidas 0

Respostas

Paullsoftware

Paullsoftware

18/08/2005

fazendo assim ele vai primeiro multiplicar..


GOSTEI 0
Paullsoftware

Paullsoftware

18/08/2005

tente assim:
Valor_Venda := ( Valor_Custo + Outros_Custos) * Margem_Lucro;


GOSTEI 0
Adriano Santos

Adriano Santos

18/08/2005

Não esqueça cara, regras de matemática também se aplicam em programação.


GOSTEI 0
Edibertoalves

Edibertoalves

18/08/2005

No Evento OnCalcFields do ClientDataSet do Cadastro de Produtos
coloquei o seguinte código:

cdsCadProdutoPVLVENDA.Value := (cdsCadProdutoPVLCUSTO.Value +
cdsCadProdutoPOUTCUSTOS.Value) * (cdsCadProdutoPCODMARGEM.Value /
100);
frmcadproduto.dbeProduto.Text:= FormatFloat(´#,0.00´,
cdsCadProdutoPVLVENDA.Value);

Quando eu digito os valores nos DBEdits do formulário, vai de boa,
mas na hora de calcular os campos ele não está conseguindo.

Já verifiquei as propriedades do ClientDataSet e está tudo ligado.

O que estou fazendo de errado????

Agradeço antecipadamente pela atenção
:wink:
--
Ediberto


GOSTEI 0
Marcio.theis

Marcio.theis

18/08/2005

Você tem algum campo calculado para que ele entre no CalcField ?


GOSTEI 0
Edibertoalves

Edibertoalves

18/08/2005

Vc está falando da propriedade FieldKind do ClientDataSet?
Se é essa propriedade ela está como fkData.

Tem alguma coisa errada nisso??

Obrigado

--
Ediberto


GOSTEI 0
Rjun

Rjun

18/08/2005

Você criou seu campo calculado pelos FieldsEditor?


GOSTEI 0
Marcio.theis

Marcio.theis

18/08/2005

Quero dizer ter um componente CalcField.
Se não me engano ele somente executa a propriedade CalcField se tiver um componente CalcField... faz um teste e cria um campo do tipo CalcField e executa para ver se resolve....


GOSTEI 0
Paullsoftware

Paullsoftware

18/08/2005

ao invés de formatar o valor...
frmcadproduto.dbeProduto.Text:= FormatFloat(´#,0.00´, cdsCadProdutoPVLVENDA.Value);


crie um campo Float/Double e mude a propriedade [b:fb427c9f70]Currency[/b:fb427c9f70] do campo para [b:fb427c9f70]TRUE[/b:fb427c9f70]
:wink:


GOSTEI 0
POSTAR