[Home] [Help]
854: l_rel_delivery_detail_id WSH_UTIL_CORE.Id_Tab_Type;
855: l_dummy_rsv_tbl INV_RESERVATION_GLOBAL.Mtl_Reservation_Tbl_Type;
856:
857: -- WMS
858: l_attr_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
859: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
860: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
861: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
862: l_matched_entities WSH_UTIL_CORE.id_tab_type;
855: l_dummy_rsv_tbl INV_RESERVATION_GLOBAL.Mtl_Reservation_Tbl_Type;
856:
857: -- WMS
858: l_attr_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
859: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
860: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
861: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
862: l_matched_entities WSH_UTIL_CORE.id_tab_type;
863: l_out_rec WSH_DELIVERY_AUTOCREATE.Out_rec_type;
856:
857: -- WMS
858: l_attr_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
859: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
860: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
861: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
862: l_matched_entities WSH_UTIL_CORE.id_tab_type;
863: l_out_rec WSH_DELIVERY_AUTOCREATE.Out_rec_type;
864: l_dd_pup_stop_id NUMBER;
857: -- WMS
858: l_attr_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
859: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
860: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
861: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
862: l_matched_entities WSH_UTIL_CORE.id_tab_type;
863: l_out_rec WSH_DELIVERY_AUTOCREATE.Out_rec_type;
864: l_dd_pup_stop_id NUMBER;
865: x_wms_return_status VARCHAR2(1);
859: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
860: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
861: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
862: l_matched_entities WSH_UTIL_CORE.id_tab_type;
863: l_out_rec WSH_DELIVERY_AUTOCREATE.Out_rec_type;
864: l_dd_pup_stop_id NUMBER;
865: x_wms_return_status VARCHAR2(1);
866: x_wms_msg_count NUMBER;
867: x_wms_msg_data VARCHAR2(2000);
1072: l_attr_tab(i).is_xdocked_flag := 'Y';
1073: END IF;
1074: END LOOP;
1075: l_action_rec.action := 'MATCH_GROUPS';
1076: WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups(
1077: p_attr_tab => l_attr_tab,
1078: p_action_rec => l_action_rec,
1079: p_target_rec => l_target_rec,
1080: p_group_tab => l_group_tab,
1083: x_return_status => l_return_status);
1084:
1085: IF l_debug_on THEN
1086: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
1087: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups l_return_status',l_return_status);
1088: END IF;
1089: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1090: OR (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
1091: x_return_status := l_return_status;
1088: END IF;
1089: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1090: OR (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
1091: x_return_status := l_return_status;
1092: WSH_UTIL_CORE.PrintMsg('Error occurred in WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups');
1093: IF l_debug_on THEN
1094: WSH_DEBUG_SV.pop(l_module_name);
1095: END IF;
1096: RETURN;
1975:
1976: IF l_debug_on THEN
1977: WSH_DEBUG_SV.log(l_module_name,'id_tab_temp count ',l_id_tab_temp.COUNT);
1978: WSH_DEBUG_SV.log(l_module_name,'det. tab count: '|| l_del_details_tbl.count);
1979: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DELIVERIES',WSH_DEBUG_SV.C_PROC_LEVEL);
1980: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
1981: END IF;
1982: --{
1983: IF l_id_tab_temp.count > 0 THEN
1980: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
1981: END IF;
1982: --{
1983: IF l_id_tab_temp.count > 0 THEN
1984: WSH_DELIVERY_AUTOCREATE.Autocreate_Deliveries (
1985: p_line_rows => l_id_tab_temp,
1986: p_init_flag => 'Y', -- Should refresh the PL/SQL tables for compatibility
1987: p_pick_release_flag => 'N',
1988: x_del_rows => l_delivery_ids_tbl,
1989: x_grouping_rows => l_grouping_tbl,
1990: x_return_status => l_cc_return_status );
1991: IF l_debug_on THEN
1992: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
1993: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.Autocreate_Deliveries l_cc_return_status',l_cc_return_status);
1994: END IF;
1995:
1996: -- set the intermediate ship to, ship method to null if group rec from constraint validation
1997: -- has these as 'N'
2129: l_del_details_tbl := l_unappended_det_tbl;
2130:
2131: IF l_debug_on THEN
2132: WSH_DEBUG_SV.log(l_module_name,'det. tab count: '|| l_del_details_tbl.count);
2133: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DELIVERIES',WSH_DEBUG_SV.C_PROC_LEVEL);
2134: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
2135: END IF;
2136:
2137: IF l_del_details_tbl.count > 0 THEN
2135: END IF;
2136:
2137: IF l_del_details_tbl.count > 0 THEN
2138: --{
2139: WSH_DELIVERY_AUTOCREATE.Autocreate_Deliveries (
2140: p_line_rows => l_del_details_tbl,
2141: p_init_flag => 'N', -- Should not refresh the PL/SQL tables
2142: p_pick_release_flag => p_use_header_flag,
2143: x_del_rows => l_delivery_ids_tbl,
2146: );
2147:
2148: IF l_debug_on THEN
2149: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
2150: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.Autocreate_Deliveries l_return_status',l_return_status);
2151: END IF;
2152:
2153: -- set the intermediate ship to, ship method to null if group rec from constraint
2154: -- validation has these as 'N'
2244: l_del_details_tbl := l_unappended_det_tbl;
2245:
2246: IF l_debug_on THEN
2247: WSH_DEBUG_SV.log(l_module_name,'det. tab count: '|| l_del_details_tbl.count);
2248: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DELIVERIES',WSH_DEBUG_SV.C_PROC_LEVEL);
2249: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
2250: END IF;
2251:
2252: IF l_del_details_tbl.count > 0 THEN
2250: END IF;
2251:
2252: IF l_del_details_tbl.count > 0 THEN
2253: --{
2254: WSH_DELIVERY_AUTOCREATE.Autocreate_Deliveries (
2255: p_line_rows => l_del_details_tbl,
2256: p_init_flag => 'N', -- Should not refresh the PL/SQL tables
2257: p_pick_release_flag => p_use_header_flag,
2258: x_del_rows => l_delivery_ids_tbl,
2259: x_grouping_rows => l_grouping_tbl,
2260: x_return_status => l_return_status
2261: );
2262: IF l_debug_on THEN
2263: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.Autocreate_Deliveries l_return_status',l_return_status);
2264: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
2265: END IF;
2266:
2267: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
2266:
2267: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
2268: OR (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
2269: x_return_status := l_return_status;
2270: WSH_UTIL_CORE.PrintMsg('Error occurred in WSH_DELIVERY_AUTOCREATE.Autocreate_Deliveries');
2271: IF l_debug_on THEN
2272: WSH_DEBUG_SV.pop(l_module_name);
2273: END IF;
2274: RETURN;
4031: l_errors NUMBER := 0;
4032: l_warnings NUMBER := 0;
4033: l_pr_batch_size NUMBER;
4034:
4035: l_attr_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
4036: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
4037: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
4038: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
4039: l_matched_entities WSH_UTIL_CORE.id_tab_type;
4032: l_warnings NUMBER := 0;
4033: l_pr_batch_size NUMBER;
4034:
4035: l_attr_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
4036: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
4037: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
4038: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
4039: l_matched_entities WSH_UTIL_CORE.id_tab_type;
4040: l_out_rec WSH_DELIVERY_AUTOCREATE.Out_rec_type;
4033: l_pr_batch_size NUMBER;
4034:
4035: l_attr_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
4036: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
4037: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
4038: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
4039: l_matched_entities WSH_UTIL_CORE.id_tab_type;
4040: l_out_rec WSH_DELIVERY_AUTOCREATE.Out_rec_type;
4041:
4034:
4035: l_attr_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
4036: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
4037: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
4038: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
4039: l_matched_entities WSH_UTIL_CORE.id_tab_type;
4040: l_out_rec WSH_DELIVERY_AUTOCREATE.Out_rec_type;
4041:
4042: l_check_dcp NUMBER;
4036: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
4037: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
4038: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
4039: l_matched_entities WSH_UTIL_CORE.id_tab_type;
4040: l_out_rec WSH_DELIVERY_AUTOCREATE.Out_rec_type;
4041:
4042: l_check_dcp NUMBER;
4043: l_in_param_rec WSH_FTE_INTEGRATION.rate_del_in_param_rec;
4044: l_out_param_rec WSH_FTE_INTEGRATION.rate_del_out_param_rec;
4926:
4927: -- Unassign empty containers for deliveries that are unassigned during backodering
4928: IF g_unassigned_delivery_ids.COUNT > 0 THEN
4929: IF l_debug_on THEN
4930: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.unassign_empty_containers',WSH_DEBUG_SV.C_PROC_LEVEL);
4931: END IF;
4932: WSH_DELIVERY_AUTOCREATE.Unassign_Empty_Containers(g_unassigned_delivery_ids,l_return_status);
4933: IF l_debug_on THEN
4934: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.unassign_empty_containers l_return_status',l_return_status);
4928: IF g_unassigned_delivery_ids.COUNT > 0 THEN
4929: IF l_debug_on THEN
4930: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.unassign_empty_containers',WSH_DEBUG_SV.C_PROC_LEVEL);
4931: END IF;
4932: WSH_DELIVERY_AUTOCREATE.Unassign_Empty_Containers(g_unassigned_delivery_ids,l_return_status);
4933: IF l_debug_on THEN
4934: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.unassign_empty_containers l_return_status',l_return_status);
4935: END IF;
4936: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4930: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.unassign_empty_containers',WSH_DEBUG_SV.C_PROC_LEVEL);
4931: END IF;
4932: WSH_DELIVERY_AUTOCREATE.Unassign_Empty_Containers(g_unassigned_delivery_ids,l_return_status);
4933: IF l_debug_on THEN
4934: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.unassign_empty_containers l_return_status',l_return_status);
4935: END IF;
4936: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4937: l_completion_status := 'WARNING';
4938: END IF;
5195: l_attr_tab(i).entity_type := 'DELIVERY_DETAIL';
5196: END LOOP;
5197: l_action_rec.action := 'MATCH_GROUPS';
5198: IF l_debug_on THEN
5199: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups'
5200: ,WSH_DEBUG_SV.C_PROC_LEVEL);
5201: WSH_DEBUG_SV.log(l_module_name,'l_attr_tab.COUNT ',l_attr_tab.COUNT);
5202: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
5203: END IF;
5200: ,WSH_DEBUG_SV.C_PROC_LEVEL);
5201: WSH_DEBUG_SV.log(l_module_name,'l_attr_tab.COUNT ',l_attr_tab.COUNT);
5202: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
5203: END IF;
5204: WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups (
5205: p_attr_tab => l_attr_tab,
5206: p_action_rec => l_action_rec,
5207: p_target_rec => l_target_rec,
5208: p_group_tab => l_group_tab,
5210: x_out_rec => l_out_rec,
5211: x_return_status => l_return_status );
5212: IF l_debug_on THEN
5213: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
5214: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups l_return_status'
5215: ,l_return_status);
5216: END IF;
5217: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
5218: OR (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
5215: ,l_return_status);
5216: END IF;
5217: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
5218: OR (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
5219: WSH_UTIL_CORE.PrintMsg('Error occurred in WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups');
5220: RAISE e_return;
5221: END IF;
5222:
5223: --bug 7171766
5402: END LOOP; --}
5403:
5404: -- Delete empty deliveries
5405: IF l_debug_on THEN
5406: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.Delete_Empty_Deliveries' ,WSH_DEBUG_SV.C_PROC_LEVEL);
5407: END IF;
5408: WSH_DELIVERY_AUTOCREATE.Delete_Empty_Deliveries(g_batch_id,l_return_status);
5409: IF l_debug_on THEN
5410: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.Delete_Empty_Deliveries l_return_status',l_return_status);
5404: -- Delete empty deliveries
5405: IF l_debug_on THEN
5406: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.Delete_Empty_Deliveries' ,WSH_DEBUG_SV.C_PROC_LEVEL);
5407: END IF;
5408: WSH_DELIVERY_AUTOCREATE.Delete_Empty_Deliveries(g_batch_id,l_return_status);
5409: IF l_debug_on THEN
5410: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.Delete_Empty_Deliveries l_return_status',l_return_status);
5411: END IF;
5412: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
5406: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.Delete_Empty_Deliveries' ,WSH_DEBUG_SV.C_PROC_LEVEL);
5407: END IF;
5408: WSH_DELIVERY_AUTOCREATE.Delete_Empty_Deliveries(g_batch_id,l_return_status);
5409: IF l_debug_on THEN
5410: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.Delete_Empty_Deliveries l_return_status',l_return_status);
5411: END IF;
5412: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
5413: l_completion_status := 'WARNING';
5414: END IF;