Fórum Cliente Incial e Cliente final no relatório. #152586

07/04/2003

0

Delphi

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

Responder

Posts

07/04/2003

Aroldo Zanela

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


Responder

Gostei + 0

07/04/2003

Anonymous

where codigo between :codigoINI and :codigoFIM, funciona SIM


Responder

Gostei + 0

07/04/2003

Ggean

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.


Responder

Gostei + 0

07/04/2003

Josemarlourenco

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


Responder

Gostei + 0

07/04/2003

Leandronanet

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?


Responder

Gostei + 0

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

Aceitar