ttt.ttt_sql_pack_up.list_doc_job_up(cboautor_task => 0,
                                 check1 => 1,
                                 set_filtr => 0,
                                 cntdate_start => NULL,
                                 cntdate_end => NULL,
                                 txtca_name => '',
                                 nсa_name => 0,
                                 cboautoruse => 0,
                                 cbostaff => 0,
                                 opguse => 3,
                                 txtreg_num_only => '',
                                 txtreg_num_suf => '',
                                 txtindex => '',
                                 txtname_doc => '',
                                 ndoc_id => 0,
                                 cntdate_startuse => NULL,
                                 cntdate_enduse => NULL,
                                 nuseraznica => NULL,
                                 cur => v_cur);

 NREG_NUM_ONLY DOCUMENTS.REG_NUM_ONLY%TYPE;
    NREG_NUM_SUF  DOCUMENTS.REG_NUM_SUF%TYPE;
    ССA_NAME    DOCUMENTS.CA_NAME%TYPE := TXTCA_NAME;
  
    ORADATE_STARTUSE DATE;
    ORADATE_ENDUSE   DATE;
  BEGIN
  
    IF SET_FILTR = 0 THEN
      -- если не наложен фильтр
    
      OPEN CUR FOR - и длинный запрос...

CREATE OR REPLACE PACKAGE DELOOB.all_maket_ref_cursor_pkg AS
   TYPE all_maket_ref_cursor IS REF CURSOR
      RETURN all_maket%ROWTYPE;
END all_maket_ref_cursor_pkg;

CREATE OR REPLACE PROCEDURE DELOOB.test_ref_cursor(
   p_kancelarid IN     NUMBER,
   p_cursor    OUT all_maket_ref_cursor_pkg.all_maket_ref_cursor
) IS
BEGIN
   OPEN p_cursor FOR
      SELECT *
        FROM all_maket
       WHERE kancelarid = p_kancelarid;
END test_ref_cursor;
/

CREATE OR REPLACE package DELOOB.all_maket_pkg
is
  type all_maket_tbl is table of all_maket%rowtype;
end;
/

CREATE OR REPLACE FUNCTION DELOOB.showit(p_kancelarid IN NUMBER)
   RETURN all_maket_pkg.all_maket_tbl
   PIPELINED IS
   c_cursor   all_maket_ref_cursor_pkg.all_maket_ref_cursor;
   r_all_maket      c_cursor%ROWTYPE;
BEGIN
   test_ref_cursor(p_kancelarid, c_cursor);

   LOOP
      FETCH c_cursor
      INTO r_all_maket;

      EXIT WHEN c_cursor%NOTFOUND;
      PIPE ROW (r_all_maket);
   END LOOP;

   CLOSE c_cursor;

   RETURN;
END;
/

SELECT *
  FROM table(deloob.showit(0))