39: || ' where list_entry_id in '|| l_list_entry_id_list
40: || ' and list_header_id = '|| P_LIST_HEADER_ID || ' and ('||
41: l_where_clause || ' )';
42: -- DBMS_OUTPUT.PUT_LINE('after insert stmt');
43: l_dyn_cursor_id := DBMS_SQL.OPEN_CURSOR;
44: DBMS_SQL.PARSE(l_dyn_cursor_id,l_rlse_stmt,DBMS_SQL.V7);
45: DBMS_SQL.DEFINE_COLUMN(l_dyn_cursor_id,1,l_list_entry_id_col);
46: l_dummy := DBMS_SQL.EXECUTE(l_dyn_cursor_id);
47:
40: || ' and list_header_id = '|| P_LIST_HEADER_ID || ' and ('||
41: l_where_clause || ' )';
42: -- DBMS_OUTPUT.PUT_LINE('after insert stmt');
43: l_dyn_cursor_id := DBMS_SQL.OPEN_CURSOR;
44: DBMS_SQL.PARSE(l_dyn_cursor_id,l_rlse_stmt,DBMS_SQL.V7);
45: DBMS_SQL.DEFINE_COLUMN(l_dyn_cursor_id,1,l_list_entry_id_col);
46: l_dummy := DBMS_SQL.EXECUTE(l_dyn_cursor_id);
47:
48: loop
41: l_where_clause || ' )';
42: -- DBMS_OUTPUT.PUT_LINE('after insert stmt');
43: l_dyn_cursor_id := DBMS_SQL.OPEN_CURSOR;
44: DBMS_SQL.PARSE(l_dyn_cursor_id,l_rlse_stmt,DBMS_SQL.V7);
45: DBMS_SQL.DEFINE_COLUMN(l_dyn_cursor_id,1,l_list_entry_id_col);
46: l_dummy := DBMS_SQL.EXECUTE(l_dyn_cursor_id);
47:
48: loop
49: if DBMS_SQL.FETCH_ROWs(l_dyn_cursor_id) = 0
42: -- DBMS_OUTPUT.PUT_LINE('after insert stmt');
43: l_dyn_cursor_id := DBMS_SQL.OPEN_CURSOR;
44: DBMS_SQL.PARSE(l_dyn_cursor_id,l_rlse_stmt,DBMS_SQL.V7);
45: DBMS_SQL.DEFINE_COLUMN(l_dyn_cursor_id,1,l_list_entry_id_col);
46: l_dummy := DBMS_SQL.EXECUTE(l_dyn_cursor_id);
47:
48: loop
49: if DBMS_SQL.FETCH_ROWs(l_dyn_cursor_id) = 0
50: then
45: DBMS_SQL.DEFINE_COLUMN(l_dyn_cursor_id,1,l_list_entry_id_col);
46: l_dummy := DBMS_SQL.EXECUTE(l_dyn_cursor_id);
47:
48: loop
49: if DBMS_SQL.FETCH_ROWs(l_dyn_cursor_id) = 0
50: then
51: l_use_count := -1;
52: exit;
53: end if;
51: l_use_count := -1;
52: exit;
53: end if;
54:
55: DBMS_SQL.column_value(l_dyn_cursor_id,1,l_list_entry_id_col);
56: X_LIST_ENTRY_ID_TAB(l_use_count) := l_list_entry_id_col;
57: l_use_count := l_use_count + 1;
58: end loop;
59:
56: X_LIST_ENTRY_ID_TAB(l_use_count) := l_list_entry_id_col;
57: l_use_count := l_use_count + 1;
58: end loop;
59:
60: DBMS_SQL.CLOSE_CURSOR(l_dyn_cursor_id);
61:
62: end if;
63: end if;
64: end if;
63: end if;
64: end if;
65: Exception
66: when NO_DATA_FOUND then
67: if DBMS_SQL.IS_OPEN(l_dyn_cursor_id)
68: then
69: DBMS_SQL.CLOSE_CURSOR(l_dyn_cursor_id);
70: end if;
71: when OTHERS then
65: Exception
66: when NO_DATA_FOUND then
67: if DBMS_SQL.IS_OPEN(l_dyn_cursor_id)
68: then
69: DBMS_SQL.CLOSE_CURSOR(l_dyn_cursor_id);
70: end if;
71: when OTHERS then
72: if DBMS_SQL.IS_OPEN(l_dyn_cursor_id)
73: then
68: then
69: DBMS_SQL.CLOSE_CURSOR(l_dyn_cursor_id);
70: end if;
71: when OTHERS then
72: if DBMS_SQL.IS_OPEN(l_dyn_cursor_id)
73: then
74: DBMS_SQL.CLOSE_CURSOR(l_dyn_cursor_id);
75: end if;
76: raise;
70: end if;
71: when OTHERS then
72: if DBMS_SQL.IS_OPEN(l_dyn_cursor_id)
73: then
74: DBMS_SQL.CLOSE_CURSOR(l_dyn_cursor_id);
75: end if;
76: raise;
77: END;
78: