他のSQL ストアドプロシージャと同様に、PCAAccountingCommand を使用してストアドプロシージャを呼び出すことができます。PCAAccountingCommand オブジェクトをインスタンス化するには、コンストラクタへの引数として、ストアドプロシージャの名前とPCAAccountingConnection インスタンスを渡します。CommandType プロパティをStoredProcedure に設定し、PCAAccountingCommand インスタンスのParameters コレクションにキーと値のペアとしてパラメータを追加します。

C#

string connectionString = "InitiateOAuth=GETANDREFRESH;DefaultDataArea=P20V01C081KON0002;DataCenter=east02;";

using (PCAAccountingConnection connection = new PCAAccountingConnection(connectionString)) {
  PCAAccountingCommand cmd = new PCAAccountingCommand("GetOAuthAccessToken", connection);
  cmd.CommandType = CommandType.StoredProcedure; 
  cmd.Parameters.Add(new PCAAccountingParameter("@Id", "7"));
  // Add other parameters as needed ...

  PCAAccountingDataReader rdr = cmd.ExecuteReader();
  while (rdr.Read()) {
    for (int i = 0; i < rdr.FieldCount; i++) {
      Console.WriteLine(rdr.GetName(i) + " --> " + rdr[i]);
    }
    Console.WriteLine();
  }
}

VB.NET

Dim connectionString As String = "InitiateOAuth=GETANDREFRESH;DefaultDataArea=P20V01C081KON0002;DataCenter=east02;"

Using connection As New PCAAccountingConnection(connectionString)
  Dim cmd As New PCAAccountingCommand("GetOAuthAccessToken", connection)
  cmd.CommandType = CommandType.StoredProcedure
  cmd.Parameters.Add(New PCAAccountingParameter("@Id", "7"))
  ' Add other parameters as needed ...

  Dim rdr As PCAAccountingDataReader = cmd.ExecuteReader()
  While rdr.Read()
	  For i As Integer = 0 To rdr.FieldCount - 1
		  Console.WriteLine(rdr.GetName(i) + " --> " + rdr(i))
	  Next
	  Console.WriteLine()
  End While
End Using

別の方法として、ストアドプロシージャのパラメータをコマンドのテキストとして設定することもできます。ストアドプロシージャのステートメントは、次の標準的な形式でサポートされます。

"EXECUTE my_proc @first = 1, @second = 2, @third = 3;"

"EXEC my_proc @first = 1, @second = 2, @third = 3;"

パラメータ化されたクエリを実行するには、PCAAccountingCommand インスタンスのParameters コレクションに、キーと値のペアとしてパラメータを追加します。

C#

string connectionString = "InitiateOAuth=GETANDREFRESH;DefaultDataArea=P20V01C081KON0002;DataCenter=east02;";

using (PCAAccountingConnection connection = new PCAAccountingConnection(connectionString)) {
  PCAAccountingCommand cmd = new PCAAccountingCommand("EXECUTE GetOAuthAccessToken Id = @Id;", connection); 
  cmd.Parameters.Add(new PCAAccountingParameter("@Id", "7"));
  // Add other parameters as needed ...

  PCAAccountingDataReader rdr = cmd.ExecuteReader();
  while (rdr.Read()) {
    for (int i = 0; i < rdr.FieldCount; i++) {
      Console.WriteLine(rdr.GetName(i) + " --> " + rdr[i]);
    }
    Console.WriteLine();
  }
}

VB.NET

Dim connectionString As String = "InitiateOAuth=GETANDREFRESH;DefaultDataArea=P20V01C081KON0002;DataCenter=east02;"

Using connection As New PCAAccountingConnection(connectionString)
  Dim cmd As New PCAAccountingCommand("EXECUTE GetOAuthAccessToken Id = @Id;", connection)
  cmd.Parameters.Add(New PCAAccountingParameter("@Id", "7"))
  ' Add other parameters as needed ...

  Dim rdr As PCAAccountingDataReader = cmd.ExecuteReader()
  While rdr.Read()
	  For i As Integer = 0 To rdr.FieldCount - 1
		  Console.WriteLine(rdr.GetName(i) + " --> " + rdr(i))
	  Next
	  Console.WriteLine()
  End While
End Using