2587: END IF;
2588: END IF;
2589: END IF;
2590:
2591: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2592: fnd_log.string(FND_LOG.LEVEL_STATEMENT,'ahl.plsql.AHL_PRD_WORKORDER_PVT.default_attributes',
2593: 'Acc Class code: ' || p_x_prd_workorder_rec.CLASS_CODE);
2594:
2595: END IF;
2588: END IF;
2589: END IF;
2590:
2591: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2592: fnd_log.string(FND_LOG.LEVEL_STATEMENT,'ahl.plsql.AHL_PRD_WORKORDER_PVT.default_attributes',
2593: 'Acc Class code: ' || p_x_prd_workorder_rec.CLASS_CODE);
2594:
2595: END IF;
2596:
4367: AND p_x_prd_workorder_rec.master_workorder_flag = 'N'
4368: )
4369: THEN
4370:
4371: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4372: fnd_log.string
4373: (
4374: fnd_log.level_statement,
4375: l_debug_module,
4368: )
4369: THEN
4370:
4371: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4372: fnd_log.string
4373: (
4374: fnd_log.level_statement,
4375: l_debug_module,
4376: 'Cancelling Material Requirement for WO # ->'||p_x_prd_workorder_rec.JOB_NUMBER
4370:
4371: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4372: fnd_log.string
4373: (
4374: fnd_log.level_statement,
4375: l_debug_module,
4376: 'Cancelling Material Requirement for WO # ->'||p_x_prd_workorder_rec.JOB_NUMBER
4377: );
4378: fnd_log.string
4374: fnd_log.level_statement,
4375: l_debug_module,
4376: 'Cancelling Material Requirement for WO # ->'||p_x_prd_workorder_rec.JOB_NUMBER
4377: );
4378: fnd_log.string
4379: (
4380: fnd_log.level_statement,
4381: l_debug_module,
4382: 'Work Order status ->'||p_x_prd_workorder_rec.status_code
4376: 'Cancelling Material Requirement for WO # ->'||p_x_prd_workorder_rec.JOB_NUMBER
4377: );
4378: fnd_log.string
4379: (
4380: fnd_log.level_statement,
4381: l_debug_module,
4382: 'Work Order status ->'||p_x_prd_workorder_rec.status_code
4383: );
4384: END IF;
4392: FETCH c_wo_vtsk_id INTO p_x_prd_workorder_rec.VISIT_TASK_ID;
4393: CLOSE c_wo_vtsk_id;
4394: END IF;
4395:
4396: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4397: fnd_log.string
4398: (
4399: fnd_log.level_statement,
4400: l_debug_module,
4393: CLOSE c_wo_vtsk_id;
4394: END IF;
4395:
4396: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4397: fnd_log.string
4398: (
4399: fnd_log.level_statement,
4400: l_debug_module,
4401: 'Visit Task Id # ->'||p_x_prd_workorder_rec.VISIT_TASK_ID
4395:
4396: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4397: fnd_log.string
4398: (
4399: fnd_log.level_statement,
4400: l_debug_module,
4401: 'Visit Task Id # ->'||p_x_prd_workorder_rec.VISIT_TASK_ID
4402: );
4403: fnd_log.string
4399: fnd_log.level_statement,
4400: l_debug_module,
4401: 'Visit Task Id # ->'||p_x_prd_workorder_rec.VISIT_TASK_ID
4402: );
4403: fnd_log.string
4404: (
4405: fnd_log.level_statement,
4406: l_debug_module,
4407: 'Before calling AHL_LTP_REQST_MATRL_PVT.Update_Material_Reqrs_status'
4401: 'Visit Task Id # ->'||p_x_prd_workorder_rec.VISIT_TASK_ID
4402: );
4403: fnd_log.string
4404: (
4405: fnd_log.level_statement,
4406: l_debug_module,
4407: 'Before calling AHL_LTP_REQST_MATRL_PVT.Update_Material_Reqrs_status'
4408: );
4409: END IF;
4420: x_msg_count => x_msg_count,
4421: x_msg_data => x_msg_data
4422: );
4423:
4424: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4425: fnd_log.string
4426: (
4427: fnd_log.level_statement,
4428: l_debug_module,
4421: x_msg_data => x_msg_data
4422: );
4423:
4424: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4425: fnd_log.string
4426: (
4427: fnd_log.level_statement,
4428: l_debug_module,
4429: 'return status after call to Update_Material_Reqrs_status -> '|| x_return_status
4423:
4424: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4425: fnd_log.string
4426: (
4427: fnd_log.level_statement,
4428: l_debug_module,
4429: 'return status after call to Update_Material_Reqrs_status -> '|| x_return_status
4430: );
4431: END IF;
7141: * If All jobs under a MWO are cancelled(or valid statuses after that)
7142: * then cancel MWO else complete Master WO.
7143: */
7144: IF l_exists IS NULL THEN
7145: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7146: fnd_log.string
7147: (
7148: fnd_log.level_statement,
7149: 'ahl.AHL_PRD_WORKORDER_PVT.Cancel_Visit_Jobs',
7142: * then cancel MWO else complete Master WO.
7143: */
7144: IF l_exists IS NULL THEN
7145: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7146: fnd_log.string
7147: (
7148: fnd_log.level_statement,
7149: 'ahl.AHL_PRD_WORKORDER_PVT.Cancel_Visit_Jobs',
7150: 'cancelling mwo->'||l_master_workorder_tbl(l_count).workorder_id
7144: IF l_exists IS NULL THEN
7145: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7146: fnd_log.string
7147: (
7148: fnd_log.level_statement,
7149: 'ahl.AHL_PRD_WORKORDER_PVT.Cancel_Visit_Jobs',
7150: 'cancelling mwo->'||l_master_workorder_tbl(l_count).workorder_id
7151: );
7152: END IF;
7176: p_x_prd_workorder_tbl => l_copy_mwo_tbl,
7177: p_prd_workorder_rel_tbl => l_workorder_rel_cancel_tbl
7178: );
7179:
7180: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7181: fnd_log.string
7182: (
7183: fnd_log.level_statement,
7184: 'ahl.AHL_PRD_WORKORDER_PVT.Cancel_Visit_Jobs',
7177: p_prd_workorder_rel_tbl => l_workorder_rel_cancel_tbl
7178: );
7179:
7180: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7181: fnd_log.string
7182: (
7183: fnd_log.level_statement,
7184: 'ahl.AHL_PRD_WORKORDER_PVT.Cancel_Visit_Jobs',
7185: 'return status after calling complete_master_wo: ' || l_mwo_return_status
7179:
7180: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7181: fnd_log.string
7182: (
7183: fnd_log.level_statement,
7184: 'ahl.AHL_PRD_WORKORDER_PVT.Cancel_Visit_Jobs',
7185: 'return status after calling complete_master_wo: ' || l_mwo_return_status
7186: );
7187: END IF;
7192: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7193: END IF;
7194:
7195: ELSE
7196: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7197: fnd_log.string
7198: (
7199: fnd_log.level_statement,
7200: 'ahl.AHL_PRD_WORKORDER_PVT.Cancel_Visit_Jobs',
7193: END IF;
7194:
7195: ELSE
7196: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7197: fnd_log.string
7198: (
7199: fnd_log.level_statement,
7200: 'ahl.AHL_PRD_WORKORDER_PVT.Cancel_Visit_Jobs',
7201: 'completing mwo->'||l_master_workorder_tbl(l_count).workorder_id
7195: ELSE
7196: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7197: fnd_log.string
7198: (
7199: fnd_log.level_statement,
7200: 'ahl.AHL_PRD_WORKORDER_PVT.Cancel_Visit_Jobs',
7201: 'completing mwo->'||l_master_workorder_tbl(l_count).workorder_id
7202: );
7203: END IF;
7207: p_workorder_id => l_master_workorder_tbl(l_count).workorder_id,
7208: p_ue_id => null
7209: );
7210:
7211: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7212: fnd_log.string
7213: (
7214: fnd_log.level_statement,
7215: 'ahl.AHL_PRD_WORKORDER_PVT.Cancel_Visit_Jobs',
7208: p_ue_id => null
7209: );
7210:
7211: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7212: fnd_log.string
7213: (
7214: fnd_log.level_statement,
7215: 'ahl.AHL_PRD_WORKORDER_PVT.Cancel_Visit_Jobs',
7216: 'return status after calling complete_master_wo: ' || l_mwo_return_status
7210:
7211: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7212: fnd_log.string
7213: (
7214: fnd_log.level_statement,
7215: 'ahl.AHL_PRD_WORKORDER_PVT.Cancel_Visit_Jobs',
7216: 'return status after calling complete_master_wo: ' || l_mwo_return_status
7217: );
7218: END IF;
7483: latest_schedule_dates_rec get_latest_schedule_dates%ROWTYPE;
7484:
7485: BEGIN
7486:
7487: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
7488: fnd_log.string
7489: (
7490: fnd_log.level_procedure,
7491: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs.begin',
7484:
7485: BEGIN
7486:
7487: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
7488: fnd_log.string
7489: (
7490: fnd_log.level_procedure,
7491: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs.begin',
7492: 'At the start of PLSQL procedure'
7486:
7487: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
7488: fnd_log.string
7489: (
7490: fnd_log.level_procedure,
7491: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs.begin',
7492: 'At the start of PLSQL procedure'
7493: );
7494: END IF;
7506: END IF;
7507: -- Initialize API return status to success
7508: x_return_status:=FND_API.G_RET_STS_SUCCESS;
7509:
7510: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7511: fnd_log.string
7512: (
7513: fnd_log.level_statement,
7514: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7507: -- Initialize API return status to success
7508: x_return_status:=FND_API.G_RET_STS_SUCCESS;
7509:
7510: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7511: fnd_log.string
7512: (
7513: fnd_log.level_statement,
7514: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7515: 'Request for Rescheduling Workorders for Visit ID : ' || p_visit_id
7509:
7510: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7511: fnd_log.string
7512: (
7513: fnd_log.level_statement,
7514: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7515: 'Request for Rescheduling Workorders for Visit ID : ' || p_visit_id
7516: );
7517:
7514: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7515: 'Request for Rescheduling Workorders for Visit ID : ' || p_visit_id
7516: );
7517:
7518: fnd_log.string
7519: (
7520: fnd_log.level_statement,
7521: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7522: 'Request for Rescheduling Workorder Schedule Start Date : ' || p_x_scheduled_start_date
7516: );
7517:
7518: fnd_log.string
7519: (
7520: fnd_log.level_statement,
7521: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7522: 'Request for Rescheduling Workorder Schedule Start Date : ' || p_x_scheduled_start_date
7523: );
7524: fnd_log.string
7520: fnd_log.level_statement,
7521: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7522: 'Request for Rescheduling Workorder Schedule Start Date : ' || p_x_scheduled_start_date
7523: );
7524: fnd_log.string
7525: (
7526: fnd_log.level_statement,
7527: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7528: 'Request for Rescheduling Workorder Schedule End Date : ' || p_x_scheduled_end_date
7522: 'Request for Rescheduling Workorder Schedule Start Date : ' || p_x_scheduled_start_date
7523: );
7524: fnd_log.string
7525: (
7526: fnd_log.level_statement,
7527: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7528: 'Request for Rescheduling Workorder Schedule End Date : ' || p_x_scheduled_end_date
7529: );
7530:
7563: close check_workorder_exists;
7564: RAISE FND_API.G_EXC_ERROR;
7565: END IF;
7566:
7567: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7568: fnd_log.string
7569: (
7570: fnd_log.level_statement,
7571: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7564: RAISE FND_API.G_EXC_ERROR;
7565: END IF;
7566:
7567: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7568: fnd_log.string
7569: (
7570: fnd_log.level_statement,
7571: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7572: 'Workorder Status Code : ' || check_workorder_exists_rec.status_code
7566:
7567: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7568: fnd_log.string
7569: (
7570: fnd_log.level_statement,
7571: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7572: 'Workorder Status Code : ' || check_workorder_exists_rec.status_code
7573: );
7574:
7603:
7604: close check_workorder_exists;
7605:
7606:
7607: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7608: fnd_log.string
7609: (
7610: fnd_log.level_statement,
7611: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs',
7604: close check_workorder_exists;
7605:
7606:
7607: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7608: fnd_log.string
7609: (
7610: fnd_log.level_statement,
7611: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs',
7612: 'After Validate workorder details '
7606:
7607: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7608: fnd_log.string
7609: (
7610: fnd_log.level_statement,
7611: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs',
7612: 'After Validate workorder details '
7613: );
7614:
7643: l_prd_workorder_tbl(1).BATCH_ID := 1;
7644: l_prd_workorder_tbl(1).HEADER_ID := 0;
7645:
7646:
7647: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7648: fnd_log.string
7649: (
7650: fnd_log.level_statement,
7651: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs',
7644: l_prd_workorder_tbl(1).HEADER_ID := 0;
7645:
7646:
7647: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7648: fnd_log.string
7649: (
7650: fnd_log.level_statement,
7651: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs',
7652: 'Before Calling Process Jobs '
7646:
7647: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7648: fnd_log.string
7649: (
7650: fnd_log.level_statement,
7651: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs',
7652: 'Before Calling Process Jobs '
7653: );
7654:
7672: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7673: RAISE Fnd_Api.g_exc_error;
7674: END IF;
7675:
7676: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7677: fnd_log.string
7678: (
7679: fnd_log.level_statement,
7680: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs',
7673: RAISE Fnd_Api.g_exc_error;
7674: END IF;
7675:
7676: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7677: fnd_log.string
7678: (
7679: fnd_log.level_statement,
7680: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs',
7681: 'After calling Process Jobs API to reschedule master workorder'
7675:
7676: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7677: fnd_log.string
7678: (
7679: fnd_log.level_statement,
7680: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs',
7681: 'After calling Process Jobs API to reschedule master workorder'
7682: );
7683:
7698: l_offset_direction := -1;
7699: l_offset := l_offset * (-1);
7700: END IF;
7701:
7702: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7703: fnd_log.string
7704: (
7705: fnd_log.level_statement,
7706: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7699: l_offset := l_offset * (-1);
7700: END IF;
7701:
7702: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7703: fnd_log.string
7704: (
7705: fnd_log.level_statement,
7706: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7707: 'Rescheduled Wip Entity ID : ' || check_workorder_exists_rec.wip_entity_id
7701:
7702: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7703: fnd_log.string
7704: (
7705: fnd_log.level_statement,
7706: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7707: 'Rescheduled Wip Entity ID : ' || check_workorder_exists_rec.wip_entity_id
7708: );
7709:
7706: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7707: 'Rescheduled Wip Entity ID : ' || check_workorder_exists_rec.wip_entity_id
7708: );
7709:
7710: fnd_log.string
7711: (
7712: fnd_log.level_statement,
7713: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7714: 'Object Type Id : ' || l_object_type_id
7708: );
7709:
7710: fnd_log.string
7711: (
7712: fnd_log.level_statement,
7713: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7714: 'Object Type Id : ' || l_object_type_id
7715: );
7716: fnd_log.string
7712: fnd_log.level_statement,
7713: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7714: 'Object Type Id : ' || l_object_type_id
7715: );
7716: fnd_log.string
7717: (
7718: fnd_log.level_statement,
7719: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7720: 'Offset : ' || l_offset
7714: 'Object Type Id : ' || l_object_type_id
7715: );
7716: fnd_log.string
7717: (
7718: fnd_log.level_statement,
7719: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7720: 'Offset : ' || l_offset
7721: );
7722: fnd_log.string
7718: fnd_log.level_statement,
7719: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7720: 'Offset : ' || l_offset
7721: );
7722: fnd_log.string
7723: (
7724: fnd_log.level_statement,
7725: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7726: 'Offset Direction : ' || l_offset_direction
7720: 'Offset : ' || l_offset
7721: );
7722: fnd_log.string
7723: (
7724: fnd_log.level_statement,
7725: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
7726: 'Offset Direction : ' || l_offset_direction
7727: );
7728:
7729: END IF;
7730:
7731: --Call Eam APi TO Move all the workorders
7732:
7733: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7734: fnd_log.string
7735: (
7736: fnd_log.level_statement,
7737: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs',
7730:
7731: --Call Eam APi TO Move all the workorders
7732:
7733: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7734: fnd_log.string
7735: (
7736: fnd_log.level_statement,
7737: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs',
7738: 'Before Calling EAM_WO_NETWORK_UTIL_PVT.Move_WO '
7732:
7733: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7734: fnd_log.string
7735: (
7736: fnd_log.level_statement,
7737: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs',
7738: 'Before Calling EAM_WO_NETWORK_UTIL_PVT.Move_WO '
7739: );
7740:
7766: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7767: RAISE Fnd_Api.g_exc_error;
7768: END IF;
7769:
7770: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7771: fnd_log.string
7772: (
7773: fnd_log.level_statement,
7774: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs',
7767: RAISE Fnd_Api.g_exc_error;
7768: END IF;
7769:
7770: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7771: fnd_log.string
7772: (
7773: fnd_log.level_statement,
7774: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs',
7775: 'After Calling EAM_WO_NETWORK_UTIL_PVT.Move_WO ' ||l_return_status
7769:
7770: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7771: fnd_log.string
7772: (
7773: fnd_log.level_statement,
7774: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs',
7775: 'After Calling EAM_WO_NETWORK_UTIL_PVT.Move_WO ' ||l_return_status
7776: );
7777:
7845: IF FND_API.to_boolean(p_commit) THEN
7846: COMMIT;
7847: END IF;
7848:
7849: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
7850: fnd_log.string
7851: (
7852: fnd_log.level_procedure,
7853: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs.end',
7846: COMMIT;
7847: END IF;
7848:
7849: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
7850: fnd_log.string
7851: (
7852: fnd_log.level_procedure,
7853: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs.end',
7854: 'At the end of PLSQL procedure'
7848:
7849: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
7850: fnd_log.string
7851: (
7852: fnd_log.level_procedure,
7853: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.Reschedule_Visit_Jobs.end',
7854: 'At the end of PLSQL procedure'
7855: );
7856: END IF;
7932: l_count NUMBER;
7933: matchFound BOOLEAN;
7934:
7935: BEGIN
7936: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
7937: fnd_log.string
7938: (
7939: fnd_log.level_procedure,
7940: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES.begin',
7933: matchFound BOOLEAN;
7934:
7935: BEGIN
7936: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
7937: fnd_log.string
7938: (
7939: fnd_log.level_procedure,
7940: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES.begin',
7941: 'At the start of PLSQL procedure'
7935: BEGIN
7936: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
7937: fnd_log.string
7938: (
7939: fnd_log.level_procedure,
7940: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES.begin',
7941: 'At the start of PLSQL procedure'
7942: );
7943: END IF;
7952: IF FND_API.To_Boolean( p_init_msg_list) THEN
7953: FND_MSG_PUB.Initialize;
7954: END IF;
7955:
7956: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7957: fnd_log.string
7958: (
7959: fnd_log.level_statement,
7960: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES',
7953: FND_MSG_PUB.Initialize;
7954: END IF;
7955:
7956: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7957: fnd_log.string
7958: (
7959: fnd_log.level_statement,
7960: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES',
7961: 'p_init_message_list : ' || p_init_msg_list
7955:
7956: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
7957: fnd_log.string
7958: (
7959: fnd_log.level_statement,
7960: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES',
7961: 'p_init_message_list : ' || p_init_msg_list
7962: );
7963: fnd_log.string
7959: fnd_log.level_statement,
7960: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES',
7961: 'p_init_message_list : ' || p_init_msg_list
7962: );
7963: fnd_log.string
7964: (
7965: fnd_log.level_statement,
7966: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES',
7967: 'p_commit : ' || p_commit
7961: 'p_init_message_list : ' || p_init_msg_list
7962: );
7963: fnd_log.string
7964: (
7965: fnd_log.level_statement,
7966: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES',
7967: 'p_commit : ' || p_commit
7968: );
7969: END IF;
7974: -- validate source object code
7975: IF(p_trunover_notes_tbl(i).source_object_code <> 'AHL_WO_TURNOVER_NOTES')THEN
7976: FND_MESSAGE.Set_Name('AHL','AHL_PRD_WO_NOTES_INV_SOURCE');
7977: FND_MSG_PUB.ADD;
7978: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
7979: fnd_log.string
7980: (
7981: fnd_log.level_error,
7982: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES',
7975: IF(p_trunover_notes_tbl(i).source_object_code <> 'AHL_WO_TURNOVER_NOTES')THEN
7976: FND_MESSAGE.Set_Name('AHL','AHL_PRD_WO_NOTES_INV_SOURCE');
7977: FND_MSG_PUB.ADD;
7978: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
7979: fnd_log.string
7980: (
7981: fnd_log.level_error,
7982: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES',
7983: 'Invalid source object code for JTF notes' || p_trunover_notes_tbl(i).source_object_code
7977: FND_MSG_PUB.ADD;
7978: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
7979: fnd_log.string
7980: (
7981: fnd_log.level_error,
7982: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES',
7983: 'Invalid source object code for JTF notes' || p_trunover_notes_tbl(i).source_object_code
7984: );
7985: END IF;
7988: IF(p_trunover_notes_tbl(i).entered_date > SYSDATE)THEN
7989: FND_MESSAGE.Set_Name('AHL','AHL_PRD_WO_NOTES_INV_ENT_DT');
7990: FND_MESSAGE.Set_Token('ENTERED_DATE',p_trunover_notes_tbl(i).entered_date);
7991: FND_MSG_PUB.ADD;
7992: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
7993: fnd_log.string
7994: (
7995: fnd_log.level_error,
7996: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES',
7989: FND_MESSAGE.Set_Name('AHL','AHL_PRD_WO_NOTES_INV_ENT_DT');
7990: FND_MESSAGE.Set_Token('ENTERED_DATE',p_trunover_notes_tbl(i).entered_date);
7991: FND_MSG_PUB.ADD;
7992: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
7993: fnd_log.string
7994: (
7995: fnd_log.level_error,
7996: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES',
7997: 'Invalid enterded date' || to_char(p_trunover_notes_tbl(i).entered_date)
7991: FND_MSG_PUB.ADD;
7992: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
7993: fnd_log.string
7994: (
7995: fnd_log.level_error,
7996: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES',
7997: 'Invalid enterded date' || to_char(p_trunover_notes_tbl(i).entered_date)
7998: );
7999: END IF;
8001: -- validate that notes cant not be null
8002: IF(p_trunover_notes_tbl(i).notes IS NULL)THEN
8003: FND_MESSAGE.Set_Name('AHL','AHL_PRD_WO_NOTES_INV_NOTES_NLL');
8004: FND_MSG_PUB.ADD;
8005: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
8006: fnd_log.string
8007: (
8008: fnd_log.level_error,
8009: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES',
8002: IF(p_trunover_notes_tbl(i).notes IS NULL)THEN
8003: FND_MESSAGE.Set_Name('AHL','AHL_PRD_WO_NOTES_INV_NOTES_NLL');
8004: FND_MSG_PUB.ADD;
8005: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
8006: fnd_log.string
8007: (
8008: fnd_log.level_error,
8009: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES',
8010: 'Invalid enterded date' || to_char(p_trunover_notes_tbl(i).entered_date)
8004: FND_MSG_PUB.ADD;
8005: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
8006: fnd_log.string
8007: (
8008: fnd_log.level_error,
8009: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES',
8010: 'Invalid enterded date' || to_char(p_trunover_notes_tbl(i).entered_date)
8011: );
8012: END IF;
8080: IF(x_msg_count > 0 )THEN
8081: RAISE FND_API.G_EXC_ERROR;
8082: END IF;
8083:
8084: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
8085: fnd_log.string
8086: (
8087: fnd_log.level_procedure,
8088: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES.end',
8081: RAISE FND_API.G_EXC_ERROR;
8082: END IF;
8083:
8084: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
8085: fnd_log.string
8086: (
8087: fnd_log.level_procedure,
8088: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES.end',
8089: 'At the end of PLSQL procedure'
8083:
8084: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
8085: fnd_log.string
8086: (
8087: fnd_log.level_procedure,
8088: 'ahl.plsql.AHL_PRD_WORKORDER_PVT.INSERT_TURNOVER_NOTES.end',
8089: 'At the end of PLSQL procedure'
8090: );
8091: END IF;