[firebase-br] RES: Problema com o select

[Jeudí Prando]

cometi alguns erros

CREATE PROCEDURE RETORNA_ENDERECO
(
       pi_codigo integer   -- codigo do produto, parametro de entrada
)
returns
(
       po_codigo integer,  -- codigo do endereco, parametro de saida
       po_nome varchar(60) -- nome do endereco, parametro de saida
)
as
  DECLARE VARIABLE vrNome varchar(60);    -- variavel para uso interno
begin
     for
        select
            SC_PLNCT.CODIGO_CONTABIL
        from
            sc_plnct
        where
             SC_PLNCT.CODIGO_CONTABIL = :pi_codigo
        into :vrNome
     do
     begin
          select
              SC_PLNCT.CODIGO_CONTABIL,
              SC_PLNCT.NOME_PLNCT
          from
              SC_PLNCT
          where
               SC_PLNCT.CODIGO_FILIA = 1 and
               SC_PLNCT.CODIGO_CONTABIL like :vrNome||'%'
          into :po_codigo, :po_nome;
          suspend;
     end
end

corrigida... rss
evolui mais um pouco...

boa sorte!