Cliente Incial e Cliente final no relatório.

Delphi

07/04/2003

Olá pessoal estou precisando muito dessa ajuda espero que me ajudem.

Eu quero fazer um relatório de cliente mais que os paramentro irõ vim de um form onde será informado o codigo do cliente incial e do cliente final como eu faço p/ o relatório mostrar conforme digitado no form? será que o between funciona?

desde já agradeço.


Leandronanet

Leandronanet

Curtidas 0

Respostas

Aroldo Zanela

Aroldo Zanela

07/04/2003

Olá pessoal estou precisando muito dessa ajuda espero que me ajudem. Eu quero fazer um relatório de cliente mais que os paramentro irõ vim de um form onde será informado o codigo do cliente incial e do cliente final como eu faço p/ o relatório mostrar conforme digitado no form? será que o between funciona? desde já agradeço.


Sim,

cliente_id Between :INI_FAIXA and :TER_FAIXA

ou cliente >= :INI_FAIXA and cliente <= :TER_FAIXA


GOSTEI 0
Anonymous

Anonymous

07/04/2003

where codigo between :codigoINI and :codigoFIM, funciona SIM


GOSTEI 0
Ggean

Ggean

07/04/2003

Oi, nao sei se entendi direito mas...
Bem nesses casos eu prefiro usar uma query com parametros para selecionar o intervalo, depois fica mais facil de Exibir no relatorio basta mostrar todo conteudo da query.


Gean Carlos.


GOSTEI 0
Josemarlourenco

Josemarlourenco

07/04/2003

O between funciona sim.
Faça uma query do tipo:
´select * from clientes
where CodCliente between :CodInicial and :CodFinal´
No form, no evento OnClick do botão imprimir, vc deverá atribuir os valores para os parâmetros ´CodInicial´ e ´CodFinal´ e dar um open na query.

Josemar


GOSTEI 0
Leandronanet

Leandronanet

07/04/2003

O between funciona sim. Faça uma query do tipo: ´select * from clientes where CodCliente between :CodInicial and :CodFinal´ No form, no evento OnClick do botão imprimir, vc deverá atribuir os valores para os parâmetros ´CodInicial´ e ´CodFinal´ e dar um open na query. Josemar


Olá eu fiz e meu codigo do botão imprimir ficou assim:

FrmRelCliCod.QryClientes.Close;
FrmRelCliCod.QryClientes.SQL.Text:=
´Select * From CadClientes where NrCdCli Between :CodInicial And :CodFinal´;
FrmRelCliCod.QryClientes.parambyname(´CodInicial´).asString:= DtInicial.Text;
FrmRelCliCod.QryClientes.parambyname(´CodFinal´).asString:= DtFinal.Text;
FrmRelCliCod.QryClientes.Open;
FrmRelCliCod.Relatorio.Preview;

Só que não deu Certo! sabe me dizer pq?


GOSTEI 0
POSTAR