[Home] [Help]
272: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
273: --
274: IF l_debug_on IS NULL
275: THEN
276: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
277: END IF;
278: --
279: IF l_debug_on THEN
280: wsh_debug_sv.push(l_module_name, 'Update_Contnr_Int_Assignments');
276: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
277: END IF;
278: --
279: IF l_debug_on THEN
280: wsh_debug_sv.push(l_module_name, 'Update_Contnr_Int_Assignments');
281: wsh_debug_sv.log (l_module_name,'parent_delivery_detail_id ',p_parent_delivery_detail_id);
282: wsh_debug_sv.log (l_module_name,'parent_detail_interface_id ',p_parent_detail_interface_id);
283: END IF;
284:
277: END IF;
278: --
279: IF l_debug_on THEN
280: wsh_debug_sv.push(l_module_name, 'Update_Contnr_Int_Assignments');
281: wsh_debug_sv.log (l_module_name,'parent_delivery_detail_id ',p_parent_delivery_detail_id);
282: wsh_debug_sv.log (l_module_name,'parent_detail_interface_id ',p_parent_detail_interface_id);
283: END IF;
284:
285: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
278: --
279: IF l_debug_on THEN
280: wsh_debug_sv.push(l_module_name, 'Update_Contnr_Int_Assignments');
281: wsh_debug_sv.log (l_module_name,'parent_delivery_detail_id ',p_parent_delivery_detail_id);
282: wsh_debug_sv.log (l_module_name,'parent_detail_interface_id ',p_parent_detail_interface_id);
283: END IF;
284:
285: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
286:
293: -- need to check with anil
294: END IF;
295:
296: IF l_debug_on THEN
297: wsh_debug_sv.pop(l_module_name);
298: END IF;
299:
300: EXCEPTION
301:
302: WHEN Others THEN
303:
304: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
305: IF l_debug_on THEN
306: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
307: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
308: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
309: END IF;
310: END Update_Contnr_Int_Assignments;
303:
304: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
305: IF l_debug_on THEN
306: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
307: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
308: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
309: END IF;
310: END Update_Contnr_Int_Assignments;
311:
304: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
305: IF l_debug_on THEN
306: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
307: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
308: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
309: END IF;
310: END Update_Contnr_Int_Assignments;
311:
312: /*
364: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
365: --
366: IF l_debug_on IS NULL
367: THEN
368: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
369: END IF;
370: --
371: IF l_debug_on THEN
372: wsh_debug_sv.push(l_module_name, 'Process_Interfaced_Del_Details');
368: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
369: END IF;
370: --
371: IF l_debug_on THEN
372: wsh_debug_sv.push(l_module_name, 'Process_Interfaced_Del_Details');
373: wsh_debug_sv.log (l_module_name, 'Delivery Interface Id',p_delivery_interface_id);
374: wsh_debug_sv.log (l_module_name,'Delivery Id', p_delivery_id);
375: wsh_debug_sv.log (l_module_name,'New Delivery Id', p_new_delivery_id);
376: wsh_debug_sv.log (l_module_name,'Action Code ',p_action_code);
369: END IF;
370: --
371: IF l_debug_on THEN
372: wsh_debug_sv.push(l_module_name, 'Process_Interfaced_Del_Details');
373: wsh_debug_sv.log (l_module_name, 'Delivery Interface Id',p_delivery_interface_id);
374: wsh_debug_sv.log (l_module_name,'Delivery Id', p_delivery_id);
375: wsh_debug_sv.log (l_module_name,'New Delivery Id', p_new_delivery_id);
376: wsh_debug_sv.log (l_module_name,'Action Code ',p_action_code);
377: END IF;
370: --
371: IF l_debug_on THEN
372: wsh_debug_sv.push(l_module_name, 'Process_Interfaced_Del_Details');
373: wsh_debug_sv.log (l_module_name, 'Delivery Interface Id',p_delivery_interface_id);
374: wsh_debug_sv.log (l_module_name,'Delivery Id', p_delivery_id);
375: wsh_debug_sv.log (l_module_name,'New Delivery Id', p_new_delivery_id);
376: wsh_debug_sv.log (l_module_name,'Action Code ',p_action_code);
377: END IF;
378:
371: IF l_debug_on THEN
372: wsh_debug_sv.push(l_module_name, 'Process_Interfaced_Del_Details');
373: wsh_debug_sv.log (l_module_name, 'Delivery Interface Id',p_delivery_interface_id);
374: wsh_debug_sv.log (l_module_name,'Delivery Id', p_delivery_id);
375: wsh_debug_sv.log (l_module_name,'New Delivery Id', p_new_delivery_id);
376: wsh_debug_sv.log (l_module_name,'Action Code ',p_action_code);
377: END IF;
378:
379: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
372: wsh_debug_sv.push(l_module_name, 'Process_Interfaced_Del_Details');
373: wsh_debug_sv.log (l_module_name, 'Delivery Interface Id',p_delivery_interface_id);
374: wsh_debug_sv.log (l_module_name,'Delivery Id', p_delivery_id);
375: wsh_debug_sv.log (l_module_name,'New Delivery Id', p_new_delivery_id);
376: wsh_debug_sv.log (l_module_name,'Action Code ',p_action_code);
377: END IF;
378:
379: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
380:
397: p_action_code => p_action_code,
398: x_return_status => l_return_status);
399:
400: IF l_debug_on THEN
401: wsh_debug_sv.log (l_module_name, 'Return Status from Process_Non_Splits', l_return_status);
402: END IF;
403:
404: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
405: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
412: x_return_status => l_return_status);
413: END IF;
414:
415: IF l_debug_on THEN
416: wsh_debug_sv.log (l_module_name, 'Return Status from Process Splits', l_return_status);
417: END IF;
418:
419: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
420: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
420: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
421: END IF;
422:
423: IF l_debug_on THEN
424: wsh_debug_sv.log (l_module_name, 'Packing Table Count', G_Packing_Detail_Tab.count);
425: END IF;
426: IF(G_Packing_Detail_Tab.count > 0) THEN
427: Pack_Lines(
428: x_return_status => l_return_status);
427: Pack_Lines(
428: x_return_status => l_return_status);
429:
430: IF l_debug_on THEN
431: wsh_debug_sv.log (l_module_name, 'Return Status from Pack Lines', l_return_status);
432: END IF;
433:
434: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
435: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
441: p_action_code => p_action_code,
442: x_return_status => l_return_status);
443:
444: IF l_debug_on THEN
445: wsh_debug_sv.log (l_module_name, 'Return Status from Update Del Details', l_return_status);
446: END IF;
447:
448: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
449: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
450: END IF;
451:
452:
453: IF l_debug_on THEN
454: wsh_debug_sv.pop(l_module_name);
455: END IF;
456:
457: EXCEPTION
458: WHEN invalid_action_code THEN
457: EXCEPTION
458: WHEN invalid_action_code THEN
459: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
460: IF l_debug_on THEN
461: WSH_DEBUG_SV.logmsg(l_module_name,'invalid_action_code exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
462: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:invalid_action_code');
463: END IF;
464: WHEN invalid_input THEN
465: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
458: WHEN invalid_action_code THEN
459: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
460: IF l_debug_on THEN
461: WSH_DEBUG_SV.logmsg(l_module_name,'invalid_action_code exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
462: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:invalid_action_code');
463: END IF;
464: WHEN invalid_input THEN
465: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
466: IF l_debug_on THEN
463: END IF;
464: WHEN invalid_input THEN
465: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
466: IF l_debug_on THEN
467: WSH_DEBUG_SV.logmsg(l_module_name,'invalid_input exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
468: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:invalid_input');
469: END IF;
470: WHEN Others THEN
471: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
464: WHEN invalid_input THEN
465: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
466: IF l_debug_on THEN
467: WSH_DEBUG_SV.logmsg(l_module_name,'invalid_input exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
468: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:invalid_input');
469: END IF;
470: WHEN Others THEN
471: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
472: IF l_debug_on THEN
469: END IF;
470: WHEN Others THEN
471: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
472: IF l_debug_on THEN
473: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
474: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
475: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
476: END IF;
477: END Process_Interfaced_Del_Details;
470: WHEN Others THEN
471: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
472: IF l_debug_on THEN
473: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
474: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
475: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
476: END IF;
477: END Process_Interfaced_Del_Details;
478:
471: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
472: IF l_debug_on THEN
473: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
474: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
475: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
476: END IF;
477: END Process_Interfaced_Del_Details;
478:
479:
591: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
592: --
593: IF l_debug_on IS NULL
594: THEN
595: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
596: END IF;
597: --
598: IF l_debug_on THEN
599: wsh_debug_sv.push(l_module_name, 'Process_Non_Splits');
595: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
596: END IF;
597: --
598: IF l_debug_on THEN
599: wsh_debug_sv.push(l_module_name, 'Process_Non_Splits');
600: wsh_debug_sv.log (l_module_name,'Delivery Interface Id',p_delivery_interface_id);
601: wsh_debug_sv.log (l_module_name,'Delivery Id', p_delivery_id);
602: wsh_debug_sv.log (l_module_name, 'New Delivery Id', p_new_delivery_id);
603: wsh_debug_sv.log (l_module_name,'Action Code ',p_action_code);
596: END IF;
597: --
598: IF l_debug_on THEN
599: wsh_debug_sv.push(l_module_name, 'Process_Non_Splits');
600: wsh_debug_sv.log (l_module_name,'Delivery Interface Id',p_delivery_interface_id);
601: wsh_debug_sv.log (l_module_name,'Delivery Id', p_delivery_id);
602: wsh_debug_sv.log (l_module_name, 'New Delivery Id', p_new_delivery_id);
603: wsh_debug_sv.log (l_module_name,'Action Code ',p_action_code);
604: END IF;
597: --
598: IF l_debug_on THEN
599: wsh_debug_sv.push(l_module_name, 'Process_Non_Splits');
600: wsh_debug_sv.log (l_module_name,'Delivery Interface Id',p_delivery_interface_id);
601: wsh_debug_sv.log (l_module_name,'Delivery Id', p_delivery_id);
602: wsh_debug_sv.log (l_module_name, 'New Delivery Id', p_new_delivery_id);
603: wsh_debug_sv.log (l_module_name,'Action Code ',p_action_code);
604: END IF;
605:
598: IF l_debug_on THEN
599: wsh_debug_sv.push(l_module_name, 'Process_Non_Splits');
600: wsh_debug_sv.log (l_module_name,'Delivery Interface Id',p_delivery_interface_id);
601: wsh_debug_sv.log (l_module_name,'Delivery Id', p_delivery_id);
602: wsh_debug_sv.log (l_module_name, 'New Delivery Id', p_new_delivery_id);
603: wsh_debug_sv.log (l_module_name,'Action Code ',p_action_code);
604: END IF;
605:
606: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
599: wsh_debug_sv.push(l_module_name, 'Process_Non_Splits');
600: wsh_debug_sv.log (l_module_name,'Delivery Interface Id',p_delivery_interface_id);
601: wsh_debug_sv.log (l_module_name,'Delivery Id', p_delivery_id);
602: wsh_debug_sv.log (l_module_name, 'New Delivery Id', p_new_delivery_id);
603: wsh_debug_sv.log (l_module_name,'Action Code ',p_action_code);
604: END IF;
605:
606: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
607:
622:
623: l_new_detail_ids.delete;
624:
625: IF l_debug_on THEN
626: wsh_debug_sv.logmsg(l_module_name, 'Before Looping thru details');
627: END IF;
628:
629: FOR det_id IN detail_ids_cur LOOP
630: /* Bug fix 2451920
636: l_cont_name := NULL;
637:
638:
639: IF l_debug_on THEN
640: wsh_debug_sv.log (l_module_name, 'Delivery Detail ID',det_id.delivery_detail_id);
641: END IF;
642:
643: OPEN del_det_int_cur(det_id.delivery_detail_id, p_delivery_interface_id);
644: FETCH del_det_int_cur INTO del_det_int_rec;
644: FETCH del_det_int_cur INTO del_det_int_rec;
645: CLOSE del_det_int_cur;
646:
647: IF l_debug_on THEN
648: wsh_debug_sv.log(l_module_name,'Delivery Detail Interf Id',del_det_int_rec.delivery_detail_interface_id);
649: END IF;
650:
651: IF(p_action_code = 'CREATE') THEN --{
652:
872: l_del_details_info.ignore_for_planning := 'Y';
873: END IF;
874:
875: IF l_debug_on THEN
876: wsh_debug_sv.log (l_module_name, 'calling create shipment lines');
877: wsh_debug_sv.log (l_module_name, 'the mandatory attributes for create shipment lines are:');
878: wsh_debug_sv.log (l_module_name, 'source_code',l_del_details_info.source_code);
879: wsh_debug_sv.log (l_module_name, 'Source header id',l_del_details_info.source_header_id);
880: wsh_debug_sv.log (l_module_name, 'Source header number',l_del_details_info.source_header_number);
873: END IF;
874:
875: IF l_debug_on THEN
876: wsh_debug_sv.log (l_module_name, 'calling create shipment lines');
877: wsh_debug_sv.log (l_module_name, 'the mandatory attributes for create shipment lines are:');
878: wsh_debug_sv.log (l_module_name, 'source_code',l_del_details_info.source_code);
879: wsh_debug_sv.log (l_module_name, 'Source header id',l_del_details_info.source_header_id);
880: wsh_debug_sv.log (l_module_name, 'Source header number',l_del_details_info.source_header_number);
881: wsh_debug_sv.log (l_module_name, 'Source line id',l_del_details_info.source_line_id);
874:
875: IF l_debug_on THEN
876: wsh_debug_sv.log (l_module_name, 'calling create shipment lines');
877: wsh_debug_sv.log (l_module_name, 'the mandatory attributes for create shipment lines are:');
878: wsh_debug_sv.log (l_module_name, 'source_code',l_del_details_info.source_code);
879: wsh_debug_sv.log (l_module_name, 'Source header id',l_del_details_info.source_header_id);
880: wsh_debug_sv.log (l_module_name, 'Source header number',l_del_details_info.source_header_number);
881: wsh_debug_sv.log (l_module_name, 'Source line id',l_del_details_info.source_line_id);
882: wsh_debug_sv.log (l_module_name, 'Source line number',l_del_details_info.source_line_number);
875: IF l_debug_on THEN
876: wsh_debug_sv.log (l_module_name, 'calling create shipment lines');
877: wsh_debug_sv.log (l_module_name, 'the mandatory attributes for create shipment lines are:');
878: wsh_debug_sv.log (l_module_name, 'source_code',l_del_details_info.source_code);
879: wsh_debug_sv.log (l_module_name, 'Source header id',l_del_details_info.source_header_id);
880: wsh_debug_sv.log (l_module_name, 'Source header number',l_del_details_info.source_header_number);
881: wsh_debug_sv.log (l_module_name, 'Source line id',l_del_details_info.source_line_id);
882: wsh_debug_sv.log (l_module_name, 'Source line number',l_del_details_info.source_line_number);
883: wsh_debug_sv.log (l_module_name, 'Organization id',l_del_details_info.organization_id);
876: wsh_debug_sv.log (l_module_name, 'calling create shipment lines');
877: wsh_debug_sv.log (l_module_name, 'the mandatory attributes for create shipment lines are:');
878: wsh_debug_sv.log (l_module_name, 'source_code',l_del_details_info.source_code);
879: wsh_debug_sv.log (l_module_name, 'Source header id',l_del_details_info.source_header_id);
880: wsh_debug_sv.log (l_module_name, 'Source header number',l_del_details_info.source_header_number);
881: wsh_debug_sv.log (l_module_name, 'Source line id',l_del_details_info.source_line_id);
882: wsh_debug_sv.log (l_module_name, 'Source line number',l_del_details_info.source_line_number);
883: wsh_debug_sv.log (l_module_name, 'Organization id',l_del_details_info.organization_id);
884: wsh_debug_sv.log (l_module_name, 'Org Id', l_del_details_info.org_id);
877: wsh_debug_sv.log (l_module_name, 'the mandatory attributes for create shipment lines are:');
878: wsh_debug_sv.log (l_module_name, 'source_code',l_del_details_info.source_code);
879: wsh_debug_sv.log (l_module_name, 'Source header id',l_del_details_info.source_header_id);
880: wsh_debug_sv.log (l_module_name, 'Source header number',l_del_details_info.source_header_number);
881: wsh_debug_sv.log (l_module_name, 'Source line id',l_del_details_info.source_line_id);
882: wsh_debug_sv.log (l_module_name, 'Source line number',l_del_details_info.source_line_number);
883: wsh_debug_sv.log (l_module_name, 'Organization id',l_del_details_info.organization_id);
884: wsh_debug_sv.log (l_module_name, 'Org Id', l_del_details_info.org_id);
885: wsh_debug_sv.log (l_module_name, 'Requested qty', l_del_details_info.requested_quantity);
878: wsh_debug_sv.log (l_module_name, 'source_code',l_del_details_info.source_code);
879: wsh_debug_sv.log (l_module_name, 'Source header id',l_del_details_info.source_header_id);
880: wsh_debug_sv.log (l_module_name, 'Source header number',l_del_details_info.source_header_number);
881: wsh_debug_sv.log (l_module_name, 'Source line id',l_del_details_info.source_line_id);
882: wsh_debug_sv.log (l_module_name, 'Source line number',l_del_details_info.source_line_number);
883: wsh_debug_sv.log (l_module_name, 'Organization id',l_del_details_info.organization_id);
884: wsh_debug_sv.log (l_module_name, 'Org Id', l_del_details_info.org_id);
885: wsh_debug_sv.log (l_module_name, 'Requested qty', l_del_details_info.requested_quantity);
886: wsh_debug_sv.log (l_module_name, 'Requested qty uom',l_del_details_info.requested_quantity_uom );
879: wsh_debug_sv.log (l_module_name, 'Source header id',l_del_details_info.source_header_id);
880: wsh_debug_sv.log (l_module_name, 'Source header number',l_del_details_info.source_header_number);
881: wsh_debug_sv.log (l_module_name, 'Source line id',l_del_details_info.source_line_id);
882: wsh_debug_sv.log (l_module_name, 'Source line number',l_del_details_info.source_line_number);
883: wsh_debug_sv.log (l_module_name, 'Organization id',l_del_details_info.organization_id);
884: wsh_debug_sv.log (l_module_name, 'Org Id', l_del_details_info.org_id);
885: wsh_debug_sv.log (l_module_name, 'Requested qty', l_del_details_info.requested_quantity);
886: wsh_debug_sv.log (l_module_name, 'Requested qty uom',l_del_details_info.requested_quantity_uom );
887: wsh_debug_sv.log (l_module_name, 'Src req qty',l_del_details_info. src_requested_quantity);
880: wsh_debug_sv.log (l_module_name, 'Source header number',l_del_details_info.source_header_number);
881: wsh_debug_sv.log (l_module_name, 'Source line id',l_del_details_info.source_line_id);
882: wsh_debug_sv.log (l_module_name, 'Source line number',l_del_details_info.source_line_number);
883: wsh_debug_sv.log (l_module_name, 'Organization id',l_del_details_info.organization_id);
884: wsh_debug_sv.log (l_module_name, 'Org Id', l_del_details_info.org_id);
885: wsh_debug_sv.log (l_module_name, 'Requested qty', l_del_details_info.requested_quantity);
886: wsh_debug_sv.log (l_module_name, 'Requested qty uom',l_del_details_info.requested_quantity_uom );
887: wsh_debug_sv.log (l_module_name, 'Src req qty',l_del_details_info. src_requested_quantity);
888: wsh_debug_sv.log (l_module_name, 'Src req qty uom', l_del_details_info.src_requested_quantity_uom);
881: wsh_debug_sv.log (l_module_name, 'Source line id',l_del_details_info.source_line_id);
882: wsh_debug_sv.log (l_module_name, 'Source line number',l_del_details_info.source_line_number);
883: wsh_debug_sv.log (l_module_name, 'Organization id',l_del_details_info.organization_id);
884: wsh_debug_sv.log (l_module_name, 'Org Id', l_del_details_info.org_id);
885: wsh_debug_sv.log (l_module_name, 'Requested qty', l_del_details_info.requested_quantity);
886: wsh_debug_sv.log (l_module_name, 'Requested qty uom',l_del_details_info.requested_quantity_uom );
887: wsh_debug_sv.log (l_module_name, 'Src req qty',l_del_details_info. src_requested_quantity);
888: wsh_debug_sv.log (l_module_name, 'Src req qty uom', l_del_details_info.src_requested_quantity_uom);
889: wsh_debug_sv.log (l_module_name, 'inventory item id',l_del_details_info.inventory_item_id);
882: wsh_debug_sv.log (l_module_name, 'Source line number',l_del_details_info.source_line_number);
883: wsh_debug_sv.log (l_module_name, 'Organization id',l_del_details_info.organization_id);
884: wsh_debug_sv.log (l_module_name, 'Org Id', l_del_details_info.org_id);
885: wsh_debug_sv.log (l_module_name, 'Requested qty', l_del_details_info.requested_quantity);
886: wsh_debug_sv.log (l_module_name, 'Requested qty uom',l_del_details_info.requested_quantity_uom );
887: wsh_debug_sv.log (l_module_name, 'Src req qty',l_del_details_info. src_requested_quantity);
888: wsh_debug_sv.log (l_module_name, 'Src req qty uom', l_del_details_info.src_requested_quantity_uom);
889: wsh_debug_sv.log (l_module_name, 'inventory item id',l_del_details_info.inventory_item_id);
890: wsh_debug_sv.log (l_module_name, 'ship from loc id',l_del_details_info.ship_from_location_id);
883: wsh_debug_sv.log (l_module_name, 'Organization id',l_del_details_info.organization_id);
884: wsh_debug_sv.log (l_module_name, 'Org Id', l_del_details_info.org_id);
885: wsh_debug_sv.log (l_module_name, 'Requested qty', l_del_details_info.requested_quantity);
886: wsh_debug_sv.log (l_module_name, 'Requested qty uom',l_del_details_info.requested_quantity_uom );
887: wsh_debug_sv.log (l_module_name, 'Src req qty',l_del_details_info. src_requested_quantity);
888: wsh_debug_sv.log (l_module_name, 'Src req qty uom', l_del_details_info.src_requested_quantity_uom);
889: wsh_debug_sv.log (l_module_name, 'inventory item id',l_del_details_info.inventory_item_id);
890: wsh_debug_sv.log (l_module_name, 'ship from loc id',l_del_details_info.ship_from_location_id);
891: wsh_debug_sv.log (l_module_name, 'ship to loc id', l_del_details_info.ship_to_location_id);
884: wsh_debug_sv.log (l_module_name, 'Org Id', l_del_details_info.org_id);
885: wsh_debug_sv.log (l_module_name, 'Requested qty', l_del_details_info.requested_quantity);
886: wsh_debug_sv.log (l_module_name, 'Requested qty uom',l_del_details_info.requested_quantity_uom );
887: wsh_debug_sv.log (l_module_name, 'Src req qty',l_del_details_info. src_requested_quantity);
888: wsh_debug_sv.log (l_module_name, 'Src req qty uom', l_del_details_info.src_requested_quantity_uom);
889: wsh_debug_sv.log (l_module_name, 'inventory item id',l_del_details_info.inventory_item_id);
890: wsh_debug_sv.log (l_module_name, 'ship from loc id',l_del_details_info.ship_from_location_id);
891: wsh_debug_sv.log (l_module_name, 'ship to loc id', l_del_details_info.ship_to_location_id);
892: wsh_debug_sv.log (l_module_name, 'LINE_DIRECTION', l_del_details_info.LINE_DIRECTION);
885: wsh_debug_sv.log (l_module_name, 'Requested qty', l_del_details_info.requested_quantity);
886: wsh_debug_sv.log (l_module_name, 'Requested qty uom',l_del_details_info.requested_quantity_uom );
887: wsh_debug_sv.log (l_module_name, 'Src req qty',l_del_details_info. src_requested_quantity);
888: wsh_debug_sv.log (l_module_name, 'Src req qty uom', l_del_details_info.src_requested_quantity_uom);
889: wsh_debug_sv.log (l_module_name, 'inventory item id',l_del_details_info.inventory_item_id);
890: wsh_debug_sv.log (l_module_name, 'ship from loc id',l_del_details_info.ship_from_location_id);
891: wsh_debug_sv.log (l_module_name, 'ship to loc id', l_del_details_info.ship_to_location_id);
892: wsh_debug_sv.log (l_module_name, 'LINE_DIRECTION', l_del_details_info.LINE_DIRECTION);
893: wsh_debug_sv.log (l_module_name, 'REQUEST_DATE_TYPE_CODE', l_del_details_info.REQUEST_DATE_TYPE_CODE);
886: wsh_debug_sv.log (l_module_name, 'Requested qty uom',l_del_details_info.requested_quantity_uom );
887: wsh_debug_sv.log (l_module_name, 'Src req qty',l_del_details_info. src_requested_quantity);
888: wsh_debug_sv.log (l_module_name, 'Src req qty uom', l_del_details_info.src_requested_quantity_uom);
889: wsh_debug_sv.log (l_module_name, 'inventory item id',l_del_details_info.inventory_item_id);
890: wsh_debug_sv.log (l_module_name, 'ship from loc id',l_del_details_info.ship_from_location_id);
891: wsh_debug_sv.log (l_module_name, 'ship to loc id', l_del_details_info.ship_to_location_id);
892: wsh_debug_sv.log (l_module_name, 'LINE_DIRECTION', l_del_details_info.LINE_DIRECTION);
893: wsh_debug_sv.log (l_module_name, 'REQUEST_DATE_TYPE_CODE', l_del_details_info.REQUEST_DATE_TYPE_CODE);
894: wsh_debug_sv.log (l_module_name, 'EARLIEST_PICKUP_DATE', l_del_details_info.EARLIEST_PICKUP_DATE);
887: wsh_debug_sv.log (l_module_name, 'Src req qty',l_del_details_info. src_requested_quantity);
888: wsh_debug_sv.log (l_module_name, 'Src req qty uom', l_del_details_info.src_requested_quantity_uom);
889: wsh_debug_sv.log (l_module_name, 'inventory item id',l_del_details_info.inventory_item_id);
890: wsh_debug_sv.log (l_module_name, 'ship from loc id',l_del_details_info.ship_from_location_id);
891: wsh_debug_sv.log (l_module_name, 'ship to loc id', l_del_details_info.ship_to_location_id);
892: wsh_debug_sv.log (l_module_name, 'LINE_DIRECTION', l_del_details_info.LINE_DIRECTION);
893: wsh_debug_sv.log (l_module_name, 'REQUEST_DATE_TYPE_CODE', l_del_details_info.REQUEST_DATE_TYPE_CODE);
894: wsh_debug_sv.log (l_module_name, 'EARLIEST_PICKUP_DATE', l_del_details_info.EARLIEST_PICKUP_DATE);
895: wsh_debug_sv.log (l_module_name, 'LATEST_PICKUP_DATE', l_del_details_info.LATEST_PICKUP_DATE);
888: wsh_debug_sv.log (l_module_name, 'Src req qty uom', l_del_details_info.src_requested_quantity_uom);
889: wsh_debug_sv.log (l_module_name, 'inventory item id',l_del_details_info.inventory_item_id);
890: wsh_debug_sv.log (l_module_name, 'ship from loc id',l_del_details_info.ship_from_location_id);
891: wsh_debug_sv.log (l_module_name, 'ship to loc id', l_del_details_info.ship_to_location_id);
892: wsh_debug_sv.log (l_module_name, 'LINE_DIRECTION', l_del_details_info.LINE_DIRECTION);
893: wsh_debug_sv.log (l_module_name, 'REQUEST_DATE_TYPE_CODE', l_del_details_info.REQUEST_DATE_TYPE_CODE);
894: wsh_debug_sv.log (l_module_name, 'EARLIEST_PICKUP_DATE', l_del_details_info.EARLIEST_PICKUP_DATE);
895: wsh_debug_sv.log (l_module_name, 'LATEST_PICKUP_DATE', l_del_details_info.LATEST_PICKUP_DATE);
896: wsh_debug_sv.log (l_module_name, 'EARLIEST_DROPOFF_DATE', l_del_details_info.EARLIEST_DROPOFF_DATE);
889: wsh_debug_sv.log (l_module_name, 'inventory item id',l_del_details_info.inventory_item_id);
890: wsh_debug_sv.log (l_module_name, 'ship from loc id',l_del_details_info.ship_from_location_id);
891: wsh_debug_sv.log (l_module_name, 'ship to loc id', l_del_details_info.ship_to_location_id);
892: wsh_debug_sv.log (l_module_name, 'LINE_DIRECTION', l_del_details_info.LINE_DIRECTION);
893: wsh_debug_sv.log (l_module_name, 'REQUEST_DATE_TYPE_CODE', l_del_details_info.REQUEST_DATE_TYPE_CODE);
894: wsh_debug_sv.log (l_module_name, 'EARLIEST_PICKUP_DATE', l_del_details_info.EARLIEST_PICKUP_DATE);
895: wsh_debug_sv.log (l_module_name, 'LATEST_PICKUP_DATE', l_del_details_info.LATEST_PICKUP_DATE);
896: wsh_debug_sv.log (l_module_name, 'EARLIEST_DROPOFF_DATE', l_del_details_info.EARLIEST_DROPOFF_DATE);
897: wsh_debug_sv.log (l_module_name, 'LATEST_DROPOFF_DATE', l_del_details_info.LATEST_DROPOFF_DATE);
890: wsh_debug_sv.log (l_module_name, 'ship from loc id',l_del_details_info.ship_from_location_id);
891: wsh_debug_sv.log (l_module_name, 'ship to loc id', l_del_details_info.ship_to_location_id);
892: wsh_debug_sv.log (l_module_name, 'LINE_DIRECTION', l_del_details_info.LINE_DIRECTION);
893: wsh_debug_sv.log (l_module_name, 'REQUEST_DATE_TYPE_CODE', l_del_details_info.REQUEST_DATE_TYPE_CODE);
894: wsh_debug_sv.log (l_module_name, 'EARLIEST_PICKUP_DATE', l_del_details_info.EARLIEST_PICKUP_DATE);
895: wsh_debug_sv.log (l_module_name, 'LATEST_PICKUP_DATE', l_del_details_info.LATEST_PICKUP_DATE);
896: wsh_debug_sv.log (l_module_name, 'EARLIEST_DROPOFF_DATE', l_del_details_info.EARLIEST_DROPOFF_DATE);
897: wsh_debug_sv.log (l_module_name, 'LATEST_DROPOFF_DATE', l_del_details_info.LATEST_DROPOFF_DATE);
898: --}
891: wsh_debug_sv.log (l_module_name, 'ship to loc id', l_del_details_info.ship_to_location_id);
892: wsh_debug_sv.log (l_module_name, 'LINE_DIRECTION', l_del_details_info.LINE_DIRECTION);
893: wsh_debug_sv.log (l_module_name, 'REQUEST_DATE_TYPE_CODE', l_del_details_info.REQUEST_DATE_TYPE_CODE);
894: wsh_debug_sv.log (l_module_name, 'EARLIEST_PICKUP_DATE', l_del_details_info.EARLIEST_PICKUP_DATE);
895: wsh_debug_sv.log (l_module_name, 'LATEST_PICKUP_DATE', l_del_details_info.LATEST_PICKUP_DATE);
896: wsh_debug_sv.log (l_module_name, 'EARLIEST_DROPOFF_DATE', l_del_details_info.EARLIEST_DROPOFF_DATE);
897: wsh_debug_sv.log (l_module_name, 'LATEST_DROPOFF_DATE', l_del_details_info.LATEST_DROPOFF_DATE);
898: --}
899: END IF;
892: wsh_debug_sv.log (l_module_name, 'LINE_DIRECTION', l_del_details_info.LINE_DIRECTION);
893: wsh_debug_sv.log (l_module_name, 'REQUEST_DATE_TYPE_CODE', l_del_details_info.REQUEST_DATE_TYPE_CODE);
894: wsh_debug_sv.log (l_module_name, 'EARLIEST_PICKUP_DATE', l_del_details_info.EARLIEST_PICKUP_DATE);
895: wsh_debug_sv.log (l_module_name, 'LATEST_PICKUP_DATE', l_del_details_info.LATEST_PICKUP_DATE);
896: wsh_debug_sv.log (l_module_name, 'EARLIEST_DROPOFF_DATE', l_del_details_info.EARLIEST_DROPOFF_DATE);
897: wsh_debug_sv.log (l_module_name, 'LATEST_DROPOFF_DATE', l_del_details_info.LATEST_DROPOFF_DATE);
898: --}
899: END IF;
900:
893: wsh_debug_sv.log (l_module_name, 'REQUEST_DATE_TYPE_CODE', l_del_details_info.REQUEST_DATE_TYPE_CODE);
894: wsh_debug_sv.log (l_module_name, 'EARLIEST_PICKUP_DATE', l_del_details_info.EARLIEST_PICKUP_DATE);
895: wsh_debug_sv.log (l_module_name, 'LATEST_PICKUP_DATE', l_del_details_info.LATEST_PICKUP_DATE);
896: wsh_debug_sv.log (l_module_name, 'EARLIEST_DROPOFF_DATE', l_del_details_info.EARLIEST_DROPOFF_DATE);
897: wsh_debug_sv.log (l_module_name, 'LATEST_DROPOFF_DATE', l_del_details_info.LATEST_DROPOFF_DATE);
898: --}
899: END IF;
900:
901:
921: l_new_del_detail_id := l_detail_out_rec.detail_ids(l_index);
922:
923:
924: IF l_debug_on THEN
925: wsh_debug_sv.log (l_module_name, 'Create Shipment Lines l_new_del_detail_id,l_return_status',
926: l_new_del_detail_id||','||l_return_status);
927: END IF;
928:
929: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
931: l_loc_interface_error_rec.p_interface_table_name := 'WSH_NEW_DEL_INTERFACE';
932: l_loc_interface_error_rec.p_interface_id := p_delivery_interface_id;
933:
934: IF l_debug_on THEN
935: wsh_debug_sv.log (l_module_name, 'Delivery Interface Id', p_delivery_interface_id);
936: END IF;
937:
938: Log_Errors(
939: p_loc_interface_errors_rec => l_loc_interface_error_rec,
941: p_api_name => 'WSH_INTERFACE_PUB.Create_Shipment_lines' ,
942: x_return_status => l_return_status);
943:
944: IF l_debug_on THEN
945: wsh_debug_sv.log (l_module_name, 'Return status after log_errors', l_return_status);
946: END IF;
947: raise create_lines_failed;
948: END IF;
949:
955: raise create_lines_failed;
956: END IF;
957: ELSIF(p_action_code = 'UPDATE') THEN --}{
958: IF l_debug_on THEN
959: wsh_debug_sv.logmsg(l_module_name,'Starting Update Action');
960: END IF;
961: IF(nvl(del_det_int_rec.container_flag, 'N') = 'Y') THEN
962: -- container record
963: -- check if a container instance exists
967: FETCH cont_inst_exists INTO l_cont_inst_exists;
968: CLOSE cont_inst_exists;
969:
970: IF l_debug_on THEN
971: wsh_debug_sv.log (l_module_name, 'Container Instance Check', l_cont_inst_exists);
972: END IF;
973:
974: IF(nvl(l_cont_inst_exists, -9999) = 1) THEN
975: -- Just add to the global update table.
999: p_caller => 'WSH');
1000: --
1001: --
1002: IF l_debug_on THEN
1003: WSH_DEBUG_SV.log(l_module_name,'return status',l_return_status);
1004: WSH_DEBUG_SV.log(l_module_name,'count of l_cont_tab',l_cont_tab.count);
1005: END IF;
1006: l_cont_instance_id := l_cont_tab(1);
1007: -- K LPN CONV. rv
1000: --
1001: --
1002: IF l_debug_on THEN
1003: WSH_DEBUG_SV.log(l_module_name,'return status',l_return_status);
1004: WSH_DEBUG_SV.log(l_module_name,'count of l_cont_tab',l_cont_tab.count);
1005: END IF;
1006: l_cont_instance_id := l_cont_tab(1);
1007: -- K LPN CONV. rv
1008: --
1017: x_row_id => l_row_id,
1018: x_return_status => l_return_status);
1019:
1020: IF l_debug_on THEN
1021: wsh_debug_sv.log (l_module_name, 'Create_Container_Instance l_cont_instance_id,
1022: l_return_status',l_cont_instance_id||','||l_return_status);
1023: END IF;
1024: */
1025:
1065: p_delivery_id => l_delivery_id,
1066: x_return_status => l_return_status);
1067:
1068: IF l_debug_on THEN
1069: wsh_debug_sv.log (l_module_name, 'Add_To_Update_Table l_return_status',l_return_status);
1070: END IF;
1071:
1072: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1073: raise add_to_update_failed;
1079: WHERE delivery_detail_interface_id = del_det_int_rec.delivery_detail_interface_id
1080: AND INTERFACE_ACTION_CODE = '94X_INBOUND';
1081:
1082: IF l_debug_on THEN
1083: wsh_debug_sv.log (l_module_name, 'Interface freight count', l_det_freight_costs);
1084: END IF;
1085:
1086: IF(l_det_freight_costs > 0 ) THEN
1087: Process_Int_Freight_Costs(
1088: p_del_detail_interface_id => del_det_int_rec.delivery_detail_interface_id,
1089: x_return_status => l_return_status);
1090:
1091: IF l_debug_on THEN
1092: wsh_debug_sv.log (l_module_name,'Return status from Process Int Freight Costs',l_return_status);
1093: END IF;
1094:
1095: IF( l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1096: raise freight_cost_processing_error;
1103: END LOOP; -- for det_id
1104:
1105: -- For the newly created delivery details, call detail_to_delivery to assign them to delivery
1106: IF l_debug_on THEN
1107: wsh_debug_sv.log (l_module_name, 'Assign table count', l_new_detail_ids.count);
1108: END IF;
1109:
1110: IF(l_new_detail_ids.count > 0) THEN
1111: WSH_DELIVERY_DETAILS_GRP.Detail_To_Delivery(
1122: p_delivery_name => l_delivery_name
1123: );
1124:
1125: IF l_debug_on THEN
1126: wsh_debug_sv.log (l_module_name, 'Return status from Detail to delivery', l_return_status);
1127: wsh_debug_sv.log (l_module_name, 'Detail to Delivery api msg count', l_msg_count);
1128: wsh_debug_sv.log (l_module_name, 'Detail to Delivery api msg data', l_msg_data);
1129: END IF;
1130:
1123: );
1124:
1125: IF l_debug_on THEN
1126: wsh_debug_sv.log (l_module_name, 'Return status from Detail to delivery', l_return_status);
1127: wsh_debug_sv.log (l_module_name, 'Detail to Delivery api msg count', l_msg_count);
1128: wsh_debug_sv.log (l_module_name, 'Detail to Delivery api msg data', l_msg_data);
1129: END IF;
1130:
1131: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1124:
1125: IF l_debug_on THEN
1126: wsh_debug_sv.log (l_module_name, 'Return status from Detail to delivery', l_return_status);
1127: wsh_debug_sv.log (l_module_name, 'Detail to Delivery api msg count', l_msg_count);
1128: wsh_debug_sv.log (l_module_name, 'Detail to Delivery api msg data', l_msg_data);
1129: END IF;
1130:
1131: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1132: raise new_assignment_failed;
1133: END IF;
1134: END IF;
1135:
1136: IF l_debug_on THEN
1137: wsh_debug_sv.pop(l_module_name);
1138: END IF;
1139: EXCEPTION
1140: WHEN FND_API.G_EXC_ERROR THEN
1141: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1139: EXCEPTION
1140: WHEN FND_API.G_EXC_ERROR THEN
1141: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1142: IF l_debug_on THEN
1143: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1144: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION: FND_API.G_EXC_ERROR');
1145: END IF;
1146: WHEN create_cont_instance_failed THEN
1147: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1140: WHEN FND_API.G_EXC_ERROR THEN
1141: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1142: IF l_debug_on THEN
1143: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1144: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION: FND_API.G_EXC_ERROR');
1145: END IF;
1146: WHEN create_cont_instance_failed THEN
1147: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1148: IF l_debug_on THEN
1145: END IF;
1146: WHEN create_cont_instance_failed THEN
1147: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1148: IF l_debug_on THEN
1149: WSH_DEBUG_SV.logmsg(l_module_name,'create_cont_instance_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1150: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:create_cont_instance_failed');
1151: END IF;
1152: WHEN invalid_input THEN
1153: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1146: WHEN create_cont_instance_failed THEN
1147: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1148: IF l_debug_on THEN
1149: WSH_DEBUG_SV.logmsg(l_module_name,'create_cont_instance_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1150: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:create_cont_instance_failed');
1151: END IF;
1152: WHEN invalid_input THEN
1153: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1154: IF l_debug_on THEN
1151: END IF;
1152: WHEN invalid_input THEN
1153: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1154: IF l_debug_on THEN
1155: WSH_DEBUG_SV.logmsg(l_module_name,'invalid_input exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1156: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:invalid_input');
1157: END IF;
1158: WHEN create_lines_failed THEN
1159: FND_MESSAGE.SET_NAME('WSH', 'WSH_CREATE_LINES_FAILED');
1152: WHEN invalid_input THEN
1153: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1154: IF l_debug_on THEN
1155: WSH_DEBUG_SV.logmsg(l_module_name,'invalid_input exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1156: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:invalid_input');
1157: END IF;
1158: WHEN create_lines_failed THEN
1159: FND_MESSAGE.SET_NAME('WSH', 'WSH_CREATE_LINES_FAILED');
1160: FND_MESSAGE.SET_TOKEN('DET_INT',del_det_int_rec.delivery_detail_interface_id);
1159: FND_MESSAGE.SET_NAME('WSH', 'WSH_CREATE_LINES_FAILED');
1160: FND_MESSAGE.SET_TOKEN('DET_INT',del_det_int_rec.delivery_detail_interface_id);
1161: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1162: IF l_debug_on THEN
1163: WSH_DEBUG_SV.logmsg(l_module_name,'create_lines_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1164: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:create_lines_failed');
1165: END IF;
1166: WHEN new_assignment_failed THEN
1167: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSGN_ERROR');
1160: FND_MESSAGE.SET_TOKEN('DET_INT',del_det_int_rec.delivery_detail_interface_id);
1161: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1162: IF l_debug_on THEN
1163: WSH_DEBUG_SV.logmsg(l_module_name,'create_lines_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1164: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:create_lines_failed');
1165: END IF;
1166: WHEN new_assignment_failed THEN
1167: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSGN_ERROR');
1168: FND_MESSAGE.SET_TOKEN('DLVY', p_new_delivery_id);
1167: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSGN_ERROR');
1168: FND_MESSAGE.SET_TOKEN('DLVY', p_new_delivery_id);
1169: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1170: IF l_debug_on THEN
1171: WSH_DEBUG_SV.logmsg(l_module_name,'new_assignment_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1172: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:new_assignment_failed');
1173: END IF;
1174: WHEN freight_cost_processing_error THEN
1175: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1168: FND_MESSAGE.SET_TOKEN('DLVY', p_new_delivery_id);
1169: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1170: IF l_debug_on THEN
1171: WSH_DEBUG_SV.logmsg(l_module_name,'new_assignment_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1172: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:new_assignment_failed');
1173: END IF;
1174: WHEN freight_cost_processing_error THEN
1175: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1176: IF l_debug_on THEN
1173: END IF;
1174: WHEN freight_cost_processing_error THEN
1175: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1176: IF l_debug_on THEN
1177: WSH_DEBUG_SV.logmsg(l_module_name,'freight_cost_processing_error exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1178: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:freight_cost_processing_error');
1179: END IF;
1180: WHEN Others THEN
1181: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1174: WHEN freight_cost_processing_error THEN
1175: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1176: IF l_debug_on THEN
1177: WSH_DEBUG_SV.logmsg(l_module_name,'freight_cost_processing_error exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1178: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:freight_cost_processing_error');
1179: END IF;
1180: WHEN Others THEN
1181: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1182: IF l_debug_on THEN
1179: END IF;
1180: WHEN Others THEN
1181: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1182: IF l_debug_on THEN
1183: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
1184: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1185: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1186: END IF;
1187: END Process_Non_Splits;
1180: WHEN Others THEN
1181: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1182: IF l_debug_on THEN
1183: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
1184: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1185: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1186: END IF;
1187: END Process_Non_Splits;
1188:
1181: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1182: IF l_debug_on THEN
1183: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
1184: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1185: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1186: END IF;
1187: END Process_Non_Splits;
1188:
1189: PROCEDURE process_splits(
1236: l_debug_on := wsh_debug_interface.g_debug;
1237:
1238: --
1239: IF l_debug_on IS NULL THEN
1240: l_debug_on := wsh_debug_sv.is_debug_enabled;
1241: END IF;
1242:
1243: --
1244: IF l_debug_on THEN
1241: END IF;
1242:
1243: --
1244: IF l_debug_on THEN
1245: wsh_debug_sv.push(l_module_name, 'Process_Splits');
1246: wsh_debug_sv.LOG(l_module_name, 'Delivery Interface Id',
1247: p_delivery_interface_id);
1248: wsh_debug_sv.LOG(l_module_name, 'Delivery Id', p_delivery_id);
1249: END IF;
1242:
1243: --
1244: IF l_debug_on THEN
1245: wsh_debug_sv.push(l_module_name, 'Process_Splits');
1246: wsh_debug_sv.LOG(l_module_name, 'Delivery Interface Id',
1247: p_delivery_interface_id);
1248: wsh_debug_sv.LOG(l_module_name, 'Delivery Id', p_delivery_id);
1249: END IF;
1250:
1244: IF l_debug_on THEN
1245: wsh_debug_sv.push(l_module_name, 'Process_Splits');
1246: wsh_debug_sv.LOG(l_module_name, 'Delivery Interface Id',
1247: p_delivery_interface_id);
1248: wsh_debug_sv.LOG(l_module_name, 'Delivery Id', p_delivery_id);
1249: END IF;
1250:
1251: x_return_status := wsh_util_core.g_ret_sts_success;
1252:
1267: if those records have distinct source_line_id, then split. */
1268:
1269: FOR del_det_int_rec IN del_det_int_cur(NULL, p_delivery_interface_id) LOOP
1270: IF l_debug_on THEN
1271: wsh_debug_sv.LOG(l_module_name, 'l_src_line_count',
1272: l_src_line_count);
1273: wsh_debug_sv.LOG(l_module_name, 'l_dd_count', l_dd_count);
1274: wsh_debug_sv.log(l_module_name, 'Current Delivery_Detail_Id', del_det_int_rec.delivery_detail_id);
1275: wsh_debug_sv.log(l_module_name, 'Current del.detail_int_id', del_det_int_rec.delivery_detail_interface_id);
1269: FOR del_det_int_rec IN del_det_int_cur(NULL, p_delivery_interface_id) LOOP
1270: IF l_debug_on THEN
1271: wsh_debug_sv.LOG(l_module_name, 'l_src_line_count',
1272: l_src_line_count);
1273: wsh_debug_sv.LOG(l_module_name, 'l_dd_count', l_dd_count);
1274: wsh_debug_sv.log(l_module_name, 'Current Delivery_Detail_Id', del_det_int_rec.delivery_detail_id);
1275: wsh_debug_sv.log(l_module_name, 'Current del.detail_int_id', del_det_int_rec.delivery_detail_interface_id);
1276: wsh_debug_sv.log(l_module_name, 'Previous Delivery_detail_id', l_prev_int_rec.delivery_detail_id);
1277: wsh_debug_sv.log(l_module_name, 'Previous del.detail_int_id', l_prev_int_rec.delivery_detail_interface_id);
1270: IF l_debug_on THEN
1271: wsh_debug_sv.LOG(l_module_name, 'l_src_line_count',
1272: l_src_line_count);
1273: wsh_debug_sv.LOG(l_module_name, 'l_dd_count', l_dd_count);
1274: wsh_debug_sv.log(l_module_name, 'Current Delivery_Detail_Id', del_det_int_rec.delivery_detail_id);
1275: wsh_debug_sv.log(l_module_name, 'Current del.detail_int_id', del_det_int_rec.delivery_detail_interface_id);
1276: wsh_debug_sv.log(l_module_name, 'Previous Delivery_detail_id', l_prev_int_rec.delivery_detail_id);
1277: wsh_debug_sv.log(l_module_name, 'Previous del.detail_int_id', l_prev_int_rec.delivery_detail_interface_id);
1278: wsh_debug_sv.log(l_module_name, 'Total req qty', l_total_req_qty);
1271: wsh_debug_sv.LOG(l_module_name, 'l_src_line_count',
1272: l_src_line_count);
1273: wsh_debug_sv.LOG(l_module_name, 'l_dd_count', l_dd_count);
1274: wsh_debug_sv.log(l_module_name, 'Current Delivery_Detail_Id', del_det_int_rec.delivery_detail_id);
1275: wsh_debug_sv.log(l_module_name, 'Current del.detail_int_id', del_det_int_rec.delivery_detail_interface_id);
1276: wsh_debug_sv.log(l_module_name, 'Previous Delivery_detail_id', l_prev_int_rec.delivery_detail_id);
1277: wsh_debug_sv.log(l_module_name, 'Previous del.detail_int_id', l_prev_int_rec.delivery_detail_interface_id);
1278: wsh_debug_sv.log(l_module_name, 'Total req qty', l_total_req_qty);
1279: wsh_debug_sv.log(l_module_name, 'Total shp qty', l_total_shp_qty);
1272: l_src_line_count);
1273: wsh_debug_sv.LOG(l_module_name, 'l_dd_count', l_dd_count);
1274: wsh_debug_sv.log(l_module_name, 'Current Delivery_Detail_Id', del_det_int_rec.delivery_detail_id);
1275: wsh_debug_sv.log(l_module_name, 'Current del.detail_int_id', del_det_int_rec.delivery_detail_interface_id);
1276: wsh_debug_sv.log(l_module_name, 'Previous Delivery_detail_id', l_prev_int_rec.delivery_detail_id);
1277: wsh_debug_sv.log(l_module_name, 'Previous del.detail_int_id', l_prev_int_rec.delivery_detail_interface_id);
1278: wsh_debug_sv.log(l_module_name, 'Total req qty', l_total_req_qty);
1279: wsh_debug_sv.log(l_module_name, 'Total shp qty', l_total_shp_qty);
1280: wsh_debug_sv.log(l_module_name, 'total cc qty', l_total_cc_qty);
1273: wsh_debug_sv.LOG(l_module_name, 'l_dd_count', l_dd_count);
1274: wsh_debug_sv.log(l_module_name, 'Current Delivery_Detail_Id', del_det_int_rec.delivery_detail_id);
1275: wsh_debug_sv.log(l_module_name, 'Current del.detail_int_id', del_det_int_rec.delivery_detail_interface_id);
1276: wsh_debug_sv.log(l_module_name, 'Previous Delivery_detail_id', l_prev_int_rec.delivery_detail_id);
1277: wsh_debug_sv.log(l_module_name, 'Previous del.detail_int_id', l_prev_int_rec.delivery_detail_interface_id);
1278: wsh_debug_sv.log(l_module_name, 'Total req qty', l_total_req_qty);
1279: wsh_debug_sv.log(l_module_name, 'Total shp qty', l_total_shp_qty);
1280: wsh_debug_sv.log(l_module_name, 'total cc qty', l_total_cc_qty);
1281: END IF;
1274: wsh_debug_sv.log(l_module_name, 'Current Delivery_Detail_Id', del_det_int_rec.delivery_detail_id);
1275: wsh_debug_sv.log(l_module_name, 'Current del.detail_int_id', del_det_int_rec.delivery_detail_interface_id);
1276: wsh_debug_sv.log(l_module_name, 'Previous Delivery_detail_id', l_prev_int_rec.delivery_detail_id);
1277: wsh_debug_sv.log(l_module_name, 'Previous del.detail_int_id', l_prev_int_rec.delivery_detail_interface_id);
1278: wsh_debug_sv.log(l_module_name, 'Total req qty', l_total_req_qty);
1279: wsh_debug_sv.log(l_module_name, 'Total shp qty', l_total_shp_qty);
1280: wsh_debug_sv.log(l_module_name, 'total cc qty', l_total_cc_qty);
1281: END IF;
1282:
1275: wsh_debug_sv.log(l_module_name, 'Current del.detail_int_id', del_det_int_rec.delivery_detail_interface_id);
1276: wsh_debug_sv.log(l_module_name, 'Previous Delivery_detail_id', l_prev_int_rec.delivery_detail_id);
1277: wsh_debug_sv.log(l_module_name, 'Previous del.detail_int_id', l_prev_int_rec.delivery_detail_interface_id);
1278: wsh_debug_sv.log(l_module_name, 'Total req qty', l_total_req_qty);
1279: wsh_debug_sv.log(l_module_name, 'Total shp qty', l_total_shp_qty);
1280: wsh_debug_sv.log(l_module_name, 'total cc qty', l_total_cc_qty);
1281: END IF;
1282:
1283: IF NVL(l_prev_int_rec.delivery_detail_id, '-9999') =
1276: wsh_debug_sv.log(l_module_name, 'Previous Delivery_detail_id', l_prev_int_rec.delivery_detail_id);
1277: wsh_debug_sv.log(l_module_name, 'Previous del.detail_int_id', l_prev_int_rec.delivery_detail_interface_id);
1278: wsh_debug_sv.log(l_module_name, 'Total req qty', l_total_req_qty);
1279: wsh_debug_sv.log(l_module_name, 'Total shp qty', l_total_shp_qty);
1280: wsh_debug_sv.log(l_module_name, 'total cc qty', l_total_cc_qty);
1281: END IF;
1282:
1283: IF NVL(l_prev_int_rec.delivery_detail_id, '-9999') =
1284: del_det_int_rec.delivery_detail_id THEN
1282:
1283: IF NVL(l_prev_int_rec.delivery_detail_id, '-9999') =
1284: del_det_int_rec.delivery_detail_id THEN
1285: if l_debug_on then
1286: wsh_debug_sv.logmsg(l_module_name, 'Same Delivery Detail');
1287: end if;
1288: l_dd_count := l_dd_count + 1;
1289:
1290: IF NVL(l_prev_int_rec.source_line_id, '-9999') =
1289:
1290: IF NVL(l_prev_int_rec.source_line_id, '-9999') =
1291: del_det_int_rec.source_line_id THEN
1292: if l_debug_on then
1293: wsh_debug_sv.logmsg(l_module_name, 'Same Source Line');
1294: end if;
1295: NULL;
1296: ELSE
1297: -- split dd
1306:
1307: -- For the newly created base delivery detail, make updates
1308: -- Add the record with new detail id to the global table
1309: if l_debug_on then
1310: wsh_debug_sv.log(l_module_name, 'l_new_split_detail_id', l_new_split_detail_id);
1311: end if;
1312:
1313: If l_new_split_detail_id IS NOT NULL THEN
1314: l_prev_int_rec.delivery_detail_id := l_new_split_detail_id;
1358:
1359: -- For the newly created base delivery detail, make updates
1360: -- Add the record with new detail id to the global table
1361: if l_debug_on then
1362: wsh_debug_sv.log(l_module_name, 'l_new_split_detail_id', l_new_split_detail_id);
1363: end if;
1364:
1365: If l_new_split_detail_id IS NOT NULL THEN
1366: l_prev_int_rec.delivery_detail_id := l_new_split_detail_id;
1409: OPEN c_det_count_cur(del_det_int_rec.delivery_detail_id, p_delivery_interface_id);
1410: FETCH c_det_count_cur INTO l_num_of_dtl;
1411: CLOSE c_det_count_cur;
1412: if l_debug_on THEN
1413: wsh_debug_sv.log(l_module_name, 'l_num_of_dtl', l_num_of_dtl);
1414: end if;
1415: IF l_num_of_dtl = 1 THEN
1416: goto detail_loop_end;
1417: END IF;
1431:
1432: --
1433: IF del_det_int_rec.serial_number IS NOT NULL THEN
1434: IF l_debug_on THEN
1435: wsh_debug_sv.logmsg(l_module_name,
1436: 'Adding serial number to serial table');
1437: END IF;
1438:
1439: l_ser_count := l_serial_range_tab.COUNT;
1458: del_det_int_rec.delivery_detail_interface_id
1459: AND INTERFACE_ACTION_CODE = '94X_INBOUND';
1460:
1461: IF l_debug_on THEN
1462: wsh_debug_sv.LOG(l_module_name, 'Interface freight count',
1463: l_det_freight_costs);
1464: END IF;
1465:
1466: IF (l_det_freight_costs > 0) THEN
1464: END IF;
1465:
1466: IF (l_det_freight_costs > 0) THEN
1467: IF l_debug_on THEN
1468: wsh_debug_sv.LOG(l_module_name,
1469: 'Processing freight costs for interface detail',
1470: del_det_int_rec.delivery_detail_interface_id);
1471: END IF;
1472:
1473: process_int_freight_costs(p_del_detail_interface_id => del_det_int_rec.delivery_detail_interface_id,
1474: x_return_status => l_return_status);
1475:
1476: IF l_debug_on THEN
1477: wsh_debug_sv.LOG(l_module_name,
1478: 'Process_Int_Freight_Costs l_return_status', l_return_status);
1479: END IF;
1480:
1481: IF (l_return_status <> wsh_util_core.g_ret_sts_success) THEN
1488:
1489: END LOOP; -- for del_det_int_rec in cursor
1490:
1491: IF l_debug_on THEN
1492: wsh_debug_sv.logmsg(l_module_name, 'Outside the Loop');
1493: wsh_debug_sv.LOG(l_module_name, 'l_src_line_count', l_src_line_count);
1494: wsh_debug_sv.LOG(l_module_name, 'l_dd_count', l_dd_count);
1495: wsh_debug_sv.log(l_module_name, 'Total req qty', l_total_req_qty);
1496: wsh_debug_sv.log(l_module_name, 'Total shp qty', l_total_shp_qty);
1489: END LOOP; -- for del_det_int_rec in cursor
1490:
1491: IF l_debug_on THEN
1492: wsh_debug_sv.logmsg(l_module_name, 'Outside the Loop');
1493: wsh_debug_sv.LOG(l_module_name, 'l_src_line_count', l_src_line_count);
1494: wsh_debug_sv.LOG(l_module_name, 'l_dd_count', l_dd_count);
1495: wsh_debug_sv.log(l_module_name, 'Total req qty', l_total_req_qty);
1496: wsh_debug_sv.log(l_module_name, 'Total shp qty', l_total_shp_qty);
1497: wsh_debug_sv.log(l_module_name, 'total cc qty', l_total_cc_qty);
1490:
1491: IF l_debug_on THEN
1492: wsh_debug_sv.logmsg(l_module_name, 'Outside the Loop');
1493: wsh_debug_sv.LOG(l_module_name, 'l_src_line_count', l_src_line_count);
1494: wsh_debug_sv.LOG(l_module_name, 'l_dd_count', l_dd_count);
1495: wsh_debug_sv.log(l_module_name, 'Total req qty', l_total_req_qty);
1496: wsh_debug_sv.log(l_module_name, 'Total shp qty', l_total_shp_qty);
1497: wsh_debug_sv.log(l_module_name, 'total cc qty', l_total_cc_qty);
1498: END IF;
1491: IF l_debug_on THEN
1492: wsh_debug_sv.logmsg(l_module_name, 'Outside the Loop');
1493: wsh_debug_sv.LOG(l_module_name, 'l_src_line_count', l_src_line_count);
1494: wsh_debug_sv.LOG(l_module_name, 'l_dd_count', l_dd_count);
1495: wsh_debug_sv.log(l_module_name, 'Total req qty', l_total_req_qty);
1496: wsh_debug_sv.log(l_module_name, 'Total shp qty', l_total_shp_qty);
1497: wsh_debug_sv.log(l_module_name, 'total cc qty', l_total_cc_qty);
1498: END IF;
1499:
1492: wsh_debug_sv.logmsg(l_module_name, 'Outside the Loop');
1493: wsh_debug_sv.LOG(l_module_name, 'l_src_line_count', l_src_line_count);
1494: wsh_debug_sv.LOG(l_module_name, 'l_dd_count', l_dd_count);
1495: wsh_debug_sv.log(l_module_name, 'Total req qty', l_total_req_qty);
1496: wsh_debug_sv.log(l_module_name, 'Total shp qty', l_total_shp_qty);
1497: wsh_debug_sv.log(l_module_name, 'total cc qty', l_total_cc_qty);
1498: END IF;
1499:
1500: IF l_src_line_count > 1 THEN
1493: wsh_debug_sv.LOG(l_module_name, 'l_src_line_count', l_src_line_count);
1494: wsh_debug_sv.LOG(l_module_name, 'l_dd_count', l_dd_count);
1495: wsh_debug_sv.log(l_module_name, 'Total req qty', l_total_req_qty);
1496: wsh_debug_sv.log(l_module_name, 'Total shp qty', l_total_shp_qty);
1497: wsh_debug_sv.log(l_module_name, 'total cc qty', l_total_cc_qty);
1498: END IF;
1499:
1500: IF l_src_line_count > 1 THEN
1501: split_delivery_detail(
1511:
1512: -- For the newly created base delivery detail, make updates
1513: -- Add the record with new detail id to the global table
1514: if l_debug_on then
1515: wsh_debug_sv.log(l_module_name, 'l_new_split_detail_id', l_new_split_detail_id);
1516: end if;
1517: If l_new_split_detail_id IS NOT NULL THEN
1518: l_prev_int_rec.delivery_detail_id := l_new_split_detail_id;
1519: end if;
1551: l_serial_range_tab.delete;
1552: END IF;
1553:
1554: IF l_debug_on THEN
1555: wsh_debug_sv.pop(l_module_name);
1556: END IF;
1557:
1558: EXCEPTION
1559: WHEN fnd_api.g_exc_error THEN
1559: WHEN fnd_api.g_exc_error THEN
1560: x_return_status := fnd_api.g_ret_sts_error;
1561: --
1562: IF l_debug_on THEN
1563: wsh_debug_sv.logmsg(l_module_name,
1564: 'FND_API.G_EXC_ERROR exception has occured.',
1565: wsh_debug_sv.c_excep_level);
1566: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
1567: END IF;
1561: --
1562: IF l_debug_on THEN
1563: wsh_debug_sv.logmsg(l_module_name,
1564: 'FND_API.G_EXC_ERROR exception has occured.',
1565: wsh_debug_sv.c_excep_level);
1566: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
1567: END IF;
1568: --
1569: --
1562: IF l_debug_on THEN
1563: wsh_debug_sv.logmsg(l_module_name,
1564: 'FND_API.G_EXC_ERROR exception has occured.',
1565: wsh_debug_sv.c_excep_level);
1566: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
1567: END IF;
1568: --
1569: --
1570: WHEN fnd_api.g_exc_unexpected_error THEN
1570: WHEN fnd_api.g_exc_unexpected_error THEN
1571: x_return_status := fnd_api.g_ret_sts_unexp_error;
1572: --
1573: IF l_debug_on THEN
1574: wsh_debug_sv.logmsg(l_module_name,
1575: 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',
1576: wsh_debug_sv.c_excep_level);
1577: wsh_debug_sv.pop(l_module_name,
1578: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1572: --
1573: IF l_debug_on THEN
1574: wsh_debug_sv.logmsg(l_module_name,
1575: 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',
1576: wsh_debug_sv.c_excep_level);
1577: wsh_debug_sv.pop(l_module_name,
1578: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1579: END IF;
1580: --
1573: IF l_debug_on THEN
1574: wsh_debug_sv.logmsg(l_module_name,
1575: 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',
1576: wsh_debug_sv.c_excep_level);
1577: wsh_debug_sv.pop(l_module_name,
1578: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1579: END IF;
1580: --
1581: WHEN wsh_util_core.g_exc_warning THEN
1581: WHEN wsh_util_core.g_exc_warning THEN
1582: x_return_status := wsh_util_core.g_ret_sts_warning;
1583: --
1584: IF l_debug_on THEN
1585: wsh_debug_sv.logmsg(l_module_name,
1586: 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',
1587: wsh_debug_sv.c_excep_level);
1588: wsh_debug_sv.pop(l_module_name,
1589: 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1583: --
1584: IF l_debug_on THEN
1585: wsh_debug_sv.logmsg(l_module_name,
1586: 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',
1587: wsh_debug_sv.c_excep_level);
1588: wsh_debug_sv.pop(l_module_name,
1589: 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1590: END IF;
1591: --
1584: IF l_debug_on THEN
1585: wsh_debug_sv.logmsg(l_module_name,
1586: 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',
1587: wsh_debug_sv.c_excep_level);
1588: wsh_debug_sv.pop(l_module_name,
1589: 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1590: END IF;
1591: --
1592: WHEN invalid_input THEN
1592: WHEN invalid_input THEN
1593: x_return_status := wsh_util_core.g_ret_sts_error;
1594:
1595: IF l_debug_on THEN
1596: wsh_debug_sv.logmsg(l_module_name,
1597: 'invalid_input exception has occured.',
1598: wsh_debug_sv.c_excep_level);
1599: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:invalid_input');
1600: END IF;
1594:
1595: IF l_debug_on THEN
1596: wsh_debug_sv.logmsg(l_module_name,
1597: 'invalid_input exception has occured.',
1598: wsh_debug_sv.c_excep_level);
1599: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:invalid_input');
1600: END IF;
1601: WHEN freight_cost_processing_error THEN
1602: x_return_status := wsh_util_core.g_ret_sts_error;
1595: IF l_debug_on THEN
1596: wsh_debug_sv.logmsg(l_module_name,
1597: 'invalid_input exception has occured.',
1598: wsh_debug_sv.c_excep_level);
1599: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:invalid_input');
1600: END IF;
1601: WHEN freight_cost_processing_error THEN
1602: x_return_status := wsh_util_core.g_ret_sts_error;
1603:
1601: WHEN freight_cost_processing_error THEN
1602: x_return_status := wsh_util_core.g_ret_sts_error;
1603:
1604: IF l_debug_on THEN
1605: wsh_debug_sv.logmsg(l_module_name,
1606: 'freight_cost_processing_error exception has occured.',
1607: wsh_debug_sv.c_excep_level);
1608: wsh_debug_sv.pop(l_module_name,
1609: 'EXCEPTION:freight_cost_processing_error');
1603:
1604: IF l_debug_on THEN
1605: wsh_debug_sv.logmsg(l_module_name,
1606: 'freight_cost_processing_error exception has occured.',
1607: wsh_debug_sv.c_excep_level);
1608: wsh_debug_sv.pop(l_module_name,
1609: 'EXCEPTION:freight_cost_processing_error');
1610: END IF;
1611: WHEN OTHERS THEN
1604: IF l_debug_on THEN
1605: wsh_debug_sv.logmsg(l_module_name,
1606: 'freight_cost_processing_error exception has occured.',
1607: wsh_debug_sv.c_excep_level);
1608: wsh_debug_sv.pop(l_module_name,
1609: 'EXCEPTION:freight_cost_processing_error');
1610: END IF;
1611: WHEN OTHERS THEN
1612: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
1611: WHEN OTHERS THEN
1612: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
1613:
1614: IF l_debug_on THEN
1615: wsh_debug_sv.logmsg(l_module_name,
1616: 'Unexpected error has occured. Oracle error message is '
1617: || SQLERRM,
1618: wsh_debug_sv.c_unexpec_err_level);
1619: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
1614: IF l_debug_on THEN
1615: wsh_debug_sv.logmsg(l_module_name,
1616: 'Unexpected error has occured. Oracle error message is '
1617: || SQLERRM,
1618: wsh_debug_sv.c_unexpec_err_level);
1619: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
1620: END IF;
1621: END process_splits;
1622:
1615: wsh_debug_sv.logmsg(l_module_name,
1616: 'Unexpected error has occured. Oracle error message is '
1617: || SQLERRM,
1618: wsh_debug_sv.c_unexpec_err_level);
1619: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
1620: END IF;
1621: END process_splits;
1622:
1623:
1641: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1642: --
1643: IF l_debug_on IS NULL
1644: THEN
1645: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1646: END IF;
1647: --
1648: IF l_debug_on THEN
1649: wsh_debug_sv.push(l_module_name, 'Pack_Lines');
1645: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1646: END IF;
1647: --
1648: IF l_debug_on THEN
1649: wsh_debug_sv.push(l_module_name, 'Pack_Lines');
1650: wsh_debug_sv.log (l_module_name, 'Packing Table Count', G_Packing_Detail_Tab.count);
1651: END IF;
1652:
1653: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1646: END IF;
1647: --
1648: IF l_debug_on THEN
1649: wsh_debug_sv.push(l_module_name, 'Pack_Lines');
1650: wsh_debug_sv.log (l_module_name, 'Packing Table Count', G_Packing_Detail_Tab.count);
1651: END IF;
1652:
1653: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1654:
1658: l_del_detail_tab(1) := G_Packing_Detail_Tab(i).Delivery_Detail_Id;
1659: -- call packing api
1660:
1661: IF l_debug_on THEN
1662: wsh_debug_sv.logmsg(l_module_name, 'calling container_actions.assign_detail');
1663: wsh_debug_sv.log (l_module_name, 'Delivery detail id', G_Packing_Detail_Tab(i).Delivery_Detail_Id);
1664: wsh_debug_sv.log (l_module_name, 'Container instance id', G_Packing_Detail_Tab(i).Parent_Delivery_Detail_Id);
1665: END IF;
1666:
1659: -- call packing api
1660:
1661: IF l_debug_on THEN
1662: wsh_debug_sv.logmsg(l_module_name, 'calling container_actions.assign_detail');
1663: wsh_debug_sv.log (l_module_name, 'Delivery detail id', G_Packing_Detail_Tab(i).Delivery_Detail_Id);
1664: wsh_debug_sv.log (l_module_name, 'Container instance id', G_Packing_Detail_Tab(i).Parent_Delivery_Detail_Id);
1665: END IF;
1666:
1667: WSH_CONTAINER_ACTIONS.Assign_Detail(
1660:
1661: IF l_debug_on THEN
1662: wsh_debug_sv.logmsg(l_module_name, 'calling container_actions.assign_detail');
1663: wsh_debug_sv.log (l_module_name, 'Delivery detail id', G_Packing_Detail_Tab(i).Delivery_Detail_Id);
1664: wsh_debug_sv.log (l_module_name, 'Container instance id', G_Packing_Detail_Tab(i).Parent_Delivery_Detail_Id);
1665: END IF;
1666:
1667: WSH_CONTAINER_ACTIONS.Assign_Detail(
1668: p_container_instance_id => G_Packing_Detail_Tab(i).Parent_Delivery_Detail_Id,
1670: x_pack_status => l_pack_status,
1671: x_return_status => l_return_status);
1672:
1673: IF l_debug_on THEN
1674: wsh_debug_sv.log (l_module_name,'Return Status from Assign_Detail', l_return_status);
1675: END IF;
1676:
1677: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1678: FND_MESSAGE.SET_NAME('WSH','WSH_PACKING_ERROR');
1681: END IF;
1682: END LOOP; -- for i in 1..G_Packing
1683:
1684: IF l_debug_on THEN
1685: wsh_debug_sv.pop(l_module_name);
1686: END IF;
1687:
1688: EXCEPTION
1689: WHEN packing_failed THEN
1688: EXCEPTION
1689: WHEN packing_failed THEN
1690: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1691: IF l_debug_on THEN
1692: WSH_DEBUG_SV.logmsg(l_module_name,'packing_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1693: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:packing_failed');
1694: END IF;
1695: WHEN Others THEN
1696: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1689: WHEN packing_failed THEN
1690: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1691: IF l_debug_on THEN
1692: WSH_DEBUG_SV.logmsg(l_module_name,'packing_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1693: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:packing_failed');
1694: END IF;
1695: WHEN Others THEN
1696: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1697: IF l_debug_on THEN
1694: END IF;
1695: WHEN Others THEN
1696: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1697: IF l_debug_on THEN
1698: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
1699: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1700: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1701: END IF;
1702:
1695: WHEN Others THEN
1696: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1697: IF l_debug_on THEN
1698: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
1699: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1700: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1701: END IF;
1702:
1703: END Pack_Lines;
1696: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1697: IF l_debug_on THEN
1698: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
1699: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1700: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1701: END IF;
1702:
1703: END Pack_Lines;
1704:
1942: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1943: --
1944: IF l_debug_on IS NULL
1945: THEN
1946: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1947: END IF;
1948: --
1949: IF l_debug_on THEN
1950: wsh_debug_sv.push(l_module_name,'Process_Interfaced_Deliveries');
1946: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1947: END IF;
1948: --
1949: IF l_debug_on THEN
1950: wsh_debug_sv.push(l_module_name,'Process_Interfaced_Deliveries');
1951: wsh_debug_sv.log (l_module_name,'Delivery interface Id', p_delivery_interface_id);
1952: wsh_debug_sv.log (l_module_name,'Action Code', p_action_code);
1953: wsh_debug_sv.log (l_module_name, 'Warehouse type', WSH_INBOUND_SHIP_ADVICE_PKG.G_WAREHOUSE_TYPE);
1954: END IF;
1947: END IF;
1948: --
1949: IF l_debug_on THEN
1950: wsh_debug_sv.push(l_module_name,'Process_Interfaced_Deliveries');
1951: wsh_debug_sv.log (l_module_name,'Delivery interface Id', p_delivery_interface_id);
1952: wsh_debug_sv.log (l_module_name,'Action Code', p_action_code);
1953: wsh_debug_sv.log (l_module_name, 'Warehouse type', WSH_INBOUND_SHIP_ADVICE_PKG.G_WAREHOUSE_TYPE);
1954: END IF;
1955:
1948: --
1949: IF l_debug_on THEN
1950: wsh_debug_sv.push(l_module_name,'Process_Interfaced_Deliveries');
1951: wsh_debug_sv.log (l_module_name,'Delivery interface Id', p_delivery_interface_id);
1952: wsh_debug_sv.log (l_module_name,'Action Code', p_action_code);
1953: wsh_debug_sv.log (l_module_name, 'Warehouse type', WSH_INBOUND_SHIP_ADVICE_PKG.G_WAREHOUSE_TYPE);
1954: END IF;
1955:
1956: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1949: IF l_debug_on THEN
1950: wsh_debug_sv.push(l_module_name,'Process_Interfaced_Deliveries');
1951: wsh_debug_sv.log (l_module_name,'Delivery interface Id', p_delivery_interface_id);
1952: wsh_debug_sv.log (l_module_name,'Action Code', p_action_code);
1953: wsh_debug_sv.log (l_module_name, 'Warehouse type', WSH_INBOUND_SHIP_ADVICE_PKG.G_WAREHOUSE_TYPE);
1954: END IF;
1955:
1956: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1957:
1980: fetch l_get_enforce_shp_method_csr into l_enforce_ship_method;
1981: close l_get_enforce_shp_method_csr;
1982:
1983: IF l_debug_on THEN
1984: wsh_debug_sv.log (l_module_name, ' Ship Method ', l_del_int_rec.ship_method_code);
1985: END IF;
1986: -- need to send delivery id and name only for update
1987: --Bug Bug 3458160
1988: IF(p_action_code = 'UPDATE') THEN
2009: open get_carrier( l_del_int_rec.carrier_code );
2010: fetch get_carrier into l_carrier_id, l_manifesting_enabled_flag;
2011: close get_carrier;
2012: IF l_debug_on THEN
2013: wsh_debug_sv.log (l_module_name, ' l_carrier_id', l_carrier_id);
2014: wsh_debug_sv.log (l_module_name, ' l_manifesting_enabled_flag', l_manifesting_enabled_flag);
2015: END IF;
2016:
2017: l_del_int_rec.carrier_id := l_carrier_id;
2010: fetch get_carrier into l_carrier_id, l_manifesting_enabled_flag;
2011: close get_carrier;
2012: IF l_debug_on THEN
2013: wsh_debug_sv.log (l_module_name, ' l_carrier_id', l_carrier_id);
2014: wsh_debug_sv.log (l_module_name, ' l_manifesting_enabled_flag', l_manifesting_enabled_flag);
2015: END IF;
2016:
2017: l_del_int_rec.carrier_id := l_carrier_id;
2018: -- }
2030: -- combo of carrier, service level, and mode of transport.
2031: IF ( nvl(l_del_int_rec.carrier_code, fnd_api.g_miss_char) = fnd_api.g_miss_char) THEN
2032: --{
2033: IF l_debug_on THEN
2034: wsh_debug_sv.logmsg(l_module_name, 'Carrier is null');
2035: END IF;
2036: l_loc_interface_error_rec.p_message_name := 'WSH_NULL_INB_CARRIER';
2037: l_log_error_flag := 'Y';
2038: --}
2038: --}
2039: ELSIF (l_carrier_id IS NULL) THEN
2040: --{
2041: IF l_debug_on THEN
2042: wsh_debug_sv.logmsg(l_module_name, 'Carrier Id is null');
2043: END IF;
2044: l_loc_interface_error_rec.p_message_name := 'WSH_INVALID_INB_CARRIER';
2045: l_log_error_flag := 'Y';
2046: --}
2046: --}
2047: ELSIF (nvl(l_manifesting_enabled_flag, 'N') = 'N' ) THEN
2048: --{
2049: IF l_debug_on THEN
2050: wsh_debug_sv.logmsg(l_module_name, 'Carrier is not Manifesting Enabled');
2051: END IF;
2052: l_loc_interface_error_rec.p_message_name := 'WSH_INB_CAR_NOT_MFST_ENABLED';
2053: l_log_error_flag := 'Y';
2054: --}
2058: AND nvl(l_del_int_rec.ship_method_code, FND_API.G_MISS_CHAR) = FND_API.G_MISS_CHAR
2059: ) THEN
2060: --{
2061: IF l_debug_on THEN
2062: wsh_debug_sv.logmsg(l_module_name, 'Ship Method is enforced for the org and inbound Ship Method is NULL');
2063: END IF;
2064: l_loc_interface_error_rec.p_message_name := 'WSH_NULL_INB_SHIP_METHOD';
2065: l_log_error_flag := 'Y';
2066: --}
2071: open l_shp_method_org_csr(l_del_int_rec.ship_method_code, l_del_int_rec.organization_id);
2072: fetch l_shp_method_org_csr into l_valid_shp_method_flag;
2073: close l_shp_method_org_csr;
2074: IF l_debug_on THEN
2075: wsh_debug_sv.log (l_module_name, ' l_valid_shp_method_flag ', l_valid_shp_method_flag);
2076: END IF;
2077:
2078: IF (nvl(l_valid_shp_method_flag,'N') = 'N') THEN
2079: --{
2077:
2078: IF (nvl(l_valid_shp_method_flag,'N') = 'N') THEN
2079: --{
2080: IF l_debug_on THEN
2081: wsh_debug_sv.logmsg(l_module_name, 'Ship Method is not valid');
2082: END IF;
2083: l_loc_interface_error_rec.p_message_name := 'WSH_OI_INVALID_SHIP_METHOD';
2084: l_log_error_flag := 'Y';
2085: --}
2107: FROM wsh_new_deliveries
2108: WHERE delivery_id = l_del_int_rec.delivery_id;
2109:
2110: IF l_debug_on THEN
2111: wsh_debug_sv.log (l_module_name,'Current ship method', l_curr_ship_method);
2112: wsh_debug_sv.log (l_module_name,'Incoming ship method', l_del_int_rec.ship_method_code);
2113: END IF;
2114:
2115: IF nvl(l_curr_ship_method,FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR
2108: WHERE delivery_id = l_del_int_rec.delivery_id;
2109:
2110: IF l_debug_on THEN
2111: wsh_debug_sv.log (l_module_name,'Current ship method', l_curr_ship_method);
2112: wsh_debug_sv.log (l_module_name,'Incoming ship method', l_del_int_rec.ship_method_code);
2113: END IF;
2114:
2115: IF nvl(l_curr_ship_method,FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR
2116: THEN
2272: END IF;
2273: l_txn_type := null;
2274:
2275: IF l_debug_on THEN
2276: wsh_debug_sv.log (l_module_name, ' Service Level ', l_del_int_rec.SERVICE_LEVEL);
2277: wsh_debug_sv.log (l_module_name, ' Transportation Method ', l_del_int_rec.MODE_OF_TRANSPORT);
2278: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2279: wsh_debug_sv.logmsg (l_module_name, 'The following are the values of Carrier, Service Level and MOT being passed to the Group API');
2280: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2273: l_txn_type := null;
2274:
2275: IF l_debug_on THEN
2276: wsh_debug_sv.log (l_module_name, ' Service Level ', l_del_int_rec.SERVICE_LEVEL);
2277: wsh_debug_sv.log (l_module_name, ' Transportation Method ', l_del_int_rec.MODE_OF_TRANSPORT);
2278: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2279: wsh_debug_sv.logmsg (l_module_name, 'The following are the values of Carrier, Service Level and MOT being passed to the Group API');
2280: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2281: wsh_debug_sv.logmsg (l_module_name, '********************************************************************************************');
2274:
2275: IF l_debug_on THEN
2276: wsh_debug_sv.log (l_module_name, ' Service Level ', l_del_int_rec.SERVICE_LEVEL);
2277: wsh_debug_sv.log (l_module_name, ' Transportation Method ', l_del_int_rec.MODE_OF_TRANSPORT);
2278: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2279: wsh_debug_sv.logmsg (l_module_name, 'The following are the values of Carrier, Service Level and MOT being passed to the Group API');
2280: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2281: wsh_debug_sv.logmsg (l_module_name, '********************************************************************************************');
2282: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2275: IF l_debug_on THEN
2276: wsh_debug_sv.log (l_module_name, ' Service Level ', l_del_int_rec.SERVICE_LEVEL);
2277: wsh_debug_sv.log (l_module_name, ' Transportation Method ', l_del_int_rec.MODE_OF_TRANSPORT);
2278: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2279: wsh_debug_sv.logmsg (l_module_name, 'The following are the values of Carrier, Service Level and MOT being passed to the Group API');
2280: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2281: wsh_debug_sv.logmsg (l_module_name, '********************************************************************************************');
2282: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2283: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).CARRIER_ID',l_dlvy_attr_tab(l_index).CARRIER_ID);
2276: wsh_debug_sv.log (l_module_name, ' Service Level ', l_del_int_rec.SERVICE_LEVEL);
2277: wsh_debug_sv.log (l_module_name, ' Transportation Method ', l_del_int_rec.MODE_OF_TRANSPORT);
2278: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2279: wsh_debug_sv.logmsg (l_module_name, 'The following are the values of Carrier, Service Level and MOT being passed to the Group API');
2280: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2281: wsh_debug_sv.logmsg (l_module_name, '********************************************************************************************');
2282: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2283: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).CARRIER_ID',l_dlvy_attr_tab(l_index).CARRIER_ID);
2284: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).CARRIER_CODE',l_dlvy_attr_tab(l_index).CARRIER_CODE);
2277: wsh_debug_sv.log (l_module_name, ' Transportation Method ', l_del_int_rec.MODE_OF_TRANSPORT);
2278: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2279: wsh_debug_sv.logmsg (l_module_name, 'The following are the values of Carrier, Service Level and MOT being passed to the Group API');
2280: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2281: wsh_debug_sv.logmsg (l_module_name, '********************************************************************************************');
2282: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2283: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).CARRIER_ID',l_dlvy_attr_tab(l_index).CARRIER_ID);
2284: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).CARRIER_CODE',l_dlvy_attr_tab(l_index).CARRIER_CODE);
2285: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).SERVICE_LEVEL',l_dlvy_attr_tab(l_index).SERVICE_LEVEL);
2278: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2279: wsh_debug_sv.logmsg (l_module_name, 'The following are the values of Carrier, Service Level and MOT being passed to the Group API');
2280: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2281: wsh_debug_sv.logmsg (l_module_name, '********************************************************************************************');
2282: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2283: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).CARRIER_ID',l_dlvy_attr_tab(l_index).CARRIER_ID);
2284: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).CARRIER_CODE',l_dlvy_attr_tab(l_index).CARRIER_CODE);
2285: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).SERVICE_LEVEL',l_dlvy_attr_tab(l_index).SERVICE_LEVEL);
2286: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).MODE_OF_TRANSPORT',l_dlvy_attr_tab(l_index).MODE_OF_TRANSPORT);
2279: wsh_debug_sv.logmsg (l_module_name, 'The following are the values of Carrier, Service Level and MOT being passed to the Group API');
2280: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2281: wsh_debug_sv.logmsg (l_module_name, '********************************************************************************************');
2282: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2283: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).CARRIER_ID',l_dlvy_attr_tab(l_index).CARRIER_ID);
2284: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).CARRIER_CODE',l_dlvy_attr_tab(l_index).CARRIER_CODE);
2285: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).SERVICE_LEVEL',l_dlvy_attr_tab(l_index).SERVICE_LEVEL);
2286: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).MODE_OF_TRANSPORT',l_dlvy_attr_tab(l_index).MODE_OF_TRANSPORT);
2287: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).SHIP_METHOD_CODE',l_dlvy_attr_tab(l_index).SHIP_METHOD_CODE);
2280: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2281: wsh_debug_sv.logmsg (l_module_name, '********************************************************************************************');
2282: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2283: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).CARRIER_ID',l_dlvy_attr_tab(l_index).CARRIER_ID);
2284: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).CARRIER_CODE',l_dlvy_attr_tab(l_index).CARRIER_CODE);
2285: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).SERVICE_LEVEL',l_dlvy_attr_tab(l_index).SERVICE_LEVEL);
2286: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).MODE_OF_TRANSPORT',l_dlvy_attr_tab(l_index).MODE_OF_TRANSPORT);
2287: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).SHIP_METHOD_CODE',l_dlvy_attr_tab(l_index).SHIP_METHOD_CODE);
2288: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2281: wsh_debug_sv.logmsg (l_module_name, '********************************************************************************************');
2282: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2283: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).CARRIER_ID',l_dlvy_attr_tab(l_index).CARRIER_ID);
2284: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).CARRIER_CODE',l_dlvy_attr_tab(l_index).CARRIER_CODE);
2285: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).SERVICE_LEVEL',l_dlvy_attr_tab(l_index).SERVICE_LEVEL);
2286: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).MODE_OF_TRANSPORT',l_dlvy_attr_tab(l_index).MODE_OF_TRANSPORT);
2287: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).SHIP_METHOD_CODE',l_dlvy_attr_tab(l_index).SHIP_METHOD_CODE);
2288: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2289: wsh_debug_sv.logmsg (l_module_name, '********************************************************************************************');
2282: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2283: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).CARRIER_ID',l_dlvy_attr_tab(l_index).CARRIER_ID);
2284: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).CARRIER_CODE',l_dlvy_attr_tab(l_index).CARRIER_CODE);
2285: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).SERVICE_LEVEL',l_dlvy_attr_tab(l_index).SERVICE_LEVEL);
2286: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).MODE_OF_TRANSPORT',l_dlvy_attr_tab(l_index).MODE_OF_TRANSPORT);
2287: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).SHIP_METHOD_CODE',l_dlvy_attr_tab(l_index).SHIP_METHOD_CODE);
2288: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2289: wsh_debug_sv.logmsg (l_module_name, '********************************************************************************************');
2290: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2283: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).CARRIER_ID',l_dlvy_attr_tab(l_index).CARRIER_ID);
2284: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).CARRIER_CODE',l_dlvy_attr_tab(l_index).CARRIER_CODE);
2285: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).SERVICE_LEVEL',l_dlvy_attr_tab(l_index).SERVICE_LEVEL);
2286: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).MODE_OF_TRANSPORT',l_dlvy_attr_tab(l_index).MODE_OF_TRANSPORT);
2287: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).SHIP_METHOD_CODE',l_dlvy_attr_tab(l_index).SHIP_METHOD_CODE);
2288: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2289: wsh_debug_sv.logmsg (l_module_name, '********************************************************************************************');
2290: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2291: END IF;
2284: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).CARRIER_CODE',l_dlvy_attr_tab(l_index).CARRIER_CODE);
2285: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).SERVICE_LEVEL',l_dlvy_attr_tab(l_index).SERVICE_LEVEL);
2286: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).MODE_OF_TRANSPORT',l_dlvy_attr_tab(l_index).MODE_OF_TRANSPORT);
2287: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).SHIP_METHOD_CODE',l_dlvy_attr_tab(l_index).SHIP_METHOD_CODE);
2288: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2289: wsh_debug_sv.logmsg (l_module_name, '********************************************************************************************');
2290: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2291: END IF;
2292:
2285: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).SERVICE_LEVEL',l_dlvy_attr_tab(l_index).SERVICE_LEVEL);
2286: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).MODE_OF_TRANSPORT',l_dlvy_attr_tab(l_index).MODE_OF_TRANSPORT);
2287: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).SHIP_METHOD_CODE',l_dlvy_attr_tab(l_index).SHIP_METHOD_CODE);
2288: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2289: wsh_debug_sv.logmsg (l_module_name, '********************************************************************************************');
2290: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2291: END IF;
2292:
2293: SELECT count(*) INTO l_del_freight_costs
2286: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).MODE_OF_TRANSPORT',l_dlvy_attr_tab(l_index).MODE_OF_TRANSPORT);
2287: wsh_debug_sv.log (l_module_name, 'l_dlvy_attr_tab(l_index).SHIP_METHOD_CODE',l_dlvy_attr_tab(l_index).SHIP_METHOD_CODE);
2288: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2289: wsh_debug_sv.logmsg (l_module_name, '********************************************************************************************');
2290: wsh_debug_sv.logmsg (l_module_name, '--------------------------------------------------------------------------------------------');
2291: END IF;
2292:
2293: SELECT count(*) INTO l_del_freight_costs
2294: FROM wsh_freight_costs_interface
2295: WHERE delivery_interface_id = p_delivery_interface_id
2296: AND INTERFACE_ACTION_CODE = '94X_INBOUND';
2297:
2298: IF l_debug_on THEN
2299: wsh_debug_sv.log (l_module_name, 'Delivery Freight record count', l_del_freight_costs);
2300: END IF;
2301:
2302: IF(l_del_freight_costs > 0)
2303: THEN
2302: IF(l_del_freight_costs > 0)
2303: THEN
2304: -- {
2305: IF l_debug_on THEN
2306: wsh_debug_sv.log (l_module_name, 'calling process freight for delivery interface', p_delivery_interface_id);
2307: END IF;
2308:
2309: Process_Int_Freight_Costs(
2310: p_delivery_interface_id => p_delivery_interface_id,
2310: p_delivery_interface_id => p_delivery_interface_id,
2311: x_return_status => l_return_status);
2312:
2313: IF l_debug_on THEN
2314: wsh_debug_sv.log (l_module_name, 'Return status from process int freight costs', l_return_status);
2315: END IF;
2316: --
2317: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2318: raise freight_cost_processing_error;
2343: x_msg_count => l_msg_count,
2344: x_msg_data => l_msg_data);
2345:
2346: IF l_debug_on THEN
2347: wsh_debug_sv.log (l_module_name, 'Return status from create_Update_delivery',l_return_status);
2348: wsh_debug_sv.log (l_module_name, 'Create Update Delivery api msg count', l_msg_count);
2349: wsh_debug_sv.log (l_module_name, 'Create Update Delivery api msg', l_msg_data);
2350: END IF;
2351:
2344: x_msg_data => l_msg_data);
2345:
2346: IF l_debug_on THEN
2347: wsh_debug_sv.log (l_module_name, 'Return status from create_Update_delivery',l_return_status);
2348: wsh_debug_sv.log (l_module_name, 'Create Update Delivery api msg count', l_msg_count);
2349: wsh_debug_sv.log (l_module_name, 'Create Update Delivery api msg', l_msg_data);
2350: END IF;
2351:
2352: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS)
2345:
2346: IF l_debug_on THEN
2347: wsh_debug_sv.log (l_module_name, 'Return status from create_Update_delivery',l_return_status);
2348: wsh_debug_sv.log (l_module_name, 'Create Update Delivery api msg count', l_msg_count);
2349: wsh_debug_sv.log (l_module_name, 'Create Update Delivery api msg', l_msg_data);
2350: END IF;
2351:
2352: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS)
2353: THEN
2361: p_api_name => 'WSH_INTERFACE_GRP.Create_Update_Delivery' ,
2362: x_return_status => l_return_status);
2363: --
2364: IF l_debug_on THEN
2365: wsh_debug_sv.log (l_module_name,'Log_Errors l_return_status',l_return_status);
2366: END IF;
2367:
2368: IF p_action_code = 'CREATE'
2369: THEN
2385: IF p_action_code = 'CREATE'
2386: THEN
2387: -- {
2388: IF l_debug_on THEN
2389: wsh_debug_sv.log (l_module_name, 'New delivery Id created', l_dlvy_out_rec_tab(l_dlvy_out_rec_tab.first).delivery_id);
2390: END IF;
2391: x_dlvy_id := l_dlvy_out_rec_tab(l_dlvy_out_rec_tab.first).delivery_id;
2392: -- }
2393: END IF;
2392: -- }
2393: END IF;
2394:
2395: IF l_debug_on THEN
2396: wsh_debug_sv.pop(l_module_name);
2397: END IF;
2398:
2399: EXCEPTION
2400: WHEN fnd_api.g_exc_error THEN
2400: WHEN fnd_api.g_exc_error THEN
2401: x_return_status := fnd_api.g_ret_sts_error;
2402: --
2403: IF l_debug_on THEN
2404: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
2405: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
2406: END IF;
2407: --
2408: WHEN fnd_api.g_exc_unexpected_error THEN
2401: x_return_status := fnd_api.g_ret_sts_error;
2402: --
2403: IF l_debug_on THEN
2404: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
2405: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
2406: END IF;
2407: --
2408: WHEN fnd_api.g_exc_unexpected_error THEN
2409: x_return_status := fnd_api.g_ret_sts_unexp_error;
2408: WHEN fnd_api.g_exc_unexpected_error THEN
2409: x_return_status := fnd_api.g_ret_sts_unexp_error;
2410: --
2411: IF l_debug_on THEN
2412: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
2413: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2414: END IF;
2415: --
2416: WHEN wsh_util_core.g_exc_warning THEN
2409: x_return_status := fnd_api.g_ret_sts_unexp_error;
2410: --
2411: IF l_debug_on THEN
2412: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
2413: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2414: END IF;
2415: --
2416: WHEN wsh_util_core.g_exc_warning THEN
2417: x_return_status := wsh_util_core.g_ret_sts_warning;
2416: WHEN wsh_util_core.g_exc_warning THEN
2417: x_return_status := wsh_util_core.g_ret_sts_warning;
2418: --
2419: IF l_debug_on THEN
2420: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
2421: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2422: END IF;
2423: --
2424: WHEN invalid_ship_method THEN
2417: x_return_status := wsh_util_core.g_ret_sts_warning;
2418: --
2419: IF l_debug_on THEN
2420: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
2421: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2422: END IF;
2423: --
2424: WHEN invalid_ship_method THEN
2425: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2423: --
2424: WHEN invalid_ship_method THEN
2425: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2426: IF l_debug_on THEN
2427: WSH_DEBUG_SV.logmsg(l_module_name,'invalid_ship_method exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2428: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:invalid_ship_method');
2429: END IF;
2430: WHEN freight_cost_processing_error THEN
2431: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2424: WHEN invalid_ship_method THEN
2425: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2426: IF l_debug_on THEN
2427: WSH_DEBUG_SV.logmsg(l_module_name,'invalid_ship_method exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2428: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:invalid_ship_method');
2429: END IF;
2430: WHEN freight_cost_processing_error THEN
2431: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2432: IF l_debug_on THEN
2429: END IF;
2430: WHEN freight_cost_processing_error THEN
2431: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2432: IF l_debug_on THEN
2433: WSH_DEBUG_SV.logmsg(l_module_name,'freight_cost_processing_error exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2434: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:freight_cost_processing_error');
2435: END IF;
2436: WHEN OTHERS THEN
2437: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
2430: WHEN freight_cost_processing_error THEN
2431: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2432: IF l_debug_on THEN
2433: WSH_DEBUG_SV.logmsg(l_module_name,'freight_cost_processing_error exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2434: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:freight_cost_processing_error');
2435: END IF;
2436: WHEN OTHERS THEN
2437: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
2438: wsh_util_core.default_handler('WSH_INTERFACE_COMMON_ACTIONS.PROCESS_INTERFACED_DELIVERIES');
2437: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
2438: wsh_util_core.default_handler('WSH_INTERFACE_COMMON_ACTIONS.PROCESS_INTERFACED_DELIVERIES');
2439:
2440: IF l_debug_on THEN
2441: wsh_debug_sv.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is ' || SQLERRM, wsh_debug_sv.c_unexpec_err_level);
2442: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
2443: END IF;
2444:
2445: END Process_Interfaced_Deliveries;
2438: wsh_util_core.default_handler('WSH_INTERFACE_COMMON_ACTIONS.PROCESS_INTERFACED_DELIVERIES');
2439:
2440: IF l_debug_on THEN
2441: wsh_debug_sv.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is ' || SQLERRM, wsh_debug_sv.c_unexpec_err_level);
2442: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
2443: END IF;
2444:
2445: END Process_Interfaced_Deliveries;
2446:
2533: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2534: --
2535: IF l_debug_on IS NULL
2536: THEN
2537: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2538: END IF;
2539: --
2540: IF l_debug_on THEN
2541: wsh_debug_sv.push(l_module_name,'Delivery_Interface_Wrapper');
2537: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2538: END IF;
2539: --
2540: IF l_debug_on THEN
2541: wsh_debug_sv.push(l_module_name,'Delivery_Interface_Wrapper');
2542: wsh_debug_sv.log (l_module_name,'Delivery interface Id', p_delivery_interface_id);
2543: wsh_debug_sv.log (l_module_name,'Action Code', p_action_code);
2544: END IF;
2545:
2538: END IF;
2539: --
2540: IF l_debug_on THEN
2541: wsh_debug_sv.push(l_module_name,'Delivery_Interface_Wrapper');
2542: wsh_debug_sv.log (l_module_name,'Delivery interface Id', p_delivery_interface_id);
2543: wsh_debug_sv.log (l_module_name,'Action Code', p_action_code);
2544: END IF;
2545:
2546: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2539: --
2540: IF l_debug_on THEN
2541: wsh_debug_sv.push(l_module_name,'Delivery_Interface_Wrapper');
2542: wsh_debug_sv.log (l_module_name,'Delivery interface Id', p_delivery_interface_id);
2543: wsh_debug_sv.log (l_module_name,'Action Code', p_action_code);
2544: END IF;
2545:
2546: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2547:
2569: p_delivery_id => l_delivery_id,
2570: x_return_status => l_return_status);
2571:
2572: IF l_debug_on THEN
2573: wsh_debug_sv.log (l_module_name,'Return status from lock delivery and details', l_return_status);
2574: END IF;
2575:
2576: IF(l_return_status <> wsh_util_core.g_ret_sts_success) THEN
2577: l_loc_interface_error_rec.p_interface_table_name := 'WSH_NEW_DEL_INTERFACE';
2583: p_api_name =>'Delivery_Interface_Wrapper, Action=UPDATE' ,
2584: x_return_status => l_return_status);
2585:
2586: IF l_debug_on THEN
2587: wsh_debug_sv.log (l_module_name,'Log_Errors l_return_status', l_return_status);
2588: END IF;
2589: raise no_lock_found;
2590: END IF;
2591:
2598: x_dlvy_id => l_created_delivery_id,
2599: x_return_status => l_return_status);
2600:
2601: IF l_debug_on THEN
2602: wsh_debug_sv.log (l_module_name, 'Return Status from Process Deliveries', l_return_status);
2603: END IF;
2604:
2605: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2606: raise process_delivery_failed;
2621: p_action_code => l_action_code,
2622: x_return_status => l_return_status);
2623:
2624: IF l_debug_on THEN
2625: wsh_debug_sv.log (l_module_name, 'Return Status from Process Details', l_return_status);
2626: END IF;
2627:
2628: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2629: raise process_del_details_failed;
2662: p_diff_volume => NVL(l_volume,0) - l_org_volume,
2663: x_return_status => l_return_status);
2664:
2665: IF l_debug_on THEN
2666: wsh_debug_sv.log (l_module_name, 'Return status from WSH_WV_UTILS.Del_WV_Post_Process ',l_return_status);
2667: END IF;
2668:
2669: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2670:
2671: l_loc_interface_error_rec.p_interface_table_name := 'WSH_NEW_DEL_INTERFACE';
2672: l_loc_interface_error_rec.p_interface_id := p_delivery_interface_id;
2673:
2674: IF l_debug_on THEN
2675: wsh_debug_sv.log (l_module_name, 'Delivery Interface Id', p_delivery_interface_id);
2676: END IF;
2677:
2678: Log_Errors(
2679: p_loc_interface_errors_rec => l_loc_interface_error_rec,
2681: p_api_name => 'WSH_INTERFACE_PUB.Delivery_Interface_Wrapper' ,
2682: x_return_status => l_return_status);
2683:
2684: IF l_debug_on THEN
2685: wsh_debug_sv.log (l_module_name, 'Return status after log_errors', l_return_status);
2686: END IF;
2687: raise process_delivery_wv_failed;
2688: END IF;
2689:
2701: p_delivery_id => l_delivery_id,
2702: x_return_status => l_return_status);
2703:
2704: IF l_debug_on THEN
2705: wsh_debug_sv.log (l_module_name, 'Return Status from Process Cancel', l_return_status);
2706: END IF;
2707:
2708: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2709: raise cancel_lines_failed;
2713: raise invalid_action_code;
2714: END IF; -- if l_action_code
2715:
2716: IF l_debug_on THEN
2717: wsh_debug_sv.pop(l_module_name);
2718: END IF;
2719:
2720: EXCEPTION
2721: WHEN invalid_input THEN
2720: EXCEPTION
2721: WHEN invalid_input THEN
2722: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2723: IF l_debug_on THEN
2724: WSH_DEBUG_SV.logmsg(l_module_name,'invalid_input exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2725: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:invalid_input');
2726: END IF;
2727: WHEN no_lock_found THEN
2728: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2721: WHEN invalid_input THEN
2722: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2723: IF l_debug_on THEN
2724: WSH_DEBUG_SV.logmsg(l_module_name,'invalid_input exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2725: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:invalid_input');
2726: END IF;
2727: WHEN no_lock_found THEN
2728: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2729: IF l_debug_on THEN
2726: END IF;
2727: WHEN no_lock_found THEN
2728: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2729: IF l_debug_on THEN
2730: WSH_DEBUG_SV.logmsg(l_module_name,'no_lock_found exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2731: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:no_lock_found');
2732: END IF;
2733: WHEN invalid_action_code THEN
2734: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2727: WHEN no_lock_found THEN
2728: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2729: IF l_debug_on THEN
2730: WSH_DEBUG_SV.logmsg(l_module_name,'no_lock_found exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2731: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:no_lock_found');
2732: END IF;
2733: WHEN invalid_action_code THEN
2734: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2735: IF l_debug_on THEN
2732: END IF;
2733: WHEN invalid_action_code THEN
2734: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2735: IF l_debug_on THEN
2736: WSH_DEBUG_SV.logmsg(l_module_name,'invalid_action_code exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2737: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:invalid_action_code');
2738: END IF;
2739: WHEN process_delivery_failed THEN
2740: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2733: WHEN invalid_action_code THEN
2734: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2735: IF l_debug_on THEN
2736: WSH_DEBUG_SV.logmsg(l_module_name,'invalid_action_code exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2737: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:invalid_action_code');
2738: END IF;
2739: WHEN process_delivery_failed THEN
2740: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2741: IF l_debug_on THEN
2738: END IF;
2739: WHEN process_delivery_failed THEN
2740: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2741: IF l_debug_on THEN
2742: WSH_DEBUG_SV.logmsg(l_module_name,'process_delivery_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2743: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:process_delivery_failed');
2744: END IF;
2745: -- J: W/V Changes
2746: WHEN process_delivery_wv_failed THEN
2739: WHEN process_delivery_failed THEN
2740: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2741: IF l_debug_on THEN
2742: WSH_DEBUG_SV.logmsg(l_module_name,'process_delivery_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2743: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:process_delivery_failed');
2744: END IF;
2745: -- J: W/V Changes
2746: WHEN process_delivery_wv_failed THEN
2747: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2745: -- J: W/V Changes
2746: WHEN process_delivery_wv_failed THEN
2747: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2748: IF l_debug_on THEN
2749: WSH_DEBUG_SV.logmsg(l_module_name,'process_delivery_wv_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2750: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:process_delivery_wv_failed');
2751: END IF;
2752: WHEN process_del_details_failed THEN
2753: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2746: WHEN process_delivery_wv_failed THEN
2747: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2748: IF l_debug_on THEN
2749: WSH_DEBUG_SV.logmsg(l_module_name,'process_delivery_wv_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2750: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:process_delivery_wv_failed');
2751: END IF;
2752: WHEN process_del_details_failed THEN
2753: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2754: IF l_debug_on THEN
2751: END IF;
2752: WHEN process_del_details_failed THEN
2753: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2754: IF l_debug_on THEN
2755: WSH_DEBUG_SV.logmsg(l_module_name,'process_del_details_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2756: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:process_del_details_failed');
2757: END IF;
2758: WHEN cancel_lines_failed THEN
2759: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2752: WHEN process_del_details_failed THEN
2753: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2754: IF l_debug_on THEN
2755: WSH_DEBUG_SV.logmsg(l_module_name,'process_del_details_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2756: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:process_del_details_failed');
2757: END IF;
2758: WHEN cancel_lines_failed THEN
2759: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2760: IF l_debug_on THEN
2757: END IF;
2758: WHEN cancel_lines_failed THEN
2759: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2760: IF l_debug_on THEN
2761: WSH_DEBUG_SV.logmsg(l_module_name,'cancel_lines_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2762: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:cancel_lines_failed');
2763: END IF;
2764: WHEN Others THEN
2765: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2758: WHEN cancel_lines_failed THEN
2759: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2760: IF l_debug_on THEN
2761: WSH_DEBUG_SV.logmsg(l_module_name,'cancel_lines_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2762: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:cancel_lines_failed');
2763: END IF;
2764: WHEN Others THEN
2765: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2766: IF l_debug_on THEN
2763: END IF;
2764: WHEN Others THEN
2765: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2766: IF l_debug_on THEN
2767: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
2768: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2769: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2770: END IF;
2771:
2764: WHEN Others THEN
2765: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2766: IF l_debug_on THEN
2767: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
2768: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2769: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2770: END IF;
2771:
2772: END Delivery_Interface_Wrapper;
2765: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2766: IF l_debug_on THEN
2767: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
2768: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2769: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2770: END IF;
2771:
2772: END Delivery_Interface_Wrapper;
2773:
2892: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2893: --
2894: IF l_debug_on IS NULL
2895: THEN
2896: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2897: END IF;
2898: --
2899: IF l_debug_on THEN
2900: wsh_debug_sv.push(l_module_name,'Process_Int_Freight_Costs');
2896: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2897: END IF;
2898: --
2899: IF l_debug_on THEN
2900: wsh_debug_sv.push(l_module_name,'Process_Int_Freight_Costs');
2901: wsh_debug_sv.log (l_module_name,'Delivery interface Id', p_delivery_interface_id);
2902: wsh_debug_sv.log (l_module_name,'del_detail_interface_id', p_del_detail_interface_id);
2903: END IF;
2904:
2897: END IF;
2898: --
2899: IF l_debug_on THEN
2900: wsh_debug_sv.push(l_module_name,'Process_Int_Freight_Costs');
2901: wsh_debug_sv.log (l_module_name,'Delivery interface Id', p_delivery_interface_id);
2902: wsh_debug_sv.log (l_module_name,'del_detail_interface_id', p_del_detail_interface_id);
2903: END IF;
2904:
2905: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2898: --
2899: IF l_debug_on THEN
2900: wsh_debug_sv.push(l_module_name,'Process_Int_Freight_Costs');
2901: wsh_debug_sv.log (l_module_name,'Delivery interface Id', p_delivery_interface_id);
2902: wsh_debug_sv.log (l_module_name,'del_detail_interface_id', p_del_detail_interface_id);
2903: END IF;
2904:
2905: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2906:
2911: FROM wsh_del_details_interface
2912: WHERE delivery_detail_interface_id = p_del_detail_interface_id
2913: AND INTERFACE_ACTION_CODE = '94X_INBOUND';
2914: IF l_debug_on THEN
2915: wsh_debug_sv.log (l_module_name, 'Delivery Detail Id', l_del_detail_id);
2916: END IF;
2917: IF(l_del_detail_id IS NULL) THEN
2918: IF l_debug_on THEN
2919: wsh_debug_sv.logmsg(l_module_name, 'Null Delivery Detail Id');
2915: wsh_debug_sv.log (l_module_name, 'Delivery Detail Id', l_del_detail_id);
2916: END IF;
2917: IF(l_del_detail_id IS NULL) THEN
2918: IF l_debug_on THEN
2919: wsh_debug_sv.logmsg(l_module_name, 'Null Delivery Detail Id');
2920: END IF;
2921: raise invalid_input;
2922: END IF;
2923: ELSIF(p_delivery_interface_id IS NOT NULL) THEN
2927: WHERE delivery_interface_id = p_delivery_interface_id
2928: AND INTERFACE_ACTION_CODE = '94X_INBOUND';
2929:
2930: IF l_debug_on THEN
2931: wsh_debug_sv.log (l_module_name, 'Delivery Id', l_delivery_id);
2932: END IF;
2933: IF(l_delivery_id IS NULL) THEN
2934: IF l_debug_on THEN
2935: wsh_debug_sv.logmsg(l_module_name, 'Null Delivery Id');
2931: wsh_debug_sv.log (l_module_name, 'Delivery Id', l_delivery_id);
2932: END IF;
2933: IF(l_delivery_id IS NULL) THEN
2934: IF l_debug_on THEN
2935: wsh_debug_sv.logmsg(l_module_name, 'Null Delivery Id');
2936: END IF;
2937: raise invalid_input;
2938: END IF;
2939:
2942: ELSIF(p_trip_interface_id IS NOT NULL) THEN
2943: l_entity_interface_id := p_trip_interface_id;
2944: ELSE
2945: IF l_debug_on THEN
2946: wsh_debug_sv.logmsg(l_module_name, 'Entity IDs are Null');
2947: END IF;
2948: raise invalid_input;
2949: END IF;
2950:
2952:
2953: FOR l_freight_int_rec in freight_int_cur LOOP
2954:
2955: IF l_debug_on THEN
2956: wsh_debug_sv.log (l_module_name, 'Freight Cost Type Code', l_freight_int_rec.freight_cost_type_code);
2957: END IF;
2958:
2959: IF(l_freight_int_rec.freight_cost_type_code IS NOT NULL) THEN
2960: OPEN fc_type_id(l_freight_int_rec.freight_cost_type_code);
2964: raise invalid_freight_cost_type;
2965: END IF;
2966:
2967: IF l_debug_on THEN
2968: wsh_debug_sv.log (l_module_name, 'Freight Cost Type Id', l_fc_type_id);
2969: END IF;
2970: IF(l_fc_type_id IS NULL) THEN
2971: IF l_debug_on THEN
2972: wsh_debug_sv.logmsg(l_module_name, 'Invalid Freight Cost Type');
2968: wsh_debug_sv.log (l_module_name, 'Freight Cost Type Id', l_fc_type_id);
2969: END IF;
2970: IF(l_fc_type_id IS NULL) THEN
2971: IF l_debug_on THEN
2972: wsh_debug_sv.logmsg(l_module_name, 'Invalid Freight Cost Type');
2973: END IF;
2974:
2975: l_loc_interface_error_rec.p_interface_table_name := 'WSH_FREIGHT_COSTS_INTERFACE';
2976: l_loc_interface_error_rec.p_interface_id := l_entity_interface_id;
2980: p_msg_data => 'Invalid Freight Cost Type',
2981: p_api_name => 'WSH_FREIGHT_COSTS_PUB.Create_Update_Freight_Costs',
2982: x_return_status => l_return_status);
2983: IF l_debug_on THEN
2984: wsh_debug_sv.log (l_module_name, 'Log_Errors l_return_status',l_return_status);
2985: END IF;
2986: raise invalid_freight_cost_type;
2987: ELSE
2988: l_freight_costs_info.freight_cost_type_id := l_fc_type_id;
3019: l_freight_costs_info.attribute14 := l_freight_int_rec.attribute14;
3020: l_freight_costs_info.attribute15 := l_freight_int_rec.attribute15;
3021:
3022: IF l_debug_on THEN
3023: wsh_debug_sv.logmsg(l_module_name,'Calling freight public api');
3024: wsh_debug_sv.log (l_module_name, 'Unit amount', l_freight_costs_info.unit_amount);
3025: wsh_debug_sv.log (l_module_name, 'Currency code', l_freight_costs_info.currency_code);
3026: wsh_debug_sv.log (l_module_name, 'Delivery Id', l_freight_costs_info.delivery_id);
3027: wsh_debug_sv.log (l_module_name, 'Delivery Detail Id',l_freight_costs_info.delivery_detail_id);
3020: l_freight_costs_info.attribute15 := l_freight_int_rec.attribute15;
3021:
3022: IF l_debug_on THEN
3023: wsh_debug_sv.logmsg(l_module_name,'Calling freight public api');
3024: wsh_debug_sv.log (l_module_name, 'Unit amount', l_freight_costs_info.unit_amount);
3025: wsh_debug_sv.log (l_module_name, 'Currency code', l_freight_costs_info.currency_code);
3026: wsh_debug_sv.log (l_module_name, 'Delivery Id', l_freight_costs_info.delivery_id);
3027: wsh_debug_sv.log (l_module_name, 'Delivery Detail Id',l_freight_costs_info.delivery_detail_id);
3028: wsh_debug_sv.log (l_module_name, 'Trip Id', l_freight_costs_info.trip_id);
3021:
3022: IF l_debug_on THEN
3023: wsh_debug_sv.logmsg(l_module_name,'Calling freight public api');
3024: wsh_debug_sv.log (l_module_name, 'Unit amount', l_freight_costs_info.unit_amount);
3025: wsh_debug_sv.log (l_module_name, 'Currency code', l_freight_costs_info.currency_code);
3026: wsh_debug_sv.log (l_module_name, 'Delivery Id', l_freight_costs_info.delivery_id);
3027: wsh_debug_sv.log (l_module_name, 'Delivery Detail Id',l_freight_costs_info.delivery_detail_id);
3028: wsh_debug_sv.log (l_module_name, 'Trip Id', l_freight_costs_info.trip_id);
3029: wsh_debug_sv.log (l_module_name, 'Trip Name', l_freight_costs_info.trip_name);
3022: IF l_debug_on THEN
3023: wsh_debug_sv.logmsg(l_module_name,'Calling freight public api');
3024: wsh_debug_sv.log (l_module_name, 'Unit amount', l_freight_costs_info.unit_amount);
3025: wsh_debug_sv.log (l_module_name, 'Currency code', l_freight_costs_info.currency_code);
3026: wsh_debug_sv.log (l_module_name, 'Delivery Id', l_freight_costs_info.delivery_id);
3027: wsh_debug_sv.log (l_module_name, 'Delivery Detail Id',l_freight_costs_info.delivery_detail_id);
3028: wsh_debug_sv.log (l_module_name, 'Trip Id', l_freight_costs_info.trip_id);
3029: wsh_debug_sv.log (l_module_name, 'Trip Name', l_freight_costs_info.trip_name);
3030: wsh_debug_sv.log (l_module_name, 'Stop Id', l_freight_costs_info.stop_id);
3023: wsh_debug_sv.logmsg(l_module_name,'Calling freight public api');
3024: wsh_debug_sv.log (l_module_name, 'Unit amount', l_freight_costs_info.unit_amount);
3025: wsh_debug_sv.log (l_module_name, 'Currency code', l_freight_costs_info.currency_code);
3026: wsh_debug_sv.log (l_module_name, 'Delivery Id', l_freight_costs_info.delivery_id);
3027: wsh_debug_sv.log (l_module_name, 'Delivery Detail Id',l_freight_costs_info.delivery_detail_id);
3028: wsh_debug_sv.log (l_module_name, 'Trip Id', l_freight_costs_info.trip_id);
3029: wsh_debug_sv.log (l_module_name, 'Trip Name', l_freight_costs_info.trip_name);
3030: wsh_debug_sv.log (l_module_name, 'Stop Id', l_freight_costs_info.stop_id);
3031: END IF;
3024: wsh_debug_sv.log (l_module_name, 'Unit amount', l_freight_costs_info.unit_amount);
3025: wsh_debug_sv.log (l_module_name, 'Currency code', l_freight_costs_info.currency_code);
3026: wsh_debug_sv.log (l_module_name, 'Delivery Id', l_freight_costs_info.delivery_id);
3027: wsh_debug_sv.log (l_module_name, 'Delivery Detail Id',l_freight_costs_info.delivery_detail_id);
3028: wsh_debug_sv.log (l_module_name, 'Trip Id', l_freight_costs_info.trip_id);
3029: wsh_debug_sv.log (l_module_name, 'Trip Name', l_freight_costs_info.trip_name);
3030: wsh_debug_sv.log (l_module_name, 'Stop Id', l_freight_costs_info.stop_id);
3031: END IF;
3032:
3025: wsh_debug_sv.log (l_module_name, 'Currency code', l_freight_costs_info.currency_code);
3026: wsh_debug_sv.log (l_module_name, 'Delivery Id', l_freight_costs_info.delivery_id);
3027: wsh_debug_sv.log (l_module_name, 'Delivery Detail Id',l_freight_costs_info.delivery_detail_id);
3028: wsh_debug_sv.log (l_module_name, 'Trip Id', l_freight_costs_info.trip_id);
3029: wsh_debug_sv.log (l_module_name, 'Trip Name', l_freight_costs_info.trip_name);
3030: wsh_debug_sv.log (l_module_name, 'Stop Id', l_freight_costs_info.stop_id);
3031: END IF;
3032:
3033: WSH_FREIGHT_COSTS_PUB.Create_Update_Freight_Costs (
3026: wsh_debug_sv.log (l_module_name, 'Delivery Id', l_freight_costs_info.delivery_id);
3027: wsh_debug_sv.log (l_module_name, 'Delivery Detail Id',l_freight_costs_info.delivery_detail_id);
3028: wsh_debug_sv.log (l_module_name, 'Trip Id', l_freight_costs_info.trip_id);
3029: wsh_debug_sv.log (l_module_name, 'Trip Name', l_freight_costs_info.trip_name);
3030: wsh_debug_sv.log (l_module_name, 'Stop Id', l_freight_costs_info.stop_id);
3031: END IF;
3032:
3033: WSH_FREIGHT_COSTS_PUB.Create_Update_Freight_Costs (
3034: p_api_version_number => 1.0,
3041: p_action_code => 'CREATE',
3042: x_freight_cost_id => l_freight_cost_id);
3043:
3044: IF l_debug_on THEN
3045: wsh_debug_sv.log (l_module_name, 'return status from freight public api', l_return_status);
3046: wsh_debug_sv.log (l_module_name, 'Create Update Freight Costs api msg count', l_msg_count);
3047: wsh_debug_sv.log (l_module_name, 'Create Update Freight Costs api msg', l_msg_data);
3048: wsh_debug_sv.log (l_module_name, 'freight_cost id created', l_freight_cost_id);
3049: END IF;
3042: x_freight_cost_id => l_freight_cost_id);
3043:
3044: IF l_debug_on THEN
3045: wsh_debug_sv.log (l_module_name, 'return status from freight public api', l_return_status);
3046: wsh_debug_sv.log (l_module_name, 'Create Update Freight Costs api msg count', l_msg_count);
3047: wsh_debug_sv.log (l_module_name, 'Create Update Freight Costs api msg', l_msg_data);
3048: wsh_debug_sv.log (l_module_name, 'freight_cost id created', l_freight_cost_id);
3049: END IF;
3050:
3043:
3044: IF l_debug_on THEN
3045: wsh_debug_sv.log (l_module_name, 'return status from freight public api', l_return_status);
3046: wsh_debug_sv.log (l_module_name, 'Create Update Freight Costs api msg count', l_msg_count);
3047: wsh_debug_sv.log (l_module_name, 'Create Update Freight Costs api msg', l_msg_data);
3048: wsh_debug_sv.log (l_module_name, 'freight_cost id created', l_freight_cost_id);
3049: END IF;
3050:
3051: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3044: IF l_debug_on THEN
3045: wsh_debug_sv.log (l_module_name, 'return status from freight public api', l_return_status);
3046: wsh_debug_sv.log (l_module_name, 'Create Update Freight Costs api msg count', l_msg_count);
3047: wsh_debug_sv.log (l_module_name, 'Create Update Freight Costs api msg', l_msg_data);
3048: wsh_debug_sv.log (l_module_name, 'freight_cost id created', l_freight_cost_id);
3049: END IF;
3050:
3051: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3052: l_loc_interface_error_rec.p_interface_table_name := 'WSH_FREIGHT_COSTS_INTERFACE';
3057: p_msg_data => l_msg_data,
3058: p_api_name => 'WSH_FREIGHT_COSTS_PUB.Create_Update_Freight_Costs',
3059: x_return_status => l_return_status);
3060: IF l_debug_on THEN
3061: wsh_debug_sv.log (l_module_name, 'Log_Errors l_return_status',l_return_status);
3062: END IF;
3063: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3064: END IF;
3065:
3065:
3066: END LOOP;
3067:
3068: IF l_debug_on THEN
3069: wsh_debug_sv.pop(l_module_name);
3070: END IF;
3071:
3072: EXCEPTION
3073: WHEN invalid_input THEN
3072: EXCEPTION
3073: WHEN invalid_input THEN
3074: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3075: IF l_debug_on THEN
3076: WSH_DEBUG_SV.logmsg(l_module_name,'invalid_input exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3077: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:invalid_input');
3078: END IF;
3079: WHEN invalid_freight_cost_type THEN
3080: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3073: WHEN invalid_input THEN
3074: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3075: IF l_debug_on THEN
3076: WSH_DEBUG_SV.logmsg(l_module_name,'invalid_input exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3077: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:invalid_input');
3078: END IF;
3079: WHEN invalid_freight_cost_type THEN
3080: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3081: IF l_debug_on THEN
3078: END IF;
3079: WHEN invalid_freight_cost_type THEN
3080: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3081: IF l_debug_on THEN
3082: WSH_DEBUG_SV.logmsg(l_module_name,'invalid_freight_cost_type exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3083: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:invalid_freight_cost_type');
3084: END IF;
3085: WHEN no_freight_record THEN
3086: null;
3079: WHEN invalid_freight_cost_type THEN
3080: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3081: IF l_debug_on THEN
3082: WSH_DEBUG_SV.logmsg(l_module_name,'invalid_freight_cost_type exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3083: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:invalid_freight_cost_type');
3084: END IF;
3085: WHEN no_freight_record THEN
3086: null;
3087: IF l_debug_on THEN
3084: END IF;
3085: WHEN no_freight_record THEN
3086: null;
3087: IF l_debug_on THEN
3088: WSH_DEBUG_SV.logmsg(l_module_name,'no_freight_record exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3089: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:no_freight_record');
3090: END IF;
3091: WHEN Others THEN
3092: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3085: WHEN no_freight_record THEN
3086: null;
3087: IF l_debug_on THEN
3088: WSH_DEBUG_SV.logmsg(l_module_name,'no_freight_record exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3089: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:no_freight_record');
3090: END IF;
3091: WHEN Others THEN
3092: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3093: IF l_debug_on THEN
3090: END IF;
3091: WHEN Others THEN
3092: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3093: IF l_debug_on THEN
3094: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
3095: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3096: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3097: END IF;
3098:
3091: WHEN Others THEN
3092: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3093: IF l_debug_on THEN
3094: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
3095: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3096: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3097: END IF;
3098:
3099: END Process_Int_Freight_Costs;
3092: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3093: IF l_debug_on THEN
3094: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
3095: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3096: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3097: END IF;
3098:
3099: END Process_Int_Freight_Costs;
3100:
3145: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3146: --
3147: IF l_debug_on IS NULL
3148: THEN
3149: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3150: END IF;
3151: --
3152: IF l_debug_on THEN
3153: wsh_debug_sv.push(l_module_name,'Update_Delivery_Details');
3149: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3150: END IF;
3151: --
3152: IF l_debug_on THEN
3153: wsh_debug_sv.push(l_module_name,'Update_Delivery_Details');
3154: wsh_debug_sv.log (l_module_name, 'Source Code', p_source_code);
3155: wsh_debug_sv.log (l_module_name, 'Delivery Interface Id', p_delivery_interface_id);
3156: wsh_debug_sv.log (l_module_name, 'Update Table Count', G_Update_Attributes_Tab.count);
3157: wsh_debug_sv.log(l_module_name, 'Serial Range Tab count',G_SERIAL_RANGE_TAB.count);
3150: END IF;
3151: --
3152: IF l_debug_on THEN
3153: wsh_debug_sv.push(l_module_name,'Update_Delivery_Details');
3154: wsh_debug_sv.log (l_module_name, 'Source Code', p_source_code);
3155: wsh_debug_sv.log (l_module_name, 'Delivery Interface Id', p_delivery_interface_id);
3156: wsh_debug_sv.log (l_module_name, 'Update Table Count', G_Update_Attributes_Tab.count);
3157: wsh_debug_sv.log(l_module_name, 'Serial Range Tab count',G_SERIAL_RANGE_TAB.count);
3158: END IF;
3151: --
3152: IF l_debug_on THEN
3153: wsh_debug_sv.push(l_module_name,'Update_Delivery_Details');
3154: wsh_debug_sv.log (l_module_name, 'Source Code', p_source_code);
3155: wsh_debug_sv.log (l_module_name, 'Delivery Interface Id', p_delivery_interface_id);
3156: wsh_debug_sv.log (l_module_name, 'Update Table Count', G_Update_Attributes_Tab.count);
3157: wsh_debug_sv.log(l_module_name, 'Serial Range Tab count',G_SERIAL_RANGE_TAB.count);
3158: END IF;
3159:
3152: IF l_debug_on THEN
3153: wsh_debug_sv.push(l_module_name,'Update_Delivery_Details');
3154: wsh_debug_sv.log (l_module_name, 'Source Code', p_source_code);
3155: wsh_debug_sv.log (l_module_name, 'Delivery Interface Id', p_delivery_interface_id);
3156: wsh_debug_sv.log (l_module_name, 'Update Table Count', G_Update_Attributes_Tab.count);
3157: wsh_debug_sv.log(l_module_name, 'Serial Range Tab count',G_SERIAL_RANGE_TAB.count);
3158: END IF;
3159:
3160: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3153: wsh_debug_sv.push(l_module_name,'Update_Delivery_Details');
3154: wsh_debug_sv.log (l_module_name, 'Source Code', p_source_code);
3155: wsh_debug_sv.log (l_module_name, 'Delivery Interface Id', p_delivery_interface_id);
3156: wsh_debug_sv.log (l_module_name, 'Update Table Count', G_Update_Attributes_Tab.count);
3157: wsh_debug_sv.log(l_module_name, 'Serial Range Tab count',G_SERIAL_RANGE_TAB.count);
3158: END IF;
3159:
3160: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3161: -- Use the global table to call create_update Group API
3179: P_SERIAL_RANGE_TAB => G_SERIAL_RANGE_TAB
3180: );
3181:
3182: IF l_debug_on THEN
3183: wsh_debug_sv.log (l_module_name,'Return Status from create_update group api', l_return_status);
3184: wsh_debug_sv.log (l_module_name, 'Update Ship Attr api msg count', l_msg_count);
3185: wsh_debug_sv.log (l_module_name, 'Update Ship Attr api msg data', l_msg_data);
3186: END IF;
3187:
3180: );
3181:
3182: IF l_debug_on THEN
3183: wsh_debug_sv.log (l_module_name,'Return Status from create_update group api', l_return_status);
3184: wsh_debug_sv.log (l_module_name, 'Update Ship Attr api msg count', l_msg_count);
3185: wsh_debug_sv.log (l_module_name, 'Update Ship Attr api msg data', l_msg_data);
3186: END IF;
3187:
3188: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3181:
3182: IF l_debug_on THEN
3183: wsh_debug_sv.log (l_module_name,'Return Status from create_update group api', l_return_status);
3184: wsh_debug_sv.log (l_module_name, 'Update Ship Attr api msg count', l_msg_count);
3185: wsh_debug_sv.log (l_module_name, 'Update Ship Attr api msg data', l_msg_data);
3186: END IF;
3187:
3188: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3189: -- Need to insert record in interface errors table only
3201: p_api_name =>'WSH_DELIVERY_DETAILS_GRP.Create_Update_Delivery_Detail',
3202: x_return_status => l_return_status);
3203:
3204: IF l_debug_on THEN
3205: wsh_debug_sv.log (l_module_name,'Log_Errors l_return_status',l_return_status);
3206: END IF;
3207:
3208: END IF;
3209: raise update_shipping_att_failed;
3210: END IF;
3211: END IF; -- if G_Update_Attributes_Tab.count
3212:
3213: IF l_debug_on THEN
3214: wsh_debug_sv.pop(l_module_name);
3215: END IF;
3216:
3217: EXCEPTION
3218: WHEN update_shipping_att_failed THEN
3217: EXCEPTION
3218: WHEN update_shipping_att_failed THEN
3219: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3220: IF l_debug_on THEN
3221: WSH_DEBUG_SV.logmsg(l_module_name,'update_shipping_att_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3222: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:update_shipping_att_failed');
3223: END IF;
3224: WHEN cont_upd_ship_att_failed THEN
3225: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3218: WHEN update_shipping_att_failed THEN
3219: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3220: IF l_debug_on THEN
3221: WSH_DEBUG_SV.logmsg(l_module_name,'update_shipping_att_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3222: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:update_shipping_att_failed');
3223: END IF;
3224: WHEN cont_upd_ship_att_failed THEN
3225: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3226: IF l_debug_on THEN
3223: END IF;
3224: WHEN cont_upd_ship_att_failed THEN
3225: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3226: IF l_debug_on THEN
3227: WSH_DEBUG_SV.logmsg(l_module_name,'cont_upd_ship_att_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3228: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:cont_upd_ship_att_failed');
3229: END IF;
3230: WHEN Others THEN
3231: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3224: WHEN cont_upd_ship_att_failed THEN
3225: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3226: IF l_debug_on THEN
3227: WSH_DEBUG_SV.logmsg(l_module_name,'cont_upd_ship_att_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3228: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:cont_upd_ship_att_failed');
3229: END IF;
3230: WHEN Others THEN
3231: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3232: IF l_debug_on THEN
3229: END IF;
3230: WHEN Others THEN
3231: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3232: IF l_debug_on THEN
3233: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
3234: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3235: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3236: END IF;
3237: END Update_Delivery_Details;
3230: WHEN Others THEN
3231: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3232: IF l_debug_on THEN
3233: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
3234: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3235: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3236: END IF;
3237: END Update_Delivery_Details;
3238:
3231: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3232: IF l_debug_on THEN
3233: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
3234: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3235: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3236: END IF;
3237: END Update_Delivery_Details;
3238:
3239:
3338: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3339: --
3340: IF l_debug_on IS NULL
3341: THEN
3342: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3343: END IF;
3344: --
3345: IF l_debug_on THEN
3346: wsh_debug_sv.push(l_module_name,'Create_Update_Trip_For_Dlvy');
3342: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3343: END IF;
3344: --
3345: IF l_debug_on THEN
3346: wsh_debug_sv.push(l_module_name,'Create_Update_Trip_For_Dlvy');
3347: wsh_debug_sv.log (l_module_name, 'Delivery id', p_delivery_id);
3348: END IF;
3349:
3350: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3343: END IF;
3344: --
3345: IF l_debug_on THEN
3346: wsh_debug_sv.push(l_module_name,'Create_Update_Trip_For_Dlvy');
3347: wsh_debug_sv.log (l_module_name, 'Delivery id', p_delivery_id);
3348: END IF;
3349:
3350: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3351:
3358: FETCH del_trip_stops INTO l_pickup_stop_id, l_dropoff_stop_id, l_trip_id;
3359: CLOSE del_trip_stops;
3360:
3361: IF l_debug_on THEN
3362: wsh_debug_sv.log (l_module_name, 'Pickup Stop Id', l_pickup_stop_id);
3363: wsh_debug_sv.log (l_module_name, 'Dropoff Stop Id', l_dropoff_stop_id);
3364: wsh_debug_sv.log (l_module_name, 'Trip Id', l_trip_id);
3365: END IF;
3366: IF (l_pickup_stop_id IS NULL) THEN
3359: CLOSE del_trip_stops;
3360:
3361: IF l_debug_on THEN
3362: wsh_debug_sv.log (l_module_name, 'Pickup Stop Id', l_pickup_stop_id);
3363: wsh_debug_sv.log (l_module_name, 'Dropoff Stop Id', l_dropoff_stop_id);
3364: wsh_debug_sv.log (l_module_name, 'Trip Id', l_trip_id);
3365: END IF;
3366: IF (l_pickup_stop_id IS NULL) THEN
3367:
3360:
3361: IF l_debug_on THEN
3362: wsh_debug_sv.log (l_module_name, 'Pickup Stop Id', l_pickup_stop_id);
3363: wsh_debug_sv.log (l_module_name, 'Dropoff Stop Id', l_dropoff_stop_id);
3364: wsh_debug_sv.log (l_module_name, 'Trip Id', l_trip_id);
3365: END IF;
3366: IF (l_pickup_stop_id IS NULL) THEN
3367:
3368: -- trip does not exist. so do autocreate_trip
3375: x_trip_name => l_trip_name,
3376: x_return_status => l_return_status);
3377:
3378: IF l_debug_on THEN
3379: wsh_debug_sv.log (l_module_name, 'Return status from autocreate trip', l_return_status);
3380: wsh_debug_sv.log (l_module_name, 'Trip created', l_trip_id);
3381: END IF;
3382:
3383: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3376: x_return_status => l_return_status);
3377:
3378: IF l_debug_on THEN
3379: wsh_debug_sv.log (l_module_name, 'Return status from autocreate trip', l_return_status);
3380: wsh_debug_sv.log (l_module_name, 'Trip created', l_trip_id);
3381: END IF;
3382:
3383: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3384: x_return_status := l_return_status;
3390: FETCH del_trip_stops INTO l_pickup_stop_id, l_dropoff_stop_id, l_trip_id;
3391: CLOSE del_trip_stops;
3392:
3393: IF l_debug_on THEN
3394: wsh_debug_sv.log (l_module_name, 'After doing autocreate trip');
3395: wsh_debug_sv.log (l_module_name, 'Pickup Stop Id', l_pickup_stop_id);
3396: wsh_debug_sv.log (l_module_name, 'Dropoff Stop Id', l_dropoff_stop_id);
3397: wsh_debug_sv.log (l_module_name, 'Trip Id', l_trip_id);
3398: END IF;
3391: CLOSE del_trip_stops;
3392:
3393: IF l_debug_on THEN
3394: wsh_debug_sv.log (l_module_name, 'After doing autocreate trip');
3395: wsh_debug_sv.log (l_module_name, 'Pickup Stop Id', l_pickup_stop_id);
3396: wsh_debug_sv.log (l_module_name, 'Dropoff Stop Id', l_dropoff_stop_id);
3397: wsh_debug_sv.log (l_module_name, 'Trip Id', l_trip_id);
3398: END IF;
3399:
3392:
3393: IF l_debug_on THEN
3394: wsh_debug_sv.log (l_module_name, 'After doing autocreate trip');
3395: wsh_debug_sv.log (l_module_name, 'Pickup Stop Id', l_pickup_stop_id);
3396: wsh_debug_sv.log (l_module_name, 'Dropoff Stop Id', l_dropoff_stop_id);
3397: wsh_debug_sv.log (l_module_name, 'Trip Id', l_trip_id);
3398: END IF;
3399:
3400: END IF; -- if l_pickup_stop_id is null
3393: IF l_debug_on THEN
3394: wsh_debug_sv.log (l_module_name, 'After doing autocreate trip');
3395: wsh_debug_sv.log (l_module_name, 'Pickup Stop Id', l_pickup_stop_id);
3396: wsh_debug_sv.log (l_module_name, 'Dropoff Stop Id', l_dropoff_stop_id);
3397: wsh_debug_sv.log (l_module_name, 'Trip Id', l_trip_id);
3398: END IF;
3399:
3400: END IF; -- if l_pickup_stop_id is null
3401:
3405: INTO l_pickup_stop_int_id, l_dropoff_stop_int_id, l_trip_interface_id;
3406: CLOSE int_del_trip_stops;
3407:
3408: IF l_debug_on THEN
3409: wsh_debug_sv.log (l_module_name, 'Pickup Stop Interface Id', l_pickup_stop_int_id);
3410: wsh_debug_sv.log (l_module_name, 'Dropoff Stop Interface Id', l_dropoff_stop_int_id);
3411: wsh_debug_sv.log (l_module_name, 'Trip Interface Id', l_trip_interface_id);
3412: END IF;
3413:
3406: CLOSE int_del_trip_stops;
3407:
3408: IF l_debug_on THEN
3409: wsh_debug_sv.log (l_module_name, 'Pickup Stop Interface Id', l_pickup_stop_int_id);
3410: wsh_debug_sv.log (l_module_name, 'Dropoff Stop Interface Id', l_dropoff_stop_int_id);
3411: wsh_debug_sv.log (l_module_name, 'Trip Interface Id', l_trip_interface_id);
3412: END IF;
3413:
3414: -- get the interface trip_stop info
3407:
3408: IF l_debug_on THEN
3409: wsh_debug_sv.log (l_module_name, 'Pickup Stop Interface Id', l_pickup_stop_int_id);
3410: wsh_debug_sv.log (l_module_name, 'Dropoff Stop Interface Id', l_dropoff_stop_int_id);
3411: wsh_debug_sv.log (l_module_name, 'Trip Interface Id', l_trip_interface_id);
3412: END IF;
3413:
3414: -- get the interface trip_stop info
3415: OPEN int_pickup_stop_cur(l_pickup_stop_int_id);
3419: NULL;
3420: -- need to decide what should be done
3421: END IF;
3422: IF l_debug_on THEN
3423: wsh_debug_sv.log (l_module_name, 'Updating Stop Id', l_pickup_stop_id);
3424: END IF;
3425:
3426: -- update the base trip_stops
3427: IF l_pickup_stop_id IS NOT NULL THEN
3436: -- Updating WSH_TRIP_STOPS.
3437: -- Call DBI API after the Update.
3438: -- This API will also check for DBI Installed or not
3439: IF l_debug_on THEN
3440: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Stop id -',l_pickup_stop_id);
3441: END IF;
3442: l_stop_tab(1) := l_pickup_stop_id;
3443: WSH_INTEGRATION.DBI_Update_Trip_Stop_Log
3444: (p_stop_id_tab => l_stop_tab,
3445: p_dml_type => 'UPDATE',
3446: x_return_status => l_dbi_rs);
3447:
3448: IF l_debug_on THEN
3449: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
3450: END IF;
3451: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
3452: x_return_status := l_dbi_rs;
3453: -- just pass this return status to caller API
3451: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
3452: x_return_status := l_dbi_rs;
3453: -- just pass this return status to caller API
3454: IF l_debug_on THEN
3455: WSH_DEBUG_SV.log(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
3456: WSH_DEBUG_SV.pop(l_module_name);
3457: END IF;
3458: return;
3459: END IF;
3452: x_return_status := l_dbi_rs;
3453: -- just pass this return status to caller API
3454: IF l_debug_on THEN
3455: WSH_DEBUG_SV.log(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
3456: WSH_DEBUG_SV.pop(l_module_name);
3457: END IF;
3458: return;
3459: END IF;
3460: -- End of Code for DBI Project
3475: NULL;
3476: -- need to decide what should be done
3477: END IF;
3478: IF l_debug_on THEN
3479: wsh_debug_sv.log (l_module_name, 'Updating Drop off Stop Id', l_dropoff_stop_id);
3480: END IF;
3481:
3482: IF l_dropoff_stop_id IS NOT NULL THEN
3483: UPDATE wsh_trip_stops
3489: -- Updating WSH_TRIP_STOPS.
3490: -- Call DBI API after the Update.
3491: -- This API will also check for DBI Installed or not
3492: IF l_debug_on THEN
3493: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Stop id -',l_dropoff_stop_id);
3494: END IF;
3495: l_stop_tab(1) := l_dropoff_stop_id;
3496: WSH_INTEGRATION.DBI_Update_Trip_Stop_Log
3497: (p_stop_id_tab => l_stop_tab,
3498: p_dml_type => 'UPDATE',
3499: x_return_status => l_dbi_rs);
3500:
3501: IF l_debug_on THEN
3502: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
3503: END IF;
3504: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
3505: x_return_status := l_dbi_rs;
3506: -- just pass this return status to caller API
3504: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
3505: x_return_status := l_dbi_rs;
3506: -- just pass this return status to caller API
3507: IF l_debug_on THEN
3508: WSH_DEBUG_SV.log(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
3509: WSH_DEBUG_SV.pop(l_module_name);
3510: END IF;
3511: return;
3512: END IF;
3505: x_return_status := l_dbi_rs;
3506: -- just pass this return status to caller API
3507: IF l_debug_on THEN
3508: WSH_DEBUG_SV.log(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
3509: WSH_DEBUG_SV.pop(l_module_name);
3510: END IF;
3511: return;
3512: END IF;
3513: -- End of Code for DBI Project
3529: -- need to decide what should be done
3530: END IF;
3531:
3532: IF l_debug_on THEN
3533: wsh_debug_sv.log (l_module_name, 'Updating Trip Id', l_trip_id);
3534: END IF;
3535: -- update the base trip
3536: IF l_trip_id IS NOT NULL THEN
3537:
3552: CLOSE int_trip_cur;
3553: END IF;
3554:
3555: IF l_debug_on THEN
3556: wsh_debug_sv.pop(l_module_name);
3557: END IF;
3558: EXCEPTION
3559: WHEN trip_creation_failed THEN
3560: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3558: EXCEPTION
3559: WHEN trip_creation_failed THEN
3560: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3561: IF l_debug_on THEN
3562: WSH_DEBUG_SV.logmsg(l_module_name,'trip_creation_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3563: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:trip_creation_failed');
3564: END IF;
3565: WHEN invalid_input THEN
3566: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3559: WHEN trip_creation_failed THEN
3560: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3561: IF l_debug_on THEN
3562: WSH_DEBUG_SV.logmsg(l_module_name,'trip_creation_failed exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3563: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:trip_creation_failed');
3564: END IF;
3565: WHEN invalid_input THEN
3566: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3567: IF l_debug_on THEN
3564: END IF;
3565: WHEN invalid_input THEN
3566: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3567: IF l_debug_on THEN
3568: WSH_DEBUG_SV.logmsg(l_module_name,'invalid_input exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3569: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:invalid_input');
3570: END IF;
3571: WHEN Others THEN
3572: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3565: WHEN invalid_input THEN
3566: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3567: IF l_debug_on THEN
3568: WSH_DEBUG_SV.logmsg(l_module_name,'invalid_input exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3569: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:invalid_input');
3570: END IF;
3571: WHEN Others THEN
3572: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3573: IF l_debug_on THEN
3570: END IF;
3571: WHEN Others THEN
3572: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3573: IF l_debug_on THEN
3574: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
3575: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3576: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3577: END IF;
3578:
3571: WHEN Others THEN
3572: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3573: IF l_debug_on THEN
3574: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
3575: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3576: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3577: END IF;
3578:
3579: END Create_Update_Trip_For_Dlvy;
3572: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3573: IF l_debug_on THEN
3574: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
3575: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3576: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3577: END IF;
3578:
3579: END Create_Update_Trip_For_Dlvy;
3580:
3608: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3609: --
3610: IF l_debug_on IS NULL
3611: THEN
3612: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3613: END IF;
3614: --
3615: IF l_debug_on THEN
3616: wsh_debug_sv.push(l_module_name,'Int_Trip_Stop_Info');
3612: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3613: END IF;
3614: --
3615: IF l_debug_on THEN
3616: wsh_debug_sv.push(l_module_name,'Int_Trip_Stop_Info');
3617: wsh_debug_sv.log (l_module_name, 'Delivery Interface id', p_delivery_interface_id);
3618: wsh_debug_sv.log (l_module_name, 'Act Departure Date', p_act_dep_date);
3619: wsh_debug_sv.log (l_module_name, 'Dep Seal Code', p_dep_seal_code);
3620: wsh_debug_sv.log (l_module_name, 'Act Arrival Date', p_act_arr_date);
3613: END IF;
3614: --
3615: IF l_debug_on THEN
3616: wsh_debug_sv.push(l_module_name,'Int_Trip_Stop_Info');
3617: wsh_debug_sv.log (l_module_name, 'Delivery Interface id', p_delivery_interface_id);
3618: wsh_debug_sv.log (l_module_name, 'Act Departure Date', p_act_dep_date);
3619: wsh_debug_sv.log (l_module_name, 'Dep Seal Code', p_dep_seal_code);
3620: wsh_debug_sv.log (l_module_name, 'Act Arrival Date', p_act_arr_date);
3621: wsh_debug_sv.log (l_module_name, 'Vehicle Num', p_trip_vehicle_num);
3614: --
3615: IF l_debug_on THEN
3616: wsh_debug_sv.push(l_module_name,'Int_Trip_Stop_Info');
3617: wsh_debug_sv.log (l_module_name, 'Delivery Interface id', p_delivery_interface_id);
3618: wsh_debug_sv.log (l_module_name, 'Act Departure Date', p_act_dep_date);
3619: wsh_debug_sv.log (l_module_name, 'Dep Seal Code', p_dep_seal_code);
3620: wsh_debug_sv.log (l_module_name, 'Act Arrival Date', p_act_arr_date);
3621: wsh_debug_sv.log (l_module_name, 'Vehicle Num', p_trip_vehicle_num);
3622: wsh_debug_sv.log (l_module_name, 'Vehicle Num Prefix', p_trip_veh_num_pfx);
3615: IF l_debug_on THEN
3616: wsh_debug_sv.push(l_module_name,'Int_Trip_Stop_Info');
3617: wsh_debug_sv.log (l_module_name, 'Delivery Interface id', p_delivery_interface_id);
3618: wsh_debug_sv.log (l_module_name, 'Act Departure Date', p_act_dep_date);
3619: wsh_debug_sv.log (l_module_name, 'Dep Seal Code', p_dep_seal_code);
3620: wsh_debug_sv.log (l_module_name, 'Act Arrival Date', p_act_arr_date);
3621: wsh_debug_sv.log (l_module_name, 'Vehicle Num', p_trip_vehicle_num);
3622: wsh_debug_sv.log (l_module_name, 'Vehicle Num Prefix', p_trip_veh_num_pfx);
3623: wsh_debug_sv.log (l_module_name, 'Route Id', p_trip_route_id);
3616: wsh_debug_sv.push(l_module_name,'Int_Trip_Stop_Info');
3617: wsh_debug_sv.log (l_module_name, 'Delivery Interface id', p_delivery_interface_id);
3618: wsh_debug_sv.log (l_module_name, 'Act Departure Date', p_act_dep_date);
3619: wsh_debug_sv.log (l_module_name, 'Dep Seal Code', p_dep_seal_code);
3620: wsh_debug_sv.log (l_module_name, 'Act Arrival Date', p_act_arr_date);
3621: wsh_debug_sv.log (l_module_name, 'Vehicle Num', p_trip_vehicle_num);
3622: wsh_debug_sv.log (l_module_name, 'Vehicle Num Prefix', p_trip_veh_num_pfx);
3623: wsh_debug_sv.log (l_module_name, 'Route Id', p_trip_route_id);
3624: wsh_debug_sv.log (l_module_name, 'Routing Ins', p_trip_routing_ins);
3617: wsh_debug_sv.log (l_module_name, 'Delivery Interface id', p_delivery_interface_id);
3618: wsh_debug_sv.log (l_module_name, 'Act Departure Date', p_act_dep_date);
3619: wsh_debug_sv.log (l_module_name, 'Dep Seal Code', p_dep_seal_code);
3620: wsh_debug_sv.log (l_module_name, 'Act Arrival Date', p_act_arr_date);
3621: wsh_debug_sv.log (l_module_name, 'Vehicle Num', p_trip_vehicle_num);
3622: wsh_debug_sv.log (l_module_name, 'Vehicle Num Prefix', p_trip_veh_num_pfx);
3623: wsh_debug_sv.log (l_module_name, 'Route Id', p_trip_route_id);
3624: wsh_debug_sv.log (l_module_name, 'Routing Ins', p_trip_routing_ins);
3625: wsh_debug_sv.log (l_module_name, 'p_operator', p_operator);
3618: wsh_debug_sv.log (l_module_name, 'Act Departure Date', p_act_dep_date);
3619: wsh_debug_sv.log (l_module_name, 'Dep Seal Code', p_dep_seal_code);
3620: wsh_debug_sv.log (l_module_name, 'Act Arrival Date', p_act_arr_date);
3621: wsh_debug_sv.log (l_module_name, 'Vehicle Num', p_trip_vehicle_num);
3622: wsh_debug_sv.log (l_module_name, 'Vehicle Num Prefix', p_trip_veh_num_pfx);
3623: wsh_debug_sv.log (l_module_name, 'Route Id', p_trip_route_id);
3624: wsh_debug_sv.log (l_module_name, 'Routing Ins', p_trip_routing_ins);
3625: wsh_debug_sv.log (l_module_name, 'p_operator', p_operator);
3626: END IF;
3619: wsh_debug_sv.log (l_module_name, 'Dep Seal Code', p_dep_seal_code);
3620: wsh_debug_sv.log (l_module_name, 'Act Arrival Date', p_act_arr_date);
3621: wsh_debug_sv.log (l_module_name, 'Vehicle Num', p_trip_vehicle_num);
3622: wsh_debug_sv.log (l_module_name, 'Vehicle Num Prefix', p_trip_veh_num_pfx);
3623: wsh_debug_sv.log (l_module_name, 'Route Id', p_trip_route_id);
3624: wsh_debug_sv.log (l_module_name, 'Routing Ins', p_trip_routing_ins);
3625: wsh_debug_sv.log (l_module_name, 'p_operator', p_operator);
3626: END IF;
3627:
3620: wsh_debug_sv.log (l_module_name, 'Act Arrival Date', p_act_arr_date);
3621: wsh_debug_sv.log (l_module_name, 'Vehicle Num', p_trip_vehicle_num);
3622: wsh_debug_sv.log (l_module_name, 'Vehicle Num Prefix', p_trip_veh_num_pfx);
3623: wsh_debug_sv.log (l_module_name, 'Route Id', p_trip_route_id);
3624: wsh_debug_sv.log (l_module_name, 'Routing Ins', p_trip_routing_ins);
3625: wsh_debug_sv.log (l_module_name, 'p_operator', p_operator);
3626: END IF;
3627:
3628: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3621: wsh_debug_sv.log (l_module_name, 'Vehicle Num', p_trip_vehicle_num);
3622: wsh_debug_sv.log (l_module_name, 'Vehicle Num Prefix', p_trip_veh_num_pfx);
3623: wsh_debug_sv.log (l_module_name, 'Route Id', p_trip_route_id);
3624: wsh_debug_sv.log (l_module_name, 'Routing Ins', p_trip_routing_ins);
3625: wsh_debug_sv.log (l_module_name, 'p_operator', p_operator);
3626: END IF;
3627:
3628: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3629: -- get delivery_leg_interface_id, stop_interface_id, trip_interface_id
3735: '94X_INBOUND',
3736: p_operator);
3737:
3738: IF l_debug_on THEN
3739: wsh_debug_sv.pop(l_module_name);
3740: END IF;
3741: EXCEPTION
3742:
3743: WHEN Others THEN
3742:
3743: WHEN Others THEN
3744: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3745: IF l_debug_on THEN
3746: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
3747: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3748: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3749: END IF;
3750: END Int_Trip_Stop_Info;
3743: WHEN Others THEN
3744: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3745: IF l_debug_on THEN
3746: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
3747: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3748: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3749: END IF;
3750: END Int_Trip_Stop_Info;
3751:
3744: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3745: IF l_debug_on THEN
3746: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
3747: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3748: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3749: END IF;
3750: END Int_Trip_Stop_Info;
3751:
3752:
3790: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3791: --
3792: IF l_debug_on IS NULL
3793: THEN
3794: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3795: END IF;
3796: --
3797: IF l_debug_on THEN
3798: wsh_debug_sv.push(l_module_name, 'Add_To_Update_Table');
3794: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3795: END IF;
3796: --
3797: IF l_debug_on THEN
3798: wsh_debug_sv.push(l_module_name, 'Add_To_Update_Table');
3799: wsh_debug_sv.log (l_module_name, 'Update Mode' , p_update_mode);
3800: wsh_debug_sv.log (l_module_name, 'p_delivery_id', p_delivery_id);
3801: wsh_debug_sv.log(l_module_name, 'Delivery Detail Id', p_del_det_int_rec.delivery_detail_id);
3802: END IF;
3795: END IF;
3796: --
3797: IF l_debug_on THEN
3798: wsh_debug_sv.push(l_module_name, 'Add_To_Update_Table');
3799: wsh_debug_sv.log (l_module_name, 'Update Mode' , p_update_mode);
3800: wsh_debug_sv.log (l_module_name, 'p_delivery_id', p_delivery_id);
3801: wsh_debug_sv.log(l_module_name, 'Delivery Detail Id', p_del_det_int_rec.delivery_detail_id);
3802: END IF;
3803:
3796: --
3797: IF l_debug_on THEN
3798: wsh_debug_sv.push(l_module_name, 'Add_To_Update_Table');
3799: wsh_debug_sv.log (l_module_name, 'Update Mode' , p_update_mode);
3800: wsh_debug_sv.log (l_module_name, 'p_delivery_id', p_delivery_id);
3801: wsh_debug_sv.log(l_module_name, 'Delivery Detail Id', p_del_det_int_rec.delivery_detail_id);
3802: END IF;
3803:
3804: -- Add To Packing Table, only for update cases
3797: IF l_debug_on THEN
3798: wsh_debug_sv.push(l_module_name, 'Add_To_Update_Table');
3799: wsh_debug_sv.log (l_module_name, 'Update Mode' , p_update_mode);
3800: wsh_debug_sv.log (l_module_name, 'p_delivery_id', p_delivery_id);
3801: wsh_debug_sv.log(l_module_name, 'Delivery Detail Id', p_del_det_int_rec.delivery_detail_id);
3802: END IF;
3803:
3804: -- Add To Packing Table, only for update cases
3805: IF(p_update_mode = 'UPDATE') THEN
3807: FETCH intf_parent_det_cur INTO l_intf_parent_det_id;
3808: CLOSE intf_parent_det_cur;
3809:
3810: IF l_debug_on THEN
3811: wsh_debug_sv.log (l_module_name, 'Parent del.detail in intef assgn', l_intf_parent_det_id);
3812: wsh_debug_sv.log(l_module_name, 'Organization id of detail', p_del_det_int_rec.organization_id);
3813: END IF;
3814:
3815: IF(l_intf_parent_det_id IS NOT NULL) THEN
3808: CLOSE intf_parent_det_cur;
3809:
3810: IF l_debug_on THEN
3811: wsh_debug_sv.log (l_module_name, 'Parent del.detail in intef assgn', l_intf_parent_det_id);
3812: wsh_debug_sv.log(l_module_name, 'Organization id of detail', p_del_det_int_rec.organization_id);
3813: END IF;
3814:
3815: IF(l_intf_parent_det_id IS NOT NULL) THEN
3816:
3819: OPEN base_detail_cur(l_intf_parent_det_id);
3820: FETCH base_detail_cur INTO l_packing_detail_rec.parent_delivery_detail_id;
3821:
3822: IF l_debug_on THEN
3823: wsh_debug_sv.log (l_module_name, 'Base table detail id', l_packing_detail_rec.parent_delivery_detail_id);
3824: END IF;
3825:
3826: IF( base_detail_cur%NOTFOUND) THEN
3827: raise packing_error;
3890: l_changed_attributes.cust_po_number := p_del_det_int_rec.cust_po_number;
3891: l_changed_attributes.packing_instructions := p_del_det_int_rec.packing_instructions;
3892: l_changed_attributes.shipping_instructions := p_del_det_int_rec.shipping_instructions;
3893: IF l_debug_on THEN
3894: wsh_debug_sv.log(l_module_name,'Orig Container Name',
3895: p_del_det_int_rec.container_name);
3896: wsh_debug_sv.log(l_module_name,'delivery detail id',
3897: p_del_det_int_rec.delivery_detail_id);
3898: wsh_debug_sv.log(l_module_name,'container flag',
3892: l_changed_attributes.shipping_instructions := p_del_det_int_rec.shipping_instructions;
3893: IF l_debug_on THEN
3894: wsh_debug_sv.log(l_module_name,'Orig Container Name',
3895: p_del_det_int_rec.container_name);
3896: wsh_debug_sv.log(l_module_name,'delivery detail id',
3897: p_del_det_int_rec.delivery_detail_id);
3898: wsh_debug_sv.log(l_module_name,'container flag',
3899: p_del_det_int_rec.container_flag);
3900: END IF;
3894: wsh_debug_sv.log(l_module_name,'Orig Container Name',
3895: p_del_det_int_rec.container_name);
3896: wsh_debug_sv.log(l_module_name,'delivery detail id',
3897: p_del_det_int_rec.delivery_detail_id);
3898: wsh_debug_sv.log(l_module_name,'container flag',
3899: p_del_det_int_rec.container_flag);
3900: END IF;
3901: IF (p_del_det_int_rec.container_flag = 'Y' )
3902: AND (NVL(p_del_det_int_rec.container_name ,FND_API.G_MISS_CHAR) <>
3912: nvl(p_del_det_int_rec.container_name,FND_API.G_MISS_CHAR);
3913: END IF;
3914:
3915: IF l_debug_on THEN
3916: wsh_debug_sv.log(l_module_name,'New container name',
3917: l_changed_attributes.container_name);
3918: END IF;
3919:
3920: l_changed_attributes.container_flag := p_del_det_int_rec.container_flag ;
3920: l_changed_attributes.container_flag := p_del_det_int_rec.container_flag ;
3921: l_changed_attributes.delivery_detail_id := p_del_det_int_rec.delivery_detail_id;
3922:
3923: IF l_debug_on THEN
3924: wsh_debug_sv.log (l_module_name, 'Shipped Quantity ', p_del_det_int_rec.shipped_quantity);
3925: END IF;
3926:
3927: IF nvl(p_del_det_int_rec.shipped_quantity,FND_API.G_MISS_NUM) = FND_API.G_MISS_NUM THEN
3928: l_changed_attributes.shipped_quantity := 0;
3949: l_changed_attributes.to_serial_number := p_del_det_int_rec.to_serial_number;
3950: l_changed_attributes.requested_quantity_uom := p_del_det_int_rec.requested_quantity_uom;
3951:
3952: if l_debug_on then
3953: wsh_debug_sv.log(l_module_name, 'subinventory:', l_changed_attributes.subinventory);
3954: wsh_debug_sv.log(l_module_name, 'Container Name:', l_changed_attributes.container_name);
3955: wsh_debug_sv.log(l_module_name, 'Tracking Number', l_changed_attributes.tracking_number);
3956: end if;
3957:
3950: l_changed_attributes.requested_quantity_uom := p_del_det_int_rec.requested_quantity_uom;
3951:
3952: if l_debug_on then
3953: wsh_debug_sv.log(l_module_name, 'subinventory:', l_changed_attributes.subinventory);
3954: wsh_debug_sv.log(l_module_name, 'Container Name:', l_changed_attributes.container_name);
3955: wsh_debug_sv.log(l_module_name, 'Tracking Number', l_changed_attributes.tracking_number);
3956: end if;
3957:
3958:
3951:
3952: if l_debug_on then
3953: wsh_debug_sv.log(l_module_name, 'subinventory:', l_changed_attributes.subinventory);
3954: wsh_debug_sv.log(l_module_name, 'Container Name:', l_changed_attributes.container_name);
3955: wsh_debug_sv.log(l_module_name, 'Tracking Number', l_changed_attributes.tracking_number);
3956: end if;
3957:
3958:
3959:
3964: -- kvenkate. Removed the code for direct update.
3965: */
3966:
3967: IF l_debug_on THEN
3968: wsh_debug_sv.pop(l_module_name);
3969: END IF;
3970:
3971: EXCEPTION
3972: WHEN packing_error THEN
3974: CLOSE base_detail_cur;
3975: END IF;
3976: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3977: IF l_debug_on THEN
3978: WSH_DEBUG_SV.logmsg(l_module_name,'packing_error exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3979: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:packing_error');
3980: END IF;
3981:
3982: WHEN Others THEN
3975: END IF;
3976: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3977: IF l_debug_on THEN
3978: WSH_DEBUG_SV.logmsg(l_module_name,'packing_error exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3979: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:packing_error');
3980: END IF;
3981:
3982: WHEN Others THEN
3983: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3981:
3982: WHEN Others THEN
3983: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3984: IF l_debug_on THEN
3985: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
3986: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3987: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3988: END IF;
3989:
3982: WHEN Others THEN
3983: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3984: IF l_debug_on THEN
3985: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
3986: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3987: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3988: END IF;
3989:
3990: END Add_To_Update_Table;
3983: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3984: IF l_debug_on THEN
3985: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
3986: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3987: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3988: END IF;
3989:
3990: END Add_To_Update_Table;
3991:
4018: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4019: --
4020: IF l_debug_on IS NULL
4021: THEN
4022: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4023: END IF;
4024: --
4025: IF l_debug_on THEN
4026: wsh_debug_sv.push(l_module_name, 'Process_Cancel');
4022: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4023: END IF;
4024: --
4025: IF l_debug_on THEN
4026: wsh_debug_sv.push(l_module_name, 'Process_Cancel');
4027: wsh_debug_sv.log (l_module_name, 'Delivery Id', p_delivery_id);
4028: END IF;
4029:
4030: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4023: END IF;
4024: --
4025: IF l_debug_on THEN
4026: wsh_debug_sv.push(l_module_name, 'Process_Cancel');
4027: wsh_debug_sv.log (l_module_name, 'Delivery Id', p_delivery_id);
4028: END IF;
4029:
4030: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4031:
4039: l_del_det_int_rec.source_code := del_details_rec.source_code;
4040: l_del_det_int_rec.container_flag := del_details_rec.container_flag;
4041: l_del_det_int_rec.requested_quantity_uom := del_details_rec.requested_quantity_uom;
4042: IF l_debug_on THEN
4043: wsh_debug_sv.log (l_module_name, 'For cancel, delivery detail id',l_del_det_int_rec.delivery_detail_id);
4044: END IF;
4045:
4046: Add_To_Update_Table(
4047: l_del_det_int_rec,
4049: p_delivery_id,
4050: l_return_status);
4051:
4052: IF l_debug_on THEN
4053: wsh_debug_sv.log (l_module_name, 'return status from add_to_update_tbl', l_return_status);
4054: END IF;
4055:
4056: END LOOP; -- for del_details_rec
4057:
4063: x_return_status => l_return_status
4064: );
4065:
4066: IF l_debug_on THEN
4067: wsh_debug_sv.log (l_module_name, 'Update_Delivery_Details l_return_status',l_return_status);
4068: END IF;
4069:
4070: IF l_debug_on THEN
4071: wsh_debug_sv.pop(l_module_name);
4067: wsh_debug_sv.log (l_module_name, 'Update_Delivery_Details l_return_status',l_return_status);
4068: END IF;
4069:
4070: IF l_debug_on THEN
4071: wsh_debug_sv.pop(l_module_name);
4072: END IF;
4073:
4074: EXCEPTION
4075: WHEN Others THEN
4074: EXCEPTION
4075: WHEN Others THEN
4076: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4077: IF l_debug_on THEN
4078: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
4079: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4080: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4081: END IF;
4082:
4075: WHEN Others THEN
4076: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4077: IF l_debug_on THEN
4078: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
4079: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4080: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4081: END IF;
4082:
4083: END Process_Cancel;
4076: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4077: IF l_debug_on THEN
4078: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
4079: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4080: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4081: END IF;
4082:
4083: END Process_Cancel;
4084:
4109: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4110: --
4111: IF l_debug_on IS NULL
4112: THEN
4113: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4114: END IF;
4115: --
4116: IF l_debug_on THEN
4117: wsh_debug_sv.push(l_module_name, 'Lock_Delivery_And_Details');
4113: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4114: END IF;
4115: --
4116: IF l_debug_on THEN
4117: wsh_debug_sv.push(l_module_name, 'Lock_Delivery_And_Details');
4118: wsh_debug_sv.log (l_module_name, 'Delivery Id', p_delivery_id);
4119: END IF;
4120:
4121: x_return_status := wsh_util_core.g_ret_sts_success;
4114: END IF;
4115: --
4116: IF l_debug_on THEN
4117: wsh_debug_sv.push(l_module_name, 'Lock_Delivery_And_Details');
4118: wsh_debug_sv.log (l_module_name, 'Delivery Id', p_delivery_id);
4119: END IF;
4120:
4121: x_return_status := wsh_util_core.g_ret_sts_success;
4122:
4120:
4121: x_return_status := wsh_util_core.g_ret_sts_success;
4122:
4123: IF l_debug_on THEN
4124: wsh_debug_sv.logmsg(l_module_name, 'Locking the Delivery');
4125: END IF;
4126: SELECT delivery_id
4127: INTO l_dummy_id
4128: FROM wsh_new_deliveries
4129: WHERE delivery_id = p_delivery_id
4130: FOR UPDATE NOWAIT;
4131:
4132: IF l_debug_on THEN
4133: wsh_debug_sv.logmsg(l_module_name, 'Locking the delivery details');
4134: END IF;
4135: OPEN lock_delivery_details;
4136: FETCH lock_delivery_details INTO det_ids;
4137: IF lock_delivery_details%NOTFOUND THEN
4135: OPEN lock_delivery_details;
4136: FETCH lock_delivery_details INTO det_ids;
4137: IF lock_delivery_details%NOTFOUND THEN
4138: IF l_debug_on THEN
4139: wsh_debug_sv.logmsg(l_module_name, 'No details found');
4140: END IF;
4141:
4142: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4143: CLOSE lock_delivery_details;
4145: IF (lock_delivery_details%ISOPEN) THEN
4146: CLOSE lock_delivery_details;
4147: END IF;
4148: IF l_debug_on THEN
4149: wsh_debug_sv.pop(l_module_name);
4150: END IF;
4151:
4152: EXCEPTION
4153: WHEN RECORD_LOCKED THEN
4153: WHEN RECORD_LOCKED THEN
4154: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4155:
4156: IF l_debug_on THEN
4157: wsh_debug_sv.logmsg(l_module_name, 'Could not obtain lock');
4158: END IF;
4159:
4160: FND_MESSAGE.Set_Name('WSH', 'WSH_NO_LOCK');
4161: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
4159:
4160: FND_MESSAGE.Set_Name('WSH', 'WSH_NO_LOCK');
4161: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
4162: IF l_debug_on THEN
4163: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4164: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
4165: END IF;
4166:
4167: WHEN others THEN
4160: FND_MESSAGE.Set_Name('WSH', 'WSH_NO_LOCK');
4161: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
4162: IF l_debug_on THEN
4163: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4164: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
4165: END IF;
4166:
4167: WHEN others THEN
4168: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4166:
4167: WHEN others THEN
4168: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4169: IF l_debug_on THEN
4170: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
4171: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4172: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4173: END IF;
4174: END Lock_Delivery_And_Details;
4167: WHEN others THEN
4168: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4169: IF l_debug_on THEN
4170: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
4171: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4172: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4173: END IF;
4174: END Lock_Delivery_And_Details;
4175:
4168: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4169: IF l_debug_on THEN
4170: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
4171: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4172: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4173: END IF;
4174: END Lock_Delivery_And_Details;
4175:
4176: PROCEDURE log_errors(
4189: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4190: --
4191: IF l_debug_on IS NULL
4192: THEN
4193: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4194: END IF;
4195: --
4196: IF l_debug_on THEN
4197: wsh_debug_sv.push(l_module_name, 'log_errors');
4193: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4194: END IF;
4195: --
4196: IF l_debug_on THEN
4197: wsh_debug_sv.push(l_module_name, 'log_errors');
4198: wsh_debug_sv.log (l_module_name, 'Interface table name', p_loc_interface_errors_rec.p_interface_table_name);
4199: wsh_debug_sv.log (l_module_name, 'Interface Id', p_loc_interface_errors_rec.p_interface_id);
4200: wsh_debug_sv.log (l_module_name, 'Message Name', p_loc_interface_errors_rec.p_message_name);
4201: END IF;
4194: END IF;
4195: --
4196: IF l_debug_on THEN
4197: wsh_debug_sv.push(l_module_name, 'log_errors');
4198: wsh_debug_sv.log (l_module_name, 'Interface table name', p_loc_interface_errors_rec.p_interface_table_name);
4199: wsh_debug_sv.log (l_module_name, 'Interface Id', p_loc_interface_errors_rec.p_interface_id);
4200: wsh_debug_sv.log (l_module_name, 'Message Name', p_loc_interface_errors_rec.p_message_name);
4201: END IF;
4202:
4195: --
4196: IF l_debug_on THEN
4197: wsh_debug_sv.push(l_module_name, 'log_errors');
4198: wsh_debug_sv.log (l_module_name, 'Interface table name', p_loc_interface_errors_rec.p_interface_table_name);
4199: wsh_debug_sv.log (l_module_name, 'Interface Id', p_loc_interface_errors_rec.p_interface_id);
4200: wsh_debug_sv.log (l_module_name, 'Message Name', p_loc_interface_errors_rec.p_message_name);
4201: END IF;
4202:
4203: WSH_INTERFACE_VALIDATIONS_PKG.Log_Interface_Errors(
4196: IF l_debug_on THEN
4197: wsh_debug_sv.push(l_module_name, 'log_errors');
4198: wsh_debug_sv.log (l_module_name, 'Interface table name', p_loc_interface_errors_rec.p_interface_table_name);
4199: wsh_debug_sv.log (l_module_name, 'Interface Id', p_loc_interface_errors_rec.p_interface_id);
4200: wsh_debug_sv.log (l_module_name, 'Message Name', p_loc_interface_errors_rec.p_message_name);
4201: END IF;
4202:
4203: WSH_INTERFACE_VALIDATIONS_PKG.Log_Interface_Errors(
4204: p_interface_errors_rec => p_loc_interface_errors_rec,
4206: p_api_name => p_api_name,
4207: x_return_status => x_return_status);
4208:
4209: IF l_debug_on THEN
4210: wsh_debug_sv.log (l_module_name, 'Return status from Log_Interface_Errors', x_return_status);
4211: wsh_debug_sv.pop(l_module_name);
4212: END IF;
4213: EXCEPTION
4214: WHEN others THEN
4207: x_return_status => x_return_status);
4208:
4209: IF l_debug_on THEN
4210: wsh_debug_sv.log (l_module_name, 'Return status from Log_Interface_Errors', x_return_status);
4211: wsh_debug_sv.pop(l_module_name);
4212: END IF;
4213: EXCEPTION
4214: WHEN others THEN
4215: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4213: EXCEPTION
4214: WHEN others THEN
4215: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4216: IF l_debug_on THEN
4217: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
4218: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4219: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4220: END IF;
4221:
4214: WHEN others THEN
4215: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4216: IF l_debug_on THEN
4217: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
4218: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4219: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4220: END IF;
4221:
4222: END Log_Errors;
4215: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4216: IF l_debug_on THEN
4217: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
4218: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4219: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4220: END IF;
4221:
4222: END Log_Errors;
4223:
4247: l_debug_on := wsh_debug_interface.g_debug;
4248:
4249: --
4250: IF l_debug_on IS NULL THEN
4251: l_debug_on := wsh_debug_sv.is_debug_enabled;
4252: END IF;
4253:
4254: --
4255: IF l_debug_on THEN
4252: END IF;
4253:
4254: --
4255: IF l_debug_on THEN
4256: wsh_debug_sv.push(l_module_name, 'split_delivery_detail');
4257: wsh_debug_sv.LOG(l_module_name, 'p_delivery_detail_id',p_delivery_detail_id);
4258: wsh_debug_sv.LOG(l_module_name, 'p_qty_to_split', p_qty_to_split);
4259: END IF;
4260:
4253:
4254: --
4255: IF l_debug_on THEN
4256: wsh_debug_sv.push(l_module_name, 'split_delivery_detail');
4257: wsh_debug_sv.LOG(l_module_name, 'p_delivery_detail_id',p_delivery_detail_id);
4258: wsh_debug_sv.LOG(l_module_name, 'p_qty_to_split', p_qty_to_split);
4259: END IF;
4260:
4261: OPEN base_detail_qty(p_delivery_detail_id);
4254: --
4255: IF l_debug_on THEN
4256: wsh_debug_sv.push(l_module_name, 'split_delivery_detail');
4257: wsh_debug_sv.LOG(l_module_name, 'p_delivery_detail_id',p_delivery_detail_id);
4258: wsh_debug_sv.LOG(l_module_name, 'p_qty_to_split', p_qty_to_split);
4259: END IF;
4260:
4261: OPEN base_detail_qty(p_delivery_detail_id);
4262: FETCH base_detail_qty INTO l_base_req_qty;
4262: FETCH base_detail_qty INTO l_base_req_qty;
4263: CLOSE base_detail_qty;
4264:
4265: IF l_debug_on THEN
4266: wsh_debug_sv.LOG(l_module_name, 'Base req qty', l_base_req_qty);
4267: END IF;
4268:
4269: IF (p_qty_to_split > l_base_req_qty) THEN
4270: -- Quantity has exceeded
4274: NULL;
4275: ELSE
4276: -- call split_delivery_details
4277: IF l_debug_on THEN
4278: wsh_debug_sv.LOG(l_module_name, 'qty to split', p_qty_to_split);
4279: END IF;
4280:
4281: IF p_qty_to_split IS NULL THEN
4282: fnd_message.set_name('WSH', 'WSH_REQUIRED_FIELD_NULL');
4292: x_new_detail_id => x_new_detail_id,
4293: x_return_status => l_return_status);
4294:
4295: IF l_debug_on THEN
4296: wsh_debug_sv.LOG(l_module_name, 'Split_Delivery_Details x_new_detail_id,l_return_status',
4297: x_new_detail_id || ',' || l_return_status);
4298: END IF;
4299:
4300: wsh_util_core.api_post_call(
4304: END IF;
4305:
4306: IF l_number_of_warnings > 0 THEN
4307: IF l_debug_on THEN
4308: wsh_debug_sv.logmsg (l_module_name,'Number of warnings', l_number_of_warnings);
4309: END IF;
4310: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
4311: END IF;
4312:
4312:
4313: x_return_status := wsh_util_core.g_ret_sts_success;
4314:
4315: IF l_debug_on THEN
4316: wsh_debug_sv.pop(l_module_name);
4317: END IF;
4318: EXCEPTION
4319: WHEN fnd_api.g_exc_error THEN
4320: x_return_status := fnd_api.g_ret_sts_error;
4319: WHEN fnd_api.g_exc_error THEN
4320: x_return_status := fnd_api.g_ret_sts_error;
4321: --
4322: IF l_debug_on THEN
4323: wsh_debug_sv.logmsg(l_module_name,
4324: 'FND_API.G_EXC_ERROR exception has occured.',
4325: wsh_debug_sv.c_excep_level);
4326: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
4327: END IF;
4321: --
4322: IF l_debug_on THEN
4323: wsh_debug_sv.logmsg(l_module_name,
4324: 'FND_API.G_EXC_ERROR exception has occured.',
4325: wsh_debug_sv.c_excep_level);
4326: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
4327: END IF;
4328: --
4329: WHEN fnd_api.g_exc_unexpected_error THEN
4322: IF l_debug_on THEN
4323: wsh_debug_sv.logmsg(l_module_name,
4324: 'FND_API.G_EXC_ERROR exception has occured.',
4325: wsh_debug_sv.c_excep_level);
4326: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
4327: END IF;
4328: --
4329: WHEN fnd_api.g_exc_unexpected_error THEN
4330: x_return_status := fnd_api.g_ret_sts_unexp_error;
4329: WHEN fnd_api.g_exc_unexpected_error THEN
4330: x_return_status := fnd_api.g_ret_sts_unexp_error;
4331: --
4332: IF l_debug_on THEN
4333: wsh_debug_sv.logmsg(l_module_name,
4334: 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',
4335: wsh_debug_sv.c_excep_level);
4336: wsh_debug_sv.pop(l_module_name,
4337: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4331: --
4332: IF l_debug_on THEN
4333: wsh_debug_sv.logmsg(l_module_name,
4334: 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',
4335: wsh_debug_sv.c_excep_level);
4336: wsh_debug_sv.pop(l_module_name,
4337: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4338: END IF;
4339: --
4332: IF l_debug_on THEN
4333: wsh_debug_sv.logmsg(l_module_name,
4334: 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',
4335: wsh_debug_sv.c_excep_level);
4336: wsh_debug_sv.pop(l_module_name,
4337: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4338: END IF;
4339: --
4340: WHEN wsh_util_core.g_exc_warning THEN
4340: WHEN wsh_util_core.g_exc_warning THEN
4341: x_return_status := wsh_util_core.g_ret_sts_warning;
4342: --
4343: IF l_debug_on THEN
4344: wsh_debug_sv.logmsg(l_module_name,
4345: 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',
4346: wsh_debug_sv.c_excep_level);
4347: wsh_debug_sv.pop(l_module_name,
4348: 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4342: --
4343: IF l_debug_on THEN
4344: wsh_debug_sv.logmsg(l_module_name,
4345: 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',
4346: wsh_debug_sv.c_excep_level);
4347: wsh_debug_sv.pop(l_module_name,
4348: 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4349: END IF;
4350: WHEN OTHERS THEN
4343: IF l_debug_on THEN
4344: wsh_debug_sv.logmsg(l_module_name,
4345: 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',
4346: wsh_debug_sv.c_excep_level);
4347: wsh_debug_sv.pop(l_module_name,
4348: 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4349: END IF;
4350: WHEN OTHERS THEN
4351: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
4351: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
4352: wsh_util_core.default_handler('WSH_INTERFACE_COMMON_ACTIONS.split_delivery_detail');
4353: --
4354: IF l_debug_on THEN
4355: wsh_debug_sv.logmsg(l_module_name,
4356: 'Unexpected error has occured. Oracle error message is '
4357: || SQLERRM,
4358: wsh_debug_sv.c_unexpec_err_level);
4359: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
4354: IF l_debug_on THEN
4355: wsh_debug_sv.logmsg(l_module_name,
4356: 'Unexpected error has occured. Oracle error message is '
4357: || SQLERRM,
4358: wsh_debug_sv.c_unexpec_err_level);
4359: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
4360: END IF;
4361: END split_delivery_detail;
4362:
4355: wsh_debug_sv.logmsg(l_module_name,
4356: 'Unexpected error has occured. Oracle error message is '
4357: || SQLERRM,
4358: wsh_debug_sv.c_unexpec_err_level);
4359: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
4360: END IF;
4361: END split_delivery_detail;
4362:
4363: