PL / SQL 11g>将数据导入记录表对象

时间:2014-09-03 14:18:15

标签: oracle plsql oracle11g

我尝试使用自定义RECORD和TABLE OF RECORD数据类型从复杂查询中提取数据(此处已在此处简化以供审阅),但我无法将数据输入表中由于" PLS-00308:此结构不允许作为作业的来源"错误。我仔细地按照了这些例子,并没有理解这个问题。任何人都可以指出我的方向。

这里是代码

TYPE CORE_REC IS RECORD 
      (
           OrgID CHAR(20 BYTE)
           , StoreNumber VARCHAR2(200 BYTE)
           , StoreName VARCHAR(200 BYTE)
           , AssociateName VARCHAR2(300 BYTE)
      );

 TYPE CORE_REC_CURSOR IS REF CURSOR RETURN CORE_REC;

 TYPE CORE_REC_TABLE IS TABLE OF CORE_REC INDEX BY BINARY_INTEGER;

  FUNCTION CORE_GETCURRS (
      OrgID IN CHAR
 ) RETURN HDT_CORE_MAIN.CORE_REC AS

 CurrTable HDT_CORE_MAIN.CORE_REC;
 i BINARY_INTEGER := 0;

 CURSOR CurrCursor IS
      WITH
           CoreCurrs AS
                (SELECT
                     busSTR.id AS OrgID
                     , busSTR.name AS StoreNumber
                     , busSTR.name2 AS StoreName
                     , emp.lname || ', ' || emp.fname || ' ' || emp.mname AS AssociateName
                     FROM tp2.tpt_company busSTR
                          INNER JOIN tp2.cmt_person emp
                               ON busSTR.ID = emp.company_id
                     WHERE
                          busSTR.id = OrgID
                )
      SELECT
           CoreCurrs.OrgID
           , CoreCurrs.StoreNumber
           , CoreCurrs.StoreName
           , CoreCurrs.AssociateName
           FROM CoreCurrs
      ;
 BEGIN
     DBMS_OUTPUT.ENABLE(1000000);
     OPEN CurrCursor;
     LOOP
          i := i + 1;
          FETCH CurrCursor INTO CurrTable(i);
          EXIT WHEN CurrCursor%NOTFOUND;
     END LOOP;
     CLOSE CurrCursor;
     RETURN CurrTable;

  END CORE_GETCURRS;

在FETCH语句中抛出错误。

1 个答案:

答案 0 :(得分:1)

您的变量类型错误,应为:

 CurrTable HDT_CORE_MAIN.CORE_REC_TABLE;

目前你正试图选择一个记录的元素,而不是一个表的元素,这是没有意义的。当它被定义为CORE_REC时,引用CurrTable(i)并不意味着什么。