How to create a procedure to output REF CURSOR with any WHERE clause?

Question

I have an requirement like this: I have huge query which need to reuse in my code more than 10 times. This SQL has about 50 lines. Thing is for those 10 odd times sometimes the WHERE clause changes (columns are the same). So I cannot create a view since SQL is not static.
I thought of writing a procedure with a WHERE_CLAUSE input para. I output a sys refcursor by adding the where clause. But I can't do it since you cannot add a where clause like that.
i.e.
PROCEDURE dynamyic_query (p_where_clause IN VARCHAR2, p_out_query OUT SYS_REFCURSOR ) IS
BEGIN
  OPEN p_out_query FOR SELECT ......... FROM table WHERE || ' ' || p_where_clause;
END;The above gives error.
How to handle a situation like this???? Any help would be greatly appreciated.

Answer 1

I tried this method:
I created a table tab_test which has these records:
TNAME                          TABTYPE    CLUSTERID                                                                                                                                                                  
ABS_V4_P_ERROR_MESSAGES        TABLE                                                                                                                                                                                  
ABS_V4_P_ORG_PARAM             TABLE                                                                                                                                                                                  
ABS_V4_P_PARAMETER             TABLE                                                                                                                                                                                  
ABS_V4_P_SYS_PARAM             TABLE                                                                                                                                                                                  
ACCINTERFACE_PARAMETERS        TABLE                                                                                                                                                                                  
ACCOUNTS                       TABLE                                                                                                                                                                                  
ACCOUNT_EXTRACT_PERIODS        TABLE                                                                                                                                                                                  
ACCOUNT_EXTRACT_PERIODS#       TABLE                                                                                                                                                                                  
ACCOUNT_EXTRACT_PERIODS_1      TABLE                                                                                                                                                                                   Now I create this proc:
PROCEDURE FORMS_TEXT_DYN_SQL_TEST(p_where_cluase IN VARCHAR2, p_out_cursor OUT SYS_REFCURSOR) IS
  v_stmt VARCHAR2(1000);
BEGIN
  v_stmt := 'SELECT tname FROM tab_test WHERE tname LIKE ''%ABS_V4%'' AND tabtype = :x';
  OPEN p_out_cursor FOR v_stmt using p_where_cluase;
END;I create this code block and run it:
declare
  v_tname varchar2(200);
  out_cursor sys_refcursor;
begin
  forms_text_dyn_sql_test('TABLE', out_cursor );
  LOOP
    fetch out_cursor INTO v_tname;
    exit when out_cursor%NOTFOUND;
    DBMS_OUTPUT.PUT_LINE(v_tname);
  END LOOP;
end;
/I get correct output:
ABS_V4_P_ERROR_MESSAGES
ABS_V4_P_ORG_PARAM
ABS_V4_P_PARAMETER
ABS_V4_P_SYS_PARAMHowever, when I change the proc like this:
PROCEDURE FORMS_TEXT_DYN_SQL_TEST(p_where_cluase IN VARCHAR2, p_out_cursor OUT SYS_REFCURSOR) IS
  v_stmt VARCHAR2(1000);
BEGIN
  v_stmt := 'SELECT tname FROM tab_test WHERE tname LIKE ''%ABS_V4%'' AND :y';
  OPEN p_out_cursor FOR v_stmt using p_where_cluase;
END;And run this code block:
declare
  v_tname varchar2(200);
  out_cursor sys_refcursor;
begin
  forms_text_dyn_sql_test(' 1 = 1 ', out_cursor );
  LOOP
    fetch out_cursor INTO v_tname;
    exit when out_cursor%NOTFOUND;
    DBMS_OUTPUT.PUT_LINE(v_tname);
  END LOOP;
end;
/I get error:
[1]: (Error): ORA-00920: invalid relational operator ORA-06512: at "ABS.FORMS_TEXT_DYN_SQL_TEST", line 6 ORA-06512: at line 5Looks like you can only put column_name = :z, column_name = :y type values. You cannot it seems replace it with any WHERE CLAUSE????