25: end if;
26:
27: l_stmt := 'select ''Y'' from msc_plans'||l_dblink||' msc where :plan_name in msc.compile_designator '||
28: 'and curr_plan_type <> 4';
29: l_cursor_id := dbms_sql.open_cursor;
30: dbms_sql.parse(l_cursor_id,l_stmt,dbms_sql.native);
31: dbms_sql.bind_variable(l_cursor_id, ':plan_name', p_plan_name);
32: dbms_sql.define_column(l_cursor_id, 1, l_result, 1);
33: l_dummy := dbms_sql.execute(l_cursor_id);
26:
27: l_stmt := 'select ''Y'' from msc_plans'||l_dblink||' msc where :plan_name in msc.compile_designator '||
28: 'and curr_plan_type <> 4';
29: l_cursor_id := dbms_sql.open_cursor;
30: dbms_sql.parse(l_cursor_id,l_stmt,dbms_sql.native);
31: dbms_sql.bind_variable(l_cursor_id, ':plan_name', p_plan_name);
32: dbms_sql.define_column(l_cursor_id, 1, l_result, 1);
33: l_dummy := dbms_sql.execute(l_cursor_id);
34: l_dummy := dbms_sql.fetch_rows(l_cursor_id);
27: l_stmt := 'select ''Y'' from msc_plans'||l_dblink||' msc where :plan_name in msc.compile_designator '||
28: 'and curr_plan_type <> 4';
29: l_cursor_id := dbms_sql.open_cursor;
30: dbms_sql.parse(l_cursor_id,l_stmt,dbms_sql.native);
31: dbms_sql.bind_variable(l_cursor_id, ':plan_name', p_plan_name);
32: dbms_sql.define_column(l_cursor_id, 1, l_result, 1);
33: l_dummy := dbms_sql.execute(l_cursor_id);
34: l_dummy := dbms_sql.fetch_rows(l_cursor_id);
35: dbms_sql.column_value(l_cursor_id, 1, l_result);
28: 'and curr_plan_type <> 4';
29: l_cursor_id := dbms_sql.open_cursor;
30: dbms_sql.parse(l_cursor_id,l_stmt,dbms_sql.native);
31: dbms_sql.bind_variable(l_cursor_id, ':plan_name', p_plan_name);
32: dbms_sql.define_column(l_cursor_id, 1, l_result, 1);
33: l_dummy := dbms_sql.execute(l_cursor_id);
34: l_dummy := dbms_sql.fetch_rows(l_cursor_id);
35: dbms_sql.column_value(l_cursor_id, 1, l_result);
36: dbms_sql.close_cursor(l_cursor_id);
29: l_cursor_id := dbms_sql.open_cursor;
30: dbms_sql.parse(l_cursor_id,l_stmt,dbms_sql.native);
31: dbms_sql.bind_variable(l_cursor_id, ':plan_name', p_plan_name);
32: dbms_sql.define_column(l_cursor_id, 1, l_result, 1);
33: l_dummy := dbms_sql.execute(l_cursor_id);
34: l_dummy := dbms_sql.fetch_rows(l_cursor_id);
35: dbms_sql.column_value(l_cursor_id, 1, l_result);
36: dbms_sql.close_cursor(l_cursor_id);
37:
30: dbms_sql.parse(l_cursor_id,l_stmt,dbms_sql.native);
31: dbms_sql.bind_variable(l_cursor_id, ':plan_name', p_plan_name);
32: dbms_sql.define_column(l_cursor_id, 1, l_result, 1);
33: l_dummy := dbms_sql.execute(l_cursor_id);
34: l_dummy := dbms_sql.fetch_rows(l_cursor_id);
35: dbms_sql.column_value(l_cursor_id, 1, l_result);
36: dbms_sql.close_cursor(l_cursor_id);
37:
38: if (l_result = 'Y') then
31: dbms_sql.bind_variable(l_cursor_id, ':plan_name', p_plan_name);
32: dbms_sql.define_column(l_cursor_id, 1, l_result, 1);
33: l_dummy := dbms_sql.execute(l_cursor_id);
34: l_dummy := dbms_sql.fetch_rows(l_cursor_id);
35: dbms_sql.column_value(l_cursor_id, 1, l_result);
36: dbms_sql.close_cursor(l_cursor_id);
37:
38: if (l_result = 'Y') then
39: return 'Y';
32: dbms_sql.define_column(l_cursor_id, 1, l_result, 1);
33: l_dummy := dbms_sql.execute(l_cursor_id);
34: l_dummy := dbms_sql.fetch_rows(l_cursor_id);
35: dbms_sql.column_value(l_cursor_id, 1, l_result);
36: dbms_sql.close_cursor(l_cursor_id);
37:
38: if (l_result = 'Y') then
39: return 'Y';
40: else
42: end if;
43:
44: exception
45: when others then
46: dbms_sql.close_cursor(l_cursor_id);
47: raise;
48:
49: end;
50:
89: l_table_name||' f where f.'||l_col_name||' >= trunc(:reference_date)+'||abs(l_days_offset);
90: end if;
91:
92:
93: l_cursor_id := dbms_sql.open_cursor;
94: dbms_sql.parse(l_cursor_id,l_stmt,dbms_sql.native);
95: dbms_sql.bind_variable(l_cursor_id, ':reference_date', p_reference_date);
96: dbms_sql.define_column(l_cursor_id, 1, l_result);
97: l_dummy := dbms_sql.execute(l_cursor_id);
90: end if;
91:
92:
93: l_cursor_id := dbms_sql.open_cursor;
94: dbms_sql.parse(l_cursor_id,l_stmt,dbms_sql.native);
95: dbms_sql.bind_variable(l_cursor_id, ':reference_date', p_reference_date);
96: dbms_sql.define_column(l_cursor_id, 1, l_result);
97: l_dummy := dbms_sql.execute(l_cursor_id);
98: l_dummy := dbms_sql.fetch_rows(l_cursor_id);
91:
92:
93: l_cursor_id := dbms_sql.open_cursor;
94: dbms_sql.parse(l_cursor_id,l_stmt,dbms_sql.native);
95: dbms_sql.bind_variable(l_cursor_id, ':reference_date', p_reference_date);
96: dbms_sql.define_column(l_cursor_id, 1, l_result);
97: l_dummy := dbms_sql.execute(l_cursor_id);
98: l_dummy := dbms_sql.fetch_rows(l_cursor_id);
99: dbms_sql.column_value(l_cursor_id, 1, l_result);
92:
93: l_cursor_id := dbms_sql.open_cursor;
94: dbms_sql.parse(l_cursor_id,l_stmt,dbms_sql.native);
95: dbms_sql.bind_variable(l_cursor_id, ':reference_date', p_reference_date);
96: dbms_sql.define_column(l_cursor_id, 1, l_result);
97: l_dummy := dbms_sql.execute(l_cursor_id);
98: l_dummy := dbms_sql.fetch_rows(l_cursor_id);
99: dbms_sql.column_value(l_cursor_id, 1, l_result);
100: dbms_sql.close_cursor(l_cursor_id);
93: l_cursor_id := dbms_sql.open_cursor;
94: dbms_sql.parse(l_cursor_id,l_stmt,dbms_sql.native);
95: dbms_sql.bind_variable(l_cursor_id, ':reference_date', p_reference_date);
96: dbms_sql.define_column(l_cursor_id, 1, l_result);
97: l_dummy := dbms_sql.execute(l_cursor_id);
98: l_dummy := dbms_sql.fetch_rows(l_cursor_id);
99: dbms_sql.column_value(l_cursor_id, 1, l_result);
100: dbms_sql.close_cursor(l_cursor_id);
101: return l_result;
94: dbms_sql.parse(l_cursor_id,l_stmt,dbms_sql.native);
95: dbms_sql.bind_variable(l_cursor_id, ':reference_date', p_reference_date);
96: dbms_sql.define_column(l_cursor_id, 1, l_result);
97: l_dummy := dbms_sql.execute(l_cursor_id);
98: l_dummy := dbms_sql.fetch_rows(l_cursor_id);
99: dbms_sql.column_value(l_cursor_id, 1, l_result);
100: dbms_sql.close_cursor(l_cursor_id);
101: return l_result;
102:
95: dbms_sql.bind_variable(l_cursor_id, ':reference_date', p_reference_date);
96: dbms_sql.define_column(l_cursor_id, 1, l_result);
97: l_dummy := dbms_sql.execute(l_cursor_id);
98: l_dummy := dbms_sql.fetch_rows(l_cursor_id);
99: dbms_sql.column_value(l_cursor_id, 1, l_result);
100: dbms_sql.close_cursor(l_cursor_id);
101: return l_result;
102:
103: exception
96: dbms_sql.define_column(l_cursor_id, 1, l_result);
97: l_dummy := dbms_sql.execute(l_cursor_id);
98: l_dummy := dbms_sql.fetch_rows(l_cursor_id);
99: dbms_sql.column_value(l_cursor_id, 1, l_result);
100: dbms_sql.close_cursor(l_cursor_id);
101: return l_result;
102:
103: exception
104: when others then
101: return l_result;
102:
103: exception
104: when others then
105: dbms_sql.close_cursor(l_cursor_id);
106: raise;
107: end;
108:
109: