[firebase-br] Procedure - Registros retornados

[Sandro Souza]

Bom dia/tarde Wilson.

Grande Wilson, acredito que seja a função ROW_COUNT, ou seja, ela retorna a
quantidade de registros retornados pelo último SELECT.

Dessa forma, tente substituir:

if (v_Contador > 1) then

Por

if (*row_count* > 1) then

e veja se funciona.

Espero ter ajudado mais que atrapalhado. :D

2009/12/11 Wilson Mota - GMail <wmotasjrp em gmail.com>

> Ola pessoal.
> Gostaria de saber se existe uma forma de saber a qtde de registros
> retornados de um select, consegui contornar o problema - conforme abaixo,
> porém gostaria de
> saber dos amigos se existe algum comando especifico, do tipo recordcount
> (delphi) ou alguma
> outra forma mais inteligente e pratica.
> Obrigado.
>
> Wilson
>
>  SELECT DISTINCT TI.DESCRICAO AS TINTA_INTERNA, TE.DESCRICAO AS
> TINTA_EXTERNA
>  FROM LEVANTAMENTO_MAT_PRAZOS L
>  JOIN ITENS_LEVANTAMENTO_MATERIAL ILM ON
>     ILM.ID_LEVANTAMENTO_MATERIAL = L.ID_LEVANTAMENTO_MATERIAL
>  LEFT OUTER JOIN MATERIAL TI ON
>     TI.CODIGO = ILM.ID_TINTA_FACE_INTERNA
>  LEFT OUTER JOIN MATERIAL TE ON
>     TE.CODIGO = ILM.ID_TINTA_FACE_EXTERNA
>  WHERE L.ID_PRAZO_ENTREGA_PED_VENDA = :i_ID_Prazo_Entrega_Ped_Venda AND
>        ILM.ID_ITENS_PEDIDO_VENDA = :i_ID_Itens_Pedido_Venda AND
>        ILM.ID_TINTA_FACE_INTERNA IS NOT NULL AND ILM.ID_TINTA_FACE_EXTERNA
> IS NOT NULL
>  INTO :v_Tinta_Interna, :v_Tinta_Externa
>  DO
>  BEGIN
>     v_Contador = v_Contador + 1;
>     if (:v_Tinta_Interna <> :v_Tinta_Externa) then
>        o_Tinta = :v_Tinta_Interna + ' / ' + :v_Tinta_Externa;
>     else
>        o_Tinta = :v_Tinta_Interna;
>  END
>  if (v_Contador > 1) then
>     o_Tinta = 'Consultar OP';
>
>  SUSPEND;
> ______________________________________________
> 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
>