如何实现不同业务信息的数据集在同一事务内处理

atiger

例如，业务信息inforA（包含dsData），业务信息inforB（包含dssData），代码实现dsData和dssData这个两个数据集为主从数据集后，因为它们不在同一事务中，dssData.DataSet.ApplyUpdate(True), 就会报错。如何实现它们在同一事务，参考代码如下：

……
dsData.DataSet.Close;
  dsData.DataSet.Connection := dssData.DataSet.Connection;
  dsData.DataSet.Open;
  With dssData.DataSet.Connection.Transaction do
  begin
    lTransactionHandle := Start(False);    //启动事务
    // Start 后面的参数是指事务的启动方式
    Try
      // 处理
      ……
      dsData.DataSet.ApplyUpdates(True);
      Commit(lTransactionHandle);   //  提交事务
    Except
      Rollback(lTransactionHandle);  //回滚事务
    end;
end