调用Oracle中返回sys refcursor的函数

我试图调用一个函数(oracle)使用nhibernate返回ref游标，但我没有成功的hbm文件，可以有人请指导我与此。

如果我让它像<return class ...，我得到配置错误。

我试过{ ? = call package.function(:a, :b, :c) as result from dual }，即使这也不工作。

使用nHibernate调用ORACLE函数/过程有一些限制。
如参考文档(17.2.2.1)所述:

对于Oracle，以下规则适用:

函数必须返回一个结果集。a的第一个参数过程必须是返回结果集的OUT。这是由在Oracle 9或10中使用SYS_REFCURSOR类型。在Oracle中，您需要这样做定义一个REF CURSOR类型，参见Oracle文献。

我试着玩一点，因为我有同样的问题。

下面是PACKAGE-PROCEDURE:

create or replace
PACKAGE           "MYPACKAGE" AS
    TYPE ReferenceCursor IS REF CURSOR;
    PROCEDURE  usp_GetDual 
    (
    pCursor OUT ReferenceCursor,
    a IN CHAR,
    b IN CHAR
    );
END MYPACKAGE;

身体:

PROCEDURE usp_GetDual
    (
          pCursor OUT ReferenceCursor,
          a IN CHAR,
          b IN CHAR
    )
  IS
    err_code NUMBER;
    err_msg VARCHAR2(200);
  BEGIN
  OPEN pCursor FOR
    SELECT * FROM dual;
   EXCEPTION
    WHEN OTHERS THEN 
        err_code := SQLCODE;
        err_msg := substr(SQLERRM, 1, 200);
END usp_GetDual;

我的映射文件:

<?xml version="1.0" encoding="utf-8"?>
<hibernate-mapping xmlns="urn:nhibernate-mapping-2.2" assembly="MyAssembly">
    <sql-query name="GetDaul">
        { call MYPACKAGE.usp_GetDual ( :a, :b ) }
    </sql-query>
</hibernate-mapping>

，这是我用来测试它的代码:

var value = Session.GetNamedQuery("GetDaul")
    .SetParameter<string>("a", "AAA")
    .SetParameter<string>("b", "BBB")
    .UniqueResult();

你可以看到REF CURSOR必须是你的过程(pCursor OUT ReferenceCursor)中的第一个参数，你不需要在映射或调用中引用它。

如果你想返回实体，事情会变得有点复杂。

您的映射文件必须指定返回类型(类):

<?xml version="1.0" encoding="utf-8"?>
<hibernate-mapping xmlns="urn:nhibernate-mapping-2.2" assembly="MyAssembly">
    <sql-query name="GetOrders">
         <return class="MyAssembly.Domain.MyOrder, MyAssembly" />
         { call MYPACKAGE.usp_GetOrders ( :pCompanyCode , :pOrderNumer ) }
    </sql-query>
</hibernate-mapping>

你必须定义你的实体:

public class MyOrder
{
    public virtual string Number { get; set; }
    public virtual int Ver { get; private set; }
    public virtual string Company { get; set; }
    public virtual string Customer { get; set; }
    public override bool Equals(object obj)
    {
        if (obj == null)
            return false;
        Order order = obj as Order;
        if (order == null)
            return false;
        if (this.Number.Trim() == order.Number.Trim() &&
            this.Ver == order.Ver &&
            this.Company.Trim() == order.Company.Trim()
            )
            return true;
        else
            return false;
    }
    public override int GetHashCode()
    {
        int hash = 0;
        hash = hash +
            (null == this.Number ? 0 : this.Number.GetHashCode())
            +
            (this.Ver.GetHashCode())
            +
            (null == this.Company ? 0 : this.Company.GetHashCode());
        return (hash);
    }
}

，这是实体的映射文件:

<hibernate-mapping xmlns="urn:nhibernate-mapping-2.2" assembly="MyAssembly" namespace="MyAssembly.Domain">
  <class name="MyOrder" table="OCSAORH" mutable="false">
    <composite-id>
      <key-property name="Number" column="OCHORDN" type="String" length="10"></key-property>
      <key-property name="Ver" column="OCHAMND" type="Int32"></key-property>
      <key-property name="Company" column="OCHCOSC" type="String" length="5"></key-property>
    </composite-id>
    <property name="Customer" column="OCHCLII" type="String"></property>
  </class>
</hibernate-mapping>

这是我的ORACLE包:

PROCEDURE usp_GetOrders 
          (
          pCursor OUT ReferenceCursor,
          pCompanyCode IN CHAR,
          pOrderNumer IN CHAR
      )
  IS
    err_code NUMBER;
    err_msg VARCHAR2(200);
  BEGIN
  OPEN pCursor FOR
       SELECT 
            OCSAORH.*
      FROM OCSAORH 
            WHERE OCSAORH.OCHAMND = 0
                AND OCSAORH.OCHCOSC = pCompanyCode
                AND OCSAORH.OCHORDN = pOrderNumer;              
    EXCEPTION
            WHEN OTHERS THEN 
          err_code := SQLCODE;
          err_msg := substr(SQLERRM, 1, 200);
END usp_GetOrders;

现在你可以很容易地得到你的订单使用参数:

var listOfOrders = Session.GetNamedQuery("GetOrder")
    .SetParameter<string>("pCompanyCode", "ABC")
        .SetParameter<string>("pOrderNumer", "XYZ")
        .List<Domain.MyOrder>();

这篇文章帮助我理解了事情应该怎么做

我基于这个post - mapping-to-oracle-stored-procedure-with-fluent-nhibernate

以下是我的总结:

在这个过程中，你必须声明OUT SYS_REFCURSOR类型的第一个参数。例:p_cursor OUT SYS_REFCURSOR, MyVar1 int, MyVar2 nvarchar
返回结果集do
```
OPEN p_cursor FOR <select statement here>;
```
在我的例子中是一个动态查询，它像一个魅力。
在hbm映射中围绕
之间的调用
```
{ }
```
,
```
 { call MyProc (MyVar1, MyVar2) }
```
如果你不使用{ }, nhibernate会抛出错误的" number of arguments"

我也遇到了同样的麻烦。我是这样解决的:

Oracle PL/SQL in myppackage:

...
function MyFunction(a number) return number is
n number;
pragma autonomous_transaction; -- Important!
begin
   n:=apps.fnd_request.submit_request( ... );
   commit; -- Important!
   return n;
end;

mapping.hbm.xml: (Embedded Resource)

  ...
  <sql-query name='MyFunctionQuery'>
    <query-param name='par' type='System.Int64'/>
    <return-scalar column='ret' type='System.Int64'/>
    <![CDATA[ 
      select MyPackage.MyFunction(:par) as ret from dual
    ]]>
  </sql-query>

c#>

 ...
 IQuery Q = session.GetNamedQuery("MyFunctionQuery")
                   .SetParameter("par", 1);
 var result = Q.UniqueResult();

问好。

在我这边和Oracle上，NHibernate似乎丢失了包内过程的名称。因此，让我们假设前面的示例:call MYPACKAGE.usp_GetOrders ( :pCompanyCode , :pOrderNumer )—>的结果是包MyPackage不是一个存储过程。

Oracle.DataAccess.Client.OracleException ORA-06550: line 1, column 7: PLS-00221: 'MYPACKAGE'不是一个过程或未定义ORA-06550: line 1, column 7:

相关内容

最新更新

热门标签：