[Home] [Help]
1: PACKAGE BODY WSH_DELIVERY_DETAILS_ACTIONS as
2: /* $Header: WSHDDACB.pls 120.36.12010000.3 2008/11/06 11:53:07 anvarshn ship $ */
3:
4: -- odaboval : Begin of OPM Changes (Pick_Confirm)
5: G_PACKAGE_NAME CONSTANT VARCHAR2(50) := 'WSH_DELIVERY_DETAILS_ACTIONS';
1: PACKAGE BODY WSH_DELIVERY_DETAILS_ACTIONS as
2: /* $Header: WSHDDACB.pls 120.36.12010000.3 2008/11/06 11:53:07 anvarshn ship $ */
3:
4: -- odaboval : Begin of OPM Changes (Pick_Confirm)
5: G_PACKAGE_NAME CONSTANT VARCHAR2(50) := 'WSH_DELIVERY_DETAILS_ACTIONS';
6:
7: G_MAX_DECIMAL_DIGITS CONSTANT NUMBER := 9 ;
8: G_MAX_REAL_DIGITS CONSTANT NUMBER := 10 ;
9: G_RET_WARNING CONSTANT VARCHAR2(1):= 'W';
1458: END IF;
1459: -- Workflow Changes ==/
1460: --
1461: IF l_debug_on THEN
1462: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_TOP_DETAIL_TO_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
1463: END IF;
1464: --
1465:
1466: wsh_delivery_details_actions.assign_top_detail_to_delivery(
1462: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_TOP_DETAIL_TO_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
1463: END IF;
1464: --
1465:
1466: wsh_delivery_details_actions.assign_top_detail_to_delivery(
1467: P_DETAIL_ID => l_topmost_delivery_detail_id,
1468: P_DELIVERY_ID => p_delivery_id,
1469: X_RETURN_STATUS => x_return_status,
1470: x_dlvy_has_lines => x_dlvy_has_lines, -- J-IB-NPARIKH
1602: WHEN others THEN
1603: ROLLBACK TO before_assign_topmost_cont;
1604: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1605: wsh_util_core.add_message(x_return_status,l_module_name);
1606: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_DELIVERY_DETAIL',l_module_name);
1607:
1608: --
1609: IF l_debug_on THEN
1610: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1673: --
1674: EXCEPTION
1675: WHEN others THEN
1676: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1677: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.Assign_Detail_to_Delivery',l_module_name);
1678: --
1679: IF l_debug_on THEN
1680: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1681: END IF;
3112: -- End of OTM R12 : assign delivery detail
3113:
3114: -- K: MDC delete consolidation record of it exists
3115: l_mdc_detail_tab(1) := p_detail_id;
3116: WSH_DELIVERY_DETAILS_ACTIONS.Delete_Consol_Record(
3117: p_detail_id_tab => l_mdc_detail_tab,
3118: x_return_status => x_return_status);
3119:
3120: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3189: last_update_login = FND_GLOBAL.LOGIN_ID
3190: WHERE delivery_detail_id = p_detail_id;
3191:
3192: l_mdc_detail_tab(1) := p_detail_id;
3193: WSH_DELIVERY_DETAILS_ACTIONS.Delete_Consol_Record(
3194: p_detail_id_tab => l_mdc_detail_tab,
3195: x_return_status => x_return_status);
3196:
3197: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3368:
3369: FOR i in l_sync_tmp_recTbl.delivery_detail_id_tbl.first..l_sync_tmp_recTbl.delivery_detail_id_tbl.last LOOP
3370: l_mdc_detail_tab(i) := l_sync_tmp_recTbl.delivery_detail_id_tbl(i);
3371: END LOOP;
3372: WSH_DELIVERY_DETAILS_ACTIONS.Create_Consol_Record(
3373: p_detail_id_tab => l_mdc_detail_tab,
3374: x_return_status => x_return_status);
3375:
3376: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3520: --
3521: RETURN;
3522: WHEN others THEN
3523: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3524: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_DETAIL_TO_CONT',l_module_name);
3525: --
3526: IF l_debug_on THEN
3527: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3528: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3729: last_updated_by = FND_GLOBAL.USER_ID,
3730: last_update_login = FND_GLOBAL.LOGIN_ID
3731: WHERE delivery_detail_id = p_detail_id;
3732: l_mdc_detail_tab(1) := p_detail_id;
3733: WSH_DELIVERY_DETAILS_ACTIONS.Create_Consol_Record(
3734: p_detail_id_tab => l_mdc_detail_tab,
3735: x_return_status => x_return_status);
3736:
3737: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3895: END IF;
3896: --
3897: RETURN;
3898: WHEN others THEN
3899: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_DETAIL_FROM_CONT',l_module_name);
3900: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3901:
3902: --
3903: IF l_debug_on THEN
4729: RAISE NO_DATA_FOUND;
4730: END IF;
4731:
4732: l_mdc_detail_tab(1) := l_detail.delivery_detail_id;
4733: WSH_DELIVERY_DETAILS_ACTIONS.Create_Consol_Record(
4734: p_detail_id_tab => l_mdc_detail_tab,
4735: x_return_status => x_return_status);
4736:
4737: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5083: --
5084: RETURN;
5085: WHEN others THEN
5086: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5087: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_TOP_DETAIL_TO_DELIVERY',l_module_name);
5088: --
5089: IF l_debug_on THEN
5090: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5091: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5151: --
5152: EXCEPTION
5153: WHEN others THEN
5154: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5155: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_TOP_DETAIL_TO_DELIVERY',l_module_name);
5156: --
5157: IF l_debug_on THEN
5158: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5159: END IF;
6080:
6081: FOR i in l_sync_tmp_recTbl.delivery_detail_id_tbl.first..l_sync_tmp_recTbl.delivery_detail_id_tbl.last LOOP
6082: l_mdc_detail_tab(i) := l_sync_tmp_recTbl.delivery_detail_id_tbl(i);
6083: END LOOP;
6084: WSH_DELIVERY_DETAILS_ACTIONS.Create_Consol_Record(
6085: p_detail_id_tab => l_mdc_detail_tab,
6086: x_return_status => x_return_status);
6087:
6088: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
6244:
6245: FOR i in l_sync_tmp_recTbl.delivery_detail_id_tbl.first..l_sync_tmp_recTbl.delivery_detail_id_tbl.last LOOP
6246: l_mdc_detail_tab(i) := l_sync_tmp_recTbl.delivery_detail_id_tbl(i);
6247: END LOOP;
6248: WSH_DELIVERY_DETAILS_ACTIONS.Create_Consol_Record(
6249: p_detail_id_tab => l_mdc_detail_tab,
6250: x_return_status => x_return_status);
6251: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
6252: IF l_debug_on THEN
6325: last_updated_by = FND_GLOBAL.USER_ID,
6326: last_update_login = FND_GLOBAL.LOGIN_ID
6327: WHERE delivery_detail_id = p_detail_id1;
6328: l_mdc_detail_tab(1) := p_detail_id1;
6329: WSH_DELIVERY_DETAILS_ACTIONS.Delete_Consol_Record(
6330: p_detail_id_tab => l_mdc_detail_tab,
6331: x_return_status => x_return_status);
6332:
6333: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
6488: if c_del_id_for_cont_or_detail%ISOPEN THEN
6489: close c_del_id_for_cont_or_detail;
6490: end if;
6491: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6492: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_CONT_TO_CONT',l_module_name);
6493: --
6494: IF l_debug_on THEN
6495: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6496: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7003: RAISE NO_DATA_FOUND;
7004: END IF;
7005:
7006: l_mdc_detail_tab(1) := l_dd_id(j);
7007: WSH_DELIVERY_DETAILS_ACTIONS.Delete_Consol_Record(
7008: p_detail_id_tab => l_mdc_detail_tab,
7009: x_return_status => x_return_status);
7010:
7011: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
7355: RAISE NO_DATA_FOUND;
7356: END IF;
7357:
7358: l_mdc_detail_tab(1) := p_detail_id;
7359: WSH_DELIVERY_DETAILS_ACTIONS.Create_Consol_Record(
7360: p_detail_id_tab => l_mdc_detail_tab,
7361: x_return_status => x_return_status);
7362:
7363: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
7553: END IF;
7554:
7555: WHEN others THEN
7556: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7557: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_DETAIL_FROM_DELIVERY',l_module_name);
7558: ROLLBACK TO before_unassign;
7559:
7560:
7561: --
7605: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
7606: END IF;
7607: --
7608: IF l_debug_on THEN
7609: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_DETAIL_FROM_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
7610: END IF;
7611: UNASSIGN_DETAIL_FROM_DELIVERY (p_detail_id,
7612: x_return_status,
7613: p_validate_flag,
7619: --
7620: EXCEPTION
7621: WHEN others THEN
7622: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7623: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_DETAIL_FROM_DELIVERY',l_module_name);
7624: --
7625: IF l_debug_on THEN
7626: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7627: END IF;
8226: END IF;
8227: --
8228: WHEN others THEN
8229: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8230: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_MULTIPLE_DETAIL',l_module_name);
8231: --
8232: IF l_debug_on THEN
8233: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8234: END IF;
8309: --
8310: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8311: --
8312: IF l_debug_on THEN
8313: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_MULTIPLE_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
8314: END IF;
8315: --
8316: UNASSIGN_MULTIPLE_DETAILS
8317: (
8329:
8330: EXCEPTION
8331: WHEN others THEN
8332: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8333: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_MULTIPLE_DETAIL',l_module_name);
8334: --
8335: IF l_debug_on THEN
8336: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8337: END IF;
8460: --
8461: IF l_debug_on THEN
8462: WSH_DEBUG_SV.log(l_module_name,'Delivery id ',p_rec_of_detail_ids(i));
8463:
8464: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_DETAIL_TO_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
8465: END IF;
8466: --
8467: wsh_delivery_details_actions.assign_detail_to_delivery(
8468: p_detail_id => P_REC_OF_DETAIL_IDS(i),
8463:
8464: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_DETAIL_TO_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
8465: END IF;
8466: --
8467: wsh_delivery_details_actions.assign_detail_to_delivery(
8468: p_detail_id => P_REC_OF_DETAIL_IDS(i),
8469: p_delivery_id => p_delivery_id,
8470: x_return_status => x_return_status,
8471: x_dlvy_has_lines => l_has_lines, -- J-IB-NPARIKH
8490:
8491: IF (p_cont_ins_id <> -9999) THEN
8492: -- J: W/V Changes
8493: -- replaced the direct update with Assign_Detail_To_Cont API
8494: wsh_delivery_details_actions.Assign_Detail_To_Cont(
8495: p_detail_id => P_REC_OF_DETAIL_IDS(i),
8496: p_parent_detail_id => p_cont_ins_id,
8497: x_return_status => x_return_status);
8498:
8606: END IF;
8607: --
8608: WHEN others THEN
8609: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8610: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_MULTIPLE_DETAILS',l_module_name);
8611:
8612: --
8613: IF l_debug_on THEN
8614: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8718:
8719: -- Bug 2637876
8720: l_original_shipped_qty NUMBER;
8721: l_split_shipped_qty NUMBER;
8722: l_serial_tab WSH_DELIVERY_DETAILS_ACTIONS.serial_tab;
8723: i NUMBER;
8724: j NUMBER;
8725: l_serial_orig_rec WSH_DELIVERY_DETAILS_ACTIONS.SplitDetailRecType;
8726: l_new_serial_rec WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Rec_Type;
8721: l_split_shipped_qty NUMBER;
8722: l_serial_tab WSH_DELIVERY_DETAILS_ACTIONS.serial_tab;
8723: i NUMBER;
8724: j NUMBER;
8725: l_serial_orig_rec WSH_DELIVERY_DETAILS_ACTIONS.SplitDetailRecType;
8726: l_new_serial_rec WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Rec_Type;
8727: l_transaction_id_tab WSH_UTIL_CORE.id_tab_type;
8728: l_serial_number WSH_DELIVERY_DETAILS.serial_number%TYPE;
8729: TYPE l_sr_no_tab IS TABLE OF VARCHAR2(30) INDEX BY BINARY_INTEGER;
9023: END IF;
9024: --
9025: WHEN others THEN
9026: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
9027: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DELIVERY_DETAILS_BULK',l_module_name);
9028: --
9029: IF l_debug_on THEN
9030: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9031: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9903: CLOSE c_get_req_pick_qty;
9904: END IF;
9905: rollback to split_savepoint;
9906: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
9907: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DETAIL_INT_BULK',l_module_name);
9908: --
9909: IF l_debug_on THEN
9910: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9911: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10246: END IF;
10247: --
10248: WHEN others THEN
10249: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10250: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DELIVERY_DETAILS',l_module_name);
10251: --
10252: IF l_debug_on THEN
10253: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10254: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
11043: END IF;
11044:
11045: WHEN others THEN
11046: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
11047: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DETAIL_INT',l_module_name);
11048: --
11049: IF l_debug_on THEN
11050: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11051: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
11689: END IF;
11690: CLOSE get_container;
11691:
11692: IF l_debug_on THEN
11693: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_DETAIL_FROM_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
11694: END IF;
11695:
11696: -- Unassign the Line or Container
11697: -- because this
11694: END IF;
11695:
11696: -- Unassign the Line or Container
11697: -- because this
11698: wsh_delivery_details_actions.unassign_detail_from_delivery(
11699: p_detail_id => p_ids_tobe_unassigned(i),
11700: p_validate_flag => p_validate_flag,
11701: x_return_status => l_return_status
11702: );
11737: END IF;
11738:
11739: IF l_line_id IS NULL THEN
11740: IF l_debug_on THEN
11741: WSH_DEBUG_SV.log(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_UNPACK_EMPTY_CONT
11742: recursively for ',l_parent_container_id(1));
11743: END IF;
11744:
11745: -- lpn conv
12153: -- in p_Cons_Source_Line_Rec_Tab.
12154: --
12155: -- HW OPM BUG#:3121616 added requested_quantity2
12156: PROCEDURE Consolidate_Source_Line(
12157: p_Cons_Source_Line_Rec_Tab IN WSH_DELIVERY_DETAILS_ACTIONS.Cons_Source_Line_Rec_Tab,
12158: x_consolidate_ids OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
12159: x_return_status OUT NOCOPY VARCHAR2 ) IS
12160:
12161: CURSOR get_bo_dds_cur(p_delivery_detail_id IN NUMBER, p_source_line_id IN NUMBER,p_delivery_id IN NUMBER) is
12619:
12620:
12621: WHEN OTHERS THEN
12622: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12623: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.Consolidate_Source_Lines ' );
12624: --
12625: -- Debug Statements
12626: --
12627: IF l_debug_on THEN
12696: --
12697: -- Debug Statements
12698: --
12699: IF l_debug_on THEN
12700: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.unassign_unpack_empty_cont',WSH_DEBUG_SV.C_PROC_LEVEL);
12701: END IF;
12702: --
12703: l_delivery_detail_ids(1) := p_delivery_detail_id;
12704: IF (p_delete_flag = 'Y') THEN --{
12701: END IF;
12702: --
12703: l_delivery_detail_ids(1) := p_delivery_detail_id;
12704: IF (p_delete_flag = 'Y') THEN --{
12705: WSH_DELIVERY_DETAILS_ACTIONS.unassign_unpack_empty_cont (
12706: p_ids_tobe_unassigned => l_delivery_detail_ids ,
12707: p_validate_flag => 'N',
12708: x_return_status => l_return_status
12709: );
12721: IF l_debug_on THEN
12722: WSH_DEBUG_SV.logmsg(l_module_name,'Unreserving the Backordered quantity ',WSH_DEBUG_SV.C_PROC_LEVEL);
12723: WSH_DEBUG_SV.logmsg(l_module_name,'... delivery_detail_id '|| p_delivery_detail_id,WSH_DEBUG_SV.C_PROC_LEVEL);
12724: WSH_DEBUG_SV.logmsg(l_module_name,'... backordered quantity '||p_bo_qty ,WSH_DEBUG_SV.C_PROC_LEVEL);
12725: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNRESERVE_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
12726: END IF;
12727: --
12728: wsh_delivery_details_actions.unreserve_delivery_detail(
12729: p_delivery_Detail_id => p_delivery_detail_id,
12724: WSH_DEBUG_SV.logmsg(l_module_name,'... backordered quantity '||p_bo_qty ,WSH_DEBUG_SV.C_PROC_LEVEL);
12725: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNRESERVE_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
12726: END IF;
12727: --
12728: wsh_delivery_details_actions.unreserve_delivery_detail(
12729: p_delivery_Detail_id => p_delivery_detail_id,
12730: p_unreserve_mode => p_bo_mode ,
12731: p_quantity_to_unreserve => p_bo_qty,
12732: p_override_retain_ato_rsv => 'N',
12747: IF l_debug_on THEN
12748: WSH_DEBUG_SV.logmsg(l_module_name,'Unreserving the Backordered quantity ',WSH_DEBUG_SV.C_PROC_LEVEL);
12749: WSH_DEBUG_SV.logmsg(l_module_name,'... delivery_detail_id '|| p_delivery_detail_id,WSH_DEBUG_SV.C_PROC_LEVEL);
12750: WSH_DEBUG_SV.logmsg(l_module_name,'... overpicked quantity '||p_overpick_qty ,WSH_DEBUG_SV.C_PROC_LEVEL);
12751: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNRESERVE_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
12752: END IF;
12753: --
12754: --Bug 4721577 Do not retain reservation for overpicked quantities
12755: IF p_bo_mode = 'RETAIN_RSV' THEN
12752: END IF;
12753: --
12754: --Bug 4721577 Do not retain reservation for overpicked quantities
12755: IF p_bo_mode = 'RETAIN_RSV' THEN
12756: wsh_delivery_details_actions.unreserve_delivery_detail(
12757: p_delivery_Detail_id => p_delivery_detail_id,
12758: p_unreserve_mode => 'UNRESERVE' ,
12759: p_quantity_to_unreserve => p_overpick_qty,
12760: p_override_retain_ato_rsv => 'Y',
12761: p_quantity2_to_unreserve => p_bo_qty2s,
12762: x_return_status => l_return_status
12763: );
12764: ELSE
12765: wsh_delivery_details_actions.unreserve_delivery_detail(
12766: p_delivery_Detail_id => p_delivery_detail_id,
12767: p_unreserve_mode => p_bo_mode ,
12768: p_quantity_to_unreserve => p_overpick_qty,
12769: p_override_retain_ato_rsv => 'Y',
12837: -- delivery detail for each source line id.
12838: --
12839: -- HW OPM BUG#:3121616 Added x_remain_bo_qty2s
12840: PROCEDURE Consolidate_Delivery_Details(
12841: p_delivery_details_tab IN WSH_DELIVERY_DETAILS_ACTIONS.Cons_Source_Line_Rec_Tab,
12842: p_bo_mode IN VARCHAR2,
12843: x_cons_delivery_details_tab OUT NOCOPY WSH_DELIVERY_DETAILS_ACTIONS.Cons_Source_Line_Rec_Tab,
12844: x_remain_bo_qtys OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
12845: x_remain_bo_qty2s OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
12839: -- HW OPM BUG#:3121616 Added x_remain_bo_qty2s
12840: PROCEDURE Consolidate_Delivery_Details(
12841: p_delivery_details_tab IN WSH_DELIVERY_DETAILS_ACTIONS.Cons_Source_Line_Rec_Tab,
12842: p_bo_mode IN VARCHAR2,
12843: x_cons_delivery_details_tab OUT NOCOPY WSH_DELIVERY_DETAILS_ACTIONS.Cons_Source_Line_Rec_Tab,
12844: x_remain_bo_qtys OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
12845: x_remain_bo_qty2s OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
12846: x_return_status OUT NOCOPY VARCHAR2
12847: ) IS
12846: x_return_status OUT NOCOPY VARCHAR2
12847: ) IS
12848: l_line_ids WSH_UTIL_CORE.Id_Tab_Type; -- Stores the source line ids passed as parameter
12849: l_detail_ids WSH_UTIL_CORE.Id_Tab_Type; -- Stores the delivery detail ids passed as parameter
12850: l_delivery_details_tab WSH_DELIVERY_DETAILS_ACTIONS.Cons_Source_Line_Rec_Tab; -- Stores the delivery detail records with req-qty >0
12851: l_freight_detail_ids WSH_UTIL_CORE.Id_Tab_Type; -- Stores the delivery details for which the freight costs need to be deleted.
12852: l_req_qtys WSH_UTIL_CORE.Id_Tab_Type; -- Stores the requested quantities passed as parameter
12853: l_bo_qtys WSH_UTIL_CORE.Id_Tab_Type; -- Stores the BO quantities passed as parameter
12854: l_overpick_qtys WSH_UTIL_CORE.Id_Tab_Type; -- Stores the Overpicked quantities passed as parameter
13204: --
13205:
13206: WHEN OTHERS THEN
13207: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13208: WSH_UTIL_CORE.Default_Handler('WSH_DELIVERY_DETAILS_ACTIONS.Consolidate_Delivery_Details',l_module_name);
13209: --
13210: -- Debug Statements
13211: --
13212: IF l_debug_on THEN
13258: END IF;
13259: EXCEPTION
13260: WHEN OTHERS THEN
13261: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13262: WSH_UTIL_CORE.Default_Handler('WSH_DELIVERY_DETAILS_ACTIONS.Unassign_Top_Detail_from_Delivery',l_module_name);
13263: --
13264: -- Debug Statements
13265: --
13266: IF l_debug_on THEN
13390: EXCEPTION
13391:
13392: WHEN OTHERS THEN
13393: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13394: WSH_UTIL_CORE.Default_Handler('WSH_DELIVERY_DETAILS_ACTIONS.Create_Consol_Record',l_module_name);
13395: --
13396: -- Debug Statements
13397: --
13398: IF l_debug_on THEN
13401: END IF;
13402: --
13403: END Create_Consol_Record;
13404:
13405: END WSH_DELIVERY_DETAILS_ACTIONS;