ストアドプロシージャの呼び出し
他のSQL ストアドプロシージャと同様に、SASDataSetsCommand を使用してストアドプロシージャを呼び出すことができます。SASDataSetsCommand オブジェクトをインスタンス化するには、コンストラクタへの引数として、ストアドプロシージャの名前とSASDataSetsConnection インスタンスを渡します。CommandType プロパティをStoredProcedure に設定し、SASDataSetsCommand インスタンスのParameters コレクションにキーと値のペアとしてパラメータを追加します。
C#
string connectionString = "URI=C:\myfolder;"; using (SASDataSetsConnection connection = new SASDataSetsConnection(connectionString)) { SASDataSetsCommand cmd = new SASDataSetsCommand("SelectEntries", connection); cmd.CommandType = CommandType.StoredProcedure; cmd.Parameters.Add(new SASDataSetsParameter("@ObjectName", "Account")); // Add other parameters as needed ... SASDataSetsDataReader 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 = "URI=C:\myfolder;" Using connection As New SASDataSetsConnection(connectionString) Dim cmd As New SASDataSetsCommand("SelectEntries", connection) cmd.CommandType = CommandType.StoredProcedure cmd.Parameters.Add(New SASDataSetsParameter("@ObjectName", "Account")) ' Add other parameters as needed ... Dim rdr As SASDataSetsDataReader = 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;"
パラメータ化されたクエリを実行するには、SASDataSetsCommand インスタンスのParameters コレクションに、キーと値のペアとしてパラメータを追加します。
C#
string connectionString = "URI=C:\myfolder;"; using (SASDataSetsConnection connection = new SASDataSetsConnection(connectionString)) { SASDataSetsCommand cmd = new SASDataSetsCommand("EXECUTE SelectEntries ObjectName = @ObjectName;", connection); cmd.Parameters.Add(new SASDataSetsParameter("@ObjectName", "Account")); // Add other parameters as needed ... SASDataSetsDataReader 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 = "URI=C:\myfolder;" Using connection As New SASDataSetsConnection(connectionString) Dim cmd As New SASDataSetsCommand("EXECUTE SelectEntries ObjectName = @ObjectName;", connection) cmd.Parameters.Add(New SASDataSetsParameter("@ObjectName", "Account")) ' Add other parameters as needed ... Dim rdr As SASDataSetsDataReader = 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