获取引起PLSQL

Question

设置想知道是否有已经有一些改写建议，帮助功能，生成日期复发两个日期之间 - 从这个链接generate_recurrences（）用于复发的recurrency events

在PLSQL

？它返回一个setof日期，但在plsql中，我无法弄清楚如何获取日期和循环的结果集next next_date，其中next还返回列表中的下一个日期。

我想它重写它PLSQL但只有一个日期的回报，因为我无法找到如何在PLSQL返回一个结果，那就是我已经试过：

CREATE OR REPLACE FUNCTION GENERATE_RECURRENCE(rec in VARCHAR2, 
           start_date in TIMESTAMP, 
           end_date in TIMESTAMP) 
RETURN TIMESTAMP 
IS 
    next_date TIMESTAMP := start_date; 
    duration INTERVAL DAY TO SECOND; 
    day  INTERVAL DAY TO SECOND; 
BEGIN 
IF recurs = 'none' THEN 
    return next_date; 
elsif recurs = 'daily' then 
    duration := INTERVAL '1' DAY ; 
    while next_date <= end_date loop 
    return next_date + duration; 
END IF; 
END; 

Answer 1

我前段时间写了下面的流水线函数。这不是正是你要求的，但它给了你一个日期范围的结果集，所以你应该能够匹配你的需求。

它需要你创建一个类型对象来保存返回值，我使用了一个现有的对象而不是创建一个自定义的对象。所以你应该修改它来使用足够大的对象（并且使用日期类型而不是字符串）。但功能不会满足你的要求。

享受！

CREATE OR REPLACE FUNCTION date_range_stream(start_date_in IN DATE, 
              end_date_in IN DATE) RETURN rpt_results_10_obj_type_type 
    DETERMINISTIC 
    PIPELINED IS 
    /* 
     Parameters:  start_date_in - First date to return (truncated) 
         end_date_in - Last date to return, inclusive 

     Results:  date string formatted as MM/DD/YYYY 

     Author:   Stew Stryker 

     Usage:   SELECT to_date(text01, 'MM/DD/YYYY') AS a_date 
          FROM TABLE(aeo.aeo_misc_tools.date_range_stream('01-MAR-2009', SYSDATE)) 
         Returns a rows from starting date to current 

     Requires the definition of the following object: 

      CREATE OR REPLACE TYPE rpt_results_10col_obj AS OBJECT 
      ( seq_num NUMBER, 
       place VARCHAR2(20), 
       rep_info VARCHAR2(20), 
       text01 VARCHAR2(512), 
       text02 VARCHAR2(512), 
       text03 VARCHAR2(512), 
       text04 VARCHAR2(512), 
       text05 VARCHAR2(512), 
       text06 VARCHAR2(512), 
       text07 VARCHAR2(512), 
       text08 VARCHAR2(512), 
       text09 VARCHAR2(512), 
       text10 VARCHAR2(512)); 


    */ 
    cur_date DATE := trunc(start_date_in); 
    date_row rpt_results_10col_obj := aeo.rpt_results_10col_obj(NULL, 
                   NULL, 
                   NULL, 
                   NULL, 
                   NULL, 
                   NULL, 
                   NULL, 
                   NULL, 
                   NULL, 
                   NULL, 
                   NULL, 
                   NULL, 
                   NULL); 
BEGIN 
    WHILE cur_date <= trunc(end_date_in) 
    LOOP 
     date_row.text01 := TO_CHAR(cur_date, 'MM/DD/YYYY'); 
     PIPE ROW(date_row); 
     cur_date := cur_date + 1; 
    END LOOP; 

    RETURN; 

EXCEPTION 
    WHEN no_data_found THEN 
     RETURN; 
    WHEN OTHERS THEN 
     dbms_output.put_line('EXCEPTION IN aeo.aeo_misc_tools.date_range_stream - ' || SQLCODE || ': ' || 
          SQLERRM); 
     RAISE; 
     RETURN; 
END date_range_stream;