如何在另一个函数的包体内调用 SQL 函数

Question

我有一个包裹体，如下所示。我需要在函数体内调用一个名为 TESTING() 的函数并调用另一个查询。代码如下

CREATE OR REPLACE PACKAGE BODY TEST_PCAKAGE AS  -- body
  FUNCTION OUTER_FUNCTION (
    INPUT_A  IN VARCHAR2,
    INPUT_B  IN DATE,
  ) RETURN REF_CURSOR_TYPE  IS
    CUR_CA_RECEIPTS REF_CURSOR_TYPE;
  BEGIN
     OPEN CUR_CA_RECEIPTS FOR
       TESTING();
         SELECT * FROM TEST_TABLE;
         RETURN CUR_CA_RECEIPTS;
       END OUTER_FUNCTION;
END TEST_PCAKAGE ; 

在创建这个包体时，它给了我错误。谁能告诉我该怎么做？

错误：错误（14,1）：PLS-00428：此 SELECT 语句中需要一个 INTO 子句

create or replace
FUNCTION           "TESTING" RETURN VARCHAR2
AS
BEGIN
  RETURN('SUCCESS');
END;

Answer 1

我猜你正试图从函数中返回光标

试试这个：

CREATE OR REPLACE PACKAGE BODY TEST_PCAKAGE AS  -- body
  FUNCTION OUTER_FUNCTION (
    INPUT_A  IN VARCHAR2,
    INPUT_B  IN DATE,
  ) RETURN REF_CURSOR_TYPE  IS
    -- use sys_refcursor for dynamic cursors 
    CUR_CA_RECEIPTS sys_refcursor;
  BEGIN
     -- Open the cursor for a query and not a function
     OPEN CUR_CA_RECEIPTS FOR SELECT * FROM TEST_TABLE;
     -- i'm guessing this is for debug
     TESTING();
     -- you can now iterate it in a different procedure
     RETURN CUR_CA_RECEIPTS;
  END OUTER_FUNCTION;
END TEST_PCAKAGE ;