755: END IF;
756: IF l_default_value_chk = 0 THEN
757: -- End of Added for the bug 16476696 to avoid parsing errors
758: BEGIN
759: l_cursor := dbms_sql.open_cursor;
760: dbms_sql.parse(l_cursor, l_arg_default_value, dbms_sql.v7);
761: dbms_sql.define_column(l_cursor, 1, l_sql_value, 100 );
762: l_rows := dbms_sql.execute(l_cursor);
763: l_rows := dbms_sql.fetch_rows(l_cursor);
756: IF l_default_value_chk = 0 THEN
757: -- End of Added for the bug 16476696 to avoid parsing errors
758: BEGIN
759: l_cursor := dbms_sql.open_cursor;
760: dbms_sql.parse(l_cursor, l_arg_default_value, dbms_sql.v7);
761: dbms_sql.define_column(l_cursor, 1, l_sql_value, 100 );
762: l_rows := dbms_sql.execute(l_cursor);
763: l_rows := dbms_sql.fetch_rows(l_cursor);
764: dbms_sql.column_value(l_cursor, 1, l_sql_value);
757: -- End of Added for the bug 16476696 to avoid parsing errors
758: BEGIN
759: l_cursor := dbms_sql.open_cursor;
760: dbms_sql.parse(l_cursor, l_arg_default_value, dbms_sql.v7);
761: dbms_sql.define_column(l_cursor, 1, l_sql_value, 100 );
762: l_rows := dbms_sql.execute(l_cursor);
763: l_rows := dbms_sql.fetch_rows(l_cursor);
764: dbms_sql.column_value(l_cursor, 1, l_sql_value);
765: IF dbms_sql.is_open(l_cursor) THEN
758: BEGIN
759: l_cursor := dbms_sql.open_cursor;
760: dbms_sql.parse(l_cursor, l_arg_default_value, dbms_sql.v7);
761: dbms_sql.define_column(l_cursor, 1, l_sql_value, 100 );
762: l_rows := dbms_sql.execute(l_cursor);
763: l_rows := dbms_sql.fetch_rows(l_cursor);
764: dbms_sql.column_value(l_cursor, 1, l_sql_value);
765: IF dbms_sql.is_open(l_cursor) THEN
766: dbms_sql.close_cursor(l_cursor);
759: l_cursor := dbms_sql.open_cursor;
760: dbms_sql.parse(l_cursor, l_arg_default_value, dbms_sql.v7);
761: dbms_sql.define_column(l_cursor, 1, l_sql_value, 100 );
762: l_rows := dbms_sql.execute(l_cursor);
763: l_rows := dbms_sql.fetch_rows(l_cursor);
764: dbms_sql.column_value(l_cursor, 1, l_sql_value);
765: IF dbms_sql.is_open(l_cursor) THEN
766: dbms_sql.close_cursor(l_cursor);
767: END IF;
760: dbms_sql.parse(l_cursor, l_arg_default_value, dbms_sql.v7);
761: dbms_sql.define_column(l_cursor, 1, l_sql_value, 100 );
762: l_rows := dbms_sql.execute(l_cursor);
763: l_rows := dbms_sql.fetch_rows(l_cursor);
764: dbms_sql.column_value(l_cursor, 1, l_sql_value);
765: IF dbms_sql.is_open(l_cursor) THEN
766: dbms_sql.close_cursor(l_cursor);
767: END IF;
768:
761: dbms_sql.define_column(l_cursor, 1, l_sql_value, 100 );
762: l_rows := dbms_sql.execute(l_cursor);
763: l_rows := dbms_sql.fetch_rows(l_cursor);
764: dbms_sql.column_value(l_cursor, 1, l_sql_value);
765: IF dbms_sql.is_open(l_cursor) THEN
766: dbms_sql.close_cursor(l_cursor);
767: END IF;
768:
769: l_argument(l_arg_cnt) := l_sql_value;
762: l_rows := dbms_sql.execute(l_cursor);
763: l_rows := dbms_sql.fetch_rows(l_cursor);
764: dbms_sql.column_value(l_cursor, 1, l_sql_value);
765: IF dbms_sql.is_open(l_cursor) THEN
766: dbms_sql.close_cursor(l_cursor);
767: END IF;
768:
769: l_argument(l_arg_cnt) := l_sql_value;
770: END;
772: EXCEPTION
773: WHEN OTHERS THEN
774: --NULL;
775: -- Bug 3596524
776: IF dbms_sql.is_open(l_cursor) THEN
777: dbms_sql.close_cursor(l_cursor);
778: END IF;
779: END;
780: END IF;
773: WHEN OTHERS THEN
774: --NULL;
775: -- Bug 3596524
776: IF dbms_sql.is_open(l_cursor) THEN
777: dbms_sql.close_cursor(l_cursor);
778: END IF;
779: END;
780: END IF;
781:
796: l_select_clause || ' where 1=1 ' || l_additional_clause
797: || ' ' || l_where_clause;
798:
799: BEGIN
800: l_cursor := dbms_sql.open_cursor;
801: dbms_sql.parse(l_cursor, l_value_set_lookup, dbms_sql.v7);
802: dbms_sql.bind_variable(l_cursor, ':value', l_argument(l_arg_cnt));
803: dbms_sql.define_column(l_cursor, 1, l_sql_value, 255 );
804: l_rows := dbms_sql.execute(l_cursor);
797: || ' ' || l_where_clause;
798:
799: BEGIN
800: l_cursor := dbms_sql.open_cursor;
801: dbms_sql.parse(l_cursor, l_value_set_lookup, dbms_sql.v7);
802: dbms_sql.bind_variable(l_cursor, ':value', l_argument(l_arg_cnt));
803: dbms_sql.define_column(l_cursor, 1, l_sql_value, 255 );
804: l_rows := dbms_sql.execute(l_cursor);
805: l_rows := dbms_sql.fetch_rows(l_cursor);
798:
799: BEGIN
800: l_cursor := dbms_sql.open_cursor;
801: dbms_sql.parse(l_cursor, l_value_set_lookup, dbms_sql.v7);
802: dbms_sql.bind_variable(l_cursor, ':value', l_argument(l_arg_cnt));
803: dbms_sql.define_column(l_cursor, 1, l_sql_value, 255 );
804: l_rows := dbms_sql.execute(l_cursor);
805: l_rows := dbms_sql.fetch_rows(l_cursor);
806: dbms_sql.column_value(l_cursor, 1, l_sql_value);
799: BEGIN
800: l_cursor := dbms_sql.open_cursor;
801: dbms_sql.parse(l_cursor, l_value_set_lookup, dbms_sql.v7);
802: dbms_sql.bind_variable(l_cursor, ':value', l_argument(l_arg_cnt));
803: dbms_sql.define_column(l_cursor, 1, l_sql_value, 255 );
804: l_rows := dbms_sql.execute(l_cursor);
805: l_rows := dbms_sql.fetch_rows(l_cursor);
806: dbms_sql.column_value(l_cursor, 1, l_sql_value);
807:
800: l_cursor := dbms_sql.open_cursor;
801: dbms_sql.parse(l_cursor, l_value_set_lookup, dbms_sql.v7);
802: dbms_sql.bind_variable(l_cursor, ':value', l_argument(l_arg_cnt));
803: dbms_sql.define_column(l_cursor, 1, l_sql_value, 255 );
804: l_rows := dbms_sql.execute(l_cursor);
805: l_rows := dbms_sql.fetch_rows(l_cursor);
806: dbms_sql.column_value(l_cursor, 1, l_sql_value);
807:
808: EXCEPTION
801: dbms_sql.parse(l_cursor, l_value_set_lookup, dbms_sql.v7);
802: dbms_sql.bind_variable(l_cursor, ':value', l_argument(l_arg_cnt));
803: dbms_sql.define_column(l_cursor, 1, l_sql_value, 255 );
804: l_rows := dbms_sql.execute(l_cursor);
805: l_rows := dbms_sql.fetch_rows(l_cursor);
806: dbms_sql.column_value(l_cursor, 1, l_sql_value);
807:
808: EXCEPTION
809: WHEN OTHERS THEN
802: dbms_sql.bind_variable(l_cursor, ':value', l_argument(l_arg_cnt));
803: dbms_sql.define_column(l_cursor, 1, l_sql_value, 255 );
804: l_rows := dbms_sql.execute(l_cursor);
805: l_rows := dbms_sql.fetch_rows(l_cursor);
806: dbms_sql.column_value(l_cursor, 1, l_sql_value);
807:
808: EXCEPTION
809: WHEN OTHERS THEN
810: l_sql_value := NULL;
809: WHEN OTHERS THEN
810: l_sql_value := NULL;
811: END;
812:
813: IF dbms_sql.is_open(l_cursor) THEN
814: dbms_sql.close_cursor(l_cursor);
815: END IF;
816:
817: IF l_sql_value IS NOT NULL THEN
810: l_sql_value := NULL;
811: END;
812:
813: IF dbms_sql.is_open(l_cursor) THEN
814: dbms_sql.close_cursor(l_cursor);
815: END IF;
816:
817: IF l_sql_value IS NOT NULL THEN
818: l_argument(l_arg_cnt) := l_sql_value;