[firebase-br] Stack Overflow no seguinte Select

[Danilo Rogério]

Galera, vejam o seguinte select....
 
No Delphi estou recebendo erro de stack overflow:
 
Estou abrindo a query da seguinte maneira:
 
ClientDataSet.Close;
Query.ParamByName('ID_CLIENTE').asinteger := 0
ClientDataSet.Open;
 
Aí vai o Select:
 
SELECT
  C.ID_CLIENTE,
  C.DT_INCLUSAO,
  C.NOME,
  (CASE C.TP_CLIENTE
     WHEN 'F' THEN 'Física'
     WHEN 'J' THEN 'Jurídica'
   END
  ) AS TIPO,
  (CASE C.TP_CLIENTE
     WHEN 'F' THEN
       (SELECT F.CPF
        FROM CLIENTE_FISICA F
        WHERE F.ID_CLIENTE = C.ID_CLIENTE
       )
     WHEN 'J' THEN
       (SELECT J.CNPJ
        FROM CLIENTE_JURIDICA J
        WHERE J.ID_CLIENTE = C.ID_CLIENTE
       )
   END
  ) AS DOCUMENTO,
  (CASE C.STATUS
     WHEN 'A' THEN 'Ativo'
     WHEN 'I' THEN 'Inativo'
   END) AS STATUS,
  E.ENDERECO,
  E.BAIRRO,
  E.CEP,
  D.DSC_CIDADE,
  E.TELEFONE_RES
FROM
  CLIENTE C LEFT OUTER JOIN CLIENTE_ENDERECO E
ON
  C.ID_CLIENTE = E.ID_CLIENTE AND
  E.ATUAL = 'S' LEFT OUTER JOIN CIDADE D
ON
  E.ID_CIDADE = D.ID_CIDADE
WHERE
  C.ID_CLIENTE =:ID_CLIENTE
 
Até mais galera...
 
Obrigado...

		
---------------------------------
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora!