[Home] [Help]
1835: y NUMBER;
1836: --Added following variables by tchimira for VWP ER-12424063 on 17-FEB -2011
1837: l_msg_data VARCHAR2(2000);
1838: l_msg_count NUMBER;
1839: l_task_link_rec AHL_VWP_TASKS_LINKS_PVT.TASK_LINK_REC;
1840: --Since at engineering level we have only before and after convention which can be translated to only StartAfterEnd.
1841: --we need to pass the value for precedence constraint as Starts After End only.
1842: -- SKPATHAK :: 10-NOV-2011 :: changed STARTS AFTER END to StartsAfterEnd
1843: -- SKPATHAK :: 11-NOV-2011 :: Bug 13374723 :: changed StartsAfterEnd to STARTSAFTEREND
2111: l_task_link_rec.PARENT_TASK_ID := l_parent_task_id;
2112: l_task_link_rec.visit_Task_id := l_child_task_id;
2113: l_task_link_rec.dml_operation := 'C';
2114:
2115: AHL_VWP_TASKS_LINKS_PVT.VALIDATE_VWP_LINKS
2116: (
2117: x_return_status =>l_return_Status,
2118: x_msg_count =>l_msg_count,
2119: x_msg_data =>l_msg_data,
4254: l_post_rout_no VARCHAR2(30);
4255: l_post_route_type VARCHAR2(30);
4256: l_post_system_code VARCHAR2(100);
4257: l_post_process_code VARCHAR2(30);
4258: l_task_link_rec AHL_VWP_TASKS_LINKS_PVT.TASK_LINK_REC;
4259: l_return_status VARCHAR2(1);
4260: l_msg_data VARCHAR2(2000);
4261:
4262: --Cursor to get the stage details for a given task
4470:
4471: OPEN check_rule_exists (l_task_link_rec.VISIT_TASK_ID, l_task_link_rec.PARENT_TASK_ID);
4472: FETCH check_rule_exists INTO l_dummy;
4473: IF check_rule_exists%NOTFOUND THEN
4474: AHL_VWP_TASKS_LINKS_PVT.Create_Task_Links (p_task_link_rec =>l_task_link_rec);
4475: END IF;
4476: CLOSE check_rule_exists;
4477:
4478: END LOOP;-- Loop through all the tasks that fall under same stage