【delphi中利用ClientDataSet和ADOQuery分别如何调用oracle中的存储过程-400分相送】

急急急急急急急急急急急急急急急急！！！！！！！
本人包中的两个存储过程声明如下,想每个过程都用***ClientDataSet**和**ADOQuery***来调用，也就是说需要四个调用!!!如何实现!!!第一个过程的功能：传入一个或多个一般类型的参数，**返回多个**一般类型的值
第二个过程的功能：传入一个或多个一般类型的参数，**返回所得的查询数据集**，也就是游标sql server 中利用存储过程的一个特性，即存储过程中的最后一条select 作为返回集，轻松实现上述两个过程。想问oracle中大家如何实现上述两个功能。
如果用别的方法不用下面这样的函数请指点!!!!!!create or replace package PKG_JCCTEST1
AS
  TYPE RCTYPE1 IS REF CURSOR;
  PROCEDURE GetSumAndSub(p number ,p2 number , result1 out number ,result2 out number);procedure GetDataSetById(p_id varchar2 ,  rc1 rctype1);end ;
我已经搜索相关版关以前的贴子，不能解决本人问题，谢绝copy网上以前的代码作为回复!!!!