are you doing "execute procedure SP" or "select * from SP"? , you want the
"select ..." form

Nick Upson

On 24 August 2012 15:15, Farshid Dehghan <f_ksh3600@...> wrote:

> **
>
>
> Thanks for the answer
> But I had forgotten the "For" the Mail wrote.
> Add This word does not solve the problem
>
> --- In firebird-support@yahoogroups.com, "Ismael L. Donis Garcia" <ismael@...>
> wrote:
> >
> > add FOR to SELECT
> >
> >
> > SET TERM ^ ;
> > CREATE PROCEDURE SP(
> > TLek VARCHAR(15) CHARACTER SET NONE COLLATE NONE)
> > RETURNS(
> > PNAME VARCHAR(100) CHARACTER SET NONE COLLATE NONE)
> > AS
> > BEGIN
> > for Select Name FROM TBL1 Where (TLekName = :TLek) ORDER BY ID
> > Into :PName DO
> > SUSPEND;
> > END ^
> > SET TERM ^ ;
> >
> >
> > =========
> > || ISMAEL ||
> > =========
> > ----- Original Message -----
> > From: Farshid Dehghan
> > To: firebird-support@yahoogroups.com
> > Sent: Thursday, August 23, 2012 1:16 PM
> > Subject: [firebird-support] Problem IBStoredProc
> >
> >
> >
> > Hi
> > I've used Delphi IBStoredProc, But not run.
> > No error.
> > Please get help
> >
> > //----------in firebird
> > SET TERM ^ ;
> > CREATE PROCEDURE SP(
> > TLek VARCHAR(15) CHARACTER SET NONE COLLATE NONE)
> > RETURNS(
> > PNAME VARCHAR(100) CHARACTER SET NONE COLLATE NONE)
> > AS
> > BEGIN
> > Select Name FROM TBL1 Where (TLekName = :TLek) ORDER BY ID
> > Into :PName DO
> > SUSPEND;
> > END ^
> > SET TERM ^ ;
> >
> > //----------in delphi
> > IBStoredProc1.StoredProcName := 'SP';
> > IBStoredProc1.ParamByName('TLek').AsString := 'mb';
> > IBStoredProc1.ExecProc;
> >
> >
> >
> >
> >
> > [Non-text portions of this message have been removed]
> >
>
>
>


[Non-text portions of this message have been removed]