[Home] [Help]
1076: IF l_to_plan_id = -1 THEN
1077: --
1078: -- Create a new plan header in qa_plans table.
1079: --
1080: SELECT qa_plans_s.nextval INTO l_to_plan_id FROM dual;
1081:
1082: l_plan_view := get_plan_view_name(l_plan_name);
1083: l_import_view := get_import_view_name(l_plan_name);
1084:
1149:
1150: --
1151: -- Bug 3926150. Commenting out copy_plan_elements because it
1152: -- is obsolete by copy_plan_elements_bulk. We don't want to
1153: -- dual maintain two codelines.
1154: -- bso Fri Dec 3 21:59:44 PST 2004
1155: --
1156: /*
1157: PROCEDURE copy_plan_elements(
1719: FOR qpcat IN action_trigger_cursor LOOP
1720:
1721: SELECT qa_plan_char_action_triggers_s.nextval
1722: INTO l_qpcat_id
1723: FROM dual;
1724:
1725: INSERT INTO qa_plan_char_action_triggers (
1726: plan_char_action_trigger_id,
1727: last_update_date,
1778: FOR qpca IN action_cursor(qpcat.plan_char_action_trigger_id) LOOP
1779:
1780: SELECT qa_plan_char_actions_s.nextval
1781: INTO l_qpca_id
1782: FROM dual;
1783:
1784: --
1785: -- These are alert actions, generate new alert action IDs
1786: --
1798: new_action_set_id,
1799: new_action_set_member_id,
1800: l_action_name_seq,
1801: l_action_set_name_seq
1802: FROM dual;
1803:
1804: --
1805: -- Some action details are stored in Oracle Alert tables
1806: -- with alert ID 10177. Copy the header and recreate new
2106: FOR qpt IN txn_cursor LOOP
2107:
2108: SELECT qa_plan_transactions_s.nextval
2109: INTO l_plan_transaction_id
2110: FROM dual;
2111:
2112: INSERT INTO qa_plan_transactions (
2113: plan_transaction_id,
2114: last_update_date,
2589:
2590: l_plan_view := get_plan_view_name(l_plan_name);
2591: l_import_view := get_import_view_name(l_plan_name);
2592:
2593: SELECT qa_plans_s.nextval INTO x_plan_id FROM dual;
2594:
2595: INSERT INTO qa_plans(
2596: plan_id,
2597: organization_id,