ADO.NET Provider for NetSuite

Build 24.0.9062

バッチ処理

CData ADO.NET Provider for NetSuite では、NetSuiteDataAdapters を通じて、NetSuite の一括ロードサポートを活用することができます。Batch API を使用して、関連するSQL データ操作ステートメントを同時に実行できます。本製品 はバッチ内のすべてのSQL クエリを単一のリクエストに変換します。

ADO.NET Batch API の使用

バッチ更新を実行するには、次の基本的な手順を実行します。

  1. NetSuiteCommand オブジェクトで、パラメータ化されたカスタムSQL ステートメントを定義します。
  2. NetSuiteCommand オブジェクトのUpdatedRowSource プロパティを"UpdateRowSource.None" に設定します。
  3. NetSuiteCommand オブジェクトをNetSuiteDataAdapter に割り当てます。
  4. パラメータをコマンドに追加します。
  5. NetSuiteDataAdapter のUpdate メソッドを呼び出します。変更を含むDataSet またはDataTable を渡します。

バッチサイズの制御

要求のサイズ、ネットワークリソース、サーバーのパフォーマンスなどの要因に応じて、より小さなバッチ要求をいくつか実行することでパフォーマンスを向上させることができます。各バッチのサイズは、NetSuiteDataAdapter のUpdateBatchSize プロパティを正の整数に設定することで制御できます。

一括INSERT

次のコードはレコードを一括で挿入する単一のバッチを準備します。 そして、新しいレコードのId を取得します。 この例では、"Added" 状態の新しいDataRows の一括INSERT を実行します。

C# 

NetSuiteDataAdapter adapter = new NetSuiteDataAdapter();

using (NetSuiteConnection conn = new NetSuiteConnection("AccountId=XABC123456;Schema=SuiteTalk;AuthScheme=Token;OAuthClientId=MyOAuthClientId;OAuthClientSecret=MyOAuthClientSecret;OAuthAccessToken=MyOAuthAccessToken;OAuthAccessTokenSecret=MyOAuthAccessTokenSecret;")) {
  conn.Open();
  adapter.InsertCommand = conn.CreateCommand();
  adapter.InsertCommand.CommandText = "INSERT INTO Account (AcctName) VALUES (@AcctName)";
  adapter.InsertCommand.UpdatedRowSource = UpdateRowSource.None;
  adapter.InsertCommand.Parameters.Add("@AcctName", "AcctName");

  DataTable batchDataTable = new DataTable();
  batchDataTable.Columns.Add("AcctName", typeof(string));
  batchDataTable.Rows.Add("Savings");
  batchDataTable.Rows.Add("Petty Cash");
  adapter.UpdateBatchSize = 2;
  adapter.Update(batchDataTable);

  NetSuiteCommand cmd = new NetSuiteCommand("SELECT * FROM LastResultInfo#TEMP", conn);
  adapter = new NetSuiteDataAdapter(cmd);
  DataTable res = new DataTable();
  adapter.Fill(res);
  foreach (DataRow row in res.Rows) 
    foreach(DataColumn col in res.Columns)
      Console.Write("{0}: {1}", col.ColumnName, row[col]);
}

VB.NET 

 
Dim adapter As New NetSuiteDataAdapter()

Using conn As New NetSuiteConnection("AccountId=XABC123456;Schema=SuiteTalk;AuthScheme=Token;OAuthClientId=MyOAuthClientId;OAuthClientSecret=MyOAuthClientSecret;OAuthAccessToken=MyOAuthAccessToken;OAuthAccessTokenSecret=MyOAuthAccessTokenSecret;")
  conn.Open()
  adapter.InsertCommand = conn.CreateCommand()
  adapter.InsertCommand.CommandText = "INSERT INTO Account (InternalId) VALUES (@AcctName)"
  adapter.InsertCommand.UpdatedRowSource = UpdateRowSource.None
  adapter.InsertCommand.Parameters.Add("@AcctName", "AcctName")

  Dim batchDataTable As New DataTable()
  batchDataTable.Columns.Add("AcctName", GetType(String))
  batchDataTable.Rows.Add("Petty Cash")
  batchDataTable.Rows.Add("Savings")
  adapter.UpdateBatchSize = 2
  adapter.Update(batchDataTable)

  Dim cmd As New NetSuiteCommand("SELECT * FROM LastResultInfo#TEMP", conn)
  adapter = New NetSuiteDataAdapter(cmd)
  Dim res As New DataTable()
  adapter.Fill(res)
  For Each row As DataRow In res.Rows 
    For Each col As DataColumn In res.Columns
      Console.WriteLine("{0}: {1}", col.ColumnName, row(col))
    Next
  Next
End Using

一括更新

