带有参数的流水线函数使用%ROWTYPE声明

时间:2017-10-20 08:01:57

标签: oracle

我正在尝试在一个包中声明一个流水线表函数(t),该包接受一个声明为<tablename>%ROWTYPE的参数。声明该函数有效并且包编译没有任何错误。

但是我想在一个过程(p1)中使用这个函数,如下所示。

CREATE OR REPLACE PACKAGE BODY t1
AS
   -- private

   PROCEDURE p1
   IS
      l_person   persons%ROWTYPE;
   BEGIN
      FOR l_row IN (SELECT *
                      FROM TABLE (t (l_person)))
      LOOP
         NULL;
      END LOOP;
   END;


   -- public

   FUNCTION t (p_persons_record persons%ROWTYPE)
      RETURN t_a_list
      PIPELINED
   IS
      l_a   t_a;
   BEGIN
      l_a.dummy := 'A';
      PIPE ROW (l_a);
   END;
END;

此示例代码没有意义,但它演示了我的问题。 它只是不编译但会出现以下错误:

[Error] PLS-00382 (10: 38): PLS-00382: expression is of wrong type
[Error] PLS-00306 (10: 35): PLS-00306: wrong number or types of arguments in call to 'T'
[Error] ORA-00904 (10: 35): PL/SQL: ORA-00904: "T1"."T": invalid identifier

任何人都可以解释错误以及如何解决这些错误吗?

修改

包规范是:

CREATE OR REPLACE PACKAGE t1
AS
   TYPE t_a IS RECORD (dummy VARCHAR2 (1));

   TYPE t_a_list IS TABLE OF t_a;

   FUNCTION t (p_persons_record persons%ROWTYPE)
      RETURN t_a_list
      PIPELINED;
END;

2 个答案:

答案 0 :(得分:1)

您无法在SQL Scope中使用记录类型。因此,带有由rowtype属性派生的记录参数的PL / SQL函数不能用作SQL中的表函数。 您必须重写的唯一事情是在架构级别而不是PL / SQL记录上使用SQL对象。

-- adapt your columns to your table as necessary
CREATE OR REPLACE TYPE g_persons AS OBJECT (
   ID int,
   C1 int
);

CREATE OR REPLACE PACKAGE t1
AS
   TYPE t_a IS RECORD (dummy VARCHAR2 (1));

   TYPE t_a_list IS TABLE OF t_a;

   FUNCTION t (p_persons_record g_persons_t)
      RETURN t_a_list
      PIPELINED;
END;
/

CREATE OR REPLACE PACKAGE BODY t1
AS
   -- private

   PROCEDURE p1
   IS
      l_person   g_persons_t;
   BEGIN

      l_person.ID := 1; -- init your record some how
      l_person.C1 := 1; -- init your record some how

      FOR l_row IN (SELECT *
                      FROM TABLE (t (l_person)))
      LOOP
         NULL;
      END LOOP;
   END;


   -- public

   FUNCTION t (p_persons_record g_persons_t)
      RETURN t_a_list
      PIPELINED
   IS
      l_a   t_a;

   BEGIN
      l_a.dummy := 'A';
      PIPE ROW (l_a);     
   END;

END;
/

答案 1 :(得分:0)

我认为您的PACKAGE规范缺少t的声明。您是否检查过您的PACKAGE规范与此类似?:

CREATE OR REPLACE PACKAGE t1 AS
   PROCEDURE p1;
   FUNCTION t (p_persons_record persons%ROWTYPE) RETURN t_a_list PIPELINED;
END;