Please help on binding variables

Question

Hello,
I need to bind the variable in following function.
If the single deptno is passed into function, the function will return correct result. However, if the set of deptno is passed, the function cannot give correct result.
Could anyone please help me on it...
Thanks in advance!!!
scott@ORA111>create or replace function my_test (p_deptno_list varchar2)
2 return sys_refcursor
3 as
4 rec sys_refcursor;
5 v_sql varchar2(1000);
6
7 begin
8 v_sql := 'select * from emp where deptno in (:1)';
9 open rec for v_sql using p_deptno_list;
10 return rec;
11
12 end;
13 /
Function created.
Elapsed: 00:00:00.04
scott@ORA111>var my_rec refcursor
scott@ORA111>execute :my_rec := my_test('10');
PL/SQL procedure successfully completed.
Elapsed: 00:00:00.00
scott@ORA111>print :my_rec
EMPNO ENAME JOB MGR HIREDATE SAL COMM DEPTNO
7782 CLARK MANAGER 7839 09-JUN-81 2450 10
7839 KING PRESIDENT 17-NOV-81 5000 10
7934 MILLER CLERK 7782 23-JAN-82 1300 10
9999 TEMP SALESMAN 7782 27-APR-09 6000 10
Elapsed: 00:00:00.01
scott@ORA111>var my_rec refcursor
scott@ORA111>execute :my_rec := my_test('10, 20');
PL/SQL procedure successfully completed.
Elapsed: 00:00:00.01
scott@ORA111>print :my_rec
ERROR:
ORA-12801: error signaled in parallel query server P000
ORA-01722: invalid number
no rows selected
Elapsed: 00:00:00.01

Answer 1

Hello Beijing,
Thank you so much for your help!!!
We need a procedure/function to take the inputs as query conditions, execute the query, store the result in refer cursor and pass it into Client Application.
With the help on this Forum, I have done following test. Only one thing that I have not figure out is the variable-list. As you know the line 15 in my procedure will not give the correct result. However, I am not able to concatenate the bind variable in the string.
Please help, thanks again.
SQL> create or replace function test_function
2 (p_deptno_list varchar2,
3 p_hire_start emp.hiredate%type,
4 p_hire_end emp.hiredate%type,
5 p_job emp.job%type)
6 return sys_refcursor
7 as
8 rec sys_refcursor;
9 v_sql varchar2(1000);
10
11 begin
12 v_sql := 'select * from emp';
13
14 if p_deptno_list is not null then
15 v_sql := v_sql ||' where instr(replace(:1, '' '', ''''), deptno) > 0';
16 else
17 v_sql := v_sql ||' where :1 is null';
18 end if;
19
20 if p_hire_start is not null and p_hire_end is not null then
21 v_sql := v_sql ||' and hiredate between :2 and :3';
22 else
23 v_sql := v_sql ||' and :2 is null and :3 is null';
24 end if;
25
26
27 if p_job is not null then
28 v_sql := v_sql ||' and job = :4';
29 else
30 v_sql := v_sql ||' and :4 is null';
31 end if;
32
33 open rec for v_sql using p_deptno_list, p_hire_start, p_hire_end, p_job;
34 return rec;
35
36 end;
37 /
Function created.
SQL> set lin 200
SQL> var rec refcursor
SQL> execute :rec := test_function(null, null, null, null);
PL/SQL procedure successfully completed.
SQL> print rec
EMPNO ENAME JOB MGR HIREDATE SAL COMM DEPTNO
7369 SMITH CLERK 7902 17-DEC-80 800 20
7499 ALLEN SALESMAN 7698 20-FEB-81 1600 300 30
7521 WARD SALESMAN 7698 22-FEB-81 1250 500 30
7566 JONES MANAGER 7839 02-APR-81 2975 20
7654 MARTIN SALESMAN 7698 28-SEP-81 1250 1400 30
7698 BLAKE MANAGER 7839 01-MAY-81 2850 30
7782 CLARK MANAGER 7839 09-JUN-81 3450 10
7788 SCOTT ANALYST 7566 19-APR-87 3000 20
7839 KING PRESIDENT 17-NOV-81 6000 10
7844 TURNER SALESMAN 7698 08-SEP-81 1500 0 30
7876 ADAMS CLERK 7788 23-MAY-87 1100 20
EMPNO ENAME JOB MGR HIREDATE SAL COMM DEPTNO
7900 JAMES CLERK 7698 03-DEC-81 950 30
7902 FORD ANALYST 7566 03-DEC-81 3000 20
7934 MILLER CLERK 7782 23-JAN-82 4300 10
14 rows selected.
SQL> execute :rec := test_function('20, 30', null, null, null);
PL/SQL procedure successfully completed.
SQL> print rec
EMPNO ENAME JOB MGR HIREDATE SAL COMM DEPTNO
7369 SMITH CLERK 7902 17-DEC-80 800 20
7499 ALLEN SALESMAN 7698 20-FEB-81 1600 300 30
7521 WARD SALESMAN 7698 22-FEB-81 1250 500 30
7566 JONES MANAGER 7839 02-APR-81 2975 20
7654 MARTIN SALESMAN 7698 28-SEP-81 1250 1400 30
7698 BLAKE MANAGER 7839 01-MAY-81 2850 30
7788 SCOTT ANALYST 7566 19-APR-87 3000 20
7844 TURNER SALESMAN 7698 08-SEP-81 1500 0 30
7876 ADAMS CLERK 7788 23-MAY-87 1100 20
7900 JAMES CLERK 7698 03-DEC-81 950 30
7902 FORD ANALYST 7566 03-DEC-81 3000 20
11 rows selected.
SQL> execute :rec := test_function('20', to_date('01-JAN-1981','DD-MON-YYYY'), to_date('31-DEC-1981','DD-MON-YYYY'), null);
PL/SQL procedure successfully completed.
SQL> print rec
EMPNO ENAME JOB MGR HIREDATE SAL COMM DEPTNO
7566 JONES MANAGER 7839 02-APR-81 2975 20
7902 FORD ANALYST 7566 03-DEC-81 3000 20
SQL> execute :rec := test_function('20', to_date('01-JAN-1981','DD-MON-YYYY'), to_date('31-DEC-1981','DD-MON-YYYY'), 'MANAGER');
PL/SQL procedure successfully completed.
SQL> print rec
EMPNO ENAME JOB MGR HIREDATE SAL COMM DEPTNO
7566 JONES MANAGER 7839 02-APR-81 2975 20
SQL> spool off