你必須將所有的更新作業，自行啟動並包在同一個交易控管的範圍內      If Not AdoConnection1.InTransaction Then
    AdoConnection1.BeginTrans; // 開始交易控管      Try
    // 更新MasterTable及detailTbale
    ADODataSet1.UpdateBatch([arAll]);
    ......
    // 更新 其他 Table
    AdoConnection1.CommitTrans; // 沒問題完成交易
  Except
    AdoConnection1.RollbackTrans; // 有問題則全部還還原
  End;
 

引言: 而我的疑惑就是在處理 adoqyDetail 的時候，以出貨單舉例來說出貨單明細每增加一筆記錄就要去改變庫存檔的數量，我會在 adoqyDetail.AfterPost 事件中再運用一個 adoQuery 或 adoCommand 去異動庫存Table, 在這個部份我就覺得很疑惑，好像是已經完成庫存數的更新，而出貨單還在 Cache 當中，這樣不就喪失了 BatchUpdate 的意義?

引言: 以你這種做法，是會有這種現象很正常的，問題是你希望連庫存Table也要與M/D Table一起有BatchUpdate 效果，那必須同樣的用TAdoQuery並設定為BatchUpdate 模式才可以。

引言: 不同的資料更新方式，各有其優缺點及其適用時機，以你的狀況來看，個人覺得使用BatchUpdate模式，應該會有問題，因為BatchUpdate模式適用於每個人操作的資料範圍，最好不要有重疊，或有少許的資料重疊，但可以用程式碼簡單的予以避免掉，以防止破壞資料的完整性或正確性。而你的庫存Table(應該是與庫存量相關的更新)要與M/D Table 一起BatchUpdate，那麼在更新前，有異動到的庫存資料已被別人早一步更新過了，此時則該如何是好呢? 或許你可以想一套處理更新不成功時的調整處理邏輯，以解決這個問題，以此狀況來說，如果是我，我會在作業流程(或程式的流程)上來解決： 1.M/D Table在同一交易中先行儲存(若每人處理的資料互不衝突，則交易管理亦可以省了) 2.在主檔及明細檔中設置一個[已過帳]欄位以作為程式異常後，若要繼續處理時，判斷己處理及未處理的依據從而避免資料的重複過帳。 3.開啟一個交易，開始作過帳的動作，明細檔做完一筆，將該筆[已過帳]欄位設為True,同一筆主檔的明細資料全部作完後,則將主檔的該筆[已過帳]欄位設為True,直到全部完成為止。 4.在[存檔]的動作中，單據的儲存及庫存資料的更新先後完成(先確定單據的儲存動作完成，才能作庫存資料的更新)，對於使用者來說，仍是一個動作。 如此下來，主檔明細檔的批次更新與庫存Table的更新分隔開來，以程式面來看是不是可以簡化了(不用同時考慮庫存的更新)，而庫存Table的更新也可以在短時間內更新完成，縮短資料鎖定的時間，重點是若要作表單審核的需求時，庫存的更新動作正好可以放到審核的動作中來完成。 PS:以上純屬個人看法，僅供參考。

引言: 感覺起來若是這樣處理變的很複雜

bestlong 你好 程式複不複雜，這是個見仁見智的問題，端看你以什麼角度來審視這個問題，而你的取決點又在那裏？之前的論述是配合你的問題需求提出來的，或許沒有想的很周詳(畢竟不是我切身的問題，好像有點不負責任喔！討論不就是這樣嗎?)沒辦法，因為問題是這樣所以回答就會這樣。 任何的取捨都會有得有失，只是看得到的多還是失去的多；每個人的經歷、經驗與體會各有不同，也許你認為很簡單的而我認為很難，也許你認為很難的我卻認為很簡單，所以每個人最後的決定會有所不同;而同樣的做法，對你或許是得到的多，但對我可能是失去的多。無論如何取捨，總是要能够有完整的解決方案才是吧！。 < class="code"> 想了又想還真有點複雜,好像回到起點來還比較好點,再重貼一遍,並稍作修改 If Not AdoConnection1.InTransaction Then AdoConnection1.BeginTrans; // 開始交易控管 Try // 主檔明細未更新前先更新 其他 Table While Not MasterTable.Eof Do Begin While Not DetailTable.Eof Do Begin // 更新 其他 Table // 因為這裏才可抓到主檔及明細檔的異動狀態、更新前及更新後的值,來加以運算庫存Table的更新值 // 如果是新增=>只要直接過帳即可 // 如果是修改=>用新的值-舊值的結果來過帳(其實就是用舊值反過帳,用新值過帳) // 如果是刪除=>只要直接反過帳即可 DetailTable.Next; End; MasterTable.Next; End; // 最後才更新MasterTable及detailTbale ADODataSet1.UpdateBatch([arAll]); ...... AdoConnection1.CommitTrans; // 沒問題完成交易 Except AdoConnection1.RollbackTrans; // 有問題則全部還還原 End; 發表人 - chance36 於 2004/05/26 04:04:36

引言:

  If Not AdoConnection1.InTransaction Then
    AdoConnection1.BeginTrans; // 開始交易控管      Try
    // 主檔明細未更新前先更新 其他 Table
    While Not MasterTable.Eof Do Begin
      While Not DetailTable.Eof Do Begin
        // 更新 其他 Table
        // 因為這裏才可抓到主檔及明細檔的異動狀態、更新前及更新後的值,來加以運算庫存Table的更新值
        // 如果是新增=>只要直接過帳即可
        // 如果是修改=>用新的值-舊值的結果來過帳(其實就是用舊值反過帳,用新值過帳)
        // 如果是刪除=>只要直接反過帳即可
        DetailTable.Next;
      End;
      MasterTable.Next;
    End;
    
    // 最後才更新MasterTable及detailTbale
    ADODataSet1.UpdateBatch([arAll]);        ......
    AdoConnection1.CommitTrans; // 沒問題完成交易
  Except
    AdoConnection1.RollbackTrans; // 有問題則全部還原
  End;

引言: 這樣的做法正是我所要的, 只是您採用巢狀 While 是否為達到可以異動多筆單據後在一次交易中全部更新, 這樣在多人環境下會提高所異動的資料, 已被他人異動的衝突, 所以我會採取一張單據一個交易的方式, 也就是拿掉 While Not MasterTable.Eof Do Begin 這個迴圈.

  If Not AdoConnection1.InTransaction Then
    AdoConnection1.BeginTrans; // 開始交易控管      Try
  // 主檔明細未更新前先更新 其他 Table
    While Not DetailTable.Eof Do Begin
      // 更新 其他 Table
      // 因為這裏才可抓到主檔及明細檔的異動狀態、更新前及更新後的值,來加以運算庫存Table的更新值
      // 如果是新增=>只要直接過帳即可
      // 如果是修改=>用新的值-舊值的結果來過帳(其實就是用舊值反過帳,用新值過帳)
      // 如果是刪除=>只要直接反過帳即可
      DetailTable.Next;
    End;
    
    // 最後才更新MasterTable及detailTbale
    ADODataSet1.UpdateBatch([arAll]);        ......
    AdoConnection1.CommitTrans; // 沒問題完成交易
  Except
    AdoConnection1.RollbackTrans; // 有問題則全部還原
  End;