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;