oracle 存儲過程返回數據集是以遊標參數的形式返回,同時返回多個數據集就相當於多幾個輸出類型的遊標參數,而在程序處理中如何處理這種多結果集的存儲過程?
今天研究了Delphi7 和 c# 兩種語言,D7 ODBC 方式連接,OraStoreProced 對象無法處理多個對象,查看其父類TCustomOraQuery,不想c# 斷開式數據集可以接收多個集合,即DataSet 等同於 List
- 示例
Oracle
--包頭
create or replace package mypackage is
type cur_type is ref cursor;
procedure pr_get_data(cur1 out cur_type,cur2 out cur_type);
end;
--包體
create or replace package body mypackage is
procedure pr_get_data(cur1 out cur_type,cur2 out cur_type) as
begin
open cur1 for select * from sales;
open cur2 for select * from t1;
end;
end;
c# 調用
- C# 示例
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
using Oracle.ManagedDataAccess.Client;
namespace WinStoreProced
{
public partial class Form1 : Form
{
private string connstr = "Data Source=(DESCRIPTION =(ADDRESS =(PROTOCOL = TCP)(HOST = localhost)(PORT = 1521))(CONNECT_DATA =(SERVER = DEDICATED)(SERVICE_NAME = ORCL)));User Id=t1;Password=tt123;";
public Form1()
{
InitializeComponent();
}
private void button1_Click(object sender, EventArgs e)
{
using (OracleConnection conn = new OracleConnection(connstr)) {
try
{
conn.Open();
Text = "Success";
using (OracleCommand cmd = conn.CreateCommand())
{
cmd.CommandType = CommandType.StoredProcedure;
cmd.CommandText = "mypackage.pr_get_data";
cmd.Parameters.Clear();
cmd.Parameters.Add("data1", OracleDbType.RefCursor, ParameterDirection.Output);
cmd.Parameters.Add("data2", OracleDbType.RefCursor, ParameterDirection.Output);
cmd.Prepare();
try
{
OracleDataAdapter oda = new OracleDataAdapter(cmd);
DataSet ds = new DataSet();
oda.Fill(ds);
dataGridView1.DataSource = ds.Tables[0];
dataGridView2.DataSource = ds.Tables[1];
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
}
}
catch(Exception ex) {
MessageBox.Show(ex.Message);
}
}
}
}
}
- 結果