1621: -- If it's a component visit, then plan it for the repair batch SUMMARY tasks (workscope parent tasks)
1622: IF (l_is_comp_visit = 'Y' AND
1623: l_task_rec.task_type_code = 'SUMMARY' AND
1624: l_task_rec.mr_id IS NULL) THEN
1625: AHL_VWP_PROJ_PROD_PVT.plan_visit(
1626: p_api_version => l_api_version,
1627: p_init_msg_list => Fnd_Api.g_false,
1628: p_commit => Fnd_Api.g_false,
1629: p_validation_level => p_validation_level,
1635:
1636: IF (l_log_statement >= l_log_current_level) THEN
1637: fnd_log.string(l_log_statement,
1638: L_DEBUG_KEY,
1639: 'After Calling AHL_VWP_PROJ_PROD_PVT.plan_visit. Return Status = ' || l_return_status );
1640: END IF;
1641:
1642: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
1643: x_msg_count := l_msg_count;
1651: ELSE
1652: -- SKPATHAK :: 02-MAY-2011 :: VWPE: ER:12424063 :: STARTS
1653: -- If tasks are added to a visit in below mentioned statuses, draft WOs should be automatically created for the visit tasks
1654: IF ((c_visit_rec.status_code IN ('PLANNING', 'PARTIALLY RELEASED', 'RELEASED')) AND (l_task_rec.task_type_code <> 'SUMMARY') AND (l_return_status='S')) THEN
1655: AHL_VWP_PROJ_PROD_PVT.plan_visit(
1656: p_api_version => l_api_version,
1657: p_init_msg_list => Fnd_Api.g_false,
1658: p_commit => Fnd_Api.g_false,
1659: p_validation_level => p_validation_level,
1667:
1668: IF (l_log_statement >= l_log_current_level) THEN
1669: fnd_log.string(l_log_statement,
1670: L_DEBUG_KEY,
1671: 'After Calling AHL_VWP_PROJ_PROD_PVT.plan_visit. Return Status = ' || l_return_status );
1672: END IF;
1673:
1674: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
1675: x_msg_count := l_msg_count;
2526: ', Task Number= ' || p_x_Task_rec.visit_task_number);
2527: END IF;
2528:
2529: -- PRAKKUM :: FP:PIE :: 13-OCT-2010 ::
2530: -- Commented out the call to AHL_VWP_PROJ_PROD_PVT.Add_Task_to_Project as it is no longer in use
2531: /*
2532: -- Calling projects api to create project task for the newly added service request
2533: IF (l_task_rec.Visit_Task_ID IS NOT NULL AND p_module_type = 'SR' )THEN
2534: IF (l_log_statement >= l_log_current_level) THEN
2533: IF (l_task_rec.Visit_Task_ID IS NOT NULL AND p_module_type = 'SR' )THEN
2534: IF (l_log_statement >= l_log_current_level) THEN
2535: fnd_log.string(l_log_statement,
2536: L_DEBUG_KEY,
2537: 'Before Calling AHL_VWP_PROJ_PROD_PVT.Add_Task_to_Project ' ||
2538: 'Visit Task Id = ' || l_task_rec.Visit_Task_ID);
2539: END IF;
2540:
2541: AHL_VWP_PROJ_PROD_PVT.Add_Task_to_Project(
2537: 'Before Calling AHL_VWP_PROJ_PROD_PVT.Add_Task_to_Project ' ||
2538: 'Visit Task Id = ' || l_task_rec.Visit_Task_ID);
2539: END IF;
2540:
2541: AHL_VWP_PROJ_PROD_PVT.Add_Task_to_Project(
2542: p_api_version => l_api_version,
2543: p_init_msg_list => p_init_msg_list,
2544: p_commit => Fnd_Api.g_false,
2545: p_validation_level => p_validation_level,
2551:
2552: IF (l_log_statement >= l_log_current_level) THEN
2553: fnd_log.string(l_log_statement,
2554: L_DEBUG_KEY,
2555: 'After Calling AHL_VWP_PROJ_PROD_PVT.Add_Task_to_Project, Return Status = ' ||l_return_status );
2556: END IF;
2557: END IF;
2558: */
2559: ---------------------------End of API Body---------------------------------------
3519: IF (l_log_statement >= l_log_current_level) THEN
3520: fnd_log.string(l_log_statement, L_DEBUG_KEY, 'Before calling Use_New_Task_Structure.');
3521: END IF;
3522:
3523: AHL_VWP_PROJ_PROD_PVT.Use_New_Task_Structure
3524: ( p_visit_id => c_Task_rec.visit_id,
3525: x_new_structure_flag => l_new_structure_flag
3526: );
3527:
3530: IF ((NVL(c_Task_rec.cost_parent_id, -5) <> NVL(l_task_rec.COST_PARENT_ID,-5))) THEN
3531: IF (l_log_statement >= l_log_current_level) THEN
3532: fnd_log.string(l_log_statement,
3533: L_DEBUG_KEY,
3534: 'Before calling AHL_VWP_PROJ_PROD_PVT.Update_Project_Task l_return_status= '|| l_return_status);
3535: END IF;
3536:
3537: AHL_VWP_PROJ_PROD_PVT.Update_Project_Task (
3538: p_task_id => l_Task_rec.visit_task_id,
3533: L_DEBUG_KEY,
3534: 'Before calling AHL_VWP_PROJ_PROD_PVT.Update_Project_Task l_return_status= '|| l_return_status);
3535: END IF;
3536:
3537: AHL_VWP_PROJ_PROD_PVT.Update_Project_Task (
3538: p_task_id => l_Task_rec.visit_task_id,
3539: x_return_status => l_return_status,
3540: x_msg_count => l_msg_count,
3541: x_msg_data => l_msg_data
3542: );
3543: IF (l_log_statement >= l_log_current_level) THEN
3544: fnd_log.string(l_log_statement,
3545: L_DEBUG_KEY,
3546: 'After calling AHL_VWP_PROJ_PROD_PVT.Update_Project_Task l_return_status= '|| l_return_status);
3547: END IF;
3548:
3549: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3550: x_msg_count := FND_MSG_PUB.count_msg;
6656:
6657: IF (l_log_statement >= l_log_current_level) THEN
6658: fnd_log.string(l_log_statement,
6659: L_DEBUG_KEY,
6660: 'Before Calling AHL_VWP_PROJ_PROD_PVT.Delete_Task_to_Project');
6661: END IF;
6662: AHL_VWP_PROJ_PROD_PVT.Delete_Task_to_Project(
6663: /*p_api_version => l_api_version,
6664: p_init_msg_list => p_init_msg_list,
6658: fnd_log.string(l_log_statement,
6659: L_DEBUG_KEY,
6660: 'Before Calling AHL_VWP_PROJ_PROD_PVT.Delete_Task_to_Project');
6661: END IF;
6662: AHL_VWP_PROJ_PROD_PVT.Delete_Task_to_Project(
6663: /*p_api_version => l_api_version,
6664: p_init_msg_list => p_init_msg_list,
6665: p_commit => Fnd_Api.g_false,
6666: p_validation_level => p_validation_level,
7123: IF c_task_rec.PROJECT_TASK_ID IS NOT NULL THEN
7124: IF (l_log_statement >= l_log_current_level) THEN
7125: fnd_log.string(l_log_statement,
7126: L_DEBUG_KEY,
7127: 'Before Calling AHL_VWP_PROJ_PROD_PVT.Delete_Task_to_Project');
7128: END IF;
7129:
7130: AHL_VWP_PROJ_PROD_PVT.Delete_Task_to_Project(
7131: /* p_api_version => l_api_version,
7126: L_DEBUG_KEY,
7127: 'Before Calling AHL_VWP_PROJ_PROD_PVT.Delete_Task_to_Project');
7128: END IF;
7129:
7130: AHL_VWP_PROJ_PROD_PVT.Delete_Task_to_Project(
7131: /* p_api_version => l_api_version,
7132: p_init_msg_list => p_init_msg_list,
7133: p_commit => Fnd_Api.g_false,
7134: p_validation_level => p_validation_level,
7140:
7141: IF (l_log_statement >= l_log_current_level) THEN
7142: fnd_log.string(l_log_statement,
7143: L_DEBUG_KEY,
7144: 'After Calling AHL_VWP_PROJ_PROD_PVT.Delete_Task_to_Project, Return Status = ' || l_return_status);
7145: END IF;
7146:
7147: IF (fnd_msg_pub.count_msg > 0) OR
7148: NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
7762:
7763: IF (l_log_statement >= l_log_current_level)THEN
7764: fnd_log.string(l_log_statement,
7765: L_DEBUG_KEY,
7766: ' Calling AHL_VWP_PROJ_PROD_PVT.Delete_Task_to_Project API');
7767: END IF;
7768:
7769: AHL_VWP_PROJ_PROD_PVT.Delete_Task_to_Project(
7770: /* p_api_version => l_api_version,
7765: L_DEBUG_KEY,
7766: ' Calling AHL_VWP_PROJ_PROD_PVT.Delete_Task_to_Project API');
7767: END IF;
7768:
7769: AHL_VWP_PROJ_PROD_PVT.Delete_Task_to_Project(
7770: /* p_api_version => l_api_version,
7771: p_init_msg_list => p_init_msg_list,
7772: p_commit => Fnd_Api.g_false,
7773: p_validation_level => p_validation_level,
8054: THEN
8055: IF (l_log_statement >= l_log_current_level) THEN
8056: fnd_log.string(l_log_statement,
8057: L_DEBUG_KEY,
8058: ' Calling AHL_VWP_PROJ_PROD_PVT.Delete_Task_to_Project');
8059: END IF;
8060: AHL_VWP_PROJ_PROD_PVT.Delete_Task_to_Project
8061: (
8062: /* p_api_version => l_api_version,
8056: fnd_log.string(l_log_statement,
8057: L_DEBUG_KEY,
8058: ' Calling AHL_VWP_PROJ_PROD_PVT.Delete_Task_to_Project');
8059: END IF;
8060: AHL_VWP_PROJ_PROD_PVT.Delete_Task_to_Project
8061: (
8062: /* p_api_version => l_api_version,
8063: p_init_msg_list => p_init_msg_list,
8064: p_commit => Fnd_Api.g_false,
9398:
9399: --PRAKKUM :: 12/06/2012 :: Bug 14068468 :: Moved plan visit call to happen after cost parent is set
9400: -- SKPATHAK :: 02-MAY-2011 :: VWPE: ER:12424063 :: Automatically create draft WOs if tasks are added to a visit that is in any of the below three statuses
9401: IF ((c_visit_rec.status_code IN ('PLANNING', 'PARTIALLY RELEASED', 'RELEASED')) AND (p_module_type <> 'SR')) THEN
9402: AHL_VWP_PROJ_PROD_PVT.plan_visit(
9403: p_api_version => l_api_version,
9404: p_init_msg_list => Fnd_Api.G_FALSE,
9405: p_commit => Fnd_Api.G_FALSE,
9406: p_validation_level => p_validation_level,
9411:
9412: IF (l_log_statement >= l_log_current_level) THEN
9413: fnd_log.string(l_log_statement,
9414: L_DEBUG_KEY,
9415: 'After Calling AHL_VWP_PROJ_PROD_PVT.plan_visit. Return Status = ' || l_return_status );
9416: END IF;
9417:
9418: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
9419: x_msg_count := l_msg_count;
9437:
9438: IF (l_log_statement >= l_log_current_level) THEN
9439: fnd_log.string(l_log_statement,
9440: L_DEBUG_KEY,
9441: 'Before Calling AHL_VWP_PROJ_PROD_PVT.Move_To_InRepair_Locator.');
9442: END IF;
9443: -- Get the task Details
9444: OPEN c_task_dtls (l_task_tbl(i).visit_task_id);
9445: FETCH c_task_dtls INTO l_task_type, l_summary_task_id, l_instance_id, l_task_status_code;
9490:
9491: IF (l_log_statement >= l_log_current_level) THEN
9492: fnd_log.string(l_log_statement,
9493: L_DEBUG_KEY,
9494: 'After Calling AHL_VWP_PROJ_PROD_PVT.Move_To_InRepair_Locator.' ||
9495: 'Return Status = ' || l_return_status );
9496: END IF;
9497: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9498: x_msg_count := l_msg_count;
9518: END IF;
9519:
9520: -- SKPATHAK :: 02-MAY-2011 :: VWPE: ER:12424063 :: Automatically create draft WOs if tasks are added to a visit that is in any of the below three statuses
9521: IF ((c_visit_rec.status_code IN ('PLANNING', 'PARTIALLY RELEASED', 'RELEASED')) AND (p_module_type <> 'SR')) THEN
9522: AHL_VWP_PROJ_PROD_PVT.plan_visit(
9523: p_api_version => l_api_version,
9524: p_init_msg_list => Fnd_Api.G_FALSE,
9525: p_commit => Fnd_Api.G_FALSE,
9526: p_validation_level => p_validation_level,
9531:
9532: IF (l_log_statement >= l_log_current_level) THEN
9533: fnd_log.string(l_log_statement,
9534: L_DEBUG_KEY,
9535: 'After Calling AHL_VWP_PROJ_PROD_PVT.plan_visit. Return Status = ' || l_return_status );
9536: END IF;
9537:
9538: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
9539: x_msg_count := l_msg_count;
10183: LAST_UPDATE_LOGIN = Fnd_Global.LOGIN_ID
10184: WHERE VISIT_ID = p_visit_id
10185: AND STATUS_CODE = 'RELEASED';
10186:
10187: AHL_VWP_PROJ_PROD_PVT.plan_visit(
10188: p_api_version => l_api_version,
10189: p_init_msg_list => p_init_msg_list,
10190: p_commit => Fnd_Api.g_false,
10191: p_validation_level => p_validation_level,
10199:
10200: IF (l_log_statement >= l_log_current_level) THEN
10201: fnd_log.string(l_log_statement,
10202: L_DEBUG_KEY,
10203: 'After Calling AHL_VWP_PROJ_PROD_PVT.plan_visit. Return Status = ' || l_return_status );
10204: END IF;
10205:
10206: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
10207: x_msg_count := l_msg_count;