[请求]在一个事务中多次更新同一记录的问题**

alang

按你说的操作，关闭窗体时候会提示，是否保存，选是，执行中报错，有个字段找不到啊
Field 'EBD_ServiceCharge' not found

alang

好像  FQuery没有关闭造成的
static function TDBCOMMAND.OpenSqlex(FSql:string;FQuery:TQuery):TQuery;
begin
  FQuery.Close;

alang

重现楼主错误了
错误出现在
static function TDBCOMMAND.ExcSqlex(FSql: String;FQuery:TQuery):Boolean;
begin
   FQuery.Close;
   FQuery.CommandText:= Fsql;
   try
     FQuery.Execute;
     Result := True;
   except
     Result := False;
   end;
end;
这时候传递过来的lsql 参数是
UPDATE EXP_BILL_DETAIL SET  EBD_InvServiceCharge = 0 EBD_InvFitmentCharge = 0 EBD_InvOtherExpenses = 0 EBD_InvMagrofCardFee = -1300 EBD_InvVacantRent = 0 EBD_InvTotalAmount = EBD_InvTotalAmount - 1300 EBD_STATUS = '40' WHERE EBD_MAINID = '0000000073' AND EBD_CONTRACT = 'C000000068' AND EBD_PAYMENT_FLAG = '10'
这个语句在SQL Server就不能执行啊

alang

服务器: 消息 170，级别 15，状态 1，行 1
第 1 行: 'EBD_InvFitmentCharge' 附近有语法错误。

liso

最初由 alang 发布
[B]按你说的操作，关闭窗体时候会提示，是否保存，选是，执行中报错，有个字段找不到啊
Field 'EBD_ServiceCharge' not found [/B]

出这个错是因为没找到这条记录，

liso

另外这个地方的代码要改一下，我昨天测试好忘了改回来
procedure TINVOICE_MANAGE.DataNavigatorBeforeAction(Sender: TObject; var Accept: Boolean);
begin
  if TAction(Sender).Name = 'actSave' then
  begin
    Beforesave('');
    dsb_inv_bill_detailupdate();
  end;
end;

liso

确实是更新代码的sql语句有问题，没有加“，”，但是为什么平台这个时候不报具体的sql执行出错呢？
我修改一下继续测试。谢谢！！

alang

这条sql语句不在事务中执行，或者在非立即事务中执行报错信息都是对的
在立即事务中执行，报错信息就是这个了，已经提交缺陷

liso

这个缺陷什么时候能够解决，我这边本来有个演示计划的，已经拖了1个礼拜了。请帮我们抓紧改一下吧！谢谢！！

jiahaiminghr

楼主，这个缺陷我们会尽快修改的。

但是它不会影响你们的开发的，出现这些错误是因为你的代码有问题了。
你们可以继续你们的开发工作。