请教高手，存储过程中写递归调用!

[czjearth]

有这样一个表：
Area(AreaID, ParentID, AreaName)
我现在想要实现输入任何一个AreaID,能返回该AreaId及其下级
所有AreaID的数据集：
例：
AreaID ParentId, AreaName
1 0 A栋
2 0 B栋
11 1 aa栋
12 1 ab栋
21 2 bb栋
31 11 aaa栋
查询传入参数：1
返回数据集
1 0 A栋
11 1 aa栋
12 1 ab栋
31 11 aaa栋
请高手指点，该存储过程怎么写!
谢!

[czjearth]

谢谢！我想多给点分，请问怎么给啊

[czjearth]

100分够不够, 不够你说话!

[yellowpage3403]

CREATE PROCEDURE GETAREA(
IAREA VARCHAR(10)
)
RETURNS
(
AreaID VARCHAR(10),
ParentId VARCHAR(10),
AreaName VARCHAR(20)
)
AS
DECLARE VARIABLE SUBAREAID VARCHAR(10);
BEGIN
SELECT AREAID,PARENTID,AREANAME FROM AREA WHERE AREAID=:IAREA
INTO :AREAID,:PARENTID,:AREANAME;
SUSPEND;
FOR SELECT DISTINCT AREAID FROM AREA WHERE PARENTID=:AREAID INTO :SUBAREAID DO
BEGIN
FOR SELECT * FROM GETAREA(:SUBAREAID) INTO :AREAID,:PARENTID,:AREANAME DO
SUSPEND;
END
END


//==========================================
SELECT * FROM GETAREA('1') ORDER BY AREAID

[yellowpage3403]

才20分呀！
记得给分哟！