informix的存储过程中如何返回数据集？

[xuanyuan000000]

如题！

[OracleRoob]

直接

select * from 表名

[xuanyuan000000]

我执行了
create procedure A()
select * from systables;
end procedure;
这样编译不过。可否说得详细一点

[cloudflashes]

没有定义 returning

[mujian1986]

[sqlcode]
create procedure A() returning varchar(50);
define ret varchar(50);
foreach select tabname into ret from systables
return ret with resume;
end foreach;
end procedure
[/sqlcode]

[mujian1986]

create procedure A() returning varchar(50); 
  define ret varchar(50); 
  foreach select tabname into ret from systables 
    return ret with resume; 
  end foreach; 
end procedure