バッチ更新では、さらに、更新する各行の主キーが必要です。次の例では、"Modified" 状態のすべてのDataRow レコードに対してバッチを実行します。

C# 

NetSuiteDataAdapter adapter = new NetSuiteDataAdapter();

using (NetSuiteConnection conn = new NetSuiteConnection("AccountId=XABC123456;Schema=SuiteTalk;AuthScheme=Token;OAuthClientId=MyOAuthClientId;OAuthClientSecret=MyOAuthClientSecret;OAuthAccessToken=MyOAuthAccessToken;OAuthAccessTokenSecret=MyOAuthAccessTokenSecret;")) { 
  conn.Open();
  adapter.UpdateCommand = conn.CreateCommand();
  adapter.UpdateCommand.CommandText = "UPDATE Account SET AcctName=@AcctName WHERE InternalId=@InternalId";
  adapter.UpdateCommand.Parameters.Add("@AcctName", "AcctName");
  adapter.UpdateCommand.Parameters.Add("@InternalId", "InternalId");
  adapter.UpdateCommand.UpdatedRowSource = UpdateRowSource.None; 
  DataTable batchDataTable = new DataTable();
  batchDataTable.Columns.Add("AcctName", typeof(string));
  batchDataTable.Rows.Add("Savings");
  batchDataTable.Rows.Add("Petty Cash");
  adapter.UpdateBatchSize = 2;
  adapter.Update(dataTable);
}

VB.NET 

 
Dim adapter As New NetSuiteDataAdapter()

Using conn As New NetSuiteConnection("AccountId=XABC123456;Schema=SuiteTalk;AuthScheme=Token;OAuthClientId=MyOAuthClientId;OAuthClientSecret=MyOAuthClientSecret;OAuthAccessToken=MyOAuthAccessToken;OAuthAccessTokenSecret=MyOAuthAccessTokenSecret;")
  conn.Open()
  adapter.UpdateCommand = conn.CreateCommand()
  adapter.UpdateCommand.CommandText = "UPDATE Account SET AcctName=@AcctName WHERE InternalId=@InternalId"
  adapter.UpdateCommand.Parameters.Add("@AcctName", "AcctName")
  adapter.UpdateCommand.Parameters.Add("@InternalId", "InternalId")
  adapter.UpdateCommand.UpdatedRowSource = UpdateRowSource.None
  Dim batchDataTable As New DataTable()
  batchDataTable.Columns.Add("AcctName", GetType(String))
  batchDataTable.Rows.Add("Petty Cash")
  batchDataTable.Rows.Add("Savings")
  adapter.UpdateBatchSize = 2
  adapter.Update(dataTable)
End Using

一括削除

次のコードは、レコードを一括で削除する単一のバッチを準備します。各行の主キーが必要です。次の例では、"Deleted" 状態のすべてのDataRow レコードに対してバッチを実行します。

C# 

NetSuiteDataAdapter adapter = new NetSuiteDataAdapter();

using (NetSuiteConnection conn = new NetSuiteConnection("AccountId=XABC123456;Schema=SuiteTalk;AuthScheme=Token;OAuthClientId=MyOAuthClientId;OAuthClientSecret=MyOAuthClientSecret;OAuthAccessToken=MyOAuthAccessToken;OAuthAccessTokenSecret=MyOAuthAccessTokenSecret;")) {
  conn.Open();
  adapter.DeleteCommand = conn.CreateCommand();
  adapter.DeleteCommand.CommandText = "DELETE FROM Account WHERE InternalId=@InternalId";
  adapter.DeleteCommand.Parameters.Add("@InternalId", "InternalId");
  adapter.DeleteCommand.UpdatedRowSource = UpdateRowSource.None; 
  adapter.UpdateBatchSize = 2;
  adpater.Update(table);
}

VB.NET 

Dim adapter As New NetSuiteDataAdapter()

Using conn As New NetSuiteConnection("AccountId=XABC123456;Schema=SuiteTalk;AuthScheme=Token;OAuthClientId=MyOAuthClientId;OAuthClientSecret=MyOAuthClientSecret;OAuthAccessToken=MyOAuthAccessToken;OAuthAccessTokenSecret=MyOAuthAccessTokenSecret;")
  conn.Open()
  adapter.DeleteCommand = conn.CreateCommand()
  adapter.DeleteCommand.CommandText = "DELETE FROM Account WHERE InternalId=@InternalId"
  adapter.DeleteCommand.Parameters.Add("@InternalId", "InternalId")
  adapter.DeleteCommand.UpdatedRowSource = UpdateRowSource.None 
  adapter.UpdateBatchSize = 2
  adpater.Update(table)
End Using

Copyright (c) 2024 CData Software, Inc. - All rights reserved.
Build 24.0.9062