752
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
lmby 2003-10-21
- 打赏
- 举报
declare sp_getReqId procedure for up_get_reqid @dept = 'D0', @reqid = '' output;
execute sp_getReqId;
fetch sp_getReqId into :ls_request;
if sqlca.sqlcode <> 0 then
rollback;
close sp_getReqId;
messagebox( '提示', '后台数据库出错，请与管理员联系！' )
return
end if
execute sp_getReqId;
fetch sp_getReqId into :ls_request;
if sqlca.sqlcode <> 0 then
rollback;
close sp_getReqId;
messagebox( '提示', '后台数据库出错，请与管理员联系！' )
return
end if
