ActiveDelphi

[Rogeriomgo]

Tenho uma tabela de vendas onde está o valor total das notas fiscais retirada em cada dia, para saber qual a nota fiscal de valor máximo usando o commandtext sql seria:
"select max(valor_total) from vendas" aqui ele me retorna o valor máximo da venda que tem na tabela vendas (ibexpert). Como chamo no delphi este valor e apresento em um Tedit, dbedit ou label?
Sendo que para chamar este valor máximo uso um tbutton. Em um datamodule tenho um clientedataset, um provider e uma query.

[wllfl]

PARCEIRO ESSE: (valor_total), 'VALOR_TOTAL' ESTA NA TABELA COMO ULTIMO VALOR, OU SEJA, ELE APARECE COMO SOMA DE TODAS AS VENDAS DE UM SÓ REGISTRO ? ELE UM CAMPO VÁLIDO ?

[Rogeriomgo]

Quero retornar o valor total de uma nota fiscal que tenha o valor maior de venda do dia, por exemplo: tenho em determinado dia a retirada de 30 notas fiscais de vendas, entre estas notas há uma de maior valor de venda, quero retornar em um tedit este valor por exemplo:
nota fiscal 0001 = valor total R$345,00
nota fiscal 0003 = valor total R$120,35
nota fiscal 0010 = valor total R$456.79
.
.
.

então me retornaria o valor da nota fiscal 0010 que seria de R$456,79.

na minha tabela vendas estaria todas as notas fiscais de cada dia. Em uma pesquisa por dia, quero pegar apenas o valor total de venda da nota de maior valor.

Sei que é,possível por outras formas mas gostaria de aplicar a linha de comando sql "select max(valor_total) from vendas" no delphi para retornar o valor.

[wllfl]

PARCEIRO, A LINHA DE COMANDO EM SQL ESTÁ LEGAL, O QUE EU ACHO Q PODERIA SER FEITO NESSE CASO SERIA INTRODUZIR NO EDITOR DO DELPHI ALGUMA COISA DO GENERO:

IF ('NOME DA QUERY'.RECORDCOUNT >0) THEN
BEGIN
TEDIT.TEXT = 'NOME DA QUERY'.VALUE OU TEXT ;
END;


NESSE CASO 'SE A QUERY ENCONTRAR O REGISTRO DE MAIOR VALOR O RECORDCOUNT SERÁ MAIOR QUE 0 THEN O TEXT DO EDIT SERÁ IGUAL AO VALOR DA QUERY'.

NÃO SEI VAI DAR CERTO PQ AINDA NÃO TESTEI, ESTOU PASSANDO OS COMANDOS D CABEÇA, TALVEZ VC TENHA QUE CONVERTER OS VALORES, CASO NÃO RODAR AVISA.

[adriano_servitec]

[wllfl]

ISSO AÍ PARCEIRO, ESSES COMANDOS QUE EU PASSEI SERIA SÓ PARA VC TRANSMITIR OS REGISTROS DA QUERY PARA A TELA.

AINDA NÃO TESTEI HEIN.

[Rogeriomgo]

O select que coloquei, quando executado no editor sql do ibexpert, me retorna o resultado esperado. Gostaria de saber se tem como usa-lo no delphi usando o commandtext ou similar, para retornar o resultado em um dbedit ou tedit. Ainda não testei a dica acima, retorno depois com o resultado.

[adriano_servitec]

[Rogeriomgo]

Em um datamodule tenho um clientedataset, um provider e uma query.

[Rogeriomgo]

Tenho em um datamodule, clientdataset, provider e query. No formulário por exemplo um botão para chamar a nota fiscal de maior valor do dia, retornando apenas o valor total da nota fiscal. A tabela vendas, se refere a uma tabela onde estão registrados o numero da nota_fiscal, data_nota e valor_total da nota de cada dia. Estou querendo retornar em um dbedit o valor total da nota fiscal de maior valor de venda do dia. Estou querendo usar o commandtext, pois a função max, vai me retorna o valor máximo do campo valor_total. O commandtext seria 'select max(valor_total) from vendas'. Veja o exemplo acima. Não sei como encaixar este select, no delphi.

[theblitzkriegbop]

Da uma olha neste código.

[Rogeriomgo]

/adequando o codigo acima ao meu;

DMVendas.Qry_Vendas.Active := false;
DMVendas.Qry_Vendas.SQL.Clear;
DMVendas.Qry_Vendas.SQL.Add('select max(Valor_Total) from Vendas');
DMVendas.Qry_Vendas.Active := true;

if DMVendas.Qry_Vendas.FieldByName('Valor_Total').AsString <> '' then
begin
edit4.text := DMVendas.Qry_Vendas.FieldByName('max').AsString;
-----------------------------------------------------------------------
Na query tenho meu select assim:

Select
nota_fiscal, data_nota, Valor_Total
from
Vendas
where
nota_fiscal= :nota_fiscal
----------------------------------------------------------------------
Quando executo da o seguinte erro:

"Qry_Vendas. Field 'valor_total' not found"

ou seja campo 'valor_total' não encontrado.

[DonOctavioDelFlores]

[Rogeriomgo]

Adequando o codigo acima a minha necessidade ficou assim: