calculated fields

Delphi

25/07/2003

alguem pode me ajudar estou utilizando calculatedfiels preço unitario e quantidade vendida para fazer o subtotal. utilizei para o subtotal o campo aggregate e coloquei um dbtext para exibir esse subtotal, por favor se alguem souber porque nao aparece no dbtext esse subtotal me ajude tenho certa urgência....
muito obrigada, desde ja!
alguém. :wink:


Alguém

Alguém

Curtidas 0

Respostas

Mikemurussi

Mikemurussi

25/07/2003

Faça o seguinte:

- Na tabela, adicione um campo calculado.
- Verifique, na tabela, se a propriedade AutoCalcFields ou CalcFields está marcada como TRUE.
- No evento OnCalcFields, coloque o cálculo e atribua o valor ao campo calculado.

Ex:
campo calculado: xTotal

procedure .....CalcFields(DataSet: TDataSet);
begin
with DataSet do
FieldByName(´xTotal´).AsCurrency := FieldByName(´Quantidade´).AsInteger * FieldByName(´Unitario´).AsCurrency;
end;

Atribua qualquer componente ao campo calculado que vai funcionar.

Agora, se você utiliza SQL, na instrução, simplesmente faça assim:
SELECT xxxxxxx, (Quantidade * Unitario) Total FROM xxx

Espero ter ajudado.

[url]www.murussi.com.br[/url]


GOSTEI 0
POSTAR