请问这个存储过程怎样做，请提供代码

Question

Stored Procedure是按不同的SQL会有不同的文法.
我用interbase为例:Create Procedure MyUserID(MyUserName Char(20))
Returns (MyID char(8))
As
Begin
Select userID from UserDataBase
where UserName = :MyUserName
into :MyUserNameSuspend;
end;之後便可以用 Tquery 取数据.
Query1.Sql.clear;
Query1.Sql.Add('Select MyUserName from MyUserID('XXXX')');
Query1.prepare;
Query1.open;

Answer 1

先前有误:
Create Procedure MyUserID(MyUserName Char(20))
Returns (MyID char(8))
As
Begin
Select userID from UserDataBase
where UserName = :MyUserName
into :MyIDSuspend;
end;之後便可以用 Tquery 取数据.
Query1.Sql.clear;
Query1.Sql.Add('Select MyID from MyUserID('XXXX')');
Query1.prepare;
Query1.open;