[firebase-br] AJUDA COM SP SELECIONAVEL.

[Adalberto de Sousa Monteiro]

BOA TARDE PESSOAL,

DESENVOLVI A SEGUINTE SP (ABAIXO) PORÉM NÃO ESTOU CONSEGUINDO RECEBER OS VALORES NO PROGRAMA, COMO FAÇO PARA RECEBER O PRIMEIRO REGISTRO E OS PRÓXIMOS ? PRECISO DE UM WHILE NO PROGRAMA ?

DESCULPEM .... MAS NUNCA UTILIZEI ESSE TIPO DE SP.

OBS:  ESTOU UTILIZANDO FIREBIR 1.5, DELPHI 7 COM OS COMPONENTES DA PLAHETA DO INTERBASE.

VALEU

ADALBERTO.


CREATE PROCEDURE PROC_MOSTRUARIO_MUSICAS 
RETURNS (
    INTERPRETE VARCHAR(50),
    RANKING INTEGER,
    MUSICA VARCHAR(100))
AS
BEGIN
   FOR SELECT INTERPRETE.NM_INTERPRETE,
              CASE
                 WHEN ( (NOT MUSICA.FL_RANKING IS NULL) AND (MUSICA.FL_RANKING <> 99) ) THEN MUSICA.FL_RANKING
                 ELSE ''
              END RANKING,
              MUSICA.DS_MUSICA
         FROM TB_MUSICA MUSICA
              INNER JOIN TB_INTERPRETE INTERPRETE ON (INTERPRETE.ID_INTERPRETE = MUSICA.ID_INTERPRETE)
     ORDER BY INTERPRETE.NM_INTERPRETE, MUSICA.FL_RANKING, MUSICA.DS_MUSICA
         INTO :INTERPRETE, :RANKING, :MUSICA
   DO
   BEGIN
      SUSPEND;
   END
END