214:
215: --
216: -- Parse, bind and execute the SQL
217: --
218: c := dbms_sql.open_cursor;
219: dbms_sql.parse(c, statement, dbms_sql.native);
220: dbms_sql.bind_variable(c, 'mv', p_prev_vers_num);
221: dbms_sql.bind_variable(c, 'id', p_header_id);
222: row_processed := dbms_sql.execute(c);
215: --
216: -- Parse, bind and execute the SQL
217: --
218: c := dbms_sql.open_cursor;
219: dbms_sql.parse(c, statement, dbms_sql.native);
220: dbms_sql.bind_variable(c, 'mv', p_prev_vers_num);
221: dbms_sql.bind_variable(c, 'id', p_header_id);
222: row_processed := dbms_sql.execute(c);
223: dbms_sql.close_cursor(c);
216: -- Parse, bind and execute the SQL
217: --
218: c := dbms_sql.open_cursor;
219: dbms_sql.parse(c, statement, dbms_sql.native);
220: dbms_sql.bind_variable(c, 'mv', p_prev_vers_num);
221: dbms_sql.bind_variable(c, 'id', p_header_id);
222: row_processed := dbms_sql.execute(c);
223: dbms_sql.close_cursor(c);
224:
217: --
218: c := dbms_sql.open_cursor;
219: dbms_sql.parse(c, statement, dbms_sql.native);
220: dbms_sql.bind_variable(c, 'mv', p_prev_vers_num);
221: dbms_sql.bind_variable(c, 'id', p_header_id);
222: row_processed := dbms_sql.execute(c);
223: dbms_sql.close_cursor(c);
224:
225:
218: c := dbms_sql.open_cursor;
219: dbms_sql.parse(c, statement, dbms_sql.native);
220: dbms_sql.bind_variable(c, 'mv', p_prev_vers_num);
221: dbms_sql.bind_variable(c, 'id', p_header_id);
222: row_processed := dbms_sql.execute(c);
223: dbms_sql.close_cursor(c);
224:
225:
226: --
219: dbms_sql.parse(c, statement, dbms_sql.native);
220: dbms_sql.bind_variable(c, 'mv', p_prev_vers_num);
221: dbms_sql.bind_variable(c, 'id', p_header_id);
222: row_processed := dbms_sql.execute(c);
223: dbms_sql.close_cursor(c);
224:
225:
226: --
227: -- store previous amounts of versions for funding
228: --
229:
230: IF p_table_name='OKE_K_FUNDING_SOURCES' OR p_table_name='OKE_K_FUND_ALLOCATIONS' THEN
231: statement := 'UPDATE '||p_table_name|| ' set PREVIOUS_AMOUNT=AMOUNT WHERE ' ||p_where_clause;
232: c := dbms_sql.open_cursor;
233: dbms_sql.parse(c, statement, dbms_sql.native);
234: dbms_sql.bind_variable(c, 'id', p_header_id);
235: row_processed := dbms_sql.execute(c);
236: dbms_sql.close_cursor(c);
229:
230: IF p_table_name='OKE_K_FUNDING_SOURCES' OR p_table_name='OKE_K_FUND_ALLOCATIONS' THEN
231: statement := 'UPDATE '||p_table_name|| ' set PREVIOUS_AMOUNT=AMOUNT WHERE ' ||p_where_clause;
232: c := dbms_sql.open_cursor;
233: dbms_sql.parse(c, statement, dbms_sql.native);
234: dbms_sql.bind_variable(c, 'id', p_header_id);
235: row_processed := dbms_sql.execute(c);
236: dbms_sql.close_cursor(c);
237: END IF;
230: IF p_table_name='OKE_K_FUNDING_SOURCES' OR p_table_name='OKE_K_FUND_ALLOCATIONS' THEN
231: statement := 'UPDATE '||p_table_name|| ' set PREVIOUS_AMOUNT=AMOUNT WHERE ' ||p_where_clause;
232: c := dbms_sql.open_cursor;
233: dbms_sql.parse(c, statement, dbms_sql.native);
234: dbms_sql.bind_variable(c, 'id', p_header_id);
235: row_processed := dbms_sql.execute(c);
236: dbms_sql.close_cursor(c);
237: END IF;
238:
231: statement := 'UPDATE '||p_table_name|| ' set PREVIOUS_AMOUNT=AMOUNT WHERE ' ||p_where_clause;
232: c := dbms_sql.open_cursor;
233: dbms_sql.parse(c, statement, dbms_sql.native);
234: dbms_sql.bind_variable(c, 'id', p_header_id);
235: row_processed := dbms_sql.execute(c);
236: dbms_sql.close_cursor(c);
237: END IF;
238:
239:
232: c := dbms_sql.open_cursor;
233: dbms_sql.parse(c, statement, dbms_sql.native);
234: dbms_sql.bind_variable(c, 'id', p_header_id);
235: row_processed := dbms_sql.execute(c);
236: dbms_sql.close_cursor(c);
237: END IF;
238:
239:
240:
355:
356: --
357: -- Parse, bind and execute the SQL
358: --
359: c := dbms_sql.open_cursor;
360: dbms_sql.parse(c, statement, dbms_sql.native);
361: dbms_sql.bind_variable(c, 'id', p_header_id);
362: row_processed := dbms_sql.execute(c);
363: dbms_sql.close_cursor(c);
356: --
357: -- Parse, bind and execute the SQL
358: --
359: c := dbms_sql.open_cursor;
360: dbms_sql.parse(c, statement, dbms_sql.native);
361: dbms_sql.bind_variable(c, 'id', p_header_id);
362: row_processed := dbms_sql.execute(c);
363: dbms_sql.close_cursor(c);
364:
357: -- Parse, bind and execute the SQL
358: --
359: c := dbms_sql.open_cursor;
360: dbms_sql.parse(c, statement, dbms_sql.native);
361: dbms_sql.bind_variable(c, 'id', p_header_id);
362: row_processed := dbms_sql.execute(c);
363: dbms_sql.close_cursor(c);
364:
365: --
358: --
359: c := dbms_sql.open_cursor;
360: dbms_sql.parse(c, statement, dbms_sql.native);
361: dbms_sql.bind_variable(c, 'id', p_header_id);
362: row_processed := dbms_sql.execute(c);
363: dbms_sql.close_cursor(c);
364:
365: --
366: -- Now, construct the insert statement.
359: c := dbms_sql.open_cursor;
360: dbms_sql.parse(c, statement, dbms_sql.native);
361: dbms_sql.bind_variable(c, 'id', p_header_id);
362: row_processed := dbms_sql.execute(c);
363: dbms_sql.close_cursor(c);
364:
365: --
366: -- Now, construct the insert statement.
367: --
373:
374: --
375: -- Parse, bind and execute the SQL
376: --
377: c := dbms_sql.open_cursor;
378: dbms_sql.parse(c, statement, dbms_sql.native);
379: dbms_sql.bind_variable(c, 'id', p_header_id);
380: dbms_sql.bind_variable(c, 'mv', p_rstr_from_ver);
381: row_processed := dbms_sql.execute(c);
374: --
375: -- Parse, bind and execute the SQL
376: --
377: c := dbms_sql.open_cursor;
378: dbms_sql.parse(c, statement, dbms_sql.native);
379: dbms_sql.bind_variable(c, 'id', p_header_id);
380: dbms_sql.bind_variable(c, 'mv', p_rstr_from_ver);
381: row_processed := dbms_sql.execute(c);
382: dbms_sql.close_cursor(c);
375: -- Parse, bind and execute the SQL
376: --
377: c := dbms_sql.open_cursor;
378: dbms_sql.parse(c, statement, dbms_sql.native);
379: dbms_sql.bind_variable(c, 'id', p_header_id);
380: dbms_sql.bind_variable(c, 'mv', p_rstr_from_ver);
381: row_processed := dbms_sql.execute(c);
382: dbms_sql.close_cursor(c);
383:
376: --
377: c := dbms_sql.open_cursor;
378: dbms_sql.parse(c, statement, dbms_sql.native);
379: dbms_sql.bind_variable(c, 'id', p_header_id);
380: dbms_sql.bind_variable(c, 'mv', p_rstr_from_ver);
381: row_processed := dbms_sql.execute(c);
382: dbms_sql.close_cursor(c);
383:
384:
377: c := dbms_sql.open_cursor;
378: dbms_sql.parse(c, statement, dbms_sql.native);
379: dbms_sql.bind_variable(c, 'id', p_header_id);
380: dbms_sql.bind_variable(c, 'mv', p_rstr_from_ver);
381: row_processed := dbms_sql.execute(c);
382: dbms_sql.close_cursor(c);
383:
384:
385: --
378: dbms_sql.parse(c, statement, dbms_sql.native);
379: dbms_sql.bind_variable(c, 'id', p_header_id);
380: dbms_sql.bind_variable(c, 'mv', p_rstr_from_ver);
381: row_processed := dbms_sql.execute(c);
382: dbms_sql.close_cursor(c);
383:
384:
385: --
386: -- store previous amounts of versions for funding
408: ELSE
409: statement := 'UPDATE '||p_table_name|| ' set PREVIOUS_AMOUNT=(SELECT AMOUNT FROM '||
410: p_hist_table_name ||' WHERE '||p_where_clause||' AND MAJOR_VERSION = :mv)'
411: || 'WHERE ' ||p_where_clause;
412: c := dbms_sql.open_cursor;
413: dbms_sql.parse(c, statement, dbms_sql.native);
414: dbms_sql.bind_variable(c, 'id', p_header_id);
415: row_processed := dbms_sql.execute(c);
416: dbms_sql.close_cursor(c);
409: statement := 'UPDATE '||p_table_name|| ' set PREVIOUS_AMOUNT=(SELECT AMOUNT FROM '||
410: p_hist_table_name ||' WHERE '||p_where_clause||' AND MAJOR_VERSION = :mv)'
411: || 'WHERE ' ||p_where_clause;
412: c := dbms_sql.open_cursor;
413: dbms_sql.parse(c, statement, dbms_sql.native);
414: dbms_sql.bind_variable(c, 'id', p_header_id);
415: row_processed := dbms_sql.execute(c);
416: dbms_sql.close_cursor(c);
417: END IF;
410: p_hist_table_name ||' WHERE '||p_where_clause||' AND MAJOR_VERSION = :mv)'
411: || 'WHERE ' ||p_where_clause;
412: c := dbms_sql.open_cursor;
413: dbms_sql.parse(c, statement, dbms_sql.native);
414: dbms_sql.bind_variable(c, 'id', p_header_id);
415: row_processed := dbms_sql.execute(c);
416: dbms_sql.close_cursor(c);
417: END IF;
418: */
411: || 'WHERE ' ||p_where_clause;
412: c := dbms_sql.open_cursor;
413: dbms_sql.parse(c, statement, dbms_sql.native);
414: dbms_sql.bind_variable(c, 'id', p_header_id);
415: row_processed := dbms_sql.execute(c);
416: dbms_sql.close_cursor(c);
417: END IF;
418: */
419:
412: c := dbms_sql.open_cursor;
413: dbms_sql.parse(c, statement, dbms_sql.native);
414: dbms_sql.bind_variable(c, 'id', p_header_id);
415: row_processed := dbms_sql.execute(c);
416: dbms_sql.close_cursor(c);
417: END IF;
418: */
419:
420: