[Home] [Help]
1539: ATTRIBUTE12,
1540: ATTRIBUTE13,
1541: ATTRIBUTE14,
1542: ATTRIBUTE15
1543: FROM AHL_TASK_LINKS
1544: WHERE visit_task_id in (SELECT VISIT_TASK_ID
1545: FROM AHL_VISIT_TASKS_B
1546: WHERE visit_id = x_visit_id);
1547:
2195: FETCH c_new_task_ID INTO l_new_parent_task_id;
2196: CLOSE c_new_task_ID;
2197:
2198: -- Create task link
2199: INSERT INTO AHL_TASK_LINKS
2200: (
2201: TASK_LINK_ID,
2202: OBJECT_VERSION_NUMBER,
2203: LAST_UPDATE_DATE,
2226: ATTRIBUTE15
2227: )
2228: values
2229: (
2230: ahl_task_links_s.nextval,
2231: 1,
2232: SYSDATE,
2233: Fnd_Global.USER_ID,
2234: SYSDATE,
2449: WHERE visit_id = c_visit_id;
2450: --
2451: -- Added by mpothuku on 12/27/04 to find any task links for a task
2452: CURSOR c_links (x_id IN NUMBER) IS
2453: SELECT COUNT(*) FROM Ahl_Task_Links L ,Ahl_Visit_Tasks_B T
2454: WHERE (T.VISIT_TASK_ID = L.VISIT_TASK_ID OR T.VISIT_TASK_ID = L.PARENT_TASK_ID)
2455: AND T.VISIT_TASK_ID = x_id;
2456:
2457: --To check if the unplanned tasks UE is associated with any other visits other than itself before its deletion.
2522: -- the association must be removed.
2523: OPEN c_links (l_visit_task_id);
2524: FETCH c_links INTO l_count;
2525: IF l_count > 0 THEN
2526: DELETE Ahl_Task_Links
2527: WHERE VISIT_TASK_ID = l_visit_task_id
2528: OR PARENT_TASK_ID = l_visit_task_id;
2529: END IF;
2530: CLOSE c_links;
3351: --
3352: -- Added by mpothuku on 12/27/04
3353: -- To find any task links for a task
3354: CURSOR c_links (x_id IN NUMBER) IS
3355: SELECT COUNT(*) FROM Ahl_Task_Links L ,Ahl_Visit_Tasks_B T
3356: WHERE (T.VISIT_TASK_ID = L.VISIT_TASK_ID OR T.VISIT_TASK_ID = L.PARENT_TASK_ID)
3357: AND T.VISIT_TASK_ID = x_id;
3358:
3359: -- To find task link related information for a visit
3376: ATTRIBUTE12,
3377: ATTRIBUTE13,
3378: ATTRIBUTE14,
3379: ATTRIBUTE15
3380: FROM AHL_TASK_LINKS
3381: WHERE visit_task_id in ( SELECT VISIT_TASK_ID
3382: FROM AHL_VISIT_TASKS_B
3383: WHERE visit_id = x_visit_id);
3384: -- To find the coresponding task id in the new visit
4287: /* Added by mpothuku on 01/11/04 to delete the existing links */
4288: OPEN c_links (l_exist_prim_visit_task_id);
4289: FETCH c_links INTO l_count;
4290: IF l_count > 0 THEN
4291: DELETE Ahl_Task_Links
4292: WHERE VISIT_TASK_ID = l_exist_prim_visit_task_id
4293: OR PARENT_TASK_ID = l_exist_prim_visit_task_id;
4294: END IF;
4295: CLOSE c_links;
4311: FETCH c_new_primary_task INTO l_new_parent_task_id,l_new_task_number;
4312: CLOSE c_new_primary_task;
4313:
4314: -- Create task link
4315: INSERT INTO AHL_TASK_LINKS
4316: (
4317: TASK_LINK_ID,
4318: OBJECT_VERSION_NUMBER,
4319: LAST_UPDATE_DATE,
4342: ATTRIBUTE15
4343: )
4344: values
4345: (
4346: ahl_task_links_s.nextval,
4347: 1,
4348: SYSDATE,
4349: Fnd_Global.USER_ID,
4350: SYSDATE,