DB2
时间:2007-12-23 来源:不详 作者:迈克DB
callipd.sp_exec_dsql(stmt,o_err_no);
setstate='插入数据到ipd.'||in_TRANSFER_name;
ifo_err_no=0
then
updatetransfer_task
setdeal_flag=2
wheretransfer_id=in_transfer_id;
seto_err_no=0;
else
updatetransfer_task
setdeal_flag=-1
wheretransfer_id=in_transfer_id;
seto_err_msg=state||'任务号'||char(in_TRANS_TYPE_id)||'传送出错!SQLCODE:'||char(o_err_no);
seto_err_no=1;
endif;
commit;
endif;--下帐数据完毕
endif;
settemp_int=0;
callipd.bi_check(in_transfer_id,
in_transfer_name,
temp_int,
o_err_no,
o_err_msg);
ENDP1 asp?tags=db2">db2asp">存储过程asp?tags=数据库">数据库
文章评论
共有位Admini5网友发表了评论 查看完整内容