44: wlst.parent_delivery_detail_id;
45:
46: l_curr_unpack_parent_lpn_id NUMBER;
47: l_prev_unpack_parent_lpn_id NUMBER;
48: l_unpack_lpn_id_tbl wsh_util_core.id_tab_type;
49:
50: cursor l_pack_csr (p_hw_time_stamp IN DATE) is
51: select wddc.lpn_id,
52: wddp.lpn_id parent_lpn_id
67: wda.parent_delivery_detail_id;
68:
69: l_curr_pack_parent_lpn_id NUMBER;
70: l_prev_pack_parent_lpn_id NUMBER;
71: l_pack_lpn_id_tbl wsh_util_core.id_tab_type;
72:
73: cursor l_unassign_csr (p_hw_time_stamp IN DATE) is
74: select wdd.lpn_id,
75: wlst.delivery_id old_delivery_id
88:
89:
90: l_curr_unasgn_del_id NUMBER;
91: l_prev_unasgn_del_id NUMBER;
92: l_unasgn_lpn_id_tbl wsh_util_core.id_tab_type;
93:
94: cursor l_assign_csr (p_hw_time_stamp IN DATE) is
95: select wdd.lpn_id,
96: wda.delivery_id new_delivery_id
108: wda.delivery_id;
109:
110: l_curr_asgn_del_id NUMBER;
111: l_prev_asgn_del_id NUMBER;
112: l_asgn_lpn_id_tbl wsh_util_core.id_tab_type;
113:
114: cursor l_update_csr (p_hw_time_stamp IN DATE) is
115: select wdd.lpn_id,
116: wlst.delivery_detail_id,
162: WSH_DEBUG_SV.push(l_module_name);
163: END IF;
164: --
165: -- Setting the return status in the begining
166: x_return_status := wsh_util_core.g_ret_sts_success;
167: --
168: IF l_debug_on THEN
169: WSH_DEBUG_SV.log(l_module_name,'wsh_wms_lpn_grp.g_hw_time_stamp', wsh_wms_lpn_grp.g_hw_time_stamp);
170: END IF;
452: --
453: -- Debug Statements
454: --
455: IF l_debug_on THEN
456: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
457: END IF;
458: --
459: wsh_util_core.api_post_call(
460: p_return_status => l_return_status,
455: IF l_debug_on THEN
456: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
457: END IF;
458: --
459: wsh_util_core.api_post_call(
460: p_return_status => l_return_status,
461: x_num_warnings => l_num_warnings,
462: x_num_errors => l_num_errors,
463: p_msg_data => l_msg_data
470:
471: IF l_num_errors > 0 THEN
472: RAISE FND_API.G_EXC_ERROR;
473: ELSIF l_num_warnings > 0 THEN
474: x_return_status := wsh_util_core.g_ret_sts_warning;
475: END IF;
476:
477: --}
478: --
484: --
485: EXCEPTION
486: --{
487: WHEN FND_API.G_EXC_ERROR THEN
488: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
489: WSH_WMS_LPN_GRP.g_call_group_api := l_original_call_grp_api;
490: IF (nvl(wsh_wms_lpn_grp.g_update_to_containers,'N') = 'Y') THEN
491: wsh_wms_lpn_grp.g_update_to_containers := 'N';
492: END IF;
500: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
501: END IF;
502: --
503: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
504: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
505: WSH_WMS_LPN_GRP.g_call_group_api := l_original_call_grp_api;
506: IF (nvl(wsh_wms_lpn_grp.g_update_to_containers,'N') = 'Y') THEN
507: wsh_wms_lpn_grp.g_update_to_containers := 'N';
508: END IF;
516: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
517: END IF;
518: --
519: WHEN OTHERS THEN
520: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
521: wsh_util_core.default_handler('WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_module_name);
522: WSH_WMS_LPN_GRP.g_call_group_api := l_original_call_grp_api;
523: IF (nvl(wsh_wms_lpn_grp.g_update_to_containers,'N') = 'Y') THEN
524: wsh_wms_lpn_grp.g_update_to_containers := 'N';
517: END IF;
518: --
519: WHEN OTHERS THEN
520: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
521: wsh_util_core.default_handler('WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_module_name);
522: WSH_WMS_LPN_GRP.g_call_group_api := l_original_call_grp_api;
523: IF (nvl(wsh_wms_lpn_grp.g_update_to_containers,'N') = 'Y') THEN
524: wsh_wms_lpn_grp.g_update_to_containers := 'N';
525: END IF;
604: WSH_DEBUG_SV.push(l_module_name);
605: END IF;
606: --
607: -- Setting the return status in the begining
608: x_return_status := wsh_util_core.g_ret_sts_success;
609: --
610: IF ( wsh_wms_lpn_grp.g_hw_time_stamp is null ) THEN
611: wsh_wms_lpn_grp.g_hw_time_stamp := sysdate;
612: END IF;
664: --
665: -- Debug Statements
666: --
667: IF l_debug_on THEN
668: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
669: END IF;
670: --
671: wsh_util_core.api_post_call(
672: p_return_status => l_return_status,
667: IF l_debug_on THEN
668: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
669: END IF;
670: --
671: wsh_util_core.api_post_call(
672: p_return_status => l_return_status,
673: x_num_warnings => l_num_warnings,
674: x_num_errors => l_num_errors,
675: p_msg_data => l_msg_data
742: --
743: -- Debug Statements
744: --
745: IF l_debug_on THEN
746: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
747: END IF;
748: --
749: wsh_util_core.api_post_call(
750: p_return_status => l_return_status,
745: IF l_debug_on THEN
746: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
747: END IF;
748: --
749: wsh_util_core.api_post_call(
750: p_return_status => l_return_status,
751: x_num_warnings => l_num_warnings,
752: x_num_errors => l_num_errors,
753: p_msg_data => l_msg_data
760:
761: IF l_num_errors > 0 THEN
762: RAISE FND_API.G_EXC_ERROR;
763: ELSIF l_num_warnings > 0 THEN
764: x_return_status := wsh_util_core.g_ret_sts_warning;
765: END IF;
766:
767: --}
768: --
774: --
775: EXCEPTION
776: --{
777: WHEN FND_API.G_EXC_ERROR THEN
778: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
779: WSH_WMS_LPN_GRP.g_call_group_api := l_original_call_grp_api;
780: IF (nvl(wsh_wms_lpn_grp.g_update_to_containers,'N') = 'Y') THEN
781: wsh_wms_lpn_grp.g_update_to_containers := 'N';
782: END IF;
790: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
791: END IF;
792: --
793: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
794: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
795: WSH_WMS_LPN_GRP.g_call_group_api := l_original_call_grp_api;
796: IF (nvl(wsh_wms_lpn_grp.g_update_to_containers,'N') = 'Y') THEN
797: wsh_wms_lpn_grp.g_update_to_containers := 'N';
798: END IF;
806: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
807: END IF;
808: --
809: WHEN OTHERS THEN
810: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
811: wsh_util_core.default_handler('WSH_LPN_SYNC_COMM_PKG.SYNC_PRORATED_LPNS_TO_WMS',l_module_name);
812: WSH_WMS_LPN_GRP.g_call_group_api := l_original_call_grp_api;
813: IF (nvl(wsh_wms_lpn_grp.g_update_to_containers,'N') = 'Y') THEN
814: wsh_wms_lpn_grp.g_update_to_containers := 'N';
807: END IF;
808: --
809: WHEN OTHERS THEN
810: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
811: wsh_util_core.default_handler('WSH_LPN_SYNC_COMM_PKG.SYNC_PRORATED_LPNS_TO_WMS',l_module_name);
812: WSH_WMS_LPN_GRP.g_call_group_api := l_original_call_grp_api;
813: IF (nvl(wsh_wms_lpn_grp.g_update_to_containers,'N') = 'Y') THEN
814: wsh_wms_lpn_grp.g_update_to_containers := 'N';
815: END IF;