Problema com Store Procedure

Firebird

10/02/2004

Boa noite a todos
Estou com o seguinte problema, tinha um banco em IB6 e agora estou migrando para o Firebird 1.5 RC8, e estou tendo problemas na criação de algumas Procedures, essa que estou mandando é uma delas, no interbase 6 ela funcionava muito bem, mas agora que estou passando para o firebird, nao estou conseguinto criar essas procedures. Se alguem puder me ajudar.

Segue codigo da Procedure abaixo

Desde já agradeço.

CONNECT ´C:\escola\escola.gdb´ USER ´SYSDBA´ PASSWORD ´masterkey´;



SET TERM ^ ;

/* Stored procedures definition */


/* Stored Procedure: PROC_CONTASPAGAR */
CREATE PROCEDURE PROC_CONTASPAGAR (
DATAI DATE,
DATAF DATE)
RETURNS (
COD_CONTA INTEGER,
DATA_PAGA DATE,
NUM_PARCELAS CHAR (12),
NOMEEMPRESA CHAR (40),
TELEFONE CHAR (15),
VALOR NUMERIC (18, 4))
AS
begin
for select distinct C.COD_CONTA, P.DATA_PAGA,P.NUM_PARCELAS, C.NOMEEMPRESA, C.TELEFONE,
C.VALOR
from CONTASPARCELA P INNER JOIN CONTASPAGAR C
ON C.COD_CONTA = P.COD_CONTA
where DATA_PAGA between :datai and :dataf and baixaconta=´N´
into :COD_CONTA,:DATA_PAGA,:NUM_PARCELAS,:NOMEEMPRESA,:TELEFONE,:VALOR
do
suspend;
end
^


SET TERM ; ^


Codigodelphi

Codigodelphi

Curtidas 0
POSTAR