[firebase-br] RES: Numero da Linha TIB_Query

[José Otávio Lussari]

Eu estou na 1.5 ainda... :(
ando enrolado, mas pretendo migrar ainda...

atenciosamente,

[ ]’s
José Otávio Lussari
Analista de Sistemas
Bacharel em Sistemas de Informação


-----Mensagem original-----
De: lista-bounces em firebase.com.br [mailto:lista-bounces em firebase.com.br] Em
nome de Eduardo Jedliczka
Enviada em: segunda-feira, 24 de janeiro de 2011 13:40
Para: FireBase
Assunto: Re: [firebase-br] Numero da Linha TIB_Query

Bom, a variável RowNum e RowCount só funcionarão após um FetchAll (o
que GERALMENTE não é muito desejável).

Mas se forem poucos items, experimente setar a propriedade
AutoFetchAll = TRUE, ou dar um FetchAll após o Open.

Se a quantidade de itens for grande, aí sugiro resolver isto via banco
de dados. Como você não falou a versão do banco que você está usando,
vou supor que esteja usando a versão 2.1 ou 2.5.

escreva um block (é como uma procedure, mas sem ter que criar no banco
de dados, e funciona no IB_Query) retornando os dados que você quer, e
crie uma variável para contar a "linha".

Outra opção, (depende da versão do banco), é retornar a  Select
ROWNUM(), campo from tabela

Abraço

Eduardo Jedliczka
Apucarana - Pr


Em 24 de janeiro de 2011 13:17, José Otávio Lussari
<tavinhol em gmail.com> escreveu:
> Pessoal, boa tarde!
>
> enviei esse email semana passada e estou reenviando para tentar a ajuda
> novamente de vocês:
>
>
>
> Para demonstrar o numero do item do pedido por exemplo, no IBX eu fazia
> assim:
>
> Cria uma campo do tipo integer em meu dataset e fazia o seguinte no
envento
> onCalculateField.:
>
>
>
> procedure TDMGerador_Cod.QueryEstrutCalcFields(DataSet: TDataSet);
>
> begin
>
>   QueryEstrutItem.AsInteger:= QueryEstrut.RecNo;
>
> end;
>
>
>
> Estou tentando fazer o mesmo usando TIB_Query:
>
>
>
> procedure TDMGerador_Cod.DataSetDesenhoCalculateField(Sender:
TIB_Statement;
> ARow: TIB_Row; AField: TIB_Column);
>
> begin
>
>   ARow.ByName('Item').AsInteger:= DataSetDesenho.RecNo;
>
> end;
>
>
>
> mas não está dando certo! Tentei tbem:
>
>
>
> ARow.ByName('Item').AsInteger:= DataSetDesenho.RowNum;
>
>
>
> e também não deu certo! Alguém poderia me dizer como fazer na TIB_Query?
>
> obrigado pessoal.
>
>
>
> atenciosamente,
>
>
>
> [ ]’s
> José Otávio Lussari
> Analista de Sistemas
>
> Bacharel em Sistemas de Informação
>
>
>
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para saber como gerenciar/excluir seu cadastro na lista, use:
http://www.firebase.com.br/fb/artigo.php?id=1107
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
>

______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
Para saber como gerenciar/excluir seu cadastro na lista, use:
http://www.firebase.com.br/fb/artigo.php?id=1107
Para consultar mensagens antigas: http://firebase.com.br/pesquisa