- 论坛徽章:
- 0
|
请教:调用prodedure后返回informix.u128_19是什么错?
主要调用程序如下:
**已连接数据库
$begin work;
$set lock mode to wait;
$prepare preProc from "execute procedure f_bak_stage3(?,?,?,?,?,?,?,?)";
$declare exeProc cursor for preProc;
$open exeProc using $centerCode, $accBookType, $accBookCode, $yearMonth, $vouchNum1, $vouchNum2, $operBranch, $operCode;
$fetch exeProc into $successFlag, $errStr;
if (sqlca.sqlcode)
{
strcpy(msg, "ERR805:" ;
rfmtdouble(sqlca.sqlcode, ERRFMT, errCode);
strcat(msg, errCode);
batFail(requestId, msg);
exit(0);
}
$close exeProc;
$free exeProc;
if ( successFlag>;0 )
{
strcpy(msg, "MSG806:记帐成功!" ;
$commit work;
batSucc(requestId, msg);
}
else
{
strcpy(msg, "ERR807:记帐错误" ;
strcat(msg, errStr);
$rollback work;
batFail(requestId, msg);
}
disConnect();
程序执行后errStr为informix.u128_19
系统是HP-UNIX |
|