311: x_org_info.autopack_level := NVL(WSH_PR_CRITERIA.g_autopack_level, l_param_info.autopack_level);
312: -- rlanka : Pack J Enhancement
313: --
314: -- LSP PROJECT : Use_header_flag value defaulting (from org/client defaults) has been moved to the calling API
315: -- WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups/Create_Hash and hence just passing
316: -- the original value to the calling API.
317: --x_org_info.use_header_flag := NVL(WSH_PR_CRITERIA.g_acDelivCriteria, l_param_info.autocreate_del_orders_flag); --bug 4556414
318: x_org_info.use_header_flag := WSH_PR_CRITERIA.g_acDelivCriteria;
319: -- LSP PROJECT : end
869: l_rel_delivery_detail_id WSH_UTIL_CORE.Id_Tab_Type;
870: l_dummy_rsv_tbl INV_RESERVATION_GLOBAL.Mtl_Reservation_Tbl_Type;
871:
872: -- WMS
873: l_attr_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
874: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
875: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
876: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
877: l_matched_entities WSH_UTIL_CORE.id_tab_type;
870: l_dummy_rsv_tbl INV_RESERVATION_GLOBAL.Mtl_Reservation_Tbl_Type;
871:
872: -- WMS
873: l_attr_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
874: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
875: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
876: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
877: l_matched_entities WSH_UTIL_CORE.id_tab_type;
878: l_out_rec WSH_DELIVERY_AUTOCREATE.Out_rec_type;
871:
872: -- WMS
873: l_attr_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
874: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
875: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
876: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
877: l_matched_entities WSH_UTIL_CORE.id_tab_type;
878: l_out_rec WSH_DELIVERY_AUTOCREATE.Out_rec_type;
879: l_dd_pup_stop_id NUMBER;
872: -- WMS
873: l_attr_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
874: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
875: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
876: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
877: l_matched_entities WSH_UTIL_CORE.id_tab_type;
878: l_out_rec WSH_DELIVERY_AUTOCREATE.Out_rec_type;
879: l_dd_pup_stop_id NUMBER;
880: x_wms_return_status VARCHAR2(1);
874: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
875: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
876: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
877: l_matched_entities WSH_UTIL_CORE.id_tab_type;
878: l_out_rec WSH_DELIVERY_AUTOCREATE.Out_rec_type;
879: l_dd_pup_stop_id NUMBER;
880: x_wms_return_status VARCHAR2(1);
881: x_wms_msg_count NUMBER;
882: x_wms_msg_data VARCHAR2(2000);
1092: l_attr_tab(i).is_xdocked_flag := 'Y';
1093: END IF;
1094: END LOOP;
1095: -- LSP PROJECT : Use_header_flag value defaulting (from org/client defaults) has been moved to the calling API
1096: -- WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups/Create_Hash and to recognize the change
1097: -- passing action code as 'MATCH_GROUPS_AT_PICK' instead of 'MATCH_GROUPS'.
1098: l_action_rec.action := 'MATCH_GROUPS_AT_PICK';
1099: -- LSP PROJECT : end
1100: l_action_rec.group_by_header_flag := p_use_header_flag ; --bug 8623544
1098: l_action_rec.action := 'MATCH_GROUPS_AT_PICK';
1099: -- LSP PROJECT : end
1100: l_action_rec.group_by_header_flag := p_use_header_flag ; --bug 8623544
1101:
1102: WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups(
1103: p_attr_tab => l_attr_tab,
1104: p_action_rec => l_action_rec,
1105: p_target_rec => l_target_rec,
1106: p_group_tab => l_group_tab,
1109: x_return_status => l_return_status);
1110:
1111: IF l_debug_on THEN
1112: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
1113: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups l_return_status',l_return_status);
1114: END IF;
1115: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1116: OR (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
1117: x_return_status := l_return_status;
1114: END IF;
1115: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1116: OR (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
1117: x_return_status := l_return_status;
1118: WSH_UTIL_CORE.PrintMsg('Error occurred in WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups');
1119: IF l_debug_on THEN
1120: WSH_DEBUG_SV.pop(l_module_name);
1121: END IF;
1122: RETURN;
2036:
2037: IF l_debug_on THEN
2038: WSH_DEBUG_SV.log(l_module_name,'id_tab_temp count ',l_id_tab_temp.COUNT);
2039: WSH_DEBUG_SV.log(l_module_name,'det. tab count: '|| l_del_details_tbl.count);
2040: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DELIVERIES',WSH_DEBUG_SV.C_PROC_LEVEL);
2041: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
2042: END IF;
2043: --{
2044: IF l_id_tab_temp.count > 0 THEN
2041: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
2042: END IF;
2043: --{
2044: IF l_id_tab_temp.count > 0 THEN
2045: WSH_DELIVERY_AUTOCREATE.Autocreate_Deliveries (
2046: p_line_rows => l_id_tab_temp,
2047: p_init_flag => 'Y', -- Should refresh the PL/SQL tables for compatibility
2048: p_pick_release_flag => 'N',
2049: x_del_rows => l_delivery_ids_tbl,
2050: x_grouping_rows => l_grouping_tbl,
2051: x_return_status => l_cc_return_status );
2052: IF l_debug_on THEN
2053: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
2054: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.Autocreate_Deliveries l_cc_return_status',l_cc_return_status);
2055: END IF;
2056:
2057: -- set the intermediate ship to, ship method to null if group rec from constraint validation
2058: -- has these as 'N'
2190: l_del_details_tbl := l_unappended_det_tbl;
2191:
2192: IF l_debug_on THEN
2193: WSH_DEBUG_SV.log(l_module_name,'det. tab count: '|| l_del_details_tbl.count);
2194: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DELIVERIES',WSH_DEBUG_SV.C_PROC_LEVEL);
2195: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
2196: END IF;
2197:
2198: IF l_del_details_tbl.count > 0 THEN
2196: END IF;
2197:
2198: IF l_del_details_tbl.count > 0 THEN
2199: --{
2200: WSH_DELIVERY_AUTOCREATE.Autocreate_Deliveries (
2201: p_line_rows => l_del_details_tbl,
2202: p_init_flag => 'N', -- Should not refresh the PL/SQL tables
2203: p_pick_release_flag => p_use_header_flag,
2204: x_del_rows => l_delivery_ids_tbl,
2207: );
2208:
2209: IF l_debug_on THEN
2210: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
2211: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.Autocreate_Deliveries l_return_status',l_return_status);
2212: END IF;
2213:
2214: -- set the intermediate ship to, ship method to null if group rec from constraint
2215: -- validation has these as 'N'
2305: l_del_details_tbl := l_unappended_det_tbl;
2306:
2307: IF l_debug_on THEN
2308: WSH_DEBUG_SV.log(l_module_name,'det. tab count: '|| l_del_details_tbl.count);
2309: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DELIVERIES',WSH_DEBUG_SV.C_PROC_LEVEL);
2310: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
2311: END IF;
2312:
2313: IF l_del_details_tbl.count > 0 THEN
2311: END IF;
2312:
2313: IF l_del_details_tbl.count > 0 THEN
2314: --{
2315: WSH_DELIVERY_AUTOCREATE.Autocreate_Deliveries (
2316: p_line_rows => l_del_details_tbl,
2317: p_init_flag => 'N', -- Should not refresh the PL/SQL tables
2318: p_pick_release_flag => p_use_header_flag,
2319: x_del_rows => l_delivery_ids_tbl,
2320: x_grouping_rows => l_grouping_tbl,
2321: x_return_status => l_return_status
2322: );
2323: IF l_debug_on THEN
2324: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.Autocreate_Deliveries l_return_status',l_return_status);
2325: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
2326: END IF;
2327:
2328: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
2327:
2328: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
2329: OR (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
2330: x_return_status := l_return_status;
2331: WSH_UTIL_CORE.PrintMsg('Error occurred in WSH_DELIVERY_AUTOCREATE.Autocreate_Deliveries');
2332: IF l_debug_on THEN
2333: WSH_DEBUG_SV.pop(l_module_name);
2334: END IF;
2335: RETURN;
4121: l_errors NUMBER := 0;
4122: l_warnings NUMBER := 0;
4123: l_pr_batch_size NUMBER;
4124:
4125: l_attr_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
4126: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
4127: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
4128: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
4129: l_matched_entities WSH_UTIL_CORE.id_tab_type;
4122: l_warnings NUMBER := 0;
4123: l_pr_batch_size NUMBER;
4124:
4125: l_attr_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
4126: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
4127: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
4128: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
4129: l_matched_entities WSH_UTIL_CORE.id_tab_type;
4130: l_out_rec WSH_DELIVERY_AUTOCREATE.Out_rec_type;
4123: l_pr_batch_size NUMBER;
4124:
4125: l_attr_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
4126: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
4127: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
4128: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
4129: l_matched_entities WSH_UTIL_CORE.id_tab_type;
4130: l_out_rec WSH_DELIVERY_AUTOCREATE.Out_rec_type;
4131:
4124:
4125: l_attr_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
4126: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
4127: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
4128: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
4129: l_matched_entities WSH_UTIL_CORE.id_tab_type;
4130: l_out_rec WSH_DELIVERY_AUTOCREATE.Out_rec_type;
4131:
4132: l_check_dcp NUMBER;
4126: l_group_tab WSH_DELIVERY_AUTOCREATE.Grp_attr_tab_type;
4127: l_action_rec WSH_DELIVERY_AUTOCREATE.Action_rec_type;
4128: l_target_rec WSH_DELIVERY_AUTOCREATE.Grp_attr_rec_type;
4129: l_matched_entities WSH_UTIL_CORE.id_tab_type;
4130: l_out_rec WSH_DELIVERY_AUTOCREATE.Out_rec_type;
4131:
4132: l_check_dcp NUMBER;
4133: l_in_param_rec WSH_FTE_INTEGRATION.rate_del_in_param_rec;
4134: l_out_param_rec WSH_FTE_INTEGRATION.rate_del_out_param_rec;
5021:
5022: -- Unassign empty containers for deliveries that are unassigned during backodering
5023: IF g_unassigned_delivery_ids.COUNT > 0 AND (l_mode IS NULL OR l_mode IN ('PICK-SS','PICK')) THEN --WMS High Vol Support, Added AND cond
5024: IF l_debug_on THEN
5025: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.unassign_empty_containers',WSH_DEBUG_SV.C_PROC_LEVEL);
5026: END IF;
5027: WSH_DELIVERY_AUTOCREATE.Unassign_Empty_Containers(g_unassigned_delivery_ids,l_return_status);
5028: IF l_debug_on THEN
5029: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.unassign_empty_containers l_return_status',l_return_status);
5023: IF g_unassigned_delivery_ids.COUNT > 0 AND (l_mode IS NULL OR l_mode IN ('PICK-SS','PICK')) THEN --WMS High Vol Support, Added AND cond
5024: IF l_debug_on THEN
5025: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.unassign_empty_containers',WSH_DEBUG_SV.C_PROC_LEVEL);
5026: END IF;
5027: WSH_DELIVERY_AUTOCREATE.Unassign_Empty_Containers(g_unassigned_delivery_ids,l_return_status);
5028: IF l_debug_on THEN
5029: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.unassign_empty_containers l_return_status',l_return_status);
5030: END IF;
5031: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
5025: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.unassign_empty_containers',WSH_DEBUG_SV.C_PROC_LEVEL);
5026: END IF;
5027: WSH_DELIVERY_AUTOCREATE.Unassign_Empty_Containers(g_unassigned_delivery_ids,l_return_status);
5028: IF l_debug_on THEN
5029: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.unassign_empty_containers l_return_status',l_return_status);
5030: END IF;
5031: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
5032: l_completion_status := 'WARNING';
5033: END IF;
5304: l_action_rec.action := 'MATCH_GROUPS';
5305: l_action_rec.group_by_header_flag := l_org_info_tbl(crec.organization_id).use_header_flag ; --bug 8623544
5306:
5307: IF l_debug_on THEN
5308: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups'
5309: ,WSH_DEBUG_SV.C_PROC_LEVEL);
5310: WSH_DEBUG_SV.log(l_module_name,'l_attr_tab.COUNT ',l_attr_tab.COUNT);
5311: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
5312: END IF;
5309: ,WSH_DEBUG_SV.C_PROC_LEVEL);
5310: WSH_DEBUG_SV.log(l_module_name,'l_attr_tab.COUNT ',l_attr_tab.COUNT);
5311: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
5312: END IF;
5313: WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups (
5314: p_attr_tab => l_attr_tab,
5315: p_action_rec => l_action_rec,
5316: p_target_rec => l_target_rec,
5317: p_group_tab => l_group_tab,
5319: x_out_rec => l_out_rec,
5320: x_return_status => l_return_status );
5321: IF l_debug_on THEN
5322: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
5323: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups l_return_status'
5324: ,l_return_status);
5325: END IF;
5326: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
5327: OR (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
5324: ,l_return_status);
5325: END IF;
5326: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
5327: OR (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
5328: WSH_UTIL_CORE.PrintMsg('Error occurred in WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups');
5329: RAISE e_return;
5330: END IF;
5331:
5332: --bug 7171766
5536: END LOOP; --}
5537:
5538: -- Delete empty deliveries
5539: IF l_debug_on THEN
5540: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.Delete_Empty_Deliveries' ,WSH_DEBUG_SV.C_PROC_LEVEL);
5541: END IF;
5542: WSH_DELIVERY_AUTOCREATE.Delete_Empty_Deliveries(g_batch_id,l_return_status);
5543: IF l_debug_on THEN
5544: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.Delete_Empty_Deliveries l_return_status',l_return_status);
5538: -- Delete empty deliveries
5539: IF l_debug_on THEN
5540: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.Delete_Empty_Deliveries' ,WSH_DEBUG_SV.C_PROC_LEVEL);
5541: END IF;
5542: WSH_DELIVERY_AUTOCREATE.Delete_Empty_Deliveries(g_batch_id,l_return_status);
5543: IF l_debug_on THEN
5544: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.Delete_Empty_Deliveries l_return_status',l_return_status);
5545: END IF;
5546: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
5540: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.Delete_Empty_Deliveries' ,WSH_DEBUG_SV.C_PROC_LEVEL);
5541: END IF;
5542: WSH_DELIVERY_AUTOCREATE.Delete_Empty_Deliveries(g_batch_id,l_return_status);
5543: IF l_debug_on THEN
5544: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_AUTOCREATE.Delete_Empty_Deliveries l_return_status',l_return_status);
5545: END IF;
5546: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
5547: l_completion_status := 'WARNING';
5548: END IF;