ストアドプロシージャの呼び出し

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

string connectionString = " If using an online instance: InitiateOAuth=GETANDREFRESH;OAuthClientId=YourClientId;OAuthClientSecret=YourClientSecret;CompanyFileId=yourCompanyFileId;CallbackURL=http://localhost:33333;User=companyFileUser;Password=companyFilePassword; If using an on premise instance: InitiateOAuth=OFF;URL=http://localhost:8080/accountright;CompanyFileId=327eed10-9615-4e5e-bd9e-ae2cc00e2c70;User=companyFileUser;Password=companyFilePassword;";

using (MYOBConnection connection = new MYOBConnection(connectionString)) {
  MYOBCommand cmd = new MYOBCommand("SelectEntries", connection);
  cmd.CommandType = CommandType.StoredProcedure; 
  cmd.Parameters.Add(new MYOBParameter("@ObjectName", "Account"));
  // Add other parameters as needed ...

  MYOBDataReader 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 = " If using an online instance: InitiateOAuth=GETANDREFRESH;OAuthClientId=YourClientId;OAuthClientSecret=YourClientSecret;CompanyFileId=yourCompanyFileId;CallbackURL=http://localhost:33333;User=companyFileUser;Password=companyFilePassword; If using an on premise instance: InitiateOAuth=OFF;URL=http://localhost:8080/accountright;CompanyFileId=327eed10-9615-4e5e-bd9e-ae2cc00e2c70;User=companyFileUser;Password=companyFilePassword;"

Using connection As New MYOBConnection(connectionString)
  Dim cmd As New MYOBCommand("SelectEntries", connection)
  cmd.CommandType = CommandType.StoredProcedure
  cmd.Parameters.Add(New MYOBParameter("@ObjectName", "Account"))
  ' Add other parameters as needed ...

  Dim rdr As MYOBDataReader = 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;"

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

string connectionString = " If using an online instance: InitiateOAuth=GETANDREFRESH;OAuthClientId=YourClientId;OAuthClientSecret=YourClientSecret;CompanyFileId=yourCompanyFileId;CallbackURL=http://localhost:33333;User=companyFileUser;Password=companyFilePassword; If using an on premise instance: InitiateOAuth=OFF;URL=http://localhost:8080/accountright;CompanyFileId=327eed10-9615-4e5e-bd9e-ae2cc00e2c70;User=companyFileUser;Password=companyFilePassword;";

using (MYOBConnection connection = new MYOBConnection(connectionString)) {
  MYOBCommand cmd = new MYOBCommand("EXECUTE SelectEntries ObjectName = @ObjectName;", connection); 
  cmd.Parameters.Add(new MYOBParameter("@ObjectName", "Account"));
  // Add other parameters as needed ...

  MYOBDataReader 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 = " If using an online instance: InitiateOAuth=GETANDREFRESH;OAuthClientId=YourClientId;OAuthClientSecret=YourClientSecret;CompanyFileId=yourCompanyFileId;CallbackURL=http://localhost:33333;User=companyFileUser;Password=companyFilePassword; If using an on premise instance: InitiateOAuth=OFF;URL=http://localhost:8080/accountright;CompanyFileId=327eed10-9615-4e5e-bd9e-ae2cc00e2c70;User=companyFileUser;Password=companyFilePassword;"

Using connection As New MYOBConnection(connectionString)
  Dim cmd As New MYOBCommand("EXECUTE SelectEntries ObjectName = @ObjectName;", connection)
  cmd.Parameters.Add(New MYOBParameter("@ObjectName", "Account"))
  ' Add other parameters as needed ...

  Dim rdr As MYOBDataReader = 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

ADO.NET Provider for MYOB

ストアドプロシージャの呼び出し