firebird-support

When I execute a procedure xx,I encountered a error:

Statement failed, SQLCODE = -607
unsuccessful metadata update
-request depth exceeded. (Recursive definition?)

My procedure:

for select areacode,areaname,chargeunit,rateofagent from feeagent
where domainno = :in_domainno
and areacode not in (select distinct areacode from feebasetbl where domainno = :in_domainno and groupno = :in_groupno)
and areacode not in (select distinct areacode from feesubsec where domainno = :in_domainno and groupno = :in_groupno)
into :out_areacode,:out_areaname,:OUT_UNIT,:OUT_RATE
do
begin
suspend;
end






　　　　　　　　xuxu
　　　　　　　　xufh@...
　　　　　　　　　　2004-11-06