PB调存储过程问题?

[caoyanqi1981]

数据库是SQL 2000:
DECLARE sp_1 Procedure Sp_jb @yygg = "0001" USING SQLCA;
EXECUTE sp_1;

MESSAGEBOX("",sqlca.sqlcode)

为何返回的均为-1.
存储过程是正确的,我在查询分析器中试过.
为何?

[ttianhong]

sqlca.autocommit=true
DECLARE sp_1 Procedure Sp_jb @yygg = "0001" USING SQLCA;
EXECUTE sp_1;
sqlca.autocommit=false

[workhand]

DECLARE sp_1 Procedure For Sp_jb @yygg = "0001" USING SQLCA;
EXECUTE sp_1;
commit;
再判断试试。

[liaolwj]

给个我的看看有没有帮助；
string ls_id,ls_rmsg,ls_seq
integer li_rtd

DECLARE p_getbthseq PROCEDURE FOR P_LQF_GETBTHSEQ(:as_subcono);

EXECUTE p_getbthseq;

if sqlca.sqlcode < 0 then
messagebox(gst_globval.dept,sqlca.sqlerrtext)
goto error
end if

FETCH p_getbthseq INTO :ls_seq,:li_rtd,:ls_rmsg;

if sqlca.sqlcode < 0 then
messagebox(gst_globval.dept,sqlca.sqlerrtext)
goto error
end if