为何这样的方法不能读出 SQL Server 2000 上的自定义函数的值?(50分)

使用 Delphi 6 的 ADOStoredproc1组件执行函数如下
ADOStoredproc1.Parameters.ParamByName('@today').Value:=date;
ADOStoredproc1.Parameters.ParamByName('@pj').Value :='A';
ADOStoredproc1.ExecProc;
showmessage(adostoredproc1.Parameters[0].Value );
以上代码执行时出现的错误提示为:
"第一行;过程号(0)无效.必须介于 1到 32767之间."
而在SQL Server 中一切正常.(可能是我的调用方法有问题!!!)
请各位多多指教!!

存储过程没用过，不过你可以add all fields,可以看到好象有个返回结果的变量

to ugvanxk, :
add all fields 之后也是出现同样的错误提示!!!!
真不知该什么办才好!

各位,帮出个主意好吗?
我真的没有办法了.只有告各位帮帮了!!