235:
236: --
237: -- Parse, bind and execute the SQL
238: --
239: c := dbms_sql.open_cursor;
240: dbms_sql.parse(c, statement, dbms_sql.native);
241: dbms_sql.bind_variable(c, 'mv', p_prev_vers_num);
242: dbms_sql.bind_variable(c, 'id', p_header_id);
243: row_processed := dbms_sql.execute(c);
236: --
237: -- Parse, bind and execute the SQL
238: --
239: c := dbms_sql.open_cursor;
240: dbms_sql.parse(c, statement, dbms_sql.native);
241: dbms_sql.bind_variable(c, 'mv', p_prev_vers_num);
242: dbms_sql.bind_variable(c, 'id', p_header_id);
243: row_processed := dbms_sql.execute(c);
244: dbms_sql.close_cursor(c);
237: -- Parse, bind and execute the SQL
238: --
239: c := dbms_sql.open_cursor;
240: dbms_sql.parse(c, statement, dbms_sql.native);
241: dbms_sql.bind_variable(c, 'mv', p_prev_vers_num);
242: dbms_sql.bind_variable(c, 'id', p_header_id);
243: row_processed := dbms_sql.execute(c);
244: dbms_sql.close_cursor(c);
245:
238: --
239: c := dbms_sql.open_cursor;
240: dbms_sql.parse(c, statement, dbms_sql.native);
241: dbms_sql.bind_variable(c, 'mv', p_prev_vers_num);
242: dbms_sql.bind_variable(c, 'id', p_header_id);
243: row_processed := dbms_sql.execute(c);
244: dbms_sql.close_cursor(c);
245:
246:
239: c := dbms_sql.open_cursor;
240: dbms_sql.parse(c, statement, dbms_sql.native);
241: dbms_sql.bind_variable(c, 'mv', p_prev_vers_num);
242: dbms_sql.bind_variable(c, 'id', p_header_id);
243: row_processed := dbms_sql.execute(c);
244: dbms_sql.close_cursor(c);
245:
246:
247: --
240: dbms_sql.parse(c, statement, dbms_sql.native);
241: dbms_sql.bind_variable(c, 'mv', p_prev_vers_num);
242: dbms_sql.bind_variable(c, 'id', p_header_id);
243: row_processed := dbms_sql.execute(c);
244: dbms_sql.close_cursor(c);
245:
246:
247: --
248: -- store previous amounts of versions for funding
249: --
250:
251: IF p_table_name='OKE_K_FUNDING_SOURCES' OR p_table_name='OKE_K_FUND_ALLOCATIONS' THEN
252: statement := 'UPDATE '||p_table_name|| ' set PREVIOUS_AMOUNT=AMOUNT WHERE ' ||p_where_clause;
253: c := dbms_sql.open_cursor;
254: dbms_sql.parse(c, statement, dbms_sql.native);
255: dbms_sql.bind_variable(c, 'id', p_header_id);
256: row_processed := dbms_sql.execute(c);
257: dbms_sql.close_cursor(c);
250:
251: IF p_table_name='OKE_K_FUNDING_SOURCES' OR p_table_name='OKE_K_FUND_ALLOCATIONS' THEN
252: statement := 'UPDATE '||p_table_name|| ' set PREVIOUS_AMOUNT=AMOUNT WHERE ' ||p_where_clause;
253: c := dbms_sql.open_cursor;
254: dbms_sql.parse(c, statement, dbms_sql.native);
255: dbms_sql.bind_variable(c, 'id', p_header_id);
256: row_processed := dbms_sql.execute(c);
257: dbms_sql.close_cursor(c);
258: END IF;
251: IF p_table_name='OKE_K_FUNDING_SOURCES' OR p_table_name='OKE_K_FUND_ALLOCATIONS' THEN
252: statement := 'UPDATE '||p_table_name|| ' set PREVIOUS_AMOUNT=AMOUNT WHERE ' ||p_where_clause;
253: c := dbms_sql.open_cursor;
254: dbms_sql.parse(c, statement, dbms_sql.native);
255: dbms_sql.bind_variable(c, 'id', p_header_id);
256: row_processed := dbms_sql.execute(c);
257: dbms_sql.close_cursor(c);
258: END IF;
259:
252: statement := 'UPDATE '||p_table_name|| ' set PREVIOUS_AMOUNT=AMOUNT WHERE ' ||p_where_clause;
253: c := dbms_sql.open_cursor;
254: dbms_sql.parse(c, statement, dbms_sql.native);
255: dbms_sql.bind_variable(c, 'id', p_header_id);
256: row_processed := dbms_sql.execute(c);
257: dbms_sql.close_cursor(c);
258: END IF;
259:
260:
253: c := dbms_sql.open_cursor;
254: dbms_sql.parse(c, statement, dbms_sql.native);
255: dbms_sql.bind_variable(c, 'id', p_header_id);
256: row_processed := dbms_sql.execute(c);
257: dbms_sql.close_cursor(c);
258: END IF;
259:
260:
261:
397:
398: --
399: -- Parse, bind and execute the SQL
400: --
401: c := dbms_sql.open_cursor;
402: dbms_sql.parse(c, statement, dbms_sql.native);
403: dbms_sql.bind_variable(c, 'id', p_header_id);
404: row_processed := dbms_sql.execute(c);
405: dbms_sql.close_cursor(c);
398: --
399: -- Parse, bind and execute the SQL
400: --
401: c := dbms_sql.open_cursor;
402: dbms_sql.parse(c, statement, dbms_sql.native);
403: dbms_sql.bind_variable(c, 'id', p_header_id);
404: row_processed := dbms_sql.execute(c);
405: dbms_sql.close_cursor(c);
406:
399: -- Parse, bind and execute the SQL
400: --
401: c := dbms_sql.open_cursor;
402: dbms_sql.parse(c, statement, dbms_sql.native);
403: dbms_sql.bind_variable(c, 'id', p_header_id);
404: row_processed := dbms_sql.execute(c);
405: dbms_sql.close_cursor(c);
406:
407: --
400: --
401: c := dbms_sql.open_cursor;
402: dbms_sql.parse(c, statement, dbms_sql.native);
403: dbms_sql.bind_variable(c, 'id', p_header_id);
404: row_processed := dbms_sql.execute(c);
405: dbms_sql.close_cursor(c);
406:
407: --
408: -- Now, construct the insert statement.
401: c := dbms_sql.open_cursor;
402: dbms_sql.parse(c, statement, dbms_sql.native);
403: dbms_sql.bind_variable(c, 'id', p_header_id);
404: row_processed := dbms_sql.execute(c);
405: dbms_sql.close_cursor(c);
406:
407: --
408: -- Now, construct the insert statement.
409: --
415:
416: --
417: -- Parse, bind and execute the SQL
418: --
419: c := dbms_sql.open_cursor;
420: dbms_sql.parse(c, statement, dbms_sql.native);
421: dbms_sql.bind_variable(c, 'id', p_header_id);
422: dbms_sql.bind_variable(c, 'mv', p_rstr_from_ver);
423: row_processed := dbms_sql.execute(c);
416: --
417: -- Parse, bind and execute the SQL
418: --
419: c := dbms_sql.open_cursor;
420: dbms_sql.parse(c, statement, dbms_sql.native);
421: dbms_sql.bind_variable(c, 'id', p_header_id);
422: dbms_sql.bind_variable(c, 'mv', p_rstr_from_ver);
423: row_processed := dbms_sql.execute(c);
424: dbms_sql.close_cursor(c);
417: -- Parse, bind and execute the SQL
418: --
419: c := dbms_sql.open_cursor;
420: dbms_sql.parse(c, statement, dbms_sql.native);
421: dbms_sql.bind_variable(c, 'id', p_header_id);
422: dbms_sql.bind_variable(c, 'mv', p_rstr_from_ver);
423: row_processed := dbms_sql.execute(c);
424: dbms_sql.close_cursor(c);
425:
418: --
419: c := dbms_sql.open_cursor;
420: dbms_sql.parse(c, statement, dbms_sql.native);
421: dbms_sql.bind_variable(c, 'id', p_header_id);
422: dbms_sql.bind_variable(c, 'mv', p_rstr_from_ver);
423: row_processed := dbms_sql.execute(c);
424: dbms_sql.close_cursor(c);
425:
426:
419: c := dbms_sql.open_cursor;
420: dbms_sql.parse(c, statement, dbms_sql.native);
421: dbms_sql.bind_variable(c, 'id', p_header_id);
422: dbms_sql.bind_variable(c, 'mv', p_rstr_from_ver);
423: row_processed := dbms_sql.execute(c);
424: dbms_sql.close_cursor(c);
425:
426:
427: --
420: dbms_sql.parse(c, statement, dbms_sql.native);
421: dbms_sql.bind_variable(c, 'id', p_header_id);
422: dbms_sql.bind_variable(c, 'mv', p_rstr_from_ver);
423: row_processed := dbms_sql.execute(c);
424: dbms_sql.close_cursor(c);
425:
426:
427: --
428: -- store previous amounts of versions for funding
450: ELSE
451: statement := 'UPDATE '||p_table_name|| ' set PREVIOUS_AMOUNT=(SELECT AMOUNT FROM '||
452: p_hist_table_name ||' WHERE '||p_where_clause||' AND MAJOR_VERSION = :mv)'
453: || 'WHERE ' ||p_where_clause;
454: c := dbms_sql.open_cursor;
455: dbms_sql.parse(c, statement, dbms_sql.native);
456: dbms_sql.bind_variable(c, 'id', p_header_id);
457: row_processed := dbms_sql.execute(c);
458: dbms_sql.close_cursor(c);
451: statement := 'UPDATE '||p_table_name|| ' set PREVIOUS_AMOUNT=(SELECT AMOUNT FROM '||
452: p_hist_table_name ||' WHERE '||p_where_clause||' AND MAJOR_VERSION = :mv)'
453: || 'WHERE ' ||p_where_clause;
454: c := dbms_sql.open_cursor;
455: dbms_sql.parse(c, statement, dbms_sql.native);
456: dbms_sql.bind_variable(c, 'id', p_header_id);
457: row_processed := dbms_sql.execute(c);
458: dbms_sql.close_cursor(c);
459: END IF;
452: p_hist_table_name ||' WHERE '||p_where_clause||' AND MAJOR_VERSION = :mv)'
453: || 'WHERE ' ||p_where_clause;
454: c := dbms_sql.open_cursor;
455: dbms_sql.parse(c, statement, dbms_sql.native);
456: dbms_sql.bind_variable(c, 'id', p_header_id);
457: row_processed := dbms_sql.execute(c);
458: dbms_sql.close_cursor(c);
459: END IF;
460: */
453: || 'WHERE ' ||p_where_clause;
454: c := dbms_sql.open_cursor;
455: dbms_sql.parse(c, statement, dbms_sql.native);
456: dbms_sql.bind_variable(c, 'id', p_header_id);
457: row_processed := dbms_sql.execute(c);
458: dbms_sql.close_cursor(c);
459: END IF;
460: */
461:
454: c := dbms_sql.open_cursor;
455: dbms_sql.parse(c, statement, dbms_sql.native);
456: dbms_sql.bind_variable(c, 'id', p_header_id);
457: row_processed := dbms_sql.execute(c);
458: dbms_sql.close_cursor(c);
459: END IF;
460: */
461:
462: