[Home] [Help]
505:
506: --this cursor selects all actions for a given plan_id
507: CURSOR C1 (p_plan_id NUMBER) IS
508: SELECT qpca.plan_char_action_id, qpca.alr_action_id, qpca.message
509: FROM qa_plans qp, qa_plan_chars qpc, qa_plan_char_action_triggers qpcat, qa_plan_char_actions qpca
510: WHERE qp.plan_id = qpc.plan_id AND qpc.char_id = qpcat.char_id AND qp.plan_id = qpcat.plan_id
511: AND qpcat.plan_char_action_trigger_id = qpca.plan_char_action_trigger_id AND qp.plan_id=p_plan_id;
512: l_message qa_plan_char_actions.message%TYPE;
513:
508: SELECT qpca.plan_char_action_id, qpca.alr_action_id, qpca.message
509: FROM qa_plans qp, qa_plan_chars qpc, qa_plan_char_action_triggers qpcat, qa_plan_char_actions qpca
510: WHERE qp.plan_id = qpc.plan_id AND qpc.char_id = qpcat.char_id AND qp.plan_id = qpcat.plan_id
511: AND qpcat.plan_char_action_trigger_id = qpca.plan_char_action_trigger_id AND qp.plan_id=p_plan_id;
512: l_message qa_plan_char_actions.message%TYPE;
513:
514: --this cursor get's the body field from alr_actions for a given action_id
515: CURSOR C2 (p_alract_id NUMBER) IS
516: SELECT body
564: IF l_message IS NOT NULL THEN
565: --now check the message field
566: execute_NCM_repl_func(l_message, repl_htable, ncm_suffix_list);
567:
568: --and update the QA_PLAN_CHAR_ACTIONS table
569: UPDATE QA_PLAN_CHAR_ACTIONS SET MESSAGE = l_message WHERE PLAN_CHAR_ACTION_ID = c1_rec.plan_char_action_id;
570: END IF;
571: --dbms_output.put_line('done actid '||c1_rec.plan_char_action_id);
572: END LOOP;
565: --now check the message field
566: execute_NCM_repl_func(l_message, repl_htable, ncm_suffix_list);
567:
568: --and update the QA_PLAN_CHAR_ACTIONS table
569: UPDATE QA_PLAN_CHAR_ACTIONS SET MESSAGE = l_message WHERE PLAN_CHAR_ACTION_ID = c1_rec.plan_char_action_id;
570: END IF;
571: --dbms_output.put_line('done actid '||c1_rec.plan_char_action_id);
572: END LOOP;
573: l_src_plan_id := p_phtable.NEXT(l_src_plan_id);