Como tratar um caso de indexação em uma Query?
07/04/2003
0
Bom dia Companheiros...
Vejam se podem me ajudar...
Começei a usar o componente Query há duas semanas e ainda estou com algumas duvidas quanto ao funcionamento do mesmo.
O que acontece é o seguinte.
Estou mudando o procedimento de emissao de boletos, onde eu usava um Table e agora quero colocar a Query pois preciso indexar dois campos de uma só vez para imprimir produtos em ordem alfabetica dentro de fornecedores indexados pelo nome.
Tenho um case no evento click de um botao para imprimir boletos. O case é o seguinte:
Case frmOpcBoletosPdp_Escr.rdgTipodeBoletos.ItemIndex of
0 : dtmDados.tblEmpresas.IndexfieldNames := ´Nome´;
1 : dtmDados.tblEmpresas.IndexFieldNames := ´Escritorio´;
End;
Dependendo da selecao do usuario em um radiogroup, eu setava a indexação da tabela, para o campo Nome, ou para o Campo Escritorio da tabela Empresas.
Já que estou mudando toda a produre onde eu tinha o Table, substituindo pela Query, já fui informado de que os comandos de indexação tem que ser feitos dentro da propriedade SQL da Query.
Mas me digam, como faço para criar um case dentro da propriedade SQL da query, como eu tenho atualmente para o Table, e selecionar o tipo de indexação de acordo com a opcao selecionada pelo usuario no rariogroup?
Se puderem me orientar ficarei muito grato.
Um grande abraço a todos...
Pablo - Marília/SP
eu não estou encontranto a propriedade IndexFild
Vejam se podem me ajudar...
Começei a usar o componente Query há duas semanas e ainda estou com algumas duvidas quanto ao funcionamento do mesmo.
O que acontece é o seguinte.
Estou mudando o procedimento de emissao de boletos, onde eu usava um Table e agora quero colocar a Query pois preciso indexar dois campos de uma só vez para imprimir produtos em ordem alfabetica dentro de fornecedores indexados pelo nome.
Tenho um case no evento click de um botao para imprimir boletos. O case é o seguinte:
Case frmOpcBoletosPdp_Escr.rdgTipodeBoletos.ItemIndex of
0 : dtmDados.tblEmpresas.IndexfieldNames := ´Nome´;
1 : dtmDados.tblEmpresas.IndexFieldNames := ´Escritorio´;
End;
Dependendo da selecao do usuario em um radiogroup, eu setava a indexação da tabela, para o campo Nome, ou para o Campo Escritorio da tabela Empresas.
Já que estou mudando toda a produre onde eu tinha o Table, substituindo pela Query, já fui informado de que os comandos de indexação tem que ser feitos dentro da propriedade SQL da Query.
Mas me digam, como faço para criar um case dentro da propriedade SQL da query, como eu tenho atualmente para o Table, e selecionar o tipo de indexação de acordo com a opcao selecionada pelo usuario no rariogroup?
Se puderem me orientar ficarei muito grato.
Um grande abraço a todos...
Pablo - Marília/SP
eu não estou encontranto a propriedade IndexFild
Pablo_lima
Curtir tópico
+ 0
Responder
Posts
07/04/2003
Anonymous
Tente assim:
qrEmpresa.Close;
Case frmOpcBoletosPdp_Escr.rdgTipodeBoletos.ItemIndex of
0 : qrEmpresa.Sql[10] := ´ ORDER BY NOME ´;
1 : qrEmpresa.Sql[10] := ´ ORDER BY Escritorio´;
End;
qrEmpresa.Open;
Sendo que qrEmpresa é a query que você criou e o
qrEmpresa.Sql[10] é a linha da query (dentro da propriedade SQL) que contem o ´ORDER BY´ (a primeira linha é sempre 0)
Espero ter ajudado
Mariangela
qrEmpresa.Close;
Case frmOpcBoletosPdp_Escr.rdgTipodeBoletos.ItemIndex of
0 : qrEmpresa.Sql[10] := ´ ORDER BY NOME ´;
1 : qrEmpresa.Sql[10] := ´ ORDER BY Escritorio´;
End;
qrEmpresa.Open;
Sendo que qrEmpresa é a query que você criou e o
qrEmpresa.Sql[10] é a linha da query (dentro da propriedade SQL) que contem o ´ORDER BY´ (a primeira linha é sempre 0)
Espero ter ajudado
Mariangela
Responder
Clique aqui para fazer login e interagir na Comunidade :)