【结帖】请教**

weirongjia

文档里也说  wiki里也说  
在一个InfoBroker里的数据集是在一个事务中
为什么现在我在对一个数据集进行操作的时候在从表的前两条记录保存好后  在录入第三条物资的时候在程序里raise Exception
不是说的有事务了  数据都要rollback的么
为什么前几条记录全部保存到数据库了？？

zfang

对，同一个业务信息下的 数据集提交是放在同一个事务里的。
具体描述下你是怎么做的以及具体情况。

weirongjia

datasetxb.First;
  while not(datasetxb.Eof) do
  begin
    wzbm:= datasetxb.FieldByName('wzbm').AsString;

    datasettz.Append;
    datasettz.FieldByName('pzbm').AsString:= datasetjb.FieldByName('rkdbm').AsString;
    datasettz.FieldByName('wzbm').AsString:= datasetxb.FieldByName('wzbm').AsString;
    datasettz.FieldByName('sfbz').AsString:= '0';
    datasettz.Post;

    IfLocalValue(wzbm,gsbm);
    if flag <> 1 then
      IfSeverValue(wzbm,gsbm);

    datasetxb.Next;

    else if FQry.RecordCount>1 then
    begin
      try
        raise Exception.Create;
      finally
        DataSetWzkc.Close;
        DataSetWzkc.Free;
        DataSetXb.Close;
        DataSetXb.Free;
        DataSetTz.Close;
        DataSetTz.Free;
        DataSetJb.Close;
        DataSetJb.Free;
      end;
    end;
  finally
    FQry.Free;
  end;
end;
这是具体代码
大于1的情况是条件不满足的情况  为了能报错使这次回滚
所以我就raise了一个异常   但是在之前的数据全写进数据库了  并没有发生回滚

weirongjia

datasetxb.First;
  while not(datasetxb.Eof) do
  begin
    wzbm:= datasetxb.FieldByName('wzbm').AsString;

    datasettz.Append;
    datasettz.FieldByName('pzbm').AsString:= datasetjb.FieldByName('rkdbm').AsString;
    datasettz.FieldByName('wzbm').AsString:= datasetxb.FieldByName('wzbm').AsString;
    datasettz.FieldByName('sfbz').AsString:= '0';
    datasettz.Post;

    IfLocalValue(wzbm,gsbm);
    if flag <> 1 then
      IfSeverValue(wzbm,gsbm);

    datasetxb.Next;

   


引发异常的代码
报错的代码
    else if FQry.RecordCount>1 then
    begin
      try
        raise Exception.Create;
      finally
        DataSetWzkc.Close;
        DataSetWzkc.Free;
        DataSetXb.Close;
        DataSetXb.Free;
        DataSetTz.Close;
        DataSetTz.Free;
        DataSetJb.Close;
        DataSetJb.Free;
      end;
    end;
  finally
    FQry.Free;
  end;
end;

zfang

raise只是抛出一个异常，又不是说你提交失败了。
你要做测试的话， 比较简单的方式就是数据提交的时候某个关键字段为空或者数据类型不匹配的方式，然后你提交数据看看。

zfang

??

zfang

由于楼主长期未反馈，先结帖！
有问题请重新开帖！