[Home] [Help]
97: BEGIN
98:
99: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
100: IF l_debug_on IS NULL THEN
101: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
102: END IF;
103:
104: IF l_debug_on THEN
105: WSH_DEBUG_SV.push(l_module_name);
101: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
102: END IF;
103:
104: IF l_debug_on THEN
105: WSH_DEBUG_SV.push(l_module_name);
106: WSH_DEBUG_SV.log(l_module_name,'P_BACKORDER_REC_TBL.COUNT',P_BACKORDER_REC_TBL.COUNT);
107: WSH_DEBUG_SV.log(l_module_name,'P_ORG_INFO_TBL.COUNT',P_ORG_INFO_TBL.COUNT);
108: END IF;
109:
102: END IF;
103:
104: IF l_debug_on THEN
105: WSH_DEBUG_SV.push(l_module_name);
106: WSH_DEBUG_SV.log(l_module_name,'P_BACKORDER_REC_TBL.COUNT',P_BACKORDER_REC_TBL.COUNT);
107: WSH_DEBUG_SV.log(l_module_name,'P_ORG_INFO_TBL.COUNT',P_ORG_INFO_TBL.COUNT);
108: END IF;
109:
110: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
103:
104: IF l_debug_on THEN
105: WSH_DEBUG_SV.push(l_module_name);
106: WSH_DEBUG_SV.log(l_module_name,'P_BACKORDER_REC_TBL.COUNT',P_BACKORDER_REC_TBL.COUNT);
107: WSH_DEBUG_SV.log(l_module_name,'P_ORG_INFO_TBL.COUNT',P_ORG_INFO_TBL.COUNT);
108: END IF;
109:
110: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
111:
119:
120: -- Return back to caller if there are no records in table
121: IF p_backorder_rec_tbl.COUNT = 0 THEN
122: IF l_debug_on THEN
123: WSH_DEBUG_SV.pop(l_module_name);
124: END IF;
125: RETURN;
126: END IF;
127:
142: -- This is used to unassign empty containers from the Delivery at the end of Pick Release process
143: IF p_backorder_rec_tbl(i).planned_flag = 'N'
144: AND (NOT WSH_PICK_LIST.g_unassigned_delivery_ids.exists(l_delivery_id_mod)) THEN --{ --Bug 9406326 replaced p_backorder_rec_tbl(i).delivery_id with l_delivery_id_mod
145: IF l_debug_on THEN
146: WSH_DEBUG_SV.logmsg(l_module_name,'Assigning delivery to WSH_PICK_LIST.g_unassigned_delivery_ids');
147: END IF;
148: WSH_PICK_LIST.g_unassigned_delivery_ids(l_delivery_id_mod) := p_backorder_rec_tbl(i).delivery_id; --Bug 9406326 replaced p_backorder_rec_tbl(i).delivery_id with l_delivery_id_mod
149: END IF; --}
150:
181: p_org_info_tbl(p_backorder_rec_tbl(i).organization_id).wms_org = 'Y' AND
182: p_backorder_rec_tbl(i).container_id is NOT NULL)
183: ) THEN --{
184: IF l_debug_on THEN
185: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process', WSH_DEBUG_SV.C_PROC_LEVEL);
186: END IF;
187:
188: WSH_WV_UTILS.DD_WV_Post_Process(
189: p_delivery_detail_id => p_backorder_rec_tbl(i).delivery_detail_id,
196:
197: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
198: WSH_UTIL_CORE.Add_Message(l_return_status);
199: IF l_debug_on THEN
200: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_WV_UTILS.DD_WV_Post_Process ');
201: END IF;
202: ROLLBACK TO unassign_backorder_details;
203: l_num_errors := l_num_errors + 1;
204: GOTO next_record;
239: l_is_delivery_empty := WSH_NEW_DELIVERY_ACTIONS.IS_DELIVERY_EMPTY(p_backorder_rec_tbl(i).delivery_id);
240:
241: IF (l_is_delivery_empty = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
242: IF l_debug_on THEN
243: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_NEW_DELIVERIE_ACTIONS.IS_DELIVERY_EMPTY '||to_char(p_backorder_rec_tbl(i).delivery_id));
244: END IF;
245: ROLLBACK TO unassign_backorder_details;
246: l_num_errors := l_num_errors + 1;
247: GOTO next_record;
261: x_return_status => l_return_status);
262:
263: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
264: IF l_debug_on THEN
265: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG');
266: END IF;
267: ROLLBACK TO unassign_backorder_details;
268: l_num_errors := l_num_errors + 1;
269: GOTO next_record;
268: l_num_errors := l_num_errors + 1;
269: GOTO next_record;
270: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
271: IF l_debug_on THEN
272: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error in WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG');
273: END IF;
274: RAISE e_return;
275: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
276: IF l_debug_on THEN
273: END IF;
274: RAISE e_return;
275: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
276: IF l_debug_on THEN
277: WSH_DEBUG_SV.logmsg(l_module_name,'Warning in WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG');
278: END IF;
279: l_num_warnings := l_num_warnings + 1;
280: END IF;
281: END IF;
296: x_return_status => l_return_status);
297:
298: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
299: IF l_debug_on THEN
300: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_DELIVERY_DETAILS_ACTIONS.Delete_Consol_Record');
301: END IF;
302: ROLLBACK TO unassign_backorder_details;
303: l_num_errors := l_num_errors + 1;
304: GOTO next_record;
303: l_num_errors := l_num_errors + 1;
304: GOTO next_record;
305: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
306: IF l_debug_on THEN
307: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error in WSH_DELIVERY_DETAILS_ACTIONS.Delete_Consol_Record ');
308: END IF;
309: RAISE e_return;
310: END IF;
311: --}
316: x_return_status => l_return_status);
317:
318: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
319: IF l_debug_on THEN
320: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_DELIVERY_DETAILS_ACTIONS.Create_Consol_Record');
321: END IF;
322: ROLLBACK TO unassign_backorder_details;
323: l_num_errors := l_num_errors + 1;
324: GOTO next_record;
323: l_num_errors := l_num_errors + 1;
324: GOTO next_record;
325: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
326: IF l_debug_on THEN
327: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error in WSH_DELIVERY_DETAILS_ACTIONS.Create_Consol_Record');
328: END IF;
329: RAISE e_return;
330: END IF;
331: END IF; --}
336: open l_cnt_orgn_csr(p_backorder_rec_tbl(i).container_id);
337: fetch l_cnt_orgn_csr into l_cnt_orgn_id;
338: close l_cnt_orgn_csr;
339: IF l_debug_on THEN
340: WSH_DEBUG_SV.log(l_module_name,'Parent Container Orgn Id Is',l_cnt_orgn_id);
341: END IF;
342:
343: l_wms_org := wsh_util_validate.check_wms_org(l_cnt_orgn_id);
344:
363: p_sync_tmp_rec => l_sync_tmp_rec,
364: x_return_status => l_return_status
365: );
366: IF l_debug_on THEN
367: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
368: END IF;
369: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
370: IF l_debug_on THEN
371: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_WMS_SYNC_TMP_PKG.MERGE ');
367: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
368: END IF;
369: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
370: IF l_debug_on THEN
371: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_WMS_SYNC_TMP_PKG.MERGE ');
372: END IF;
373: ROLLBACK TO unassign_backorder_details;
374: l_num_errors := l_num_errors + 1;
375: GOTO next_record;
374: l_num_errors := l_num_errors + 1;
375: GOTO next_record;
376: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
377: IF l_debug_on THEN
378: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected Error in WSH_WMS_SYNC_TMP_PKG.MERGE ');
379: END IF;
380: RAISE e_return;
381: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
382: l_num_warnings := l_num_warnings + 1;
405: END IF; --}
406: -- Common Error Handling for above APIs
407: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN --{
408: IF l_debug_on THEN
409: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_TP_RELEASE.calculate_cont_del_tpdates ');
410: END IF;
411: ROLLBACK TO unassign_backorder_details;
412: l_num_errors := l_num_errors + 1;
413: GOTO next_record;
412: l_num_errors := l_num_errors + 1;
413: GOTO next_record;
414: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
415: IF l_debug_on THEN
416: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected Error in WSH_TP_RELEASE.calculate_cont_del_tpdates ');
417: END IF;
418: RAISE e_return;
419: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
420: l_num_warnings := l_num_warnings + 1;
421: END IF; --}
422: END IF; --}
423:
424: IF l_debug_on THEN
425: WSH_DEBUG_SV.log(l_module_name,'Updated wsh_delivery_assignments_v for backordered_delivery_detail ' ,p_backorder_rec_tbl(i).delivery_detail_id);
426: END IF;
427:
428: -- FP bug 4208538 from bug 4075078
429: -- Freight costs need to be deleted for the delivery detail if
435: IF WSH_UTIL_CORE.FTE_Is_Installed = 'Y' AND l_new_delivery_id IS NULL THEN --{
436: l_dd_id(1) := p_backorder_rec_tbl(i).delivery_detail_id;
437:
438: IF l_debug_on THEN
439: WSH_DEBUG_SV.log(l_module_name,'Call WSH_FREIGHT_COSTS_PVT.Remove_FTE_Freight_Costs',p_backorder_rec_tbl(i).delivery_detail_id);
440: END IF;
441:
442: WSH_FREIGHT_COSTS_PVT.Remove_FTE_Freight_Costs(
443: p_delivery_details_tab => l_dd_id,
443: p_delivery_details_tab => l_dd_id,
444: x_return_status => l_return_status) ;
445:
446: IF l_debug_on THEN
447: WSH_DEBUG_SV.log(l_module_name,'After WSH_FREIGHT_COSTS_PVT.Remove_FTE_Freight_Costs: return',l_return_status);
448: END IF;
449:
450: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN --{
451: FND_MESSAGE.Set_Name('WSH', 'WSH_REPRICE_REQUIRED_ERR');
450: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN --{
451: FND_MESSAGE.Set_Name('WSH', 'WSH_REPRICE_REQUIRED_ERR');
452: WSH_UTIL_CORE.add_message(l_return_status, l_module_name);
453: IF l_debug_on THEN
454: WSH_DEBUG_SV.logmsg(l_module_name,'Remove_FTE_Freight_Costs failed');
455: END IF;
456: ROLLBACK TO unassign_backorder_details;
457: l_num_errors := l_num_errors + 1;
458: GOTO next_record;
467: IF p_org_info_tbl(p_backorder_rec_tbl(i).organization_id).wms_org = 'Y'
468: AND p_backorder_rec_tbl(i).planned_flag = 'Y' AND p_backorder_rec_tbl(i).delivery_id is NOT NULL
469: AND p_backorder_rec_tbl(i).container_id is NOT NULL THEN --{
470: IF l_debug_on THEN
471: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process'
472: ,WSH_DEBUG_SV.C_PROC_LEVEL);
473: END IF;
474:
475: WSH_WV_UTILS.DD_WV_Post_Process(
468: AND p_backorder_rec_tbl(i).planned_flag = 'Y' AND p_backorder_rec_tbl(i).delivery_id is NOT NULL
469: AND p_backorder_rec_tbl(i).container_id is NOT NULL THEN --{
470: IF l_debug_on THEN
471: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process'
472: ,WSH_DEBUG_SV.C_PROC_LEVEL);
473: END IF;
474:
475: WSH_WV_UTILS.DD_WV_Post_Process(
476: p_delivery_detail_id => p_backorder_rec_tbl(i).delivery_detail_id,
482:
483: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
484: WSH_UTIL_CORE.Add_Message(l_return_status);
485: IF l_debug_on THEN
486: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_WV_UTILS.DD_WV_Post_Process ');
487: END IF;
488: ROLLBACK TO unassign_backorder_details;
489: l_num_errors := l_num_errors + 1;
490: GOTO next_record;
501: p_entity_type => 'DELIVERY',
502: p_entity_ids => l_reprice_del_tab,
503: x_return_status => l_return_status);
504: IF l_debug_on THEN
505: WSH_DEBUG_SV.log(l_module_name,'Mark_Reprice_Required l_return_status',l_return_status);
506: END IF;
507: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
508: RAISE MARK_REPRICE_ERROR;
509: END IF;
515: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
516: END IF;
517:
518: IF l_debug_on THEN
519: WSH_DEBUG_SV.pop(l_module_name);
520: END IF;
521:
522: EXCEPTION
523:
530: CLOSE c_detail_cont_planning_cur;
531: END IF;
532: -- End of OTM R12 : unassign delivery detail
533: IF l_debug_on THEN
534: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
535: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
536: END IF;
537:
538: WHEN e_return THEN
531: END IF;
532: -- End of OTM R12 : unassign delivery detail
533: IF l_debug_on THEN
534: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
535: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
536: END IF;
537:
538: WHEN e_return THEN
539: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
543: CLOSE c_detail_cont_planning_cur;
544: END IF;
545: -- End of OTM R12 : unassign delivery detail
546: IF l_debug_on THEN
547: WSH_DEBUG_SV.logmsg(l_module_name,'UNASSIGN_BACKORDERED_DETAILS e_return exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
548: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:UNASSIGN_BACKORDERED_DETAILS');
549: END IF;
550:
551: WHEN OTHERS THEN
544: END IF;
545: -- End of OTM R12 : unassign delivery detail
546: IF l_debug_on THEN
547: WSH_DEBUG_SV.logmsg(l_module_name,'UNASSIGN_BACKORDERED_DETAILS e_return exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
548: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:UNASSIGN_BACKORDERED_DETAILS');
549: END IF;
550:
551: WHEN OTHERS THEN
552: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
559: CLOSE l_cnt_orgn_csr;
560: END IF;
561: -- End of OTM R12 : unassign delivery detail
562: IF l_debug_on THEN
563: WSH_DEBUG_SV.logmsg(l_module_name,'UNASSIGN_BACKORDERED_DETAILS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
564: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:UNASSIGN_BACKORDERED_DETAILS');
565: END IF;
566:
567: END Unassign_Backordered_Details;
560: END IF;
561: -- End of OTM R12 : unassign delivery detail
562: IF l_debug_on THEN
563: WSH_DEBUG_SV.logmsg(l_module_name,'UNASSIGN_BACKORDERED_DETAILS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
564: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:UNASSIGN_BACKORDERED_DETAILS');
565: END IF;
566:
567: END Unassign_Backordered_Details;
568:
657: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
658: --
659: IF l_debug_on IS NULL
660: THEN
661: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
662: END IF;
663: --
664: -- Standalone project Changes
665: l_standalone_mode := WMS_DEPLOY.wms_deployment_mode;
663: --
664: -- Standalone project Changes
665: l_standalone_mode := WMS_DEPLOY.wms_deployment_mode;
666: IF l_debug_on THEN
667: WSH_DEBUG_SV.push(l_module_name);
668: --
669: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
670: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
671: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY2',P_REQUESTED_QUANTITY2);
665: l_standalone_mode := WMS_DEPLOY.wms_deployment_mode;
666: IF l_debug_on THEN
667: WSH_DEBUG_SV.push(l_module_name);
668: --
669: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
670: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
671: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY2',P_REQUESTED_QUANTITY2);
672: WSH_DEBUG_SV.log(l_module_name,'P_PLANNED_FLAG',P_PLANNED_FLAG);
673: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ENABLED_FLAG',P_WMS_ENABLED_FLAG);
666: IF l_debug_on THEN
667: WSH_DEBUG_SV.push(l_module_name);
668: --
669: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
670: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
671: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY2',P_REQUESTED_QUANTITY2);
672: WSH_DEBUG_SV.log(l_module_name,'P_PLANNED_FLAG',P_PLANNED_FLAG);
673: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ENABLED_FLAG',P_WMS_ENABLED_FLAG);
674: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BATCH_ID',P_DEL_BATCH_ID);
667: WSH_DEBUG_SV.push(l_module_name);
668: --
669: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
670: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
671: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY2',P_REQUESTED_QUANTITY2);
672: WSH_DEBUG_SV.log(l_module_name,'P_PLANNED_FLAG',P_PLANNED_FLAG);
673: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ENABLED_FLAG',P_WMS_ENABLED_FLAG);
674: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BATCH_ID',P_DEL_BATCH_ID);
675: WSH_DEBUG_SV.log(l_module_name,'P_REPLENISHMENT_STATUS',p_replenishment_status);
668: --
669: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
670: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
671: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY2',P_REQUESTED_QUANTITY2);
672: WSH_DEBUG_SV.log(l_module_name,'P_PLANNED_FLAG',P_PLANNED_FLAG);
673: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ENABLED_FLAG',P_WMS_ENABLED_FLAG);
674: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BATCH_ID',P_DEL_BATCH_ID);
675: WSH_DEBUG_SV.log(l_module_name,'P_REPLENISHMENT_STATUS',p_replenishment_status);
676: WSH_DEBUG_SV.log(l_module_name,'l_standalone_mode',l_standalone_mode);
669: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
670: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
671: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY2',P_REQUESTED_QUANTITY2);
672: WSH_DEBUG_SV.log(l_module_name,'P_PLANNED_FLAG',P_PLANNED_FLAG);
673: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ENABLED_FLAG',P_WMS_ENABLED_FLAG);
674: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BATCH_ID',P_DEL_BATCH_ID);
675: WSH_DEBUG_SV.log(l_module_name,'P_REPLENISHMENT_STATUS',p_replenishment_status);
676: WSH_DEBUG_SV.log(l_module_name,'l_standalone_mode',l_standalone_mode);
677: END IF;
670: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
671: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY2',P_REQUESTED_QUANTITY2);
672: WSH_DEBUG_SV.log(l_module_name,'P_PLANNED_FLAG',P_PLANNED_FLAG);
673: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ENABLED_FLAG',P_WMS_ENABLED_FLAG);
674: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BATCH_ID',P_DEL_BATCH_ID);
675: WSH_DEBUG_SV.log(l_module_name,'P_REPLENISHMENT_STATUS',p_replenishment_status);
676: WSH_DEBUG_SV.log(l_module_name,'l_standalone_mode',l_standalone_mode);
677: END IF;
678: --
671: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY2',P_REQUESTED_QUANTITY2);
672: WSH_DEBUG_SV.log(l_module_name,'P_PLANNED_FLAG',P_PLANNED_FLAG);
673: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ENABLED_FLAG',P_WMS_ENABLED_FLAG);
674: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BATCH_ID',P_DEL_BATCH_ID);
675: WSH_DEBUG_SV.log(l_module_name,'P_REPLENISHMENT_STATUS',p_replenishment_status);
676: WSH_DEBUG_SV.log(l_module_name,'l_standalone_mode',l_standalone_mode);
677: END IF;
678: --
679:
672: WSH_DEBUG_SV.log(l_module_name,'P_PLANNED_FLAG',P_PLANNED_FLAG);
673: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ENABLED_FLAG',P_WMS_ENABLED_FLAG);
674: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BATCH_ID',P_DEL_BATCH_ID);
675: WSH_DEBUG_SV.log(l_module_name,'P_REPLENISHMENT_STATUS',p_replenishment_status);
676: WSH_DEBUG_SV.log(l_module_name,'l_standalone_mode',l_standalone_mode);
677: END IF;
678: --
679:
680: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
748: p_event => 'oracle.apps.wsh.line.gen.backordered' ,
749: p_organization_id => l_organization_id,
750: x_return_status => l_wf_rs ) ;
751: IF l_debug_on THEN
752: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
753: WSH_DEBUG_SV.log(l_module_name,'Delivery Detail Id is ',p_delivery_detail_id );
754: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
755: END IF;
756: --Done Raise Event: Pick To Pod Workflow
749: p_organization_id => l_organization_id,
750: x_return_status => l_wf_rs ) ;
751: IF l_debug_on THEN
752: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
753: WSH_DEBUG_SV.log(l_module_name,'Delivery Detail Id is ',p_delivery_detail_id );
754: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
755: END IF;
756: --Done Raise Event: Pick To Pod Workflow
757: ELSE
750: x_return_status => l_wf_rs ) ;
751: IF l_debug_on THEN
752: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
753: WSH_DEBUG_SV.log(l_module_name,'Delivery Detail Id is ',p_delivery_detail_id );
754: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
755: END IF;
756: --Done Raise Event: Pick To Pod Workflow
757: ELSE
758: WSH_WF_STD.Raise_Event(
761: p_event => 'oracle.apps.wsh.line.gen.replenishmentrequested' ,
762: p_organization_id => l_organization_id,
763: x_return_status => l_wf_rs ) ;
764: IF l_debug_on THEN
765: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
766: WSH_DEBUG_SV.log(l_module_name,'Delivery Detail Id is ',p_delivery_detail_id );
767: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
768: END IF;
769: --}
762: p_organization_id => l_organization_id,
763: x_return_status => l_wf_rs ) ;
764: IF l_debug_on THEN
765: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
766: WSH_DEBUG_SV.log(l_module_name,'Delivery Detail Id is ',p_delivery_detail_id );
767: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
768: END IF;
769: --}
770: END IF;
763: x_return_status => l_wf_rs ) ;
764: IF l_debug_on THEN
765: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
766: WSH_DEBUG_SV.log(l_module_name,'Delivery Detail Id is ',p_delivery_detail_id );
767: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
768: END IF;
769: --}
770: END IF;
771:
770: END IF;
771:
772:
773: IF l_debug_on THEN
774: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Detail id-',p_delivery_detail_id);
775: END IF;
776: l_detail_tab(1) := p_delivery_detail_id;
777: WSH_INTEGRATION.DBI_Update_Detail_Log
778: (p_delivery_detail_id_tab => l_detail_tab,
779: p_dml_type => 'UPDATE',
780: x_return_status => l_dbi_rs);
781:
782: IF l_debug_on THEN
783: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
784: END IF;
785: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
786: x_return_status := l_dbi_rs;
787: -- just pass this return status to caller API
785: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
786: x_return_status := l_dbi_rs;
787: -- just pass this return status to caller API
788: IF l_debug_on THEN
789: WSH_DEBUG_SV.logmsg(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
790: WSH_DEBUG_SV.pop(l_module_name);
791: END IF;
792: return;
793: END IF;
786: x_return_status := l_dbi_rs;
787: -- just pass this return status to caller API
788: IF l_debug_on THEN
789: WSH_DEBUG_SV.logmsg(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
790: WSH_DEBUG_SV.pop(l_module_name);
791: END IF;
792: return;
793: END IF;
794: -- End of Code for DBI Project
797: -- replenishment requested lines.
798: IF ( p_replenishment_status IS NULL ) THEN
799: --{
800: IF l_debug_on THEN
801: WSH_DEBUG_SV.log(l_module_name,'Updated wsh_delivery_details for backordered_delivery_detail ' ,p_delivery_detail_id);
802: END IF;
803: -- If Pick Release is run in Parallel Mode, then Unassigning is Deferred
804: -- Unassignment API is later called from WSH_PICK_LIST.Release_Batch API
805: -- For backordering in other cases or Non-Parallel Pick Release, unassign api is called immediately
819: -- Assigning wms flag in Org Table Info
820: l_org_info_tbl(l_organization_id).wms_org := p_wms_enabled_flag;
821:
822: IF l_debug_on THEN
823: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit Unassign_Backordered_Details',WSH_DEBUG_SV.C_PROC_LEVEL);
824: END IF;
825: Unassign_Backordered_Details (
826: p_backorder_rec_tbl => l_backorder_rec_tbl,
827: p_org_info_tbl => l_org_info_tbl,
827: p_org_info_tbl => l_org_info_tbl,
828: x_return_status => l_return_status );
829:
830: IF l_debug_on THEN
831: WSH_DEBUG_SV.log(l_module_name,'After Unassign_Backordered_Details: return',l_return_status);
832: END IF;
833: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
834: x_return_status := l_return_status;
835: WSH_UTIL_CORE.Add_Message(x_return_status);
833: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
834: x_return_status := l_return_status;
835: WSH_UTIL_CORE.Add_Message(x_return_status);
836: IF l_debug_on THEN
837: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
838: WSH_DEBUG_SV.pop(l_module_name);
839: END IF;
840: RETURN;
841: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
834: x_return_status := l_return_status;
835: WSH_UTIL_CORE.Add_Message(x_return_status);
836: IF l_debug_on THEN
837: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
838: WSH_DEBUG_SV.pop(l_module_name);
839: END IF;
840: RETURN;
841: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
842: IF x_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
845: END IF;
846: --}
847: ELSE
848: IF l_debug_on THEN
849: WSH_DEBUG_SV.logmsg(l_module_name,'Deferring call to Unassign_Backordered_Details for detail : '||p_delivery_detail_id);
850: END IF;
851: END IF;
852: --}
853: END IF;
852: --}
853: END IF;
854:
855: IF l_debug_on THEN
856: WSH_DEBUG_SV.log(l_module_name,'Return Status at the end of backorder_delivery_detail API is',x_return_status);
857: WSH_DEBUG_SV.pop(l_module_name);
858: END IF;
859:
860: EXCEPTION
853: END IF;
854:
855: IF l_debug_on THEN
856: WSH_DEBUG_SV.log(l_module_name,'Return Status at the end of backorder_delivery_detail API is',x_return_status);
857: WSH_DEBUG_SV.pop(l_module_name);
858: END IF;
859:
860: EXCEPTION
861:
862: WHEN OTHERS THEN
863: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
864: WSH_UTIL_CORE.default_handler('WSH_USA_INV_PVT.backorder_delivery_detail');
865: IF l_debug_on THEN
866: WSH_DEBUG_SV.logmsg(l_module_name,'BACKORDER_DELIVERY_DETAIL_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
867: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:BACKORDER_DELIVERY_DETAIL');
868: END IF;
869:
870: END backorder_delivery_detail;
863: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
864: WSH_UTIL_CORE.default_handler('WSH_USA_INV_PVT.backorder_delivery_detail');
865: IF l_debug_on THEN
866: WSH_DEBUG_SV.logmsg(l_module_name,'BACKORDER_DELIVERY_DETAIL_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
867: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:BACKORDER_DELIVERY_DETAIL');
868: END IF;
869:
870: END backorder_delivery_detail;
871:
902: --
903: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
904: --
905: IF l_debug_on IS NULL THEN
906: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
907: -- add more debug messages
908: WSH_DEBUG_SV.push(l_module_name);
909: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
910: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
904: --
905: IF l_debug_on IS NULL THEN
906: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
907: -- add more debug messages
908: WSH_DEBUG_SV.push(l_module_name);
909: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
910: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
911: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
912: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
905: IF l_debug_on IS NULL THEN
906: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
907: -- add more debug messages
908: WSH_DEBUG_SV.push(l_module_name);
909: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
910: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
911: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
912: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
913: END IF;
906: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
907: -- add more debug messages
908: WSH_DEBUG_SV.push(l_module_name);
909: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
910: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
911: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
912: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
913: END IF;
914: --
907: -- add more debug messages
908: WSH_DEBUG_SV.push(l_module_name);
909: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
910: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
911: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
912: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
913: END IF;
914: --
915:
908: WSH_DEBUG_SV.push(l_module_name);
909: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
910: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
911: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
912: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
913: END IF;
914: --
915:
916: x_total_rsv := 0 ;
939: oe_debug_pub.add('In Get_total_Reserved_quantity ',2);
940: oe_debug_pub.add('x_total_rsv , l_rsv_array(i).primary_reservation_quantity , l_rsv_array(i).requirement_Date ',2);
941:
942: IF l_debug_on THEN
943: WSH_DEBUG_SV.log(l_module_name,'x_total_rsv2',x_total_rsv2);
944: END IF;
945:
946: FOR i in 1..l_rsv_array.count
947: LOOP
950: oe_debug_pub.add(x_total_rsv || ' : ' || l_rsv_array(i).primary_reservation_quantity || ' : ' || l_rsv_array(i).requirement_Date ,2);
951: -- HW OPMCONV - Get Qty2
952: x_total_rsv2 := x_total_rsv2 + l_rsv_array(i).secondary_reservation_quantity ;
953: IF l_debug_on THEN
954: WSH_DEBUG_SV.logmsg(l_module_name,'x_total_rsv2',x_total_rsv2);
955: END IF;
956:
957: END LOOP ;
958:
956:
957: END LOOP ;
958:
959: IF l_debug_on THEN
960: WSH_DEBUG_SV.pop(l_module_name);
961: END IF;
962:
963: EXCEPTION
964: WHEN totals_failed THEN
964: WHEN totals_failed THEN
965: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
966: WSH_UTIL_CORE.add_message (x_return_status);
967: IF l_debug_on THEN
968: WSH_DEBUG_SV.logmsg(l_module_name,'GET_TOTAL_RESERVED_QUANTITY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
969: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:GET_TOTAL_RESERVED_QUANTITY');
970: END IF;
971:
972: WHEN OTHERS THEN
965: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
966: WSH_UTIL_CORE.add_message (x_return_status);
967: IF l_debug_on THEN
968: WSH_DEBUG_SV.logmsg(l_module_name,'GET_TOTAL_RESERVED_QUANTITY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
969: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:GET_TOTAL_RESERVED_QUANTITY');
970: END IF;
971:
972: WHEN OTHERS THEN
973: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
972: WHEN OTHERS THEN
973: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
974: WSH_UTIL_CORE.default_handler('WSH_USA_INV_PVT.Get_total_Reserved_quantity');
975: IF l_debug_on THEN
976: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
977: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
978: END IF;
979:
980: END Get_total_Reserved_quantity ;
973: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
974: WSH_UTIL_CORE.default_handler('WSH_USA_INV_PVT.Get_total_Reserved_quantity');
975: IF l_debug_on THEN
976: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
977: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
978: END IF;
979:
980: END Get_total_Reserved_quantity ;
981:
1019: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1020: --
1021: IF l_debug_on IS NULL
1022: THEN
1023: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1024: END IF;
1025: --
1026: IF l_debug_on THEN
1027: WSH_DEBUG_SV.push(l_module_name);
1023: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1024: END IF;
1025: --
1026: IF l_debug_on THEN
1027: WSH_DEBUG_SV.push(l_module_name);
1028: --
1029: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1030: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1031: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1025: --
1026: IF l_debug_on THEN
1027: WSH_DEBUG_SV.push(l_module_name);
1028: --
1029: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1030: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1031: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1032: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1033: WSH_DEBUG_SV.log(l_module_name,'P_LOCK_RECORDS',P_LOCK_RECORDS);
1026: IF l_debug_on THEN
1027: WSH_DEBUG_SV.push(l_module_name);
1028: --
1029: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1030: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1031: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1032: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1033: WSH_DEBUG_SV.log(l_module_name,'P_LOCK_RECORDS',P_LOCK_RECORDS);
1034: WSH_DEBUG_SV.log(l_module_name,'P_CANCEL_ORDER_MODE',P_CANCEL_ORDER_MODE);
1027: WSH_DEBUG_SV.push(l_module_name);
1028: --
1029: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1030: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1031: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1032: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1033: WSH_DEBUG_SV.log(l_module_name,'P_LOCK_RECORDS',P_LOCK_RECORDS);
1034: WSH_DEBUG_SV.log(l_module_name,'P_CANCEL_ORDER_MODE',P_CANCEL_ORDER_MODE);
1035: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1028: --
1029: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1030: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1031: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1032: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1033: WSH_DEBUG_SV.log(l_module_name,'P_LOCK_RECORDS',P_LOCK_RECORDS);
1034: WSH_DEBUG_SV.log(l_module_name,'P_CANCEL_ORDER_MODE',P_CANCEL_ORDER_MODE);
1035: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1036: END IF;
1029: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1030: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1031: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1032: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1033: WSH_DEBUG_SV.log(l_module_name,'P_LOCK_RECORDS',P_LOCK_RECORDS);
1034: WSH_DEBUG_SV.log(l_module_name,'P_CANCEL_ORDER_MODE',P_CANCEL_ORDER_MODE);
1035: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1036: END IF;
1037: --
1030: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1031: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1032: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1033: WSH_DEBUG_SV.log(l_module_name,'P_LOCK_RECORDS',P_LOCK_RECORDS);
1034: WSH_DEBUG_SV.log(l_module_name,'P_CANCEL_ORDER_MODE',P_CANCEL_ORDER_MODE);
1035: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1036: END IF;
1037: --
1038: --
1031: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1032: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1033: WSH_DEBUG_SV.log(l_module_name,'P_LOCK_RECORDS',P_LOCK_RECORDS);
1034: WSH_DEBUG_SV.log(l_module_name,'P_CANCEL_ORDER_MODE',P_CANCEL_ORDER_MODE);
1035: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1036: END IF;
1037: --
1038: --
1039: -- Debug Statements
1038: --
1039: -- Debug Statements
1040: --
1041: IF l_debug_on THEN
1042: WSH_DEBUG_SV.logmsg(l_module_name, 'IN WSH_USA_INV_PVT.QUERY_RESERVATIONS ORDER LINE = '|| P_SOURCE_LINE_ID );
1043: END IF;
1044: --
1045: --
1046: -- Debug Statements
1045: --
1046: -- Debug Statements
1047: --
1048: IF l_debug_on THEN
1049: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit OE_ORDER_SCH_UTIL.GET_MTL_SALES_ORDER_ID',WSH_DEBUG_SV.C_PROC_LEVEL);
1050: END IF;
1051: --
1052: l_sales_order_id
1053: := OE_ORDER_SCH_UTIL.Get_mtl_sales_order_id(p_source_header_id);
1051: --
1052: l_sales_order_id
1053: := OE_ORDER_SCH_UTIL.Get_mtl_sales_order_id(p_source_header_id);
1054: IF l_debug_on THEN
1055: WSH_DEBUG_SV.log(l_module_name,'l_sales_order_id',l_sales_order_id);
1056: END IF;
1057: l_rsv.demand_source_header_id := l_sales_order_id;
1058: l_rsv.demand_source_line_id := p_source_line_id;
1059: l_rsv.organization_id := p_organization_id;
1074: --
1075: -- Debug Statements
1076: --
1077: IF l_debug_on THEN
1078: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_RESERVATION_PUB.QUERY_RESERVATION_OM_HDR_LINE',WSH_DEBUG_SV.C_PROC_LEVEL);
1079: END IF;
1080: --
1081: INV_RESERVATION_PUB.query_reservation_om_hdr_line
1082: (
1092: , x_error_code => l_error_code
1093: , p_lock_records => p_lock_records
1094: );
1095: IF l_debug_on THEN
1096: WSH_DEBUG_SV.log(l_module_name,'query_reservation_om_hdr_line x_return_status',x_return_status);
1097: END IF;
1098:
1099:
1100: IF x_return_status = fnd_api.g_ret_sts_success THEN
1101: --
1102: -- Debug Statements
1103: --
1104: IF l_debug_on THEN
1105: WSH_DEBUG_SV.logmsg(l_module_name, 'NUMBER OF RESERVATIONS FOUND: '||TO_CHAR ( X_MTL_RESERVATION_TBL_COUNT ) );
1106: END IF;
1107: --
1108: ELSE
1109: FND_MESSAGE.Set_Name('WSH', 'WSH_QUERY_RESERVATION');
1111: --
1112: -- Debug Statements
1113: --
1114: IF l_debug_on THEN
1115: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: '|| L_MSG_DATA );
1116: END IF;
1117: --
1118: FND_MESSAGE.Set_Token('ERROR_TEXT',l_msg_data);
1119: ELSE
1122: --
1123: -- Debug Statements
1124: --
1125: IF l_debug_on THEN
1126: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: '|| L_MSG_DATA );
1127: END IF;
1128: --
1129: l_error_text := l_error_text || l_msg_data;
1130: END LOOP;
1136: --
1137: -- Debug Statements
1138: --
1139: IF l_debug_on THEN
1140: WSH_DEBUG_SV.pop(l_module_name);
1141: END IF;
1142: --
1143: EXCEPTION
1144: WHEN query_reservation_failed THEN
1144: WHEN query_reservation_failed THEN
1145: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1146: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
1147: IF l_debug_on THEN
1148: WSH_DEBUG_SV.logmsg(l_module_name,'QUERY_RESERVATION_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1149: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:QUERY_RESERVATION_FAILED');
1150: END IF;
1151: END QUERY_RESERVATIONS;
1152:
1145: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1146: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
1147: IF l_debug_on THEN
1148: WSH_DEBUG_SV.logmsg(l_module_name,'QUERY_RESERVATION_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1149: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:QUERY_RESERVATION_FAILED');
1150: END IF;
1151: END QUERY_RESERVATIONS;
1152:
1153: -- This is a wrapper on inv_reservation_pub.delete_reservation
1174: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1175: --
1176: IF l_debug_on IS NULL
1177: THEN
1178: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1179: END IF;
1180: --
1181: IF l_debug_on THEN
1182: WSH_DEBUG_SV.push(l_module_name);
1178: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1179: END IF;
1180: --
1181: IF l_debug_on THEN
1182: WSH_DEBUG_SV.push(l_module_name);
1183: WSH_DEBUG_SV.logmsg(l_module_name, 'IN WSH_USA_INV_PVT.DELETE_RESERVATION ORDER LINE = '|| P_QUERY_INPUT.DEMAND_SOURCE_LINE_ID );
1184: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_RESERVATION_PUB.DELETE_RESERVATION',WSH_DEBUG_SV.C_PROC_LEVEL);
1185: END IF;
1186:
1179: END IF;
1180: --
1181: IF l_debug_on THEN
1182: WSH_DEBUG_SV.push(l_module_name);
1183: WSH_DEBUG_SV.logmsg(l_module_name, 'IN WSH_USA_INV_PVT.DELETE_RESERVATION ORDER LINE = '|| P_QUERY_INPUT.DEMAND_SOURCE_LINE_ID );
1184: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_RESERVATION_PUB.DELETE_RESERVATION',WSH_DEBUG_SV.C_PROC_LEVEL);
1185: END IF;
1186:
1187: INV_RESERVATION_PUB.delete_reservation
1180: --
1181: IF l_debug_on THEN
1182: WSH_DEBUG_SV.push(l_module_name);
1183: WSH_DEBUG_SV.logmsg(l_module_name, 'IN WSH_USA_INV_PVT.DELETE_RESERVATION ORDER LINE = '|| P_QUERY_INPUT.DEMAND_SOURCE_LINE_ID );
1184: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_RESERVATION_PUB.DELETE_RESERVATION',WSH_DEBUG_SV.C_PROC_LEVEL);
1185: END IF;
1186:
1187: INV_RESERVATION_PUB.delete_reservation
1188: (
1194: , p_rsv_rec => p_query_input
1195: , p_serial_number => l_dummy_sn
1196: );
1197: IF l_debug_on THEN
1198: WSH_DEBUG_SV.log(l_module_name,'delete_reservation x_return_status',x_return_status);
1199: END IF;
1200:
1201: IF x_return_status = fnd_api.g_ret_sts_success THEN
1202: --
1202: --
1203: -- Debug Statements
1204: --
1205: IF l_debug_on THEN
1206: WSH_DEBUG_SV.logmsg(l_module_name, 'RESERVATION DELETED FOR RESERVATION ID : '||P_QUERY_INPUT.RESERVATION_ID );
1207: END IF;
1208: --
1209: ELSE
1210: --
1210: --
1211: -- Debug Statements
1212: --
1213: IF l_debug_on THEN
1214: WSH_DEBUG_SV.logmsg(l_module_name, 'COULD NOT DELETE RESERVATION FOR RESERVATION ID : '||P_QUERY_INPUT.RESERVATION_ID );
1215: END IF;
1216: --
1217: FND_MESSAGE.Set_Name('WSH', 'WSH_DELETE_RESERVATION');
1218: IF l_msg_count = 1 THEN
1219: --
1220: -- Debug Statements
1221: --
1222: IF l_debug_on THEN
1223: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: '|| L_MSG_DATA );
1224: END IF;
1225: --
1226: FND_MESSAGE.Set_Token('ERROR_TEXT',l_msg_data);
1227: ELSE
1230: --
1231: -- Debug Statements
1232: --
1233: IF l_debug_on THEN
1234: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: '|| L_MSG_DATA );
1235: END IF;
1236: --
1237: l_error_text := l_error_text || l_msg_data;
1238: END LOOP;
1244: --
1245: -- Debug Statements
1246: --
1247: IF l_debug_on THEN
1248: WSH_DEBUG_SV.pop(l_module_name);
1249: END IF;
1250: --
1251: EXCEPTION
1252: WHEN delete_reservation_failed THEN
1255: --
1256: -- Debug Statements
1257: --
1258: IF l_debug_on THEN
1259: WSH_DEBUG_SV.logmsg(l_module_name,'DELETE_RESERVATION_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1260: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DELETE_RESERVATION_FAILED');
1261: END IF;
1262: --
1263: END delete_reservation;
1256: -- Debug Statements
1257: --
1258: IF l_debug_on THEN
1259: WSH_DEBUG_SV.logmsg(l_module_name,'DELETE_RESERVATION_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1260: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DELETE_RESERVATION_FAILED');
1261: END IF;
1262: --
1263: END delete_reservation;
1264:
1297: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1298: --
1299: IF l_debug_on IS NULL
1300: THEN
1301: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1302: END IF;
1303: --
1304: IF l_debug_on THEN
1305: WSH_DEBUG_SV.push(l_module_name);
1301: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1302: END IF;
1303: --
1304: IF l_debug_on THEN
1305: WSH_DEBUG_SV.push(l_module_name);
1306: WSH_DEBUG_SV.log(l_module_name, 'p_query_input.organization_id',p_query_input.organization_id);
1307: END IF;
1308: --
1309: --
1302: END IF;
1303: --
1304: IF l_debug_on THEN
1305: WSH_DEBUG_SV.push(l_module_name);
1306: WSH_DEBUG_SV.log(l_module_name, 'p_query_input.organization_id',p_query_input.organization_id);
1307: END IF;
1308: --
1309: --
1310: -- Debug Statements
1315: --
1316: -- Debug Statements
1317: --
1318: IF l_debug_on THEN
1319: WSH_DEBUG_SV.logmsg(l_module_name, 'IN WSH_USA_INV_PVT.CREATE_RESERVATION ' );
1320: END IF;
1321: --
1322:
1323: --
1323: --
1324: -- Debug Statements
1325: --
1326: IF l_debug_on THEN
1327: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_RESERVATION_PUB.CREATE_RESERVATION',WSH_DEBUG_SV.C_PROC_LEVEL);
1328: END IF;
1329: --
1330:
1331:
1370: , x_reservation_id => x_reservation_id
1371: );
1372: END IF;
1373: IF l_debug_on THEN
1374: WSH_DEBUG_SV.log(l_module_name,'INV_RESERVATION_PUB.CREATE_RESERVATION',x_return_status);
1375: END IF;
1376:
1377: IF x_return_status = fnd_api.g_ret_sts_success THEN
1378: --
1378: --
1379: -- Debug Statements
1380: --
1381: IF l_debug_on THEN
1382: WSH_DEBUG_SV.logmsg(l_module_name, 'RESERVATION CREATED FOR RESERVATION ID : '||X_RESERVATION_ID );
1383: END IF;
1384: --
1385: ELSE
1386: FND_MESSAGE.Set_Name('WSH', 'WSH_CREATE_RESERVATION');
1388: --
1389: -- Debug Statements
1390: --
1391: IF l_debug_on THEN
1392: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: '|| L_MSG_DATA );
1393: END IF;
1394: --
1395: FND_MESSAGE.Set_Token('ERROR_TEXT',l_msg_data);
1396: ELSE
1399: --
1400: -- Debug Statements
1401: --
1402: IF l_debug_on THEN
1403: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: '|| L_MSG_DATA );
1404: END IF;
1405: --
1406: l_error_text := l_error_text || l_msg_data;
1407: END LOOP;
1415: --
1416: -- Debug Statements
1417: --
1418: IF l_debug_on THEN
1419: WSH_DEBUG_SV.pop(l_module_name);
1420: END IF;
1421: --
1422: EXCEPTION
1423: WHEN create_reservation_failed THEN
1426: --
1427: -- Debug Statements
1428: --
1429: IF l_debug_on THEN
1430: WSH_DEBUG_SV.logmsg(l_module_name,'CREATE_RESERVATION_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1431: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CREATE_RESERVATION_FAILED');
1432: END IF;
1433: --
1434: END;
1427: -- Debug Statements
1428: --
1429: IF l_debug_on THEN
1430: WSH_DEBUG_SV.logmsg(l_module_name,'CREATE_RESERVATION_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1431: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CREATE_RESERVATION_FAILED');
1432: END IF;
1433: --
1434: END;
1435:
1462: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1463: --
1464: IF l_debug_on IS NULL
1465: THEN
1466: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1467: END IF;
1468: --
1469: IF l_debug_on THEN
1470: WSH_DEBUG_SV.push(l_module_name);
1466: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1467: END IF;
1468: --
1469: IF l_debug_on THEN
1470: WSH_DEBUG_SV.push(l_module_name);
1471: WSH_DEBUG_SV.log(l_module_name,'p_query_input.reservation_id',p_query_input.reservation_id);
1472: WSH_DEBUG_SV.log(l_module_name,'p_query_input.organization_id',p_query_input.organization_id);
1473: WSH_DEBUG_SV.log(l_module_name,'p_query_input.inventory_item_id',p_query_input.inventory_item_id);
1474: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.reservation_id',p_new_resv_rec.reservation_id);
1467: END IF;
1468: --
1469: IF l_debug_on THEN
1470: WSH_DEBUG_SV.push(l_module_name);
1471: WSH_DEBUG_SV.log(l_module_name,'p_query_input.reservation_id',p_query_input.reservation_id);
1472: WSH_DEBUG_SV.log(l_module_name,'p_query_input.organization_id',p_query_input.organization_id);
1473: WSH_DEBUG_SV.log(l_module_name,'p_query_input.inventory_item_id',p_query_input.inventory_item_id);
1474: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.reservation_id',p_new_resv_rec.reservation_id);
1475: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.organization_id',p_new_resv_rec.organization_id);
1468: --
1469: IF l_debug_on THEN
1470: WSH_DEBUG_SV.push(l_module_name);
1471: WSH_DEBUG_SV.log(l_module_name,'p_query_input.reservation_id',p_query_input.reservation_id);
1472: WSH_DEBUG_SV.log(l_module_name,'p_query_input.organization_id',p_query_input.organization_id);
1473: WSH_DEBUG_SV.log(l_module_name,'p_query_input.inventory_item_id',p_query_input.inventory_item_id);
1474: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.reservation_id',p_new_resv_rec.reservation_id);
1475: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.organization_id',p_new_resv_rec.organization_id);
1476: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.inventory_item_id',p_new_resv_rec.inventory_item_id);
1469: IF l_debug_on THEN
1470: WSH_DEBUG_SV.push(l_module_name);
1471: WSH_DEBUG_SV.log(l_module_name,'p_query_input.reservation_id',p_query_input.reservation_id);
1472: WSH_DEBUG_SV.log(l_module_name,'p_query_input.organization_id',p_query_input.organization_id);
1473: WSH_DEBUG_SV.log(l_module_name,'p_query_input.inventory_item_id',p_query_input.inventory_item_id);
1474: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.reservation_id',p_new_resv_rec.reservation_id);
1475: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.organization_id',p_new_resv_rec.organization_id);
1476: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.inventory_item_id',p_new_resv_rec.inventory_item_id);
1477:
1470: WSH_DEBUG_SV.push(l_module_name);
1471: WSH_DEBUG_SV.log(l_module_name,'p_query_input.reservation_id',p_query_input.reservation_id);
1472: WSH_DEBUG_SV.log(l_module_name,'p_query_input.organization_id',p_query_input.organization_id);
1473: WSH_DEBUG_SV.log(l_module_name,'p_query_input.inventory_item_id',p_query_input.inventory_item_id);
1474: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.reservation_id',p_new_resv_rec.reservation_id);
1475: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.organization_id',p_new_resv_rec.organization_id);
1476: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.inventory_item_id',p_new_resv_rec.inventory_item_id);
1477:
1478: WSH_DEBUG_SV.logmsg(l_module_name, 'DEBUGGING IN UPDATE RESER' );
1471: WSH_DEBUG_SV.log(l_module_name,'p_query_input.reservation_id',p_query_input.reservation_id);
1472: WSH_DEBUG_SV.log(l_module_name,'p_query_input.organization_id',p_query_input.organization_id);
1473: WSH_DEBUG_SV.log(l_module_name,'p_query_input.inventory_item_id',p_query_input.inventory_item_id);
1474: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.reservation_id',p_new_resv_rec.reservation_id);
1475: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.organization_id',p_new_resv_rec.organization_id);
1476: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.inventory_item_id',p_new_resv_rec.inventory_item_id);
1477:
1478: WSH_DEBUG_SV.logmsg(l_module_name, 'DEBUGGING IN UPDATE RESER' );
1479: WSH_DEBUG_SV.logmsg(l_module_name, 'p_new_resv_recsecondary_reservation_quantity '||p_new_resv_rec.secondary_reservation_quantity );
1472: WSH_DEBUG_SV.log(l_module_name,'p_query_input.organization_id',p_query_input.organization_id);
1473: WSH_DEBUG_SV.log(l_module_name,'p_query_input.inventory_item_id',p_query_input.inventory_item_id);
1474: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.reservation_id',p_new_resv_rec.reservation_id);
1475: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.organization_id',p_new_resv_rec.organization_id);
1476: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.inventory_item_id',p_new_resv_rec.inventory_item_id);
1477:
1478: WSH_DEBUG_SV.logmsg(l_module_name, 'DEBUGGING IN UPDATE RESER' );
1479: WSH_DEBUG_SV.logmsg(l_module_name, 'p_new_resv_recsecondary_reservation_quantity '||p_new_resv_rec.secondary_reservation_quantity );
1480: WSH_DEBUG_SV.logmsg(l_module_name, 'p_new_resv_rec.secondary_UOM_CODE '||p_new_resv_rec.secondary_uom_code );
1474: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.reservation_id',p_new_resv_rec.reservation_id);
1475: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.organization_id',p_new_resv_rec.organization_id);
1476: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.inventory_item_id',p_new_resv_rec.inventory_item_id);
1477:
1478: WSH_DEBUG_SV.logmsg(l_module_name, 'DEBUGGING IN UPDATE RESER' );
1479: WSH_DEBUG_SV.logmsg(l_module_name, 'p_new_resv_recsecondary_reservation_quantity '||p_new_resv_rec.secondary_reservation_quantity );
1480: WSH_DEBUG_SV.logmsg(l_module_name, 'p_new_resv_rec.secondary_UOM_CODE '||p_new_resv_rec.secondary_uom_code );
1481: WSH_DEBUG_SV.logmsg(l_module_name, 'p_new_resv_rec.secondary_ID '||p_new_resv_rec.secondary_uom_id );
1482:
1475: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.organization_id',p_new_resv_rec.organization_id);
1476: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.inventory_item_id',p_new_resv_rec.inventory_item_id);
1477:
1478: WSH_DEBUG_SV.logmsg(l_module_name, 'DEBUGGING IN UPDATE RESER' );
1479: WSH_DEBUG_SV.logmsg(l_module_name, 'p_new_resv_recsecondary_reservation_quantity '||p_new_resv_rec.secondary_reservation_quantity );
1480: WSH_DEBUG_SV.logmsg(l_module_name, 'p_new_resv_rec.secondary_UOM_CODE '||p_new_resv_rec.secondary_uom_code );
1481: WSH_DEBUG_SV.logmsg(l_module_name, 'p_new_resv_rec.secondary_ID '||p_new_resv_rec.secondary_uom_id );
1482:
1483:
1476: WSH_DEBUG_SV.log(l_module_name,'p_new_resv_rec.inventory_item_id',p_new_resv_rec.inventory_item_id);
1477:
1478: WSH_DEBUG_SV.logmsg(l_module_name, 'DEBUGGING IN UPDATE RESER' );
1479: WSH_DEBUG_SV.logmsg(l_module_name, 'p_new_resv_recsecondary_reservation_quantity '||p_new_resv_rec.secondary_reservation_quantity );
1480: WSH_DEBUG_SV.logmsg(l_module_name, 'p_new_resv_rec.secondary_UOM_CODE '||p_new_resv_rec.secondary_uom_code );
1481: WSH_DEBUG_SV.logmsg(l_module_name, 'p_new_resv_rec.secondary_ID '||p_new_resv_rec.secondary_uom_id );
1482:
1483:
1484: END IF;
1477:
1478: WSH_DEBUG_SV.logmsg(l_module_name, 'DEBUGGING IN UPDATE RESER' );
1479: WSH_DEBUG_SV.logmsg(l_module_name, 'p_new_resv_recsecondary_reservation_quantity '||p_new_resv_rec.secondary_reservation_quantity );
1480: WSH_DEBUG_SV.logmsg(l_module_name, 'p_new_resv_rec.secondary_UOM_CODE '||p_new_resv_rec.secondary_uom_code );
1481: WSH_DEBUG_SV.logmsg(l_module_name, 'p_new_resv_rec.secondary_ID '||p_new_resv_rec.secondary_uom_id );
1482:
1483:
1484: END IF;
1485: --
1485: --
1486: -- Debug Statements
1487: --
1488: IF l_debug_on THEN
1489: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_RESERVATION_PUB.UPDATE_RESERVATION',WSH_DEBUG_SV.C_PROC_LEVEL);
1490: END IF;
1491: --
1492:
1493:
1506: -- Bug 5099694
1507: , p_over_reservation_flag =>3
1508: );
1509: IF l_debug_on THEN
1510: WSH_DEBUG_SV.log(l_module_name,'INV_RESERVATION_PUB.update_reservation',x_return_status);
1511: END IF;
1512:
1513: IF x_return_status = fnd_api.g_ret_sts_success THEN
1514: --
1514: --
1515: -- Debug Statements
1516: --
1517: IF l_debug_on THEN
1518: WSH_DEBUG_SV.logmsg(l_module_name, 'RESERVATION UPDATED FOR RESERVATION ID : '||TO_CHAR ( P_QUERY_INPUT.RESERVATION_ID ) );
1519: END IF;
1520: --
1521: ELSE
1522: FND_MESSAGE.Set_Name('WSH', 'WSH_UPDATE_RESERVATION');
1524: --
1525: -- Debug Statements
1526: --
1527: IF l_debug_on THEN
1528: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: '|| L_MSG_DATA );
1529: END IF;
1530: --
1531: FND_MESSAGE.Set_Token('ERROR_TEXT',l_msg_data);
1532: ELSE
1535: --
1536: -- Debug Statements
1537: --
1538: IF l_debug_on THEN
1539: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: '|| L_MSG_DATA );
1540: END IF;
1541: --
1542: l_error_text := l_error_text || l_msg_data;
1543: END LOOP;
1549: --
1550: -- Debug Statements
1551: --
1552: IF l_debug_on THEN
1553: WSH_DEBUG_SV.pop(l_module_name);
1554: END IF;
1555: --
1556: EXCEPTION
1557: WHEN update_reservation_failed THEN
1560: --
1561: -- Debug Statements
1562: --
1563: IF l_debug_on THEN
1564: WSH_DEBUG_SV.logmsg(l_module_name,'UPDATE_RESERVATION_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1565: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:UPDATE_RESERVATION_FAILED');
1566: END IF;
1567: --
1568: END;
1561: -- Debug Statements
1562: --
1563: IF l_debug_on THEN
1564: WSH_DEBUG_SV.logmsg(l_module_name,'UPDATE_RESERVATION_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1565: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:UPDATE_RESERVATION_FAILED');
1566: END IF;
1567: --
1568: END;
1569:
1585: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1586: --
1587: IF l_debug_on IS NULL
1588: THEN
1589: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1590: END IF;
1591: --
1592: IF l_debug_on THEN
1593: WSH_DEBUG_SV.push(l_module_name);
1589: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1590: END IF;
1591: --
1592: IF l_debug_on THEN
1593: WSH_DEBUG_SV.push(l_module_name);
1594: --
1595: WSH_DEBUG_SV.log(l_module_name,'P_MOVE_ORDER_LINE_ID',P_MOVE_ORDER_LINE_ID);
1596: END IF;
1597: --
1591: --
1592: IF l_debug_on THEN
1593: WSH_DEBUG_SV.push(l_module_name);
1594: --
1595: WSH_DEBUG_SV.log(l_module_name,'P_MOVE_ORDER_LINE_ID',P_MOVE_ORDER_LINE_ID);
1596: END IF;
1597: --
1598: --
1599: -- Debug Statements
1598: --
1599: -- Debug Statements
1600: --
1601: IF l_debug_on THEN
1602: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_TROLIN_UTIL.QUERY_ROW',WSH_DEBUG_SV.C_PROC_LEVEL);
1603: END IF;
1604: --
1605: l_trolin_rec := INV_TROLIN_UTIL.Query_Row(
1606: p_line_id => p_move_order_line_id);
1608: --
1609: -- Debug Statements
1610: --
1611: IF l_debug_on THEN
1612: WSH_DEBUG_SV.pop(l_module_name);
1613: END IF;
1614: --
1615: RETURN TRUE;
1616: ELSE
1617: --
1618: -- Debug Statements
1619: --
1620: IF l_debug_on THEN
1621: WSH_DEBUG_SV.pop(l_module_name);
1622: END IF;
1623: --
1624: RETURN FALSE;
1625: END IF;
1658: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1659: --
1660: IF l_debug_on IS NULL
1661: THEN
1662: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1663: END IF;
1664: --
1665: IF l_debug_on THEN
1666: WSH_DEBUG_SV.push(l_module_name);
1662: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1663: END IF;
1664: --
1665: IF l_debug_on THEN
1666: WSH_DEBUG_SV.push(l_module_name);
1667: END IF;
1668: --
1669: --
1670: -- Debug Statements
1670: -- Debug Statements
1671: --
1672: IF l_debug_on THEN
1673: -- HW BUG#:3456926 - Removed OPM debugging msg and kept WSH
1674: WSH_DEBUG_SV.logmsg(l_module_name, 'IN WSH_USA_INV_PVT.CHECK_INV_INFO FOR DETAIL : '|| P_DELIVERY_DETAIL_SPLIT_REC.DELIVERY_DETAIL_ID||' REL STAT : '||P_DELIVERY_DETAIL_SPLIT_REC.RELEASED_STATUS );
1675: END IF;
1676: --
1677:
1678: -- 3012297 (initializing l_process_flag)
1697: --
1698: -- Debug Statements
1699: --
1700: IF l_debug_on THEN
1701: WSH_DEBUG_SV.pop(l_module_name);
1702: END IF;
1703: --
1704: return FALSE;
1705: END IF;
1712: --
1713: -- Debug Statements
1714: --
1715: IF l_debug_on THEN
1716: WSH_DEBUG_SV.pop(l_module_name);
1717: END IF;
1718: --
1719: return FALSE;
1720: END IF;
1724: --
1725: -- Debug Statements
1726: --
1727: IF l_debug_on THEN
1728: WSH_DEBUG_SV.pop(l_module_name);
1729: END IF;
1730: --
1731: return FALSE;
1732: END IF;
1739: --
1740: -- Debug Statements
1741: --
1742: IF l_debug_on THEN
1743: WSH_DEBUG_SV.pop(l_module_name);
1744: END IF;
1745: --
1746: return FALSE;
1747: END IF;
1752: --
1753: -- Debug Statements
1754: --
1755: IF l_debug_on THEN
1756: WSH_DEBUG_SV.pop(l_module_name);
1757: END IF;
1758: --
1759: return FALSE;
1760: END IF;
1763: --
1764: -- Debug Statements
1765: --
1766: IF l_debug_on THEN
1767: WSH_DEBUG_SV.pop(l_module_name);
1768: END IF;
1769: --
1770: return TRUE;
1771:
1822: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1823: --
1824: IF l_debug_on IS NULL
1825: THEN
1826: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1827: END IF;
1828: --
1829: IF l_debug_on THEN
1830: WSH_DEBUG_SV.push(l_module_name);
1826: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1827: END IF;
1828: --
1829: IF l_debug_on THEN
1830: WSH_DEBUG_SV.push(l_module_name);
1831: --
1832: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1833: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1834: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1828: --
1829: IF l_debug_on THEN
1830: WSH_DEBUG_SV.push(l_module_name);
1831: --
1832: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1833: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1834: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1835: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY',P_CANCELLATION_QUANTITY);
1836: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY2',P_CANCELLATION_QUANTITY2);
1829: IF l_debug_on THEN
1830: WSH_DEBUG_SV.push(l_module_name);
1831: --
1832: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1833: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1834: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1835: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY',P_CANCELLATION_QUANTITY);
1836: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY2',P_CANCELLATION_QUANTITY2);
1837: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.organization_id',p_delivery_detail_split_rec.organization_id);
1830: WSH_DEBUG_SV.push(l_module_name);
1831: --
1832: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1833: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1834: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1835: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY',P_CANCELLATION_QUANTITY);
1836: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY2',P_CANCELLATION_QUANTITY2);
1837: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.organization_id',p_delivery_detail_split_rec.organization_id);
1838: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.delivery_detail_id',p_delivery_detail_split_rec.delivery_detail_id);
1831: --
1832: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1833: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1834: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1835: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY',P_CANCELLATION_QUANTITY);
1836: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY2',P_CANCELLATION_QUANTITY2);
1837: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.organization_id',p_delivery_detail_split_rec.organization_id);
1838: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.delivery_detail_id',p_delivery_detail_split_rec.delivery_detail_id);
1839: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.inventory_item_id',p_delivery_detail_split_rec.inventory_item_id);
1832: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1833: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1834: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1835: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY',P_CANCELLATION_QUANTITY);
1836: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY2',P_CANCELLATION_QUANTITY2);
1837: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.organization_id',p_delivery_detail_split_rec.organization_id);
1838: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.delivery_detail_id',p_delivery_detail_split_rec.delivery_detail_id);
1839: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.inventory_item_id',p_delivery_detail_split_rec.inventory_item_id);
1840: END IF;
1833: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1834: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1835: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY',P_CANCELLATION_QUANTITY);
1836: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY2',P_CANCELLATION_QUANTITY2);
1837: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.organization_id',p_delivery_detail_split_rec.organization_id);
1838: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.delivery_detail_id',p_delivery_detail_split_rec.delivery_detail_id);
1839: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.inventory_item_id',p_delivery_detail_split_rec.inventory_item_id);
1840: END IF;
1841: --
1834: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1835: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY',P_CANCELLATION_QUANTITY);
1836: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY2',P_CANCELLATION_QUANTITY2);
1837: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.organization_id',p_delivery_detail_split_rec.organization_id);
1838: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.delivery_detail_id',p_delivery_detail_split_rec.delivery_detail_id);
1839: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.inventory_item_id',p_delivery_detail_split_rec.inventory_item_id);
1840: END IF;
1841: --
1842: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1835: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY',P_CANCELLATION_QUANTITY);
1836: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY2',P_CANCELLATION_QUANTITY2);
1837: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.organization_id',p_delivery_detail_split_rec.organization_id);
1838: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.delivery_detail_id',p_delivery_detail_split_rec.delivery_detail_id);
1839: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.inventory_item_id',p_delivery_detail_split_rec.inventory_item_id);
1840: END IF;
1841: --
1842: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1843:
1845: --
1846: -- Debug Statements
1847: --
1848: IF l_debug_on THEN
1849: WSH_DEBUG_SV.pop(l_module_name);
1850: END IF;
1851: --
1852: RETURN;
1853: END IF;
1855: --
1856: -- Debug Statements
1857: --
1858: IF l_debug_on THEN
1859: WSH_DEBUG_SV.logmsg(l_module_name, 'IN WSH_USA_INV_PVT.CANCEL_STAGED_RESERVATION QUANTITY : '|| P_CANCELLATION_QUANTITY );
1860: END IF;
1861: --
1862:
1863: --X-dock, conditionally populate delivery_detail_id
1890: --
1891: -- Debug Statements
1892: --
1893: IF l_debug_on THEN
1894: WSH_DEBUG_SV.log(l_module_name, 'query_reservations x_return_status',x_return_status);
1895: WSH_DEBUG_SV.logmsg(l_module_name, 'L_SIZE: '||L_SIZE );
1896: END IF;
1897:
1898: IF (x_return_status <> fnd_api.g_ret_sts_success) OR (l_size = 0) THEN
1891: -- Debug Statements
1892: --
1893: IF l_debug_on THEN
1894: WSH_DEBUG_SV.log(l_module_name, 'query_reservations x_return_status',x_return_status);
1895: WSH_DEBUG_SV.logmsg(l_module_name, 'L_SIZE: '||L_SIZE );
1896: END IF;
1897:
1898: IF (x_return_status <> fnd_api.g_ret_sts_success) OR (l_size = 0) THEN
1899: IF x_return_status = fnd_api.g_ret_sts_success THEN
1903: --
1904: -- Debug Statements
1905: --
1906: IF l_debug_on THEN
1907: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.GET_RESERVABLE_FLAG',WSH_DEBUG_SV.C_PROC_LEVEL);
1908: END IF;
1909: --
1910: l_reservable_flag := WSH_DELIVERY_DETAILS_INV.get_reservable_flag(
1911: x_item_id => p_delivery_detail_split_rec.inventory_item_id,
1911: x_item_id => p_delivery_detail_split_rec.inventory_item_id,
1912: x_organization_id => p_delivery_detail_split_rec.organization_id,
1913: x_pickable_flag => l_pickable_flag);
1914: IF l_debug_on THEN
1915: WSH_DEBUG_SV.log(l_module_name, 'get_reservable_flag l_reservable_flag,x_return_status',l_reservable_flag||','||x_return_status);
1916: END IF;
1917: -- Non reservable/transactable items will always have no reservations.
1918: IF l_reservable_flag = 'N' THEN
1919: --
1919: --
1920: -- Debug Statements
1921: --
1922: IF l_debug_on THEN
1923: WSH_DEBUG_SV.logmsg(l_module_name, 'NON RESERVABLE/TRANSACTABLE ITEM' );
1924: WSH_DEBUG_SV.pop(l_module_name);
1925: END IF;
1926: RETURN;
1927: END IF;
1920: -- Debug Statements
1921: --
1922: IF l_debug_on THEN
1923: WSH_DEBUG_SV.logmsg(l_module_name, 'NON RESERVABLE/TRANSACTABLE ITEM' );
1924: WSH_DEBUG_SV.pop(l_module_name);
1925: END IF;
1926: RETURN;
1927: END IF;
1928: END IF;
1949: --
1950: -- Debug Statements
1951: --
1952: IF l_debug_on THEN
1953: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_STAGED_RESERVATION_UTIL.QUERY_STAGED_FLAG',WSH_DEBUG_SV.C_PROC_LEVEL);
1954: END IF;
1955: --
1956: INV_STAGED_RESERVATION_UTIL.query_staged_flag
1957: ( x_return_status => x_return_status,
1959: x_msg_data => l_msg_data,
1960: x_staged_flag => l_staged_flag,
1961: p_reservation_id => l_rsv_array(l_counter).reservation_id);
1962: IF l_debug_on THEN
1963: WSH_DEBUG_SV.log(l_module_name, 'query_staged_flag x_return_status',x_return_status);
1964: END IF;
1965: -- HW OPMCONV. No need to fork code
1966:
1967: --
1967: --
1968: -- Debug Statements
1969: --
1970: IF l_debug_on THEN
1971: WSH_DEBUG_SV.logmsg(l_module_name, 'AFTER INV_STAGED_RESERVATION_UTIL.QUERY_STAGED_FLAG : '||L_STAGED_FLAG );
1972: END IF;
1973: --
1974:
1975: -- HW OPMCONV - Update qty2 using new reservation flds
1990: --
1991: -- Debug Statements
1992: --
1993: IF l_debug_on THEN
1994: WSH_DEBUG_SV.logmsg(l_module_name, 'GOING TO DELETE_RESERVATION IN CANCEL_STAGED_RESERVATION ' );
1995: END IF;
1996: --
1997: delete_reservation (p_query_input => l_rsv_array(l_counter),
1998: x_return_status => x_return_status );
1996: --
1997: delete_reservation (p_query_input => l_rsv_array(l_counter),
1998: x_return_status => x_return_status );
1999: IF l_debug_on THEN
2000: WSH_DEBUG_SV.log(l_module_name, 'delete_reservation x_return_status',x_return_status);
2001: END IF;
2002:
2003: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2004: raise cancel_failed;
2018: -- Debug Statements
2019: --
2020: IF l_debug_on THEN
2021: -- HW OPMCONV - Print correct value of Qty2
2022: WSH_DEBUG_SV.logmsg(l_module_name, 'UPDATE QTY2 '|| l_rsv_new.secondary_reservation_quantity );
2023: END IF;
2024: --
2025: -- HW OPMCONV - Ensure Qty2 are NULL before updating
2026: IF ( l_rsv_new.secondary_reservation_quantity = 0 OR
2031: update_reservation (p_query_input => l_rsv_array(l_counter),
2032: p_new_resv_rec => l_rsv_new,
2033: x_return_status => x_return_status);
2034: IF l_debug_on THEN
2035: WSH_DEBUG_SV.log(l_module_name, 'update_reservation x_return_status',x_return_status);
2036: END IF;
2037:
2038: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2039: raise cancel_failed;
2049: --
2050: -- Debug Statements
2051: --
2052: IF l_debug_on THEN
2053: WSH_DEBUG_SV.pop(l_module_name);
2054: END IF;
2055: --
2056: EXCEPTION
2057: WHEN cancel_failed THEN
2059: --
2060: -- Debug Statements
2061: --
2062: IF l_debug_on THEN
2063: WSH_DEBUG_SV.logmsg(l_module_name,'CANCEL_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2064: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CANCEL_FAILED');
2065: END IF;
2066: --
2067: WHEN others THEN
2060: -- Debug Statements
2061: --
2062: IF l_debug_on THEN
2063: WSH_DEBUG_SV.logmsg(l_module_name,'CANCEL_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2064: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CANCEL_FAILED');
2065: END IF;
2066: --
2067: WHEN others THEN
2068: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2068: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2069: wsh_util_core.default_handler('WSH_USA_INV_PVT.cancel_staged_reservation',l_module_name);
2070:
2071: IF l_debug_on THEN
2072: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2073: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2074: END IF;
2075: END cancel_staged_reservation;
2076:
2069: wsh_util_core.default_handler('WSH_USA_INV_PVT.cancel_staged_reservation',l_module_name);
2070:
2071: IF l_debug_on THEN
2072: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2073: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2074: END IF;
2075: END cancel_staged_reservation;
2076:
2077:
2144: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2145: --
2146: IF l_debug_on IS NULL
2147: THEN
2148: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2149: END IF;
2150: --
2151: IF l_debug_on THEN
2152: WSH_DEBUG_SV.push(l_module_name);
2148: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2149: END IF;
2150: --
2151: IF l_debug_on THEN
2152: WSH_DEBUG_SV.push(l_module_name);
2153: --
2154: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
2155: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
2156: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
2150: --
2151: IF l_debug_on THEN
2152: WSH_DEBUG_SV.push(l_module_name);
2153: --
2154: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
2155: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
2156: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
2157: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2158: WSH_DEBUG_SV.log(l_module_name,'P_delivery_detail_id',P_delivery_detail_id);
2151: IF l_debug_on THEN
2152: WSH_DEBUG_SV.push(l_module_name);
2153: --
2154: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
2155: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
2156: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
2157: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2158: WSH_DEBUG_SV.log(l_module_name,'P_delivery_detail_id',P_delivery_detail_id);
2159: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY',P_CANCELLATION_QUANTITY);
2152: WSH_DEBUG_SV.push(l_module_name);
2153: --
2154: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
2155: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
2156: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
2157: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2158: WSH_DEBUG_SV.log(l_module_name,'P_delivery_detail_id',P_delivery_detail_id);
2159: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY',P_CANCELLATION_QUANTITY);
2160: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY2',P_CANCELLATION_QUANTITY2);
2153: --
2154: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
2155: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
2156: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
2157: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2158: WSH_DEBUG_SV.log(l_module_name,'P_delivery_detail_id',P_delivery_detail_id);
2159: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY',P_CANCELLATION_QUANTITY);
2160: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY2',P_CANCELLATION_QUANTITY2);
2161: END IF;
2154: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
2155: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
2156: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
2157: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2158: WSH_DEBUG_SV.log(l_module_name,'P_delivery_detail_id',P_delivery_detail_id);
2159: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY',P_CANCELLATION_QUANTITY);
2160: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY2',P_CANCELLATION_QUANTITY2);
2161: END IF;
2162: --
2155: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
2156: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
2157: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2158: WSH_DEBUG_SV.log(l_module_name,'P_delivery_detail_id',P_delivery_detail_id);
2159: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY',P_CANCELLATION_QUANTITY);
2160: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY2',P_CANCELLATION_QUANTITY2);
2161: END IF;
2162: --
2163: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2156: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
2157: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2158: WSH_DEBUG_SV.log(l_module_name,'P_delivery_detail_id',P_delivery_detail_id);
2159: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY',P_CANCELLATION_QUANTITY);
2160: WSH_DEBUG_SV.log(l_module_name,'P_CANCELLATION_QUANTITY2',P_CANCELLATION_QUANTITY2);
2161: END IF;
2162: --
2163: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2164:
2166: --
2167: -- Debug Statements
2168: --
2169: IF l_debug_on THEN
2170: WSH_DEBUG_SV.pop(l_module_name);
2171: END IF;
2172: --
2173: RETURN;
2174: END IF;
2202: x_return_status => x_return_status);
2203:
2204:
2205: IF l_debug_on THEN
2206: WSH_DEBUG_SV.log(l_module_name,'query_reservations x_return_status',x_return_status);
2207: END IF;
2208:
2209: IF (x_return_status <> fnd_api.g_ret_sts_success) THEN
2210: raise cancel_failed;
2214: --
2215: -- Debug Statements
2216: --
2217: IF l_debug_on THEN
2218: WSH_DEBUG_SV.pop(l_module_name);
2219: END IF;
2220: --
2221: RETURN; -- for a backordered DD reservations might or might not exist
2222: END IF;
2237: CLOSE c_nonstaged_qty;
2238:
2239: -- HW OPMCONV - Added debugging statement
2240: IF l_debug_on THEN
2241: WSH_DEBUG_SV.log(l_module_name,'After fetching l_nonstaged_qty',l_nonstaged_qty);
2242:
2243: WSH_DEBUG_SV.log(l_module_name,'After fetching l_nonstaged_qty2',l_nonstaged_qty2);
2244: END IF;
2245:
2239: -- HW OPMCONV - Added debugging statement
2240: IF l_debug_on THEN
2241: WSH_DEBUG_SV.log(l_module_name,'After fetching l_nonstaged_qty',l_nonstaged_qty);
2242:
2243: WSH_DEBUG_SV.log(l_module_name,'After fetching l_nonstaged_qty2',l_nonstaged_qty2);
2244: END IF;
2245:
2246:
2247: l_nonstaged_rsv_qty := 0;
2250: LOOP
2251: -- HW OPMCONV. Removed forking the code
2252:
2253: IF l_debug_on THEN
2254: WSH_DEBUG_SV.log(l_module_name,'Calling program unit INV_STAGED_RESERVATION_UTIL.query_staged_flag',WSH_DEBUG_SV.C_PROC_LEVEL);
2255: END IF;
2256:
2257: IF l_debug_on THEN
2258:
2255: END IF;
2256:
2257: IF l_debug_on THEN
2258:
2259: WSH_DEBUG_SV.log(l_module_name,'BEG OF LOOP l_nonstaged_qty',l_nonstaged_qty);
2260:
2261: WSH_DEBUG_SV.log(l_module_name,'BEG OF LOOP l_nonstaged_qty2',l_nonstaged_qty2);
2262: END IF;
2263: INV_STAGED_RESERVATION_UTIL.query_staged_flag(
2257: IF l_debug_on THEN
2258:
2259: WSH_DEBUG_SV.log(l_module_name,'BEG OF LOOP l_nonstaged_qty',l_nonstaged_qty);
2260:
2261: WSH_DEBUG_SV.log(l_module_name,'BEG OF LOOP l_nonstaged_qty2',l_nonstaged_qty2);
2262: END IF;
2263: INV_STAGED_RESERVATION_UTIL.query_staged_flag(
2264: x_return_status => x_return_status,
2265: x_msg_count => l_msg_count,
2266: x_msg_data => l_msg_data,
2267: x_staged_flag => l_staged_flag,
2268: p_reservation_id => l_rsv_array(l_counter).reservation_id);
2269: IF l_debug_on THEN
2270: WSH_DEBUG_SV.log(l_module_name,'INV_STAGED_RESERVATION_UTIL.query_staged_flag',l_staged_flag);
2271: END IF;
2272: -- HW OPMCONV. Removed code forking
2273:
2274: -- Bug3012297
2278: , p_rsv => l_rsv_array(l_counter))
2279: THEN
2280:
2281: IF l_debug_on THEN
2282: WSH_DEBUG_SV.log(l_module_name,'BEFORE l_nonstaged_rsv_qty',l_nonstaged_rsv_qty);
2283: WSH_DEBUG_SV.log(l_module_name,'(l_rsv_array(l_counter).primary_reservation_quantity ',(l_rsv_array(l_counter).primary_reservation_quantity ));
2284: WSH_DEBUG_SV.log(l_module_name,'l_rsv_array(l_counter).detailed_quantity ',l_rsv_array(l_counter).detailed_quantity );
2285: END IF;
2286: l_nonstaged_rsv_qty := l_nonstaged_rsv_qty + (l_rsv_array(l_counter).primary_reservation_quantity
2279: THEN
2280:
2281: IF l_debug_on THEN
2282: WSH_DEBUG_SV.log(l_module_name,'BEFORE l_nonstaged_rsv_qty',l_nonstaged_rsv_qty);
2283: WSH_DEBUG_SV.log(l_module_name,'(l_rsv_array(l_counter).primary_reservation_quantity ',(l_rsv_array(l_counter).primary_reservation_quantity ));
2284: WSH_DEBUG_SV.log(l_module_name,'l_rsv_array(l_counter).detailed_quantity ',l_rsv_array(l_counter).detailed_quantity );
2285: END IF;
2286: l_nonstaged_rsv_qty := l_nonstaged_rsv_qty + (l_rsv_array(l_counter).primary_reservation_quantity
2287: - nvl(l_rsv_array(l_counter).detailed_quantity,0));
2280:
2281: IF l_debug_on THEN
2282: WSH_DEBUG_SV.log(l_module_name,'BEFORE l_nonstaged_rsv_qty',l_nonstaged_rsv_qty);
2283: WSH_DEBUG_SV.log(l_module_name,'(l_rsv_array(l_counter).primary_reservation_quantity ',(l_rsv_array(l_counter).primary_reservation_quantity ));
2284: WSH_DEBUG_SV.log(l_module_name,'l_rsv_array(l_counter).detailed_quantity ',l_rsv_array(l_counter).detailed_quantity );
2285: END IF;
2286: l_nonstaged_rsv_qty := l_nonstaged_rsv_qty + (l_rsv_array(l_counter).primary_reservation_quantity
2287: - nvl(l_rsv_array(l_counter).detailed_quantity,0));
2288: IF l_debug_on THEN
2285: END IF;
2286: l_nonstaged_rsv_qty := l_nonstaged_rsv_qty + (l_rsv_array(l_counter).primary_reservation_quantity
2287: - nvl(l_rsv_array(l_counter).detailed_quantity,0));
2288: IF l_debug_on THEN
2289: WSH_DEBUG_SV.log(l_module_name,'AFTER l_nonstaged_rsv_qty',l_nonstaged_rsv_qty);
2290: -- HW OPMCONV Added Qty2 using new reservation flds
2291: END IF;
2292: IF l_debug_on THEN
2293: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_rsv_qty2',l_nonstaged_rsv_qty2);
2289: WSH_DEBUG_SV.log(l_module_name,'AFTER l_nonstaged_rsv_qty',l_nonstaged_rsv_qty);
2290: -- HW OPMCONV Added Qty2 using new reservation flds
2291: END IF;
2292: IF l_debug_on THEN
2293: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_rsv_qty2',l_nonstaged_rsv_qty2);
2294: WSH_DEBUG_SV.log(l_module_name,'(l_rsv_array(l_counter).secondary_reservation_quantity ',(l_rsv_array(l_counter).secondary_reservation_quantity ));
2295: WSH_DEBUG_SV.log(l_module_name,'l_rsv_array(l_counter).secondary_detailed_quantity ',l_rsv_array(l_counter).secondary_detailed_quantity );
2296: END IF;
2297: l_nonstaged_rsv_qty2 := l_nonstaged_rsv_qty2 + (l_rsv_array(l_counter).secondary_reservation_quantity
2290: -- HW OPMCONV Added Qty2 using new reservation flds
2291: END IF;
2292: IF l_debug_on THEN
2293: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_rsv_qty2',l_nonstaged_rsv_qty2);
2294: WSH_DEBUG_SV.log(l_module_name,'(l_rsv_array(l_counter).secondary_reservation_quantity ',(l_rsv_array(l_counter).secondary_reservation_quantity ));
2295: WSH_DEBUG_SV.log(l_module_name,'l_rsv_array(l_counter).secondary_detailed_quantity ',l_rsv_array(l_counter).secondary_detailed_quantity );
2296: END IF;
2297: l_nonstaged_rsv_qty2 := l_nonstaged_rsv_qty2 + (l_rsv_array(l_counter).secondary_reservation_quantity
2298: - nvl(l_rsv_array(l_counter).secondary_detailed_quantity,0));
2291: END IF;
2292: IF l_debug_on THEN
2293: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_rsv_qty2',l_nonstaged_rsv_qty2);
2294: WSH_DEBUG_SV.log(l_module_name,'(l_rsv_array(l_counter).secondary_reservation_quantity ',(l_rsv_array(l_counter).secondary_reservation_quantity ));
2295: WSH_DEBUG_SV.log(l_module_name,'l_rsv_array(l_counter).secondary_detailed_quantity ',l_rsv_array(l_counter).secondary_detailed_quantity );
2296: END IF;
2297: l_nonstaged_rsv_qty2 := l_nonstaged_rsv_qty2 + (l_rsv_array(l_counter).secondary_reservation_quantity
2298: - nvl(l_rsv_array(l_counter).secondary_detailed_quantity,0));
2299:
2298: - nvl(l_rsv_array(l_counter).secondary_detailed_quantity,0));
2299:
2300:
2301: IF l_debug_on THEN
2302: WSH_DEBUG_SV.log(l_module_name,'AFTER l_nonstaged_rsv_qty2',l_nonstaged_rsv_qty2);
2303: -- HW OPMCONV Added Qty2 using new reservation flds
2304: END IF;
2305: END IF;
2306: --End Bug3012297
2318: --MUOM Bug 16662301
2319: l_fulfillment_base := WSH_UTIL_CORE.Get_Line_Fulfillment_Base(p_source_code, p_source_line_id);
2320:
2321: IF l_debug_on THEN
2322: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_rsv_qty',l_nonstaged_rsv_qty);
2323: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_qty',l_nonstaged_qty);
2324: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_rsv_qty2',l_nonstaged_rsv_qty2);
2325: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_qty2',l_nonstaged_qty2);
2326: --MUOM Bug 16662301
2319: l_fulfillment_base := WSH_UTIL_CORE.Get_Line_Fulfillment_Base(p_source_code, p_source_line_id);
2320:
2321: IF l_debug_on THEN
2322: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_rsv_qty',l_nonstaged_rsv_qty);
2323: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_qty',l_nonstaged_qty);
2324: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_rsv_qty2',l_nonstaged_rsv_qty2);
2325: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_qty2',l_nonstaged_qty2);
2326: --MUOM Bug 16662301
2327: WSH_DEBUG_SV.log(l_module_name,'l_fulfillment_base',l_fulfillment_base);
2320:
2321: IF l_debug_on THEN
2322: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_rsv_qty',l_nonstaged_rsv_qty);
2323: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_qty',l_nonstaged_qty);
2324: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_rsv_qty2',l_nonstaged_rsv_qty2);
2325: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_qty2',l_nonstaged_qty2);
2326: --MUOM Bug 16662301
2327: WSH_DEBUG_SV.log(l_module_name,'l_fulfillment_base',l_fulfillment_base);
2328: END IF;
2321: IF l_debug_on THEN
2322: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_rsv_qty',l_nonstaged_rsv_qty);
2323: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_qty',l_nonstaged_qty);
2324: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_rsv_qty2',l_nonstaged_rsv_qty2);
2325: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_qty2',l_nonstaged_qty2);
2326: --MUOM Bug 16662301
2327: WSH_DEBUG_SV.log(l_module_name,'l_fulfillment_base',l_fulfillment_base);
2328: END IF;
2329:
2323: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_qty',l_nonstaged_qty);
2324: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_rsv_qty2',l_nonstaged_rsv_qty2);
2325: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_qty2',l_nonstaged_qty2);
2326: --MUOM Bug 16662301
2327: WSH_DEBUG_SV.log(l_module_name,'l_fulfillment_base',l_fulfillment_base);
2328: END IF;
2329:
2330: -- l_nonstaged_qty would have got reduced by p_cancellation_quantity by this time
2331: -- MUOM Bug 16662301: Modified condition
2344: l_cancellation_quantity2 := 0;
2345: END IF;
2346:
2347: IF l_debug_on THEN
2348: WSH_DEBUG_SV.logmsg(l_module_name,'Going to Cancel l_cancellation_quantity: ' || l_cancellation_quantity
2349: || ', l_cancellation_quantity2:' || l_cancellation_quantity2 );
2350: END IF;
2351: -- 2595657
2352:
2364: --
2365: -- Debug Statements
2366: --
2367: IF l_debug_on THEN
2368: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_STAGED_RESERVATION_UTIL.QUERY_STAGED_FLAG',WSH_DEBUG_SV.C_PROC_LEVEL);
2369: END IF;
2370: --
2371: INV_STAGED_RESERVATION_UTIL.query_staged_flag
2372: ( x_return_status => x_return_status,
2374: x_msg_data => l_msg_data,
2375: x_staged_flag => l_staged_flag,
2376: p_reservation_id => l_rsv_array(l_counter).reservation_id);
2377: IF l_debug_on THEN
2378: WSH_DEBUG_SV.log(l_module_name,'query_staged_flag x_return_status',x_return_status);
2379: END IF;
2380: -- HW OPMCONV. No need to fork the code
2381: --
2382: -- Debug Statements
2381: --
2382: -- Debug Statements
2383: --
2384: IF l_debug_on THEN
2385: WSH_DEBUG_SV.logmsg(l_module_name, 'AFTER INV_STAGED_RESERVATION_UTIL.QUERY_STAGED_FLAG : '||L_STAGED_FLAG );
2386: END IF;
2387: --
2388:
2389: -- HW OPMCONV -Update Qty2 using new reservation flds.
2431: l_rsv_new.secondary_reservation_quantity := NULL;
2432: END IF;
2433:
2434: IF l_debug_on THEN
2435: WSH_DEBUG_SV.logmsg(l_module_name, 'DEBUGGING' );
2436: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_reservation_quantity '||l_rsv_new.secondary_reservation_quantity );
2437: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_UOM_CODE '||l_rsv_new.secondary_uom_code );
2438: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_ID '||l_rsv_new.secondary_uom_id );
2439: END IF;
2432: END IF;
2433:
2434: IF l_debug_on THEN
2435: WSH_DEBUG_SV.logmsg(l_module_name, 'DEBUGGING' );
2436: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_reservation_quantity '||l_rsv_new.secondary_reservation_quantity );
2437: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_UOM_CODE '||l_rsv_new.secondary_uom_code );
2438: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_ID '||l_rsv_new.secondary_uom_id );
2439: END IF;
2440:
2433:
2434: IF l_debug_on THEN
2435: WSH_DEBUG_SV.logmsg(l_module_name, 'DEBUGGING' );
2436: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_reservation_quantity '||l_rsv_new.secondary_reservation_quantity );
2437: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_UOM_CODE '||l_rsv_new.secondary_uom_code );
2438: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_ID '||l_rsv_new.secondary_uom_id );
2439: END IF;
2440:
2441: update_reservation (
2434: IF l_debug_on THEN
2435: WSH_DEBUG_SV.logmsg(l_module_name, 'DEBUGGING' );
2436: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_reservation_quantity '||l_rsv_new.secondary_reservation_quantity );
2437: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_UOM_CODE '||l_rsv_new.secondary_uom_code );
2438: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_ID '||l_rsv_new.secondary_uom_id );
2439: END IF;
2440:
2441: update_reservation (
2442: p_query_input => l_rsv_array(l_counter),
2443: p_new_resv_rec => l_rsv_new,
2444: x_return_status => x_return_status);
2445:
2446: IF l_debug_on THEN
2447: WSH_DEBUG_SV.log(l_module_name,'update_reservation x_return_status',x_return_status);
2448: END IF;
2449: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2450: raise cancel_failed;
2451: END IF;
2454: --
2455: -- Debug Statements
2456: --
2457: IF l_debug_on THEN
2458: WSH_DEBUG_SV.logmsg(l_module_name, 'GOING TO DELETE_RESERVATION IN CANCEL_NON__STAGED_RESERVATION ' );
2459: END IF;
2460: --
2461: delete_reservation (
2462: p_query_input => l_rsv_array(l_counter),
2461: delete_reservation (
2462: p_query_input => l_rsv_array(l_counter),
2463: x_return_status => x_return_status );
2464: IF l_debug_on THEN
2465: WSH_DEBUG_SV.log(l_module_name,'delete_reservation x_return_status',x_return_status);
2466: END IF;
2467:
2468: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2469: raise cancel_failed;
2504:
2505: IF l_cancellation_quantity2 = 0 THEN
2506: -- conversion failed
2507: IF l_debug_on THEN
2508: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR on UOM conversion to secondary UOM : '||l_rsv_array(l_counter).secondary_uom_code );
2509: END IF;
2510: raise cancel_failed;
2511: END IF;
2512: END IF;
2510: raise cancel_failed;
2511: END IF;
2512: END IF;
2513: IF l_debug_on THEN
2514: WSH_DEBUG_SV.log(l_module_name,'Going to Cancel l_cancellation_quantity',l_cancellation_quantity);
2515: WSH_DEBUG_SV.log(l_module_name,'Going to Cancel l_cancellation_quantity2',l_cancellation_quantity2);
2516: WSH_DEBUG_SV.log(l_module_name,'Lot involved for conversions is ',l_rsv_array(l_counter).lot_number);
2517: END IF;
2518: -- KYH BUG 4259636 END
2511: END IF;
2512: END IF;
2513: IF l_debug_on THEN
2514: WSH_DEBUG_SV.log(l_module_name,'Going to Cancel l_cancellation_quantity',l_cancellation_quantity);
2515: WSH_DEBUG_SV.log(l_module_name,'Going to Cancel l_cancellation_quantity2',l_cancellation_quantity2);
2516: WSH_DEBUG_SV.log(l_module_name,'Lot involved for conversions is ',l_rsv_array(l_counter).lot_number);
2517: END IF;
2518: -- KYH BUG 4259636 END
2519: -- HW OPMCONV Update Qty2 using new reservations flds.
2512: END IF;
2513: IF l_debug_on THEN
2514: WSH_DEBUG_SV.log(l_module_name,'Going to Cancel l_cancellation_quantity',l_cancellation_quantity);
2515: WSH_DEBUG_SV.log(l_module_name,'Going to Cancel l_cancellation_quantity2',l_cancellation_quantity2);
2516: WSH_DEBUG_SV.log(l_module_name,'Lot involved for conversions is ',l_rsv_array(l_counter).lot_number);
2517: END IF;
2518: -- KYH BUG 4259636 END
2519: -- HW OPMCONV Update Qty2 using new reservations flds.
2520: -- l_rsv_new.attribute2 :=
2534: p_query_input => l_rsv_array(l_counter),
2535: p_new_resv_rec => l_rsv_new,
2536: x_return_status => x_return_status);
2537: IF l_debug_on THEN
2538: WSH_DEBUG_SV.log(l_module_name,'update_reservation x_return_status',x_return_status);
2539: END IF;
2540:
2541: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2542: raise cancel_failed;
2556: exit;
2557: END IF;
2558: --
2559: IF l_debug_on THEN
2560: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_STAGED_RESERVATION_UTIL.QUERY_STAGED_FLAG',WSH_DEBUG_SV.C_PROC_LEVEL);
2561: END IF;
2562: --
2563: INV_STAGED_RESERVATION_UTIL.query_staged_flag (
2564: x_return_status => x_return_status,
2567: x_staged_flag => l_staged_flag,
2568: p_reservation_id => l_rsv_array(l_counter).reservation_id );
2569: --
2570: IF l_debug_on THEN
2571: WSH_DEBUG_SV.log(l_module_name,'query_staged_flag x_return_status',x_return_status);
2572: WSH_DEBUG_SV.logmsg(l_module_name, 'AFTER INV_STAGED_RESERVATION_UTIL.QUERY_STAGED_FLAG : '||L_STAGED_FLAG );
2573: END IF;
2574: --
2575: l_rsv_match := 'N';
2568: p_reservation_id => l_rsv_array(l_counter).reservation_id );
2569: --
2570: IF l_debug_on THEN
2571: WSH_DEBUG_SV.log(l_module_name,'query_staged_flag x_return_status',x_return_status);
2572: WSH_DEBUG_SV.logmsg(l_module_name, 'AFTER INV_STAGED_RESERVATION_UTIL.QUERY_STAGED_FLAG : '||L_STAGED_FLAG );
2573: END IF;
2574: --
2575: l_rsv_match := 'N';
2576: IF l_staged_flag <> 'Y' THEN
2587: l_rsv_new.secondary_reservation_quantity := l_rsv_array(l_counter).secondary_detailed_quantity;
2588: l_rsv_new.primary_reservation_quantity := l_rsv_array(l_counter).detailed_quantity;
2589: --
2590: IF l_debug_on THEN
2591: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_reservation_quantity '||l_rsv_new.secondary_reservation_quantity );
2592: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_uom_code '||l_rsv_new.secondary_uom_code );
2593: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_ID '||l_rsv_new.secondary_uom_id );
2594: END IF;
2595: --
2588: l_rsv_new.primary_reservation_quantity := l_rsv_array(l_counter).detailed_quantity;
2589: --
2590: IF l_debug_on THEN
2591: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_reservation_quantity '||l_rsv_new.secondary_reservation_quantity );
2592: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_uom_code '||l_rsv_new.secondary_uom_code );
2593: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_ID '||l_rsv_new.secondary_uom_id );
2594: END IF;
2595: --
2596: Update_Reservation (
2589: --
2590: IF l_debug_on THEN
2591: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_reservation_quantity '||l_rsv_new.secondary_reservation_quantity );
2592: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_uom_code '||l_rsv_new.secondary_uom_code );
2593: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_new.secondary_ID '||l_rsv_new.secondary_uom_id );
2594: END IF;
2595: --
2596: Update_Reservation (
2597: p_query_input => l_rsv_array(l_counter),
2598: p_new_resv_rec => l_rsv_new,
2599: x_return_status => x_return_status );
2600: --
2601: IF l_debug_on THEN
2602: WSH_DEBUG_SV.log(l_module_name,'update_reservation x_return_status',x_return_status);
2603: END IF;
2604: --
2605: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2606: raise cancel_failed;
2607: END IF;
2608: ELSE
2609: --
2610: IF l_debug_on THEN
2611: WSH_DEBUG_SV.logmsg(l_module_name, 'GOING TO DELETE_RESERVATION IN CANCEL_NON__STAGED_RESERVATION ' );
2612: END IF;
2613: --
2614: Delete_Reservation (
2615: p_query_input => l_rsv_array(l_counter),
2615: p_query_input => l_rsv_array(l_counter),
2616: x_return_status => x_return_status );
2617: --
2618: IF l_debug_on THEN
2619: WSH_DEBUG_SV.log(l_module_name,'delete_reservation x_return_status',x_return_status);
2620: END IF;
2621: --
2622: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2623: raise cancel_failed;
2649:
2650: IF l_cancellation_quantity = 0 THEN
2651: -- conversion failed
2652: IF l_debug_on THEN
2653: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR on UOM conversion to Primary UOM : ' || l_rsv_array(l_counter).primary_uom_code );
2654: END IF;
2655: raise cancel_failed;
2656: END IF;
2657: --
2655: raise cancel_failed;
2656: END IF;
2657: --
2658: IF l_debug_on THEN
2659: WSH_DEBUG_SV.logmsg(l_module_name,'Going to Cancel l_cancellation_quantity: ' || l_cancellation_quantity
2660: || ', l_cancellation_quantity2:' || l_cancellation_quantity2 );
2661: WSH_DEBUG_SV.log(l_module_name,'Lot involved for conversions is ',l_rsv_array(l_counter).lot_number);
2662: END IF;
2663:
2657: --
2658: IF l_debug_on THEN
2659: WSH_DEBUG_SV.logmsg(l_module_name,'Going to Cancel l_cancellation_quantity: ' || l_cancellation_quantity
2660: || ', l_cancellation_quantity2:' || l_cancellation_quantity2 );
2661: WSH_DEBUG_SV.log(l_module_name,'Lot involved for conversions is ',l_rsv_array(l_counter).lot_number);
2662: END IF;
2663:
2664: l_rsv_new.primary_reservation_quantity :=
2665: nvl(abs(l_rsv_array(l_counter).primary_reservation_quantity),0) - nvl(l_cancellation_quantity,0);
2669: p_new_resv_rec => l_rsv_new,
2670: x_return_status => x_return_status );
2671: --
2672: IF l_debug_on THEN
2673: WSH_DEBUG_SV.log(l_module_name,'update_reservation x_return_status',x_return_status);
2674: END IF;
2675: --
2676: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2677: raise cancel_failed;
2686: --
2687: -- Debug Statements
2688: --
2689: IF l_debug_on THEN
2690: WSH_DEBUG_SV.pop(l_module_name);
2691: END IF;
2692: --
2693: EXCEPTION
2694: WHEN cancel_failed THEN
2696: --
2697: -- Debug Statements
2698: --
2699: IF l_debug_on THEN
2700: WSH_DEBUG_SV.logmsg(l_module_name,'CANCEL_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2701: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CANCEL_FAILED');
2702: END IF;
2703: --
2704: WHEN others THEN
2697: -- Debug Statements
2698: --
2699: IF l_debug_on THEN
2700: WSH_DEBUG_SV.logmsg(l_module_name,'CANCEL_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2701: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CANCEL_FAILED');
2702: END IF;
2703: --
2704: WHEN others THEN
2705: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2708: --
2709: -- Debug Statements
2710: --
2711: IF l_debug_on THEN
2712: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2713: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2714: END IF;
2715: --
2716: END cancel_nonstaged_reservation;
2709: -- Debug Statements
2710: --
2711: IF l_debug_on THEN
2712: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2713: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2714: END IF;
2715: --
2716: END cancel_nonstaged_reservation;
2717: -- bug # 9410461: Added to new out parameter x_new_rsv_id to return reservation id of the new reservation
2768: --
2769: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2770: --
2771: IF l_debug_on IS NULL THEN
2772: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2773: END IF;
2774: --
2775: IF l_debug_on THEN
2776: WSH_DEBUG_SV.push(l_module_name);
2772: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2773: END IF;
2774: --
2775: IF l_debug_on THEN
2776: WSH_DEBUG_SV.push(l_module_name);
2777: WSH_DEBUG_SV.log(l_module_name,'P_STAGED',P_STAGED);
2778: WSH_DEBUG_SV.log(l_module_name,'P_RELEASED_STATUS',P_RELEASED_STATUS);
2779: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY',P_SPLIT_QUANTITY);
2780: -- HW OPMCONV - Print Qty2
2773: END IF;
2774: --
2775: IF l_debug_on THEN
2776: WSH_DEBUG_SV.push(l_module_name);
2777: WSH_DEBUG_SV.log(l_module_name,'P_STAGED',P_STAGED);
2778: WSH_DEBUG_SV.log(l_module_name,'P_RELEASED_STATUS',P_RELEASED_STATUS);
2779: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY',P_SPLIT_QUANTITY);
2780: -- HW OPMCONV - Print Qty2
2781: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY2',P_SPLIT_QUANTITY2);
2774: --
2775: IF l_debug_on THEN
2776: WSH_DEBUG_SV.push(l_module_name);
2777: WSH_DEBUG_SV.log(l_module_name,'P_STAGED',P_STAGED);
2778: WSH_DEBUG_SV.log(l_module_name,'P_RELEASED_STATUS',P_RELEASED_STATUS);
2779: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY',P_SPLIT_QUANTITY);
2780: -- HW OPMCONV - Print Qty2
2781: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY2',P_SPLIT_QUANTITY2);
2782: WSH_DEBUG_SV.log(l_module_name,'p_rsv.organization_id',
2775: IF l_debug_on THEN
2776: WSH_DEBUG_SV.push(l_module_name);
2777: WSH_DEBUG_SV.log(l_module_name,'P_STAGED',P_STAGED);
2778: WSH_DEBUG_SV.log(l_module_name,'P_RELEASED_STATUS',P_RELEASED_STATUS);
2779: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY',P_SPLIT_QUANTITY);
2780: -- HW OPMCONV - Print Qty2
2781: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY2',P_SPLIT_QUANTITY2);
2782: WSH_DEBUG_SV.log(l_module_name,'p_rsv.organization_id',
2783: p_rsv.organization_id);
2777: WSH_DEBUG_SV.log(l_module_name,'P_STAGED',P_STAGED);
2778: WSH_DEBUG_SV.log(l_module_name,'P_RELEASED_STATUS',P_RELEASED_STATUS);
2779: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY',P_SPLIT_QUANTITY);
2780: -- HW OPMCONV - Print Qty2
2781: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY2',P_SPLIT_QUANTITY2);
2782: WSH_DEBUG_SV.log(l_module_name,'p_rsv.organization_id',
2783: p_rsv.organization_id);
2784: WSH_DEBUG_SV.log(l_module_name,'p_rsv.inventory_item_id',
2785: p_rsv.inventory_item_id);
2778: WSH_DEBUG_SV.log(l_module_name,'P_RELEASED_STATUS',P_RELEASED_STATUS);
2779: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY',P_SPLIT_QUANTITY);
2780: -- HW OPMCONV - Print Qty2
2781: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY2',P_SPLIT_QUANTITY2);
2782: WSH_DEBUG_SV.log(l_module_name,'p_rsv.organization_id',
2783: p_rsv.organization_id);
2784: WSH_DEBUG_SV.log(l_module_name,'p_rsv.inventory_item_id',
2785: p_rsv.inventory_item_id);
2786: WSH_DEBUG_SV.log(l_module_name,'p_rsv_new.organization_id',
2780: -- HW OPMCONV - Print Qty2
2781: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY2',P_SPLIT_QUANTITY2);
2782: WSH_DEBUG_SV.log(l_module_name,'p_rsv.organization_id',
2783: p_rsv.organization_id);
2784: WSH_DEBUG_SV.log(l_module_name,'p_rsv.inventory_item_id',
2785: p_rsv.inventory_item_id);
2786: WSH_DEBUG_SV.log(l_module_name,'p_rsv_new.organization_id',
2787: p_rsv_new.organization_id);
2788: WSH_DEBUG_SV.log(l_module_name,'p_rsv_new.inventory_item_id',
2782: WSH_DEBUG_SV.log(l_module_name,'p_rsv.organization_id',
2783: p_rsv.organization_id);
2784: WSH_DEBUG_SV.log(l_module_name,'p_rsv.inventory_item_id',
2785: p_rsv.inventory_item_id);
2786: WSH_DEBUG_SV.log(l_module_name,'p_rsv_new.organization_id',
2787: p_rsv_new.organization_id);
2788: WSH_DEBUG_SV.log(l_module_name,'p_rsv_new.inventory_item_id',
2789: p_rsv_new.inventory_item_id);
2790: -- muom
2784: WSH_DEBUG_SV.log(l_module_name,'p_rsv.inventory_item_id',
2785: p_rsv.inventory_item_id);
2786: WSH_DEBUG_SV.log(l_module_name,'p_rsv_new.organization_id',
2787: p_rsv_new.organization_id);
2788: WSH_DEBUG_SV.log(l_module_name,'p_rsv_new.inventory_item_id',
2789: p_rsv_new.inventory_item_id);
2790: -- muom
2791: WSH_DEBUG_SV.log(l_module_name,'p_fulfillment_base',
2792: p_fulfillment_base);
2787: p_rsv_new.organization_id);
2788: WSH_DEBUG_SV.log(l_module_name,'p_rsv_new.inventory_item_id',
2789: p_rsv_new.inventory_item_id);
2790: -- muom
2791: WSH_DEBUG_SV.log(l_module_name,'p_fulfillment_base',
2792: p_fulfillment_base);
2793: WSH_DEBUG_SV.log(l_module_name,'p_rsv.primary_reservation_quantity',
2794: p_rsv.primary_reservation_quantity);
2795: WSH_DEBUG_SV.log(l_module_name,'p_rsv.secondary_reservation_quantity',
2789: p_rsv_new.inventory_item_id);
2790: -- muom
2791: WSH_DEBUG_SV.log(l_module_name,'p_fulfillment_base',
2792: p_fulfillment_base);
2793: WSH_DEBUG_SV.log(l_module_name,'p_rsv.primary_reservation_quantity',
2794: p_rsv.primary_reservation_quantity);
2795: WSH_DEBUG_SV.log(l_module_name,'p_rsv.secondary_reservation_quantity',
2796: p_rsv.secondary_reservation_quantity);
2797: END IF;
2791: WSH_DEBUG_SV.log(l_module_name,'p_fulfillment_base',
2792: p_fulfillment_base);
2793: WSH_DEBUG_SV.log(l_module_name,'p_rsv.primary_reservation_quantity',
2794: p_rsv.primary_reservation_quantity);
2795: WSH_DEBUG_SV.log(l_module_name,'p_rsv.secondary_reservation_quantity',
2796: p_rsv.secondary_reservation_quantity);
2797: END IF;
2798:
2799:
2812: (p_rsv.primary_reservation_quantity
2813: - l_detailed_quantity));
2814:
2815: IF l_debug_on THEN
2816: WSH_DEBUG_SV.log(l_module_name, 'l_quantity_to_split', l_quantity_to_split);
2817: END IF;
2818:
2819: -- Bug 16722851
2820: IF p_fulfillment_base = 'P' and NVL(l_quantity_to_split,0) = 0 THEN
2819: -- Bug 16722851
2820: IF p_fulfillment_base = 'P' and NVL(l_quantity_to_split,0) = 0 THEN
2821: x_return_status := l_status;
2822: IF l_debug_on THEN
2823: WSH_DEBUG_SV.pop(l_module_name);
2824: END IF;
2825: RETURN;
2826: END IF;
2827:
2831: (p_rsv.secondary_reservation_quantity
2832: - nvl(l_detailed_quantity2,0)));
2833:
2834: IF l_debug_on THEN
2835: WSH_DEBUG_SV.log(l_module_name, 'l_quantity2_to_split', l_quantity2_to_split);
2836: END IF;
2837:
2838: IF NVL(l_quantity2_to_split,0) = 0 THEN
2839: x_return_status := l_status;
2837:
2838: IF NVL(l_quantity2_to_split,0) = 0 THEN
2839: x_return_status := l_status;
2840: IF l_debug_on THEN
2841: WSH_DEBUG_SV.pop(l_module_name);
2842: END IF;
2843: RETURN;
2844: END IF;
2845: END IF;
2857: IF p_rsv.secondary_uom_code <> FND_API.G_MISS_CHAR THEN
2858: IF p_source_code = 'OE' THEN --Added for bug 16833534
2859:
2860: IF l_debug_on THEN
2861: WSH_DEBUG_SV.log(l_module_name,'DUAL tracked item so convert for lot ',p_rsv.lot_number);
2862: END IF;
2863: l_quantity2_to_split := WSH_WV_UTILS.convert_uom(
2864: item_id => p_rsv.inventory_item_id
2865: , lot_number => p_rsv.lot_number
2872:
2873: IF l_quantity2_to_split = 0 THEN
2874: -- conversion failed
2875: IF l_debug_on THEN
2876: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR on UOM conversion to secondary UOM : '||p_rsv_new.secondary_uom_code );
2877: END IF;
2878: raise transfer_split_failed;
2879: END IF;
2880:
2878: raise transfer_split_failed;
2879: END IF;
2880:
2881: IF l_debug_on THEN
2882: WSH_DEBUG_SV.log(l_module_name, 'l_quantity2_to_split', l_quantity2_to_split);
2883: END IF;
2884:
2885: -- bug 2925398: make sure secondary quantity will not touch the detailed
2886: -- portion unless the detail is released to warehouse.
2888: - l_detailed_quantity2);
2889: IF l_quantity2_to_split > l_max_qty2_to_split THEN
2890: l_quantity2_to_split := l_max_qty2_to_split;
2891: IF l_debug_on THEN
2892: WSH_DEBUG_SV.log(l_module_name, 'adjusted l_quantity2_to_split', l_quantity2_to_split);
2893: END IF;
2894: END IF;
2895:
2896: ELSE
2902: ELSE
2903: l_quantity2_to_split := p_rsv.secondary_reservation_quantity;
2904: END IF;
2905: IF l_debug_on THEN
2906: WSH_DEBUG_SV.log(l_module_name, 'adjusted l_quantity2_to_split', l_quantity2_to_split);
2907: END IF;
2908: END IF;
2909: END IF;-- End of p_source_code
2910: END IF;
2911: ELSE
2912: IF p_source_code = 'OE' THEN
2913: IF p_rsv.lot_number is not null THEN
2914: IF l_debug_on THEN
2915: WSH_DEBUG_SV.log(l_module_name,'DUAL tracked item so convert for lot ',p_rsv.lot_number);
2916: END IF;
2917: l_quantity_to_split := WSH_WV_UTILS.convert_uom(
2918: item_id => p_rsv.inventory_item_id
2919: , lot_number => p_rsv.lot_number
2926:
2927: IF l_quantity_to_split = 0 THEN
2928: -- conversion failed
2929: IF l_debug_on THEN
2930: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR on UOM conversion to primary UOM : '||p_rsv_new.primary_uom_code );
2931: END IF;
2932: raise transfer_split_failed;
2933: END IF;
2934:
2932: raise transfer_split_failed;
2933: END IF;
2934:
2935: IF l_debug_on THEN
2936: WSH_DEBUG_SV.log(l_module_name, 'l_quantity_to_split', l_quantity_to_split);
2937: END IF;
2938:
2939: l_max_qty_to_split := (p_rsv.primary_reservation_quantity
2940: - l_detailed_quantity);
2940: - l_detailed_quantity);
2941: IF l_quantity_to_split > l_max_qty_to_split THEN
2942: l_quantity_to_split := l_max_qty_to_split;
2943: IF l_debug_on THEN
2944: WSH_DEBUG_SV.log(l_module_name, 'adjusted l_quantity_to_split', l_quantity_to_split);
2945: END IF;
2946: END IF;
2947: END IF;
2948: ELSE
2953: ELSE
2954: l_quantity_to_split := p_rsv.primary_reservation_quantity;
2955: END IF;
2956: IF l_debug_on THEN
2957: WSH_DEBUG_SV.log(l_module_name, 'adjusted l_quantity_to_split', l_quantity_to_split);
2958: END IF;
2959: END IF;
2960: END IF;
2961: END IF;
2961: END IF;
2962: -- KYH INVCONV END
2963:
2964: IF l_debug_on THEN
2965: WSH_DEBUG_SV.logmsg(l_module_name, 'IN WSH_USA_INV_PVT.RESERVATION_SPLIT_ACTION TO SPLIT : '|| L_QUANTITY_TO_SPLIT );
2966: END IF;
2967: --
2968: -- 2847687 : No More performing Update_Reservations per INV advice,
2969: -- So always calling Transfer Rsvtns.
2971: -- p_rsv.primary_reservation_quantity because of least() above
2972: --
2973: -- transfer reservation with l_quantity_to_split
2974: IF l_debug_on THEN
2975: WSH_DEBUG_SV.logmsg(l_module_name, 'QUANTITY TO SPLIT : '|| L_QUANTITY_TO_SPLIT );
2976: WSH_DEBUG_SV.logmsg(l_module_name, 'QUANTITY2 TO SPLIT : '|| L_QUANTITY2_TO_SPLIT );
2977: END IF;
2978:
2979: l_rsv_new := p_rsv_new;
2972: --
2973: -- transfer reservation with l_quantity_to_split
2974: IF l_debug_on THEN
2975: WSH_DEBUG_SV.logmsg(l_module_name, 'QUANTITY TO SPLIT : '|| L_QUANTITY_TO_SPLIT );
2976: WSH_DEBUG_SV.logmsg(l_module_name, 'QUANTITY2 TO SPLIT : '|| L_QUANTITY2_TO_SPLIT );
2977: END IF;
2978:
2979: l_rsv_new := p_rsv_new;
2980: l_rsv_new.primary_reservation_quantity := l_quantity_to_split;
2998: END IF;
2999: END IF;
3000:
3001: IF l_debug_on THEN
3002: WSH_DEBUG_SV.log(l_module_name, 'l_rsv_new.detailed_quantity',
3003: l_rsv_new.detailed_quantity);
3004: WSH_DEBUG_SV.log(l_module_name, 'l_rsv_new.secondary_detailed_quantity',
3005: l_rsv_new.secondary_detailed_quantity);
3006: END IF;
3000:
3001: IF l_debug_on THEN
3002: WSH_DEBUG_SV.log(l_module_name, 'l_rsv_new.detailed_quantity',
3003: l_rsv_new.detailed_quantity);
3004: WSH_DEBUG_SV.log(l_module_name, 'l_rsv_new.secondary_detailed_quantity',
3005: l_rsv_new.secondary_detailed_quantity);
3006: END IF;
3007:
3008: --
3011: --
3012: IF l_rsv_new.primary_reservation_quantity IS NOT NULL THEN --{
3013: --
3014: IF l_debug_on THEN
3015: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_RESERVATION_PUB.TRANSFER_RESERVATION',WSH_DEBUG_SV.C_PROC_LEVEL);
3016: WSH_DEBUG_SV.log(l_module_name,'l_rsv_new.primary_reservation_quantity',
3017: l_rsv_new.primary_reservation_quantity);
3018: WSH_DEBUG_SV.log(l_module_name,'l_rsv_new.secondary_reservation_quantity',
3019: l_rsv_new.secondary_reservation_quantity);
3012: IF l_rsv_new.primary_reservation_quantity IS NOT NULL THEN --{
3013: --
3014: IF l_debug_on THEN
3015: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_RESERVATION_PUB.TRANSFER_RESERVATION',WSH_DEBUG_SV.C_PROC_LEVEL);
3016: WSH_DEBUG_SV.log(l_module_name,'l_rsv_new.primary_reservation_quantity',
3017: l_rsv_new.primary_reservation_quantity);
3018: WSH_DEBUG_SV.log(l_module_name,'l_rsv_new.secondary_reservation_quantity',
3019: l_rsv_new.secondary_reservation_quantity);
3020: END IF;
3014: IF l_debug_on THEN
3015: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_RESERVATION_PUB.TRANSFER_RESERVATION',WSH_DEBUG_SV.C_PROC_LEVEL);
3016: WSH_DEBUG_SV.log(l_module_name,'l_rsv_new.primary_reservation_quantity',
3017: l_rsv_new.primary_reservation_quantity);
3018: WSH_DEBUG_SV.log(l_module_name,'l_rsv_new.secondary_reservation_quantity',
3019: l_rsv_new.secondary_reservation_quantity);
3020: END IF;
3021: --
3022: --Added for bug 10105817
3042: p_over_reservation_flag =>3,
3043: x_to_reservation_id => l_new_rsv_id
3044: );
3045: IF l_debug_on THEN
3046: WSH_DEBUG_SV.log(l_module_name,'transfer_reservation l_status',l_status);
3047: END IF;
3048:
3049: IF l_status = fnd_api.g_ret_sts_success THEN
3050: IF l_debug_on THEN
3048:
3049: IF l_status = fnd_api.g_ret_sts_success THEN
3050: IF l_debug_on THEN
3051: -- HW OPMCONV - Print Qty2
3052: WSH_DEBUG_SV.logmsg(l_module_name, 'Rsvn. Transferred FOR Rsvn.ID :'
3053: ||P_RSV.RESERVATION_ID || ' : TO Rsvn.ID : '||L_NEW_RSV_ID||
3054: ' BY Qty: '||L_QUANTITY_TO_SPLIT ||
3055: ' BY Qty2: '||L_QUANTITY2_TO_SPLIT );
3056: END IF;
3056: END IF;
3057: x_new_rsv_id := l_new_rsv_id; -- bug # 9410461: Return the reservation id created.
3058: ELSE
3059: IF l_debug_on THEN
3060: WSH_DEBUG_SV.logmsg(l_module_name, 'COULD NOT TRANSFER FOR RESERVATION ID : '||P_RSV.RESERVATION_ID );
3061: END IF;
3062: FND_MESSAGE.Set_Name('WSH', 'WSH_TRANSFER_RESERVATION');
3063: IF l_msg_count = 1 THEN
3064: IF l_debug_on THEN
3061: END IF;
3062: FND_MESSAGE.Set_Name('WSH', 'WSH_TRANSFER_RESERVATION');
3063: IF l_msg_count = 1 THEN
3064: IF l_debug_on THEN
3065: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: '|| L_MSG_DATA );
3066: END IF;
3067: --
3068: FND_MESSAGE.Set_Token('ERROR_TEXT',l_msg_data);
3069: ELSE
3069: ELSE
3070: FOR l_index IN 1..l_msg_count LOOP
3071: l_msg_data := fnd_msg_pub.get;
3072: IF l_debug_on THEN
3073: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: '|| L_MSG_DATA );
3074: END IF;
3075: --
3076: l_error_text := l_error_text || l_msg_data;
3077: END LOOP;
3082: END IF;
3083:
3084: IF p_staged = 'Y' THEN
3085: IF l_debug_on THEN
3086: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_STAGED_RESERVATION_UTIL.UPDATE_STAGED_FLAG',WSH_DEBUG_SV.C_PROC_LEVEL);
3087: END IF;
3088: --
3089: INV_STAGED_RESERVATION_UTIL.update_staged_flag
3090: ( x_return_status => l_status,
3093: p_reservation_id => l_new_rsv_id,
3094: p_staged_flag => p_staged
3095: );
3096: IF l_debug_on THEN
3097: WSH_DEBUG_SV.log(l_module_name,'update_staged_flag l_status',l_status);
3098: END IF;
3099:
3100: IF l_status = fnd_api.g_ret_sts_success THEN
3101: IF l_debug_on THEN
3098: END IF;
3099:
3100: IF l_status = fnd_api.g_ret_sts_success THEN
3101: IF l_debug_on THEN
3102: WSH_DEBUG_SV.logmsg(l_module_name, 'STAGED FLAG UPDATED FOR RESERVATION ID : '||L_NEW_RSV_ID );
3103: END IF;
3104: ELSE
3105: IF l_debug_on THEN
3106: WSH_DEBUG_SV.logmsg(l_module_name, 'COULD NOT UPDATE STAGED FLAG FOR RESERVATION ID : '||L_NEW_RSV_ID );
3102: WSH_DEBUG_SV.logmsg(l_module_name, 'STAGED FLAG UPDATED FOR RESERVATION ID : '||L_NEW_RSV_ID );
3103: END IF;
3104: ELSE
3105: IF l_debug_on THEN
3106: WSH_DEBUG_SV.logmsg(l_module_name, 'COULD NOT UPDATE STAGED FLAG FOR RESERVATION ID : '||L_NEW_RSV_ID );
3107: END IF;
3108: IF l_msg_count = 1 THEN
3109: IF l_debug_on THEN
3110: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: '|| L_MSG_DATA );
3106: WSH_DEBUG_SV.logmsg(l_module_name, 'COULD NOT UPDATE STAGED FLAG FOR RESERVATION ID : '||L_NEW_RSV_ID );
3107: END IF;
3108: IF l_msg_count = 1 THEN
3109: IF l_debug_on THEN
3110: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: '|| L_MSG_DATA );
3111: END IF;
3112: ELSE
3113: FOR l_index IN 1..l_msg_count LOOP
3114: l_msg_data := fnd_msg_pub.get;
3112: ELSE
3113: FOR l_index IN 1..l_msg_count LOOP
3114: l_msg_data := fnd_msg_pub.get;
3115: IF l_debug_on THEN
3116: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: '|| L_MSG_DATA );
3117: END IF;
3118: END LOOP;
3119: END IF;
3120: raise transfer_split_failed;
3136: END IF; --} /* l_quantity_to_split IS NOT NULL */
3137:
3138:
3139: IF l_debug_on THEN
3140: WSH_DEBUG_SV.pop(l_module_name);
3141: END IF;
3142:
3143: --
3144: EXCEPTION
3145: WHEN transfer_split_failed THEN
3146: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3147: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
3148: IF l_debug_on THEN
3149: WSH_DEBUG_SV.logmsg(l_module_name,'TRANSFER_SPLIT_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3150: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRANSFER_SPLIT_FAILED');
3151: END IF;
3152: --
3153: WHEN others THEN
3146: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3147: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
3148: IF l_debug_on THEN
3149: WSH_DEBUG_SV.logmsg(l_module_name,'TRANSFER_SPLIT_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3150: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRANSFER_SPLIT_FAILED');
3151: END IF;
3152: --
3153: WHEN others THEN
3154: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3153: WHEN others THEN
3154: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3155: wsh_util_core.default_handler('WSH_USA_INV_PVT.reservation_split_action',l_module_name);
3156: IF l_debug_on THEN
3157: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3158: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3159: END IF;
3160: --
3161: END reservation_split_action;
3154: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3155: wsh_util_core.default_handler('WSH_USA_INV_PVT.reservation_split_action',l_module_name);
3156: IF l_debug_on THEN
3157: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3158: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3159: END IF;
3160: --
3161: END reservation_split_action;
3162:
3229: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3230: --
3231: IF l_debug_on IS NULL
3232: THEN
3233: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3234: END IF;
3235: --
3236: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS; -- bug # 9410461: Initializing return status.
3237: --
3235: --
3236: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS; -- bug # 9410461: Initializing return status.
3237: --
3238: IF l_debug_on THEN
3239: WSH_DEBUG_SV.push(l_module_name);
3240: --
3241: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
3242: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
3243: WSH_DEBUG_SV.log(l_module_name,'P_ORIGINAL_SOURCE_LINE_ID',P_ORIGINAL_SOURCE_LINE_ID);
3237: --
3238: IF l_debug_on THEN
3239: WSH_DEBUG_SV.push(l_module_name);
3240: --
3241: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
3242: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
3243: WSH_DEBUG_SV.log(l_module_name,'P_ORIGINAL_SOURCE_LINE_ID',P_ORIGINAL_SOURCE_LINE_ID);
3244: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SOURCE_LINE_ID',P_SPLIT_SOURCE_LINE_ID);
3245: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY',P_SPLIT_QUANTITY);
3238: IF l_debug_on THEN
3239: WSH_DEBUG_SV.push(l_module_name);
3240: --
3241: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
3242: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
3243: WSH_DEBUG_SV.log(l_module_name,'P_ORIGINAL_SOURCE_LINE_ID',P_ORIGINAL_SOURCE_LINE_ID);
3244: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SOURCE_LINE_ID',P_SPLIT_SOURCE_LINE_ID);
3245: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY',P_SPLIT_QUANTITY);
3246: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY2',P_SPLIT_QUANTITY2);
3239: WSH_DEBUG_SV.push(l_module_name);
3240: --
3241: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
3242: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
3243: WSH_DEBUG_SV.log(l_module_name,'P_ORIGINAL_SOURCE_LINE_ID',P_ORIGINAL_SOURCE_LINE_ID);
3244: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SOURCE_LINE_ID',P_SPLIT_SOURCE_LINE_ID);
3245: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY',P_SPLIT_QUANTITY);
3246: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY2',P_SPLIT_QUANTITY2);
3247: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_FLAG', P_SHIPPED_FLAG);
3240: --
3241: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
3242: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
3243: WSH_DEBUG_SV.log(l_module_name,'P_ORIGINAL_SOURCE_LINE_ID',P_ORIGINAL_SOURCE_LINE_ID);
3244: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SOURCE_LINE_ID',P_SPLIT_SOURCE_LINE_ID);
3245: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY',P_SPLIT_QUANTITY);
3246: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY2',P_SPLIT_QUANTITY2);
3247: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_FLAG', P_SHIPPED_FLAG);
3248: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.organization_id',p_delivery_detail_split_rec.organization_id);
3241: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
3242: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
3243: WSH_DEBUG_SV.log(l_module_name,'P_ORIGINAL_SOURCE_LINE_ID',P_ORIGINAL_SOURCE_LINE_ID);
3244: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SOURCE_LINE_ID',P_SPLIT_SOURCE_LINE_ID);
3245: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY',P_SPLIT_QUANTITY);
3246: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY2',P_SPLIT_QUANTITY2);
3247: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_FLAG', P_SHIPPED_FLAG);
3248: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.organization_id',p_delivery_detail_split_rec.organization_id);
3249: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.delivery_detail_id',p_delivery_detail_split_rec.delivery_detail_id);
3242: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
3243: WSH_DEBUG_SV.log(l_module_name,'P_ORIGINAL_SOURCE_LINE_ID',P_ORIGINAL_SOURCE_LINE_ID);
3244: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SOURCE_LINE_ID',P_SPLIT_SOURCE_LINE_ID);
3245: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY',P_SPLIT_QUANTITY);
3246: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY2',P_SPLIT_QUANTITY2);
3247: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_FLAG', P_SHIPPED_FLAG);
3248: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.organization_id',p_delivery_detail_split_rec.organization_id);
3249: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.delivery_detail_id',p_delivery_detail_split_rec.delivery_detail_id);
3250: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.inventory_item_id',p_delivery_detail_split_rec.inventory_item_id);
3243: WSH_DEBUG_SV.log(l_module_name,'P_ORIGINAL_SOURCE_LINE_ID',P_ORIGINAL_SOURCE_LINE_ID);
3244: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SOURCE_LINE_ID',P_SPLIT_SOURCE_LINE_ID);
3245: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY',P_SPLIT_QUANTITY);
3246: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY2',P_SPLIT_QUANTITY2);
3247: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_FLAG', P_SHIPPED_FLAG);
3248: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.organization_id',p_delivery_detail_split_rec.organization_id);
3249: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.delivery_detail_id',p_delivery_detail_split_rec.delivery_detail_id);
3250: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.inventory_item_id',p_delivery_detail_split_rec.inventory_item_id);
3251: END IF;
3244: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SOURCE_LINE_ID',P_SPLIT_SOURCE_LINE_ID);
3245: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY',P_SPLIT_QUANTITY);
3246: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY2',P_SPLIT_QUANTITY2);
3247: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_FLAG', P_SHIPPED_FLAG);
3248: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.organization_id',p_delivery_detail_split_rec.organization_id);
3249: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.delivery_detail_id',p_delivery_detail_split_rec.delivery_detail_id);
3250: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.inventory_item_id',p_delivery_detail_split_rec.inventory_item_id);
3251: END IF;
3252:
3245: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY',P_SPLIT_QUANTITY);
3246: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY2',P_SPLIT_QUANTITY2);
3247: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_FLAG', P_SHIPPED_FLAG);
3248: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.organization_id',p_delivery_detail_split_rec.organization_id);
3249: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.delivery_detail_id',p_delivery_detail_split_rec.delivery_detail_id);
3250: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.inventory_item_id',p_delivery_detail_split_rec.inventory_item_id);
3251: END IF;
3252:
3253: -- muom
3246: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_QUANTITY2',P_SPLIT_QUANTITY2);
3247: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_FLAG', P_SHIPPED_FLAG);
3248: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.organization_id',p_delivery_detail_split_rec.organization_id);
3249: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.delivery_detail_id',p_delivery_detail_split_rec.delivery_detail_id);
3250: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_split_rec.inventory_item_id',p_delivery_detail_split_rec.inventory_item_id);
3251: END IF;
3252:
3253: -- muom
3254: l_fulfillment_base := WSH_UTIL_CORE.Get_Line_Fulfillment_Base(p_source_code, p_original_source_line_id);
3267:
3268: -- Above call populates l_delivery_detail_id and is used at multiple places in this API
3269: IF x_return_status IN (FND_API.G_RET_STS_UNEXP_ERROR,FND_API.G_RET_STS_ERROR) THEN
3270: IF l_debug_on THEN
3271: WSH_DEBUG_SV.log(l_module_name,'Exception has occured after WSHUSAIB.get_putaway_detail_id');
3272: WSH_DEBUG_SV.pop(l_module_name);
3273: END IF;
3274: RETURN;
3275: END IF;
3268: -- Above call populates l_delivery_detail_id and is used at multiple places in this API
3269: IF x_return_status IN (FND_API.G_RET_STS_UNEXP_ERROR,FND_API.G_RET_STS_ERROR) THEN
3270: IF l_debug_on THEN
3271: WSH_DEBUG_SV.log(l_module_name,'Exception has occured after WSHUSAIB.get_putaway_detail_id');
3272: WSH_DEBUG_SV.pop(l_module_name);
3273: END IF;
3274: RETURN;
3275: END IF;
3276: --End of X-dock,split
3278: --
3279: -- Debug Statements
3280: --
3281: IF l_debug_on THEN
3282: WSH_DEBUG_SV.logmsg(l_module_name, 'IN WSH_USA_INV_PVT.SPLIT_RESERVATION TO SPLIT : '|| P_SPLIT_QUANTITY );
3283: END IF;
3284: --
3285: --{
3286: IF p_delivery_detail_split_rec.released_status = 'S' THEN
3288: --this should clear out the detailed quantity for the appropriate reservation records
3289: -- Bug 2437799: Cancel the move order line or transfer it to new order line
3290: -- depending on parameter p_move_order_line_status
3291: IF l_debug_on THEN
3292: WSH_DEBUG_SV.logmsg(l_module_name, 'p_move_order_line_status is '||p_move_order_line_status);
3293: END IF;
3294: IF (p_move_order_line_status = 'CANCEL') THEN
3295: --
3296: -- HW OPMCONV. Removed forking the code
3295: --
3296: -- HW OPMCONV. Removed forking the code
3297:
3298: IF l_debug_on THEN
3299: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_MO_CANCEL_PVT.CANCEL_MOVE_ORDER_LINE',WSH_DEBUG_SV.C_PROC_LEVEL);
3300: WSH_DEBUG_SV.logmsg(l_module_name, 'CALLING INV_MO_CANCEL_PVT.CANCEL_MOVE_ORDER_LINE FOR DD : '|| P_DELIVERY_DETAIL_SPLIT_REC.DELIVERY_DETAIL_ID);
3301: WSH_DEBUG_SV.logmsg(l_module_name, 'CALLING INV_MO_CANCEL_PVT.CANCEL_MOVE_ORDER_LINE FOR MOL : '|| P_DELIVERY_DETAIL_SPLIT_REC.MOVE_ORDER_LINE_ID);
3302: END IF;
3303: --
3296: -- HW OPMCONV. Removed forking the code
3297:
3298: IF l_debug_on THEN
3299: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_MO_CANCEL_PVT.CANCEL_MOVE_ORDER_LINE',WSH_DEBUG_SV.C_PROC_LEVEL);
3300: WSH_DEBUG_SV.logmsg(l_module_name, 'CALLING INV_MO_CANCEL_PVT.CANCEL_MOVE_ORDER_LINE FOR DD : '|| P_DELIVERY_DETAIL_SPLIT_REC.DELIVERY_DETAIL_ID);
3301: WSH_DEBUG_SV.logmsg(l_module_name, 'CALLING INV_MO_CANCEL_PVT.CANCEL_MOVE_ORDER_LINE FOR MOL : '|| P_DELIVERY_DETAIL_SPLIT_REC.MOVE_ORDER_LINE_ID);
3302: END IF;
3303: --
3304: -- X-dock changes, added p_delivery_detail_id
3297:
3298: IF l_debug_on THEN
3299: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_MO_CANCEL_PVT.CANCEL_MOVE_ORDER_LINE',WSH_DEBUG_SV.C_PROC_LEVEL);
3300: WSH_DEBUG_SV.logmsg(l_module_name, 'CALLING INV_MO_CANCEL_PVT.CANCEL_MOVE_ORDER_LINE FOR DD : '|| P_DELIVERY_DETAIL_SPLIT_REC.DELIVERY_DETAIL_ID);
3301: WSH_DEBUG_SV.logmsg(l_module_name, 'CALLING INV_MO_CANCEL_PVT.CANCEL_MOVE_ORDER_LINE FOR MOL : '|| P_DELIVERY_DETAIL_SPLIT_REC.MOVE_ORDER_LINE_ID);
3302: END IF;
3303: --
3304: -- X-dock changes, added p_delivery_detail_id
3305: INV_MO_CANCEL_PVT.Cancel_Move_Order_Line
3310: x_return_status => x_return_status,
3311: x_msg_count => l_msg_count,
3312: x_msg_data => l_msg_data);
3313: IF l_debug_on THEN
3314: WSH_DEBUG_SV.log(l_module_name,'Cancel_Move_Order_Line x_return_status',x_return_status);
3315: END IF;
3316:
3317: -- bug 5226867
3318: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3317: -- bug 5226867
3318: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3319: --
3320: IF l_debug_on THEN
3321: WSH_DEBUG_SV.log(l_module_name,'Cancel_Move_Order_Line returned unexpected error');
3322: END IF;
3323:
3324: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3325: --
3325: --
3326: ELSIF (x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
3327: --
3328: IF l_debug_on THEN
3329: WSH_DEBUG_SV.log(l_module_name,'Cancel_Move_Order_Line returned error');
3330: END IF;
3331:
3332: RAISE split_failed;
3333: --
3341: --{
3342: -- released_status is already checked above, should be 'S'
3343: IF p_delivery_detail_split_rec.move_order_line_id IS NOT NULL THEN
3344: IF l_debug_on THEN
3345: WSH_DEBUG_SV.log(l_module_name,'Updating released_status for detail');
3346: END IF;
3347: UPDATE wsh_delivery_details
3348: SET released_status = 'R',
3349: move_order_line_id = NULL
3360: x_return_status => l_wf_rs);
3361:
3362: --Error Handling to be done in WSH_WF_STD.Raise_Event itself
3363: IF l_debug_on THEN
3364: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
3365: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
3366: END IF;
3367: --Done Raise Event: Pick To Pod Workflow
3368:
3361:
3362: --Error Handling to be done in WSH_WF_STD.Raise_Event itself
3363: IF l_debug_on THEN
3364: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
3365: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
3366: END IF;
3367: --Done Raise Event: Pick To Pod Workflow
3368:
3369: --
3371: -- Update of wsh_delivery_details where released_status
3372: -- are changed, call DBI API after the update.
3373: -- This API will also check for DBI Installed or not
3374: IF l_debug_on THEN
3375: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Detail id-',p_delivery_detail_split_rec.delivery_detail_id);
3376: END IF;
3377: l_detail_tab(1) := p_delivery_detail_split_rec.delivery_detail_id;
3378: WSH_INTEGRATION.DBI_Update_Detail_Log
3379: (p_delivery_detail_id_tab => l_detail_tab,
3380: p_dml_type => 'UPDATE',
3381: x_return_status => l_dbi_rs);
3382:
3383: IF l_debug_on THEN
3384: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
3385: END IF;
3386: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
3387: x_return_status := l_dbi_rs;
3388: -- just pass this return status to caller API
3386: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
3387: x_return_status := l_dbi_rs;
3388: -- just pass this return status to caller API
3389: IF l_debug_on THEN
3390: WSH_DEBUG_SV.pop(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
3391: WSH_DEBUG_SV.pop(l_module_name);
3392: END IF;
3393: return;
3394: END IF;
3387: x_return_status := l_dbi_rs;
3388: -- just pass this return status to caller API
3389: IF l_debug_on THEN
3390: WSH_DEBUG_SV.pop(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
3391: WSH_DEBUG_SV.pop(l_module_name);
3392: END IF;
3393: return;
3394: END IF;
3395: -- End of Code for DBI Project
3401: ELSIF (p_move_order_line_status IN ('TRANSFER','PTOTRANSFER') ) THEN -- bug # 9410461: consider new value 'PTOTRANSFER'
3402: -- HW OPMCONV. Removed forking the code
3403:
3404: IF l_debug_on THEN
3405: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_Transfer_Order_PVT.Update_Txn_Source_Line',WSH_DEBUG_SV.C_PROC_LEVEL);
3406: END IF;
3407: INV_Transfer_Order_PVT.Update_Txn_Source_Line
3408: (p_line_id => p_delivery_detail_split_rec.move_order_line_id,
3409: p_new_source_line_id => p_split_source_line_id);
3414: -- bug # 9410461: Get all mmtt records for the given move order line id.
3415: -- This is required as the reservation_id of MMTT needs to updated when
3416: -- original reservation got split and transferred to new line.
3417: IF l_debug_on THEN
3418: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit inv_mo_line_detail_util.query_rows',WSH_DEBUG_SV.C_PROC_LEVEL);
3419: END IF;
3420: l_mmtt_tbl := inv_mo_line_detail_util.query_rows(p_line_id => p_delivery_detail_split_rec.move_order_line_id);
3421: --
3422: IF l_debug_on THEN
3419: END IF;
3420: l_mmtt_tbl := inv_mo_line_detail_util.query_rows(p_line_id => p_delivery_detail_split_rec.move_order_line_id);
3421: --
3422: IF l_debug_on THEN
3423: WSH_DEBUG_SV.log(l_module_name,'l_mmtt_tbl count',l_mmtt_tbl.Count);
3424: END IF;
3425: --}
3426: END IF;
3427: -- bug # 9410461: end
3439: ELSE
3440: l_split_quantity2 := p_split_quantity2;
3441: END IF;
3442: IF l_debug_on THEN
3443: WSH_DEBUG_SV.logmsg(l_module_name, 'VALUE OF L_SPLIT_QUANTITY IN SPLIT_RESERVATION '||L_SPLIT_QUANTITY );
3444: -- HW OPMCONV. Print Qty2
3445: WSH_DEBUG_SV.logmsg(l_module_name, 'VALUE OF L_SPLIT_QUANTITY2 IN SPLIT_RESERVATION '||L_SPLIT_QUANTITY2 );
3446:
3447: END IF;
3441: END IF;
3442: IF l_debug_on THEN
3443: WSH_DEBUG_SV.logmsg(l_module_name, 'VALUE OF L_SPLIT_QUANTITY IN SPLIT_RESERVATION '||L_SPLIT_QUANTITY );
3444: -- HW OPMCONV. Print Qty2
3445: WSH_DEBUG_SV.logmsg(l_module_name, 'VALUE OF L_SPLIT_QUANTITY2 IN SPLIT_RESERVATION '||L_SPLIT_QUANTITY2 );
3446:
3447: END IF;
3448: --
3449: -- HW OPMCONV. Removed forking the code
3460: x_mtl_reservation_tbl => l_rsv_array,
3461: x_mtl_reservation_tbl_count => l_size,
3462: x_return_status => x_return_status);
3463: IF l_debug_on THEN
3464: WSH_DEBUG_SV.log(l_module_name,'query_reservations x_return_status',x_return_status);
3465: END IF;
3466: -- bug # 9410461: When transferring reservations
3467: -- only transfer the reservations which are associated MMTT records of the
3468: -- currrent move order line. If new reservation is created due to the split
3471: IF ( p_delivery_detail_split_rec.released_status = 'S'
3472: AND p_move_order_line_status = 'PTOTRANSFER' AND l_mmtt_tbl.Count > 0 ) THEN
3473: --{
3474: IF l_debug_on THEN
3475: WSH_DEBUG_SV.logmsg(l_module_name, 'Inside the PTO reservations'||l_size);
3476: END IF;
3477: l_sales_order_id := OE_ORDER_SCH_UTIL.Get_mtl_sales_order_id(p_source_header_id);
3478: l_rsv_new.demand_source_line_id := p_split_source_line_id;
3479: l_rsv_new.demand_source_header_id := l_sales_order_id;
3484: --{
3485: IF l_mmtt_tbl(j).reservation_id = l_rsv_array(l_counter).reservation_id THEN
3486: --{ Reservation is matched. needs to transfer to new line.
3487: IF l_debug_on THEN
3488: WSH_DEBUG_SV.log(l_module_name,'move order line id ',p_delivery_detail_split_rec.move_order_line_id);
3489: WSH_DEBUG_SV.log(l_module_name, 'Reservation Id',l_mmtt_tbl(j).reservation_id);
3490: WSH_DEBUG_SV.log(l_module_name,'MMTT qty ',l_mmtt_tbl(j).transaction_quantity);
3491: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit reservation_split_action',WSH_DEBUG_SV.C_PROC_LEVEL);
3492: END IF;
3485: IF l_mmtt_tbl(j).reservation_id = l_rsv_array(l_counter).reservation_id THEN
3486: --{ Reservation is matched. needs to transfer to new line.
3487: IF l_debug_on THEN
3488: WSH_DEBUG_SV.log(l_module_name,'move order line id ',p_delivery_detail_split_rec.move_order_line_id);
3489: WSH_DEBUG_SV.log(l_module_name, 'Reservation Id',l_mmtt_tbl(j).reservation_id);
3490: WSH_DEBUG_SV.log(l_module_name,'MMTT qty ',l_mmtt_tbl(j).transaction_quantity);
3491: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit reservation_split_action',WSH_DEBUG_SV.C_PROC_LEVEL);
3492: END IF;
3493: l_temp_transaction_quantity := l_mmtt_tbl(j).transaction_quantity; -- p_split_quantity is IN/OUT parameter and hence this is req.
3486: --{ Reservation is matched. needs to transfer to new line.
3487: IF l_debug_on THEN
3488: WSH_DEBUG_SV.log(l_module_name,'move order line id ',p_delivery_detail_split_rec.move_order_line_id);
3489: WSH_DEBUG_SV.log(l_module_name, 'Reservation Id',l_mmtt_tbl(j).reservation_id);
3490: WSH_DEBUG_SV.log(l_module_name,'MMTT qty ',l_mmtt_tbl(j).transaction_quantity);
3491: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit reservation_split_action',WSH_DEBUG_SV.C_PROC_LEVEL);
3492: END IF;
3493: l_temp_transaction_quantity := l_mmtt_tbl(j).transaction_quantity; -- p_split_quantity is IN/OUT parameter and hence this is req.
3494: l_temp_transaction_quantity2 := l_mmtt_tbl(j).secondary_transaction_quantity; -- p_split_quantity is IN/OUT parameter and hence this is req.
3487: IF l_debug_on THEN
3488: WSH_DEBUG_SV.log(l_module_name,'move order line id ',p_delivery_detail_split_rec.move_order_line_id);
3489: WSH_DEBUG_SV.log(l_module_name, 'Reservation Id',l_mmtt_tbl(j).reservation_id);
3490: WSH_DEBUG_SV.log(l_module_name,'MMTT qty ',l_mmtt_tbl(j).transaction_quantity);
3491: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit reservation_split_action',WSH_DEBUG_SV.C_PROC_LEVEL);
3492: END IF;
3493: l_temp_transaction_quantity := l_mmtt_tbl(j).transaction_quantity; -- p_split_quantity is IN/OUT parameter and hence this is req.
3494: l_temp_transaction_quantity2 := l_mmtt_tbl(j).secondary_transaction_quantity; -- p_split_quantity is IN/OUT parameter and hence this is req.
3495: reservation_split_action (
3505: -- muom
3506: p_fulfillment_base => l_fulfillment_base,
3507: x_return_status => x_return_status);
3508: IF l_debug_on THEN
3509: WSH_DEBUG_SV.log(l_module_name, 'reservation_split_action',x_return_status);
3510: END IF;
3511: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3512: raise split_failed;
3513: END IF;
3514: IF l_new_rsv_id <> l_rsv_array(l_counter).reservation_id THEN
3515: --{
3516: l_mmtt_tbl(j).reservation_id := l_new_rsv_id;
3517: IF l_debug_on THEN
3518: WSH_DEBUG_SV.log(l_module_name,'new reservation Id ',l_mmtt_tbl(j).reservation_id);
3519: WSH_DEBUG_SV.log(l_module_name,' temp id ',l_mmtt_tbl(j).transaction_temp_id);
3520: WSH_DEBUG_SV.log(l_module_name,' move order line id ',l_mmtt_tbl(j).move_order_line_id);
3521: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit inv_mo_line_detail_util.update_row',WSH_DEBUG_SV.C_PROC_LEVEL);
3522: END IF;
3515: --{
3516: l_mmtt_tbl(j).reservation_id := l_new_rsv_id;
3517: IF l_debug_on THEN
3518: WSH_DEBUG_SV.log(l_module_name,'new reservation Id ',l_mmtt_tbl(j).reservation_id);
3519: WSH_DEBUG_SV.log(l_module_name,' temp id ',l_mmtt_tbl(j).transaction_temp_id);
3520: WSH_DEBUG_SV.log(l_module_name,' move order line id ',l_mmtt_tbl(j).move_order_line_id);
3521: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit inv_mo_line_detail_util.update_row',WSH_DEBUG_SV.C_PROC_LEVEL);
3522: END IF;
3523: inv_mo_line_detail_util.update_row(
3516: l_mmtt_tbl(j).reservation_id := l_new_rsv_id;
3517: IF l_debug_on THEN
3518: WSH_DEBUG_SV.log(l_module_name,'new reservation Id ',l_mmtt_tbl(j).reservation_id);
3519: WSH_DEBUG_SV.log(l_module_name,' temp id ',l_mmtt_tbl(j).transaction_temp_id);
3520: WSH_DEBUG_SV.log(l_module_name,' move order line id ',l_mmtt_tbl(j).move_order_line_id);
3521: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit inv_mo_line_detail_util.update_row',WSH_DEBUG_SV.C_PROC_LEVEL);
3522: END IF;
3523: inv_mo_line_detail_util.update_row(
3524: p_mo_line_detail_rec => l_mmtt_tbl(j),
3517: IF l_debug_on THEN
3518: WSH_DEBUG_SV.log(l_module_name,'new reservation Id ',l_mmtt_tbl(j).reservation_id);
3519: WSH_DEBUG_SV.log(l_module_name,' temp id ',l_mmtt_tbl(j).transaction_temp_id);
3520: WSH_DEBUG_SV.log(l_module_name,' move order line id ',l_mmtt_tbl(j).move_order_line_id);
3521: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit inv_mo_line_detail_util.update_row',WSH_DEBUG_SV.C_PROC_LEVEL);
3522: END IF;
3523: inv_mo_line_detail_util.update_row(
3524: p_mo_line_detail_rec => l_mmtt_tbl(j),
3525: x_return_status => x_return_status);
3523: inv_mo_line_detail_util.update_row(
3524: p_mo_line_detail_rec => l_mmtt_tbl(j),
3525: x_return_status => x_return_status);
3526: IF l_debug_on THEN
3527: WSH_DEBUG_SV.log(l_module_name, 'return_status',x_return_status);
3528: END IF;
3529: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3530: raise split_failed;
3531: END IF;
3541: ELSE -- non PTOTRANSFER case..
3542: -- loop over all the reservation records in l_rsv_array
3543: FOR l_counter in 1..l_size LOOP
3544: IF l_debug_on THEN
3545: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_STAGED_RESERVATION_UTIL.QUERY_STAGED_FLAG',WSH_DEBUG_SV.C_PROC_LEVEL);
3546: END IF;
3547: --
3548: INV_STAGED_RESERVATION_UTIL.query_staged_flag(
3549: x_return_status => x_return_status,
3551: x_msg_data => l_msg_data,
3552: x_staged_flag => l_staged_flag,
3553: p_reservation_id => l_rsv_array(l_counter).reservation_id);
3554: IF l_debug_on THEN
3555: WSH_DEBUG_SV.log(l_module_name,'query_staged_flag x_return_status',x_return_status);
3556: END IF;
3557:
3558: IF l_debug_on THEN
3559: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit OE_ORDER_SCH_UTIL.GET_MTL_SALES_ORDER_ID',WSH_DEBUG_SV.C_PROC_LEVEL);
3555: WSH_DEBUG_SV.log(l_module_name,'query_staged_flag x_return_status',x_return_status);
3556: END IF;
3557:
3558: IF l_debug_on THEN
3559: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit OE_ORDER_SCH_UTIL.GET_MTL_SALES_ORDER_ID',WSH_DEBUG_SV.C_PROC_LEVEL);
3560: END IF;
3561: --
3562: l_sales_order_id := OE_ORDER_SCH_UTIL.Get_mtl_sales_order_id(p_source_header_id);
3563:
3566: --X-dock,split
3567: IF (p_delivery_detail_split_rec.released_status = 'S' AND
3568: p_delivery_detail_split_rec.move_order_line_id IS NULL) THEN
3569: IF l_debug_on THEN
3570: WSH_DEBUG_SV.logmsg(l_module_name,'Delivery Detail-',p_delivery_detail_split_rec.delivery_detail_id);
3571: END IF;
3572: l_rsv_new.demand_source_line_detail := p_delivery_detail_split_rec.delivery_detail_id;
3573: END IF;
3574: --X-dock,split
3573: END IF;
3574: --X-dock,split
3575:
3576: IF l_debug_on THEN
3577: WSH_DEBUG_SV.logmsg(l_module_name, 'L_RSV_NEW.DEMAND_SOURCE_LINE_ID IN SPLIT_RESERV IS '||L_RSV_NEW.DEMAND_SOURCE_LINE_ID );
3578: WSH_DEBUG_SV.logmsg(l_module_name, 'L_RSV_NEW.DEMAND_SOURCE_LINE_DETAIL IN SPLIT_RESERV IS '||L_RSV_NEW.DEMAND_SOURCE_LINE_DETAIL );
3579: WSH_DEBUG_SV.logmsg(l_module_name, 'L_RSV_NEW.DEMAND_SOURCE_HEADER_ID IN SPLIT_RESERV IS '||L_RSV_NEW.DEMAND_SOURCE_HEADER_ID );
3580: WSH_DEBUG_SV.logmsg(l_module_name, 'p_delivery_detail_split_rec.released_status '||p_delivery_detail_split_rec.released_status);
3581: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).detailed_quantity '||nvl(l_rsv_array(l_counter).detailed_quantity,0)||' l_staged_flag '||l_staged_flag);
3574: --X-dock,split
3575:
3576: IF l_debug_on THEN
3577: WSH_DEBUG_SV.logmsg(l_module_name, 'L_RSV_NEW.DEMAND_SOURCE_LINE_ID IN SPLIT_RESERV IS '||L_RSV_NEW.DEMAND_SOURCE_LINE_ID );
3578: WSH_DEBUG_SV.logmsg(l_module_name, 'L_RSV_NEW.DEMAND_SOURCE_LINE_DETAIL IN SPLIT_RESERV IS '||L_RSV_NEW.DEMAND_SOURCE_LINE_DETAIL );
3579: WSH_DEBUG_SV.logmsg(l_module_name, 'L_RSV_NEW.DEMAND_SOURCE_HEADER_ID IN SPLIT_RESERV IS '||L_RSV_NEW.DEMAND_SOURCE_HEADER_ID );
3580: WSH_DEBUG_SV.logmsg(l_module_name, 'p_delivery_detail_split_rec.released_status '||p_delivery_detail_split_rec.released_status);
3581: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).detailed_quantity '||nvl(l_rsv_array(l_counter).detailed_quantity,0)||' l_staged_flag '||l_staged_flag);
3582: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).primary_reservation_quantity '||l_rsv_array(l_counter).primary_reservation_quantity);
3575:
3576: IF l_debug_on THEN
3577: WSH_DEBUG_SV.logmsg(l_module_name, 'L_RSV_NEW.DEMAND_SOURCE_LINE_ID IN SPLIT_RESERV IS '||L_RSV_NEW.DEMAND_SOURCE_LINE_ID );
3578: WSH_DEBUG_SV.logmsg(l_module_name, 'L_RSV_NEW.DEMAND_SOURCE_LINE_DETAIL IN SPLIT_RESERV IS '||L_RSV_NEW.DEMAND_SOURCE_LINE_DETAIL );
3579: WSH_DEBUG_SV.logmsg(l_module_name, 'L_RSV_NEW.DEMAND_SOURCE_HEADER_ID IN SPLIT_RESERV IS '||L_RSV_NEW.DEMAND_SOURCE_HEADER_ID );
3580: WSH_DEBUG_SV.logmsg(l_module_name, 'p_delivery_detail_split_rec.released_status '||p_delivery_detail_split_rec.released_status);
3581: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).detailed_quantity '||nvl(l_rsv_array(l_counter).detailed_quantity,0)||' l_staged_flag '||l_staged_flag);
3582: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).primary_reservation_quantity '||l_rsv_array(l_counter).primary_reservation_quantity);
3583: -- HW OPMCONV - Print Qty2
3576: IF l_debug_on THEN
3577: WSH_DEBUG_SV.logmsg(l_module_name, 'L_RSV_NEW.DEMAND_SOURCE_LINE_ID IN SPLIT_RESERV IS '||L_RSV_NEW.DEMAND_SOURCE_LINE_ID );
3578: WSH_DEBUG_SV.logmsg(l_module_name, 'L_RSV_NEW.DEMAND_SOURCE_LINE_DETAIL IN SPLIT_RESERV IS '||L_RSV_NEW.DEMAND_SOURCE_LINE_DETAIL );
3579: WSH_DEBUG_SV.logmsg(l_module_name, 'L_RSV_NEW.DEMAND_SOURCE_HEADER_ID IN SPLIT_RESERV IS '||L_RSV_NEW.DEMAND_SOURCE_HEADER_ID );
3580: WSH_DEBUG_SV.logmsg(l_module_name, 'p_delivery_detail_split_rec.released_status '||p_delivery_detail_split_rec.released_status);
3581: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).detailed_quantity '||nvl(l_rsv_array(l_counter).detailed_quantity,0)||' l_staged_flag '||l_staged_flag);
3582: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).primary_reservation_quantity '||l_rsv_array(l_counter).primary_reservation_quantity);
3583: -- HW OPMCONV - Print Qty2
3584: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).secondary_detailed_quantity '||nvl(l_rsv_array(l_counter).secondary_detailed_quantity,0)||' l_staged_flag '||l_staged_flag);
3577: WSH_DEBUG_SV.logmsg(l_module_name, 'L_RSV_NEW.DEMAND_SOURCE_LINE_ID IN SPLIT_RESERV IS '||L_RSV_NEW.DEMAND_SOURCE_LINE_ID );
3578: WSH_DEBUG_SV.logmsg(l_module_name, 'L_RSV_NEW.DEMAND_SOURCE_LINE_DETAIL IN SPLIT_RESERV IS '||L_RSV_NEW.DEMAND_SOURCE_LINE_DETAIL );
3579: WSH_DEBUG_SV.logmsg(l_module_name, 'L_RSV_NEW.DEMAND_SOURCE_HEADER_ID IN SPLIT_RESERV IS '||L_RSV_NEW.DEMAND_SOURCE_HEADER_ID );
3580: WSH_DEBUG_SV.logmsg(l_module_name, 'p_delivery_detail_split_rec.released_status '||p_delivery_detail_split_rec.released_status);
3581: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).detailed_quantity '||nvl(l_rsv_array(l_counter).detailed_quantity,0)||' l_staged_flag '||l_staged_flag);
3582: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).primary_reservation_quantity '||l_rsv_array(l_counter).primary_reservation_quantity);
3583: -- HW OPMCONV - Print Qty2
3584: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).secondary_detailed_quantity '||nvl(l_rsv_array(l_counter).secondary_detailed_quantity,0)||' l_staged_flag '||l_staged_flag);
3585: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).secondary_reservation_quantity '||l_rsv_array(l_counter).secondary_reservation_quantity);
3578: WSH_DEBUG_SV.logmsg(l_module_name, 'L_RSV_NEW.DEMAND_SOURCE_LINE_DETAIL IN SPLIT_RESERV IS '||L_RSV_NEW.DEMAND_SOURCE_LINE_DETAIL );
3579: WSH_DEBUG_SV.logmsg(l_module_name, 'L_RSV_NEW.DEMAND_SOURCE_HEADER_ID IN SPLIT_RESERV IS '||L_RSV_NEW.DEMAND_SOURCE_HEADER_ID );
3580: WSH_DEBUG_SV.logmsg(l_module_name, 'p_delivery_detail_split_rec.released_status '||p_delivery_detail_split_rec.released_status);
3581: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).detailed_quantity '||nvl(l_rsv_array(l_counter).detailed_quantity,0)||' l_staged_flag '||l_staged_flag);
3582: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).primary_reservation_quantity '||l_rsv_array(l_counter).primary_reservation_quantity);
3583: -- HW OPMCONV - Print Qty2
3584: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).secondary_detailed_quantity '||nvl(l_rsv_array(l_counter).secondary_detailed_quantity,0)||' l_staged_flag '||l_staged_flag);
3585: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).secondary_reservation_quantity '||l_rsv_array(l_counter).secondary_reservation_quantity);
3586: END IF;
3580: WSH_DEBUG_SV.logmsg(l_module_name, 'p_delivery_detail_split_rec.released_status '||p_delivery_detail_split_rec.released_status);
3581: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).detailed_quantity '||nvl(l_rsv_array(l_counter).detailed_quantity,0)||' l_staged_flag '||l_staged_flag);
3582: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).primary_reservation_quantity '||l_rsv_array(l_counter).primary_reservation_quantity);
3583: -- HW OPMCONV - Print Qty2
3584: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).secondary_detailed_quantity '||nvl(l_rsv_array(l_counter).secondary_detailed_quantity,0)||' l_staged_flag '||l_staged_flag);
3585: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).secondary_reservation_quantity '||l_rsv_array(l_counter).secondary_reservation_quantity);
3586: END IF;
3587:
3588: IF ((l_rsv_array(l_counter).primary_reservation_quantity > 0) AND
3581: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).detailed_quantity '||nvl(l_rsv_array(l_counter).detailed_quantity,0)||' l_staged_flag '||l_staged_flag);
3582: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).primary_reservation_quantity '||l_rsv_array(l_counter).primary_reservation_quantity);
3583: -- HW OPMCONV - Print Qty2
3584: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).secondary_detailed_quantity '||nvl(l_rsv_array(l_counter).secondary_detailed_quantity,0)||' l_staged_flag '||l_staged_flag);
3585: WSH_DEBUG_SV.logmsg(l_module_name, 'l_rsv_array(l_counter).secondary_reservation_quantity '||l_rsv_array(l_counter).secondary_reservation_quantity);
3586: END IF;
3587:
3588: IF ((l_rsv_array(l_counter).primary_reservation_quantity > 0) AND
3589: (l_rsv_array(l_counter).primary_reservation_quantity >= nvl(l_rsv_array(l_counter).detailed_quantity,0))) THEN
3605: -- Do we have to look at inventory information here ?
3606: -- No as talked to John (08/21)
3607: THEN
3608: IF l_debug_on THEN
3609: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit reservation_split_action',WSH_DEBUG_SV.C_PROC_LEVEL);
3610: END IF;
3611: -- HW OPMCONV. Added l_split_quantity2
3612:
3613: -- 2925398: keep track of released status.
3632: -- muom
3633: p_fulfillment_base => l_fulfillment_base,
3634: x_return_status => x_return_status);
3635: IF l_debug_on THEN
3636: WSH_DEBUG_SV.log(l_module_name, 'reservation_split_action',x_return_status);
3637: END IF;
3638: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3639: raise split_failed;
3640: END IF;
3644: --
3645: -- Debug Statements
3646: --
3647: IF l_debug_on THEN
3648: WSH_DEBUG_SV.logmsg(l_module_name, 'NOTHING TO SPLIT WE WILL EXIT IN SPLIT_RESERVATION' );
3649: END IF;
3650: --
3651: EXIT;
3652: END IF;
3658: --
3659: -- Debug Statements
3660: --
3661: IF l_debug_on THEN
3662: WSH_DEBUG_SV.pop(l_module_name);
3663: END IF;
3664: --
3665: EXCEPTION
3666: WHEN split_failed THEN
3668: --
3669: -- Debug Statements
3670: --
3671: IF l_debug_on THEN
3672: WSH_DEBUG_SV.logmsg(l_module_name,'SPLIT_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3673: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:SPLIT_FAILED');
3674: END IF;
3675: --
3676: -- bug 5226867
3669: -- Debug Statements
3670: --
3671: IF l_debug_on THEN
3672: WSH_DEBUG_SV.logmsg(l_module_name,'SPLIT_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3673: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:SPLIT_FAILED');
3674: END IF;
3675: --
3676: -- bug 5226867
3677: -- Added the new excpetion for unexpected error
3680: --
3681: -- Debug Statements
3682: --
3683: IF l_debug_on THEN
3684: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3685: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3686: END IF;
3687: --
3688: -- bug 5226867
3681: -- Debug Statements
3682: --
3683: IF l_debug_on THEN
3684: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3685: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3686: END IF;
3687: --
3688: -- bug 5226867
3689: WHEN others THEN
3693: --
3694: -- Debug Statements
3695: --
3696: IF l_debug_on THEN
3697: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3698: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3699: END IF;
3700: --
3701: END split_reservation;
3694: -- Debug Statements
3695: --
3696: IF l_debug_on THEN
3697: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3698: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3699: END IF;
3700: --
3701: END split_reservation;
3702:
3731: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3732: --
3733: IF l_debug_on IS NULL
3734: THEN
3735: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3736: END IF;
3737: --
3738: IF l_debug_on THEN
3739: WSH_DEBUG_SV.push(l_module_name);
3735: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3736: END IF;
3737: --
3738: IF l_debug_on THEN
3739: WSH_DEBUG_SV.push(l_module_name);
3740: --
3741: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
3742: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
3743: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TEMP_ID',P_TRANSACTION_TEMP_ID);
3737: --
3738: IF l_debug_on THEN
3739: WSH_DEBUG_SV.push(l_module_name);
3740: --
3741: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
3742: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
3743: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TEMP_ID',P_TRANSACTION_TEMP_ID);
3744: END IF;
3745: --
3738: IF l_debug_on THEN
3739: WSH_DEBUG_SV.push(l_module_name);
3740: --
3741: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
3742: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
3743: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TEMP_ID',P_TRANSACTION_TEMP_ID);
3744: END IF;
3745: --
3746: --
3739: WSH_DEBUG_SV.push(l_module_name);
3740: --
3741: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
3742: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
3743: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TEMP_ID',P_TRANSACTION_TEMP_ID);
3744: END IF;
3745: --
3746: --
3747: -- Debug Statements
3746: --
3747: -- Debug Statements
3748: --
3749: IF l_debug_on THEN
3750: WSH_DEBUG_SV.logmsg(l_module_name, 'IN WSH_USA_INV_PVT.UPDATE_SERIAL_NUMBERS' );
3751: END IF;
3752: --
3753: IF (p_serial_number IS NULL) AND (p_transaction_temp_id IS NULL) THEN
3754: x_return_status := FND_API.G_RET_STS_SUCCESS;
3755: --
3756: -- Debug Statements
3757: --
3758: IF l_debug_on THEN
3759: WSH_DEBUG_SV.pop(l_module_name);
3760: END IF;
3761: --
3762: RETURN;
3763: ELSE
3769: --
3770: -- Debug Statements
3771: --
3772: IF l_debug_on THEN
3773: WSH_DEBUG_SV.pop(l_module_name);
3774: END IF;
3775: --
3776: RETURN;
3777: END IF;
3783: p_serial_number => p_serial_number,
3784: p_transaction_temp_id => p_transaction_temp_id,
3785: x_return_status => x_return_status);
3786: IF l_debug_on THEN
3787: WSH_DEBUG_SV.log(l_module_name,'Unmark_Serial_Number x_return_status',x_return_status);
3788: END IF;
3789: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3790: x_return_status := FND_API.G_RET_STS_ERROR;
3791: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
3792: --
3793: -- Debug Statements
3794: --
3795: IF l_debug_on THEN
3796: WSH_DEBUG_SV.pop(l_module_name);
3797: END IF;
3798: --
3799: RETURN;
3800: END IF;
3810: --
3811: -- Debug Statements
3812: --
3813: IF l_debug_on THEN
3814: WSH_DEBUG_SV.pop(l_module_name);
3815: END IF;
3816: --
3817: EXCEPTION
3818:
3823: --
3824: -- Debug Statements
3825: --
3826: IF l_debug_on THEN
3827: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3828: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3829: END IF;
3830: --
3831: END update_serial_numbers;
3824: -- Debug Statements
3825: --
3826: IF l_debug_on THEN
3827: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3828: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3829: END IF;
3830: --
3831: END update_serial_numbers;
3832:
4105: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4106: --
4107: IF l_debug_on IS NULL
4108: THEN
4109: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4110: END IF;
4111: --
4112: IF l_debug_on THEN
4113: WSH_DEBUG_SV.push(l_module_name);
4109: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4110: END IF;
4111: --
4112: IF l_debug_on THEN
4113: WSH_DEBUG_SV.push(l_module_name);
4114: END IF;
4115: --
4116: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4117: l_multiple_update := 'N';
4125: --
4126: -- Debug Statements
4127: --
4128: IF l_debug_on THEN
4129: WSH_DEBUG_SV.logmsg(l_module_name, 'IN UPDATE_INVENTORY_INFO PROCEDURE ...' );
4130: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_INTEGRATION.Get_Inv_PC_Attributes' );
4131: END IF;
4132: --
4133: -- bug 2805603 : added call to get_inv_pc_attributes and set_inv_pc_attributes to get transaction_id and transaction_temp_id
4126: -- Debug Statements
4127: --
4128: IF l_debug_on THEN
4129: WSH_DEBUG_SV.logmsg(l_module_name, 'IN UPDATE_INVENTORY_INFO PROCEDURE ...' );
4130: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_INTEGRATION.Get_Inv_PC_Attributes' );
4131: END IF;
4132: --
4133: -- bug 2805603 : added call to get_inv_pc_attributes and set_inv_pc_attributes to get transaction_id and transaction_temp_id
4134: WSH_INTEGRATION.Get_Inv_PC_Attributes
4136: x_return_status => l_return_status,
4137: x_msg_count => l_msg_count,
4138: x_msg_data => l_msg_data) ;
4139: IF l_debug_on THEN
4140: WSH_DEBUG_SV.log(l_module_name,'After call to Get_Inv_PC_Attributes ',l_return_status);
4141: END IF;
4142: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4143: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4144: IF l_debug_on THEN
4141: END IF;
4142: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4143: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4144: IF l_debug_on THEN
4145: WSH_DEBUG_SV.logmsg(l_module_name, 'Errored out in Get_Inv_PC_Attributes ' );
4146: END IF;
4147: ELSE
4148: l_transaction_id := l_InvPCOutRecType.transaction_id;
4149: l_transaction_temp_id := l_InvPCOutRecType.transaction_temp_id;
4147: ELSE
4148: l_transaction_id := l_InvPCOutRecType.transaction_id;
4149: l_transaction_temp_id := l_InvPCOutRecType.transaction_temp_id;
4150: IF l_debug_on THEN
4151: WSH_DEBUG_SV.logmsg(l_module_name, 'l_transaction_id IS ' || L_TRANSACTION_ID );
4152: WSH_DEBUG_SV.logmsg(l_module_name, 'l_transaction_temp_id IS ' || L_TRANSACTION_TEMP_ID );
4153: END IF;
4154: END IF;
4155:
4148: l_transaction_id := l_InvPCOutRecType.transaction_id;
4149: l_transaction_temp_id := l_InvPCOutRecType.transaction_temp_id;
4150: IF l_debug_on THEN
4151: WSH_DEBUG_SV.logmsg(l_module_name, 'l_transaction_id IS ' || L_TRANSACTION_ID );
4152: WSH_DEBUG_SV.logmsg(l_module_name, 'l_transaction_temp_id IS ' || L_TRANSACTION_TEMP_ID );
4153: END IF;
4154: END IF;
4155:
4156: -- Assumption : Inventory will be setting the Transaction and Transaction_Temp_Id
4169: l_InvPCInRecType.source_code := 'INV';
4170: l_InvPCInRecType.api_version_number := 1.0;
4171: --
4172: IF l_debug_on THEN
4173: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_INTEGRATION.Set_Inv_PC_Attributes' );
4174: END IF;
4175: --
4176: WSH_INTEGRATION.Set_Inv_PC_Attributes
4177: ( p_in_attributes => l_InvPCInRecType,
4179: x_msg_count => l_msg_count,
4180: x_msg_data => l_msg_data );
4181:
4182: IF l_debug_on THEN
4183: WSH_DEBUG_SV.log(l_module_name,'After call to Set_Inv_PC_Attributes ',l_return_status);
4184: END IF;
4185: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4186: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4187: IF l_debug_on THEN
4184: END IF;
4185: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4186: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4187: IF l_debug_on THEN
4188: WSH_DEBUG_SV.logmsg(l_module_name, 'Errored out in Set_Inv_PC_Attributes ' );
4189: END IF;
4190: END IF;
4191: END IF;
4192: END IF;
4196: --Bug#5104847:transaction_temp_id default value is FND_API.G_MISS_NUM
4197: IF ( l_transaction_temp_id IS NOT NULL AND l_transaction_temp_id <> FND_API.G_MISS_NUM ) AND p_changed_attributes.COUNT > 1 THEN
4198:
4199: IF l_debug_on THEN
4200: WSH_DEBUG_SV.logmsg(l_module_name, 'Number of records passed by inventory ' || p_changed_attributes.COUNT );
4201: WSH_DEBUG_SV.logmsg(l_module_name, 'Reject request as transaction_temp_id is passed for more than 1 record by inventory ');
4202: END IF;
4203: l_ship_status := 'having more than 1 record from inventory to be processed';
4204: FND_MESSAGE.Set_Name('WSH', 'WSH_REJECT_UPDATE_REQUEST');
4197: IF ( l_transaction_temp_id IS NOT NULL AND l_transaction_temp_id <> FND_API.G_MISS_NUM ) AND p_changed_attributes.COUNT > 1 THEN
4198:
4199: IF l_debug_on THEN
4200: WSH_DEBUG_SV.logmsg(l_module_name, 'Number of records passed by inventory ' || p_changed_attributes.COUNT );
4201: WSH_DEBUG_SV.logmsg(l_module_name, 'Reject request as transaction_temp_id is passed for more than 1 record by inventory ');
4202: END IF;
4203: l_ship_status := 'having more than 1 record from inventory to be processed';
4204: FND_MESSAGE.Set_Name('WSH', 'WSH_REJECT_UPDATE_REQUEST');
4205: FND_MESSAGE.Set_Token('SHIP_STATUS', l_ship_status);
4206: FND_MESSAGE.Set_Token('UPDATE_ATTRIBUTE', 'transaction_temp_id');
4207: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4208: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4209: IF l_debug_on THEN
4210: WSH_DEBUG_SV.pop(l_module_name,'ERROR:REJECT INV REQUEST');
4211: END IF;
4212: RETURN;
4213: END IF;
4214:
4231: --
4232: -- Debug Statements
4233: --
4234: IF l_debug_on THEN
4235: WSH_DEBUG_SV.logmsg(l_module_name, 'L_COUNTER IS ' || L_COUNTER );
4236: WSH_DEBUG_SV.logmsg(l_module_name, 'ACTION FLAG IS ' || P_CHANGED_ATTRIBUTES ( L_COUNTER ) .ACTION_FLAG );
4237: WSH_DEBUG_SV.logmsg(l_module_name, 'DELDET ID IS ' || P_CHANGED_ATTRIBUTES ( L_COUNTER ) .DELIVERY_DETAIL_ID );
4238: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDERED QTY IS ' || P_CHANGED_ATTRIBUTES ( L_COUNTER ) .ORDERED_QUANTITY );
4239: END IF;
4232: -- Debug Statements
4233: --
4234: IF l_debug_on THEN
4235: WSH_DEBUG_SV.logmsg(l_module_name, 'L_COUNTER IS ' || L_COUNTER );
4236: WSH_DEBUG_SV.logmsg(l_module_name, 'ACTION FLAG IS ' || P_CHANGED_ATTRIBUTES ( L_COUNTER ) .ACTION_FLAG );
4237: WSH_DEBUG_SV.logmsg(l_module_name, 'DELDET ID IS ' || P_CHANGED_ATTRIBUTES ( L_COUNTER ) .DELIVERY_DETAIL_ID );
4238: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDERED QTY IS ' || P_CHANGED_ATTRIBUTES ( L_COUNTER ) .ORDERED_QUANTITY );
4239: END IF;
4240:
4233: --
4234: IF l_debug_on THEN
4235: WSH_DEBUG_SV.logmsg(l_module_name, 'L_COUNTER IS ' || L_COUNTER );
4236: WSH_DEBUG_SV.logmsg(l_module_name, 'ACTION FLAG IS ' || P_CHANGED_ATTRIBUTES ( L_COUNTER ) .ACTION_FLAG );
4237: WSH_DEBUG_SV.logmsg(l_module_name, 'DELDET ID IS ' || P_CHANGED_ATTRIBUTES ( L_COUNTER ) .DELIVERY_DETAIL_ID );
4238: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDERED QTY IS ' || P_CHANGED_ATTRIBUTES ( L_COUNTER ) .ORDERED_QUANTITY );
4239: END IF;
4240:
4241: -- Bug 3390514 : Treating FND_API.G_MISS_NUM in pending_quantity as Zero
4234: IF l_debug_on THEN
4235: WSH_DEBUG_SV.logmsg(l_module_name, 'L_COUNTER IS ' || L_COUNTER );
4236: WSH_DEBUG_SV.logmsg(l_module_name, 'ACTION FLAG IS ' || P_CHANGED_ATTRIBUTES ( L_COUNTER ) .ACTION_FLAG );
4237: WSH_DEBUG_SV.logmsg(l_module_name, 'DELDET ID IS ' || P_CHANGED_ATTRIBUTES ( L_COUNTER ) .DELIVERY_DETAIL_ID );
4238: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDERED QTY IS ' || P_CHANGED_ATTRIBUTES ( L_COUNTER ) .ORDERED_QUANTITY );
4239: END IF;
4240:
4241: -- Bug 3390514 : Treating FND_API.G_MISS_NUM in pending_quantity as Zero
4242: IF p_changed_attributes(l_counter).pending_quantity = FND_API.G_MISS_NUM THEN
4287: --
4288: -- Debug Statements
4289: --
4290: IF l_debug_on THEN
4291: WSH_DEBUG_SV.logmsg(l_module_name, 'DELIVERY STATUS IS ' || L_DELIVERY_STATUS );
4292: WSH_DEBUG_SV.logmsg(l_module_name, 'DELIVERY ID IS ' || L_DELIVERY_ID );
4293: WSH_DEBUG_SV.logmsg(l_module_name, 'PLANNED FLAG IS ' || L_PLANNED_FLAG );
4294: END IF;
4295:
4288: -- Debug Statements
4289: --
4290: IF l_debug_on THEN
4291: WSH_DEBUG_SV.logmsg(l_module_name, 'DELIVERY STATUS IS ' || L_DELIVERY_STATUS );
4292: WSH_DEBUG_SV.logmsg(l_module_name, 'DELIVERY ID IS ' || L_DELIVERY_ID );
4293: WSH_DEBUG_SV.logmsg(l_module_name, 'PLANNED FLAG IS ' || L_PLANNED_FLAG );
4294: END IF;
4295:
4296: OPEN C_Old_Detail(l_counter);
4289: --
4290: IF l_debug_on THEN
4291: WSH_DEBUG_SV.logmsg(l_module_name, 'DELIVERY STATUS IS ' || L_DELIVERY_STATUS );
4292: WSH_DEBUG_SV.logmsg(l_module_name, 'DELIVERY ID IS ' || L_DELIVERY_ID );
4293: WSH_DEBUG_SV.logmsg(l_module_name, 'PLANNED FLAG IS ' || L_PLANNED_FLAG );
4294: END IF;
4295:
4296: OPEN C_Old_Detail(l_counter);
4297: FETCH C_Old_Detail
4298: INTO old_delivery_detail_rec;
4299: IF c_old_detail%NOTFOUND THEN
4300: old_delivery_detail_rec.released_status := 'N';
4301: IF l_debug_on THEN
4302: WSH_DEBUG_SV.logmsg(l_module_name,
4303: 'c_old_detail not found. setting status N.');
4304: END IF;
4305: END IF;
4306: CLOSE C_Old_Detail;
4309: FND_MESSAGE.Set_Name('WSH', 'WSH_DEL_LINE_DIR_INVALID');
4310: FND_MESSAGE.Set_Token('DELIVERY_DETAIL_ID', old_delivery_detail_rec.delivery_detail_id);
4311: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4312: IF l_debug_on THEN
4313: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR: operation is invalid for delivery line direction');
4314: END IF;
4315: raise Delivery_Line_Direction_Err;
4316: END IF;
4317: -- muom
4320: --
4321: -- Debug Statements
4322: --
4323: IF l_debug_on THEN
4324: WSH_DEBUG_SV.log(l_module_name, 'original RELEASED_STATUS', OLD_DELIVERY_DETAIL_REC.RELEASED_STATUS );
4325: WSH_DEBUG_SV.logmsg(l_module_name, 'ORGANIZATION ID IS ' || OLD_DELIVERY_DETAIL_REC.ORGANIZATION_ID );
4326: END IF;
4327:
4328: -- bug 4481819: fail pick confirm if released status is 'N'
4321: -- Debug Statements
4322: --
4323: IF l_debug_on THEN
4324: WSH_DEBUG_SV.log(l_module_name, 'original RELEASED_STATUS', OLD_DELIVERY_DETAIL_REC.RELEASED_STATUS );
4325: WSH_DEBUG_SV.logmsg(l_module_name, 'ORGANIZATION ID IS ' || OLD_DELIVERY_DETAIL_REC.ORGANIZATION_ID );
4326: END IF;
4327:
4328: -- bug 4481819: fail pick confirm if released status is 'N'
4329: -- to prevent stuck orders in Interface Trip Stop.
4346:
4347: WSH_UTIL_CORE.add_message (x_return_status, l_module_name);
4348:
4349: IF l_debug_on THEN
4350: WSH_DEBUG_SV.logmsg(l_module_name, 'detail is not ready to release.');
4351: WSH_DEBUG_SV.pop(l_module_name);
4352: END IF;
4353: RETURN;
4354: END IF;
4347: WSH_UTIL_CORE.add_message (x_return_status, l_module_name);
4348:
4349: IF l_debug_on THEN
4350: WSH_DEBUG_SV.logmsg(l_module_name, 'detail is not ready to release.');
4351: WSH_DEBUG_SV.pop(l_module_name);
4352: END IF;
4353: RETURN;
4354: END IF;
4355:
4360: --
4361: -- Debug Statements
4362: --
4363: IF l_debug_on THEN
4364: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.CHECK_WMS_ORG',WSH_DEBUG_SV.C_PROC_LEVEL);
4365: END IF;
4366: --
4367: l_wms_enabled_flag := WSH_UTIL_VALIDATE.Check_Wms_Org(old_delivery_detail_rec.organization_id);
4368:
4369: --
4370: -- Debug Statements
4371: --
4372: IF l_debug_on THEN
4373: WSH_DEBUG_SV.logmsg(l_module_name, 'WMS ENABLED FLAG IS ' || L_WMS_ENABLED_FLAG );
4374: END IF;
4375: --
4376: --Bug fix 2340652
4377:
4385: --
4386: -- Debug Statements
4387: --
4388: IF l_debug_on THEN
4389: WSH_DEBUG_SV.logmsg(l_module_name, 'CALLED WITH MULTIPLE UPDATES' );
4390: END IF;
4391: --
4392: l_multiple_update := 'Y';
4393: l_changed_attributes(l_counter) := p_changed_attributes(l_counter);
4395: --muom changes
4396: IF ( nvl(l_fulfillment_base, 'P') = 'P') then
4397: -- { fb= P
4398: IF l_debug_on THEN
4399: WSH_DEBUG_SV.logmsg(l_module_name, 'FB = P Case' );
4400: END IF;
4401: IF (p_changed_attributes(l_counter).picked_quantity = FND_API.G_MISS_NUM) THEN
4402: -- { pq = g_miss_num Start
4403: -- { pq = g_miss_num
4418: --
4419: -- Debug Statements
4420: --
4421: IF l_debug_on THEN
4422: WSH_DEBUG_SV.logmsg(l_module_name, 'CHANGING ACTION FLAG TO U ' );
4423: END IF;
4424: --
4425: l_changed_attributes(l_counter).action_flag := 'U';
4426: ELSE
4431: x_return_status => l_return_status,
4432: p_req_quantity2 => l_split_quantity2,
4433: p_manual_split => p_changed_attributes(l_counter).action_flag);
4434: IF l_debug_on THEN
4435: WSH_DEBUG_SV.log(l_module_name,'Split_Delivery_Details',l_return_status);
4436: END IF;
4437:
4438: -- Bug 3724578 : Return back to the caller if any error occures while
4439: -- splitting the delivery detail line
4498: x_return_status => l_return_status,
4499: p_req_quantity2 => l_split_quantity2,
4500: p_manual_split => p_changed_attributes(l_counter).action_flag);
4501: IF l_debug_on THEN
4502: WSH_DEBUG_SV.log(l_module_name,'Split_Delivery_Details l_return_status',l_return_status);
4503: END IF;
4504:
4505:
4506: -- Bug 3724578 : Return back to the caller if any error occures while
4527: /* NC - Added - OPM Changes BUG# 1675561 */
4528: ELSE
4529: -- { fb = 'S'
4530: IF l_debug_on THEN
4531: WSH_DEBUG_SV.logmsg(l_module_name, 'FB = S Case' );
4532: END IF;
4533: IF (p_changed_attributes(l_counter).picked_quantity2 = FND_API.G_MISS_NUM) THEN
4534: -- { if pq2 = g_miss_num start
4535: --
4548: --
4549: -- Debug Statements
4550: --
4551: IF l_debug_on THEN
4552: WSH_DEBUG_SV.logmsg(l_module_name, 'CHANGING ACTION FLAG TO U ' );
4553: END IF;
4554: --
4555: l_changed_attributes(l_counter).action_flag := 'U';
4556: ELSE
4562: x_return_status => l_return_status,
4563: p_req_quantity2 => l_split_quantity2,
4564: p_manual_split => p_changed_attributes(l_counter).action_flag);
4565: IF l_debug_on THEN
4566: WSH_DEBUG_SV.log(l_module_name,'Split_Delivery_Details',l_return_status);
4567: END IF;
4568:
4569: -- Bug 3724578 : Return back to the caller if any error occures while
4570: -- splitting the delivery detail line
4626: x_return_status => l_return_status,
4627: p_req_quantity2 => l_split_quantity2,
4628: p_manual_split => p_changed_attributes(l_counter).action_flag);
4629: IF l_debug_on THEN
4630: WSH_DEBUG_SV.log(l_module_name,'Split_Delivery_Details l_return_status',l_return_status);
4631: END IF;
4632:
4633: -- Bug 3724578 : Return back to the caller if any error occures while
4634: -- splitting the delivery detail line
4658: --
4659: -- Debug Statements
4660: --
4661: IF l_debug_on THEN
4662: WSH_DEBUG_SV.logmsg(l_module_name, 'ACTION FLAG IS S' );
4663: WSH_DEBUG_SV.log(l_module_name, 'p_changed_attributes(l_counter).picked_quantity', p_changed_attributes(l_counter).picked_quantity);
4664: WSH_DEBUG_SV.log(l_module_name, 'p_changed_attributes(l_counter).picked_quantity2', p_changed_attributes(l_counter).picked_quantity2);
4665: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity', l_pending_quantity);
4666: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity2', l_pending_quantity2);
4659: -- Debug Statements
4660: --
4661: IF l_debug_on THEN
4662: WSH_DEBUG_SV.logmsg(l_module_name, 'ACTION FLAG IS S' );
4663: WSH_DEBUG_SV.log(l_module_name, 'p_changed_attributes(l_counter).picked_quantity', p_changed_attributes(l_counter).picked_quantity);
4664: WSH_DEBUG_SV.log(l_module_name, 'p_changed_attributes(l_counter).picked_quantity2', p_changed_attributes(l_counter).picked_quantity2);
4665: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity', l_pending_quantity);
4666: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity2', l_pending_quantity2);
4667: END IF;
4660: --
4661: IF l_debug_on THEN
4662: WSH_DEBUG_SV.logmsg(l_module_name, 'ACTION FLAG IS S' );
4663: WSH_DEBUG_SV.log(l_module_name, 'p_changed_attributes(l_counter).picked_quantity', p_changed_attributes(l_counter).picked_quantity);
4664: WSH_DEBUG_SV.log(l_module_name, 'p_changed_attributes(l_counter).picked_quantity2', p_changed_attributes(l_counter).picked_quantity2);
4665: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity', l_pending_quantity);
4666: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity2', l_pending_quantity2);
4667: END IF;
4668: --
4661: IF l_debug_on THEN
4662: WSH_DEBUG_SV.logmsg(l_module_name, 'ACTION FLAG IS S' );
4663: WSH_DEBUG_SV.log(l_module_name, 'p_changed_attributes(l_counter).picked_quantity', p_changed_attributes(l_counter).picked_quantity);
4664: WSH_DEBUG_SV.log(l_module_name, 'p_changed_attributes(l_counter).picked_quantity2', p_changed_attributes(l_counter).picked_quantity2);
4665: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity', l_pending_quantity);
4666: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity2', l_pending_quantity2);
4667: END IF;
4668: --
4669:
4662: WSH_DEBUG_SV.logmsg(l_module_name, 'ACTION FLAG IS S' );
4663: WSH_DEBUG_SV.log(l_module_name, 'p_changed_attributes(l_counter).picked_quantity', p_changed_attributes(l_counter).picked_quantity);
4664: WSH_DEBUG_SV.log(l_module_name, 'p_changed_attributes(l_counter).picked_quantity2', p_changed_attributes(l_counter).picked_quantity2);
4665: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity', l_pending_quantity);
4666: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity2', l_pending_quantity2);
4667: END IF;
4668: --
4669:
4670: IF p_changed_attributes(l_counter).picked_quantity <> FND_API.G_MISS_NUM THEN
4690: /* old_delivery_detail_rec.picked_quantity2 := l_split_quantity2
4691: + p_changed_attributes(l_counter).pending_quantity2; */
4692:
4693: IF l_debug_on THEN
4694: wsh_debug_sv.log(l_module_name, 'old_delivery_detail_rec.picked_quantity', old_delivery_detail_rec.picked_quantity);
4695: wsh_debug_sv.log(l_module_name, 'old_delivery_detail_rec.picked_quantity2', old_delivery_detail_rec.picked_quantity2);
4696: END IF;
4697:
4698: UPDATE WSH_DELIVERY_DETAILS
4691: + p_changed_attributes(l_counter).pending_quantity2; */
4692:
4693: IF l_debug_on THEN
4694: wsh_debug_sv.log(l_module_name, 'old_delivery_detail_rec.picked_quantity', old_delivery_detail_rec.picked_quantity);
4695: wsh_debug_sv.log(l_module_name, 'old_delivery_detail_rec.picked_quantity2', old_delivery_detail_rec.picked_quantity2);
4696: END IF;
4697:
4698: UPDATE WSH_DELIVERY_DETAILS
4699: SET picked_quantity = old_delivery_detail_rec.picked_quantity,
4724: --
4725: -- Debug Statements
4726: --
4727: IF l_debug_on THEN
4728: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DELIVERY_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
4729: END IF;
4730: --
4731: WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details(
4732: p_from_detail_id => p_Changed_attributes(l_counter).delivery_detail_id,
4736: p_req_quantity2 => l_split_quantity2,
4737: p_manual_split => p_changed_attributes(l_counter).action_flag);
4738: -- odaboval : End of OPM Changes (Pick_Confirm)
4739: IF l_debug_on THEN
4740: WSH_DEBUG_SV.log(l_module_name,'Split_Delivery_Details l_return_status',l_return_status);
4741: END IF;
4742:
4743: -- Bug 3724578 : Return back to the caller if any error occures while
4744: -- splitting the delivery detail line
4767: -- Update of wsh_delivery_details where requested_quantity
4768: -- are changed, call DBI API after the update.
4769: -- DBI API checks for DBI Installed also
4770: IF l_debug_on THEN
4771: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Detail id-',old_delivery_detail_rec.delivery_detail_id);
4772: END IF;
4773: l_detail_tab(1) := old_delivery_detail_rec.delivery_detail_id;
4774: WSH_INTEGRATION.DBI_Update_Detail_Log
4775: (p_delivery_detail_id_tab => l_detail_tab,
4776: p_dml_type => 'UPDATE',
4777: x_return_status => l_dbi_rs);
4778:
4779: IF l_debug_on THEN
4780: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
4781: END IF;
4782: -- DBI API can only raise unexpected error, in that case need to
4783: -- pass it to the caller API for roll back of the whole transaction
4784: -- Only need to handle Unexpected error, rest are treated as success
4785: -- Since code is not proceeding, no need to reset x_return_status
4786: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
4787: x_return_status := l_dbi_rs;
4788: IF l_debug_on THEN
4789: WSH_DEBUG_SV.pop(l_module_name);
4790: END IF;
4791: RETURN;
4792: END IF;
4793:
4803: picked_quantity2 = decode(l_split_quantity2, 0, picked_quantity2, NULL)
4804: WHERE delivery_detail_id = l_dummy_detail_id;
4805: -- bug 4416863
4806: IF l_debug_on THEN
4807: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.Detail_Weight_Volume',WSH_DEBUG_SV.C_PROC_LEVEL);
4808: END IF;
4809:
4810: WSH_WV_UTILS.Detail_Weight_Volume
4811: (p_delivery_detail_id => l_dummy_detail_id,
4817: x_return_status => l_return_status);
4818: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
4819: x_return_status := l_return_status;
4820: IF l_debug_on THEN
4821: WSH_DEBUG_SV.logmsg(l_module_name,'Detail_Weight_Volume returned '|| l_return_status);
4822: WSH_DEBUG_SV.pop(l_module_name);
4823: END IF;
4824: return;
4825: END IF;
4818: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
4819: x_return_status := l_return_status;
4820: IF l_debug_on THEN
4821: WSH_DEBUG_SV.logmsg(l_module_name,'Detail_Weight_Volume returned '|| l_return_status);
4822: WSH_DEBUG_SV.pop(l_module_name);
4823: END IF;
4824: return;
4825: END IF;
4826: -- end bug 4416863
4853: p_event => 'oracle.apps.wsh.line.gen.releasedtowarehouse' ,
4854: p_organization_id => l_organization_id,
4855: x_return_status => l_wf_rs ) ;
4856: IF l_debug_on THEN
4857: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
4858: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
4859: END IF;
4860:
4861: OPEN c_get_picked_lines_count( l_dummy_detail_id );
4854: p_organization_id => l_organization_id,
4855: x_return_status => l_wf_rs ) ;
4856: IF l_debug_on THEN
4857: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
4858: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
4859: END IF;
4860:
4861: OPEN c_get_picked_lines_count( l_dummy_detail_id );
4862: FETCH c_get_picked_lines_count into l_count_picked_lines, l_delv_id ;
4868: p_event => 'oracle.apps.wsh.delivery.pik.pickinitiated' ,
4869: p_organization_id => l_organization_id,
4870: x_return_status => l_wf_rs ) ;
4871: IF l_debug_on THEN
4872: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
4873: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
4874: END IF;
4875: END IF;
4876: END IF;
4869: p_organization_id => l_organization_id,
4870: x_return_status => l_wf_rs ) ;
4871: IF l_debug_on THEN
4872: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
4873: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
4874: END IF;
4875: END IF;
4876: END IF;
4877: CLOSE c_get_picked_lines_count;
4884: -- Update of wsh_delivery_details where requested_quantity
4885: -- are changed, call DBI API after the update.
4886: -- DBI API checks for DBI Installed also
4887: IF l_debug_on THEN
4888: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Detail id-',l_dummy_detail_id);
4889: END IF;
4890: l_detail_tab(1) := l_dummy_detail_id;
4891: WSH_INTEGRATION.DBI_Update_Detail_Log
4892: (p_delivery_detail_id_tab => l_detail_tab,
4893: p_dml_type => 'UPDATE',
4894: x_return_status => l_dbi_rs);
4895:
4896: IF l_debug_on THEN
4897: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
4898: END IF;
4899: -- DBI API can only raise unexpected error, in that case need to
4900: -- pass it to the caller API for roll back of the whole transaction
4901: -- Only need to handle Unexpected error, rest are treated as success
4902: -- Since code is not proceeding, no need to reset x_return_status
4903: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
4904: x_return_status := l_dbi_rs;
4905: IF l_debug_on THEN
4906: WSH_DEBUG_SV.pop(l_module_name);
4907: END IF;
4908: RETURN;
4909: END IF;
4910: -- } -- End of action_flag = M
4914: -- In dynamic replenishment case, WMS passes the action flag as 'R' and replenishment quantity in cycle_count_quantity attribute.
4915: ELSIF (p_changed_attributes(l_Counter).action_flag = 'R' ) THEN
4916: --{
4917: IF l_debug_on THEN
4918: WSH_DEBUG_SV.logmsg(l_module_name, 'CYCLE_COUNT_QUANTITY = ' || P_CHANGED_ATTRIBUTES ( L_COUNTER ) .CYCLE_COUNT_QUANTITY );
4919: WSH_DEBUG_SV.logmsg(l_module_name, 'L_REQUEST_ID = ' || L_REQUEST_ID );
4920:
4921: END IF;
4922:
4915: ELSIF (p_changed_attributes(l_Counter).action_flag = 'R' ) THEN
4916: --{
4917: IF l_debug_on THEN
4918: WSH_DEBUG_SV.logmsg(l_module_name, 'CYCLE_COUNT_QUANTITY = ' || P_CHANGED_ATTRIBUTES ( L_COUNTER ) .CYCLE_COUNT_QUANTITY );
4919: WSH_DEBUG_SV.logmsg(l_module_name, 'L_REQUEST_ID = ' || L_REQUEST_ID );
4920:
4921: END IF;
4922:
4923: l_split_quantity := p_Changed_attributes(l_Counter).cycle_count_quantity;
4930: --
4931: -- Debug Statements
4932: --
4933: IF l_debug_on THEN
4934: WSH_DEBUG_SV.logmsg(l_module_name, 'SPLIT_DELIVERY_DETAILS BEING CALLED WITH ' || TO_CHAR ( L_SPLIT_QUANTITY ) );
4935: END IF;
4936: --
4937: WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details(
4938: p_from_detail_id => p_Changed_attributes(l_counter).delivery_detail_id,
4941: x_return_status => l_return_status,
4942: p_req_quantity2 => l_split_quantity2,
4943: p_manual_split => 'B');
4944: IF l_debug_on THEN
4945: WSH_DEBUG_SV.log(l_module_name,'Split_Delivery_Details l_return_status',l_return_status);
4946: WSH_DEBUG_SV.log(l_module_name,'Split_Delivery_Details is ',l_dummy_detail_id);
4947: END IF;
4948:
4949: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4942: p_req_quantity2 => l_split_quantity2,
4943: p_manual_split => 'B');
4944: IF l_debug_on THEN
4945: WSH_DEBUG_SV.log(l_module_name,'Split_Delivery_Details l_return_status',l_return_status);
4946: WSH_DEBUG_SV.log(l_module_name,'Split_Delivery_Details is ',l_dummy_detail_id);
4947: END IF;
4948:
4949: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4950: x_return_status := l_return_status;
4958: --
4959: -- Debug Statements
4960: --
4961: IF l_debug_on THEN
4962: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_USA_INV_PVT. BACKORDERED_DELIVERY_DETAIL' ,WSH_DEBUG_SV.C_PROC_LEVEL);
4963: END IF;
4964: --
4965: backorder_delivery_detail(
4966: p_delivery_detail_id => l_dummy_detail_id ,
4995: --
4996: -- Debug Statements
4997: --
4998: IF l_debug_on THEN
4999: WSH_DEBUG_SV.logmsg(l_module_name, 'CYCLE_COUNT_QUANTITY = ' || P_CHANGED_ATTRIBUTES ( L_COUNTER ) .CYCLE_COUNT_QUANTITY );
5000: WSH_DEBUG_SV.logmsg(l_module_name, 'L_REQUEST_ID = ' || L_REQUEST_ID );
5001: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_ITEM_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5002: END IF;
5003:
4996: -- Debug Statements
4997: --
4998: IF l_debug_on THEN
4999: WSH_DEBUG_SV.logmsg(l_module_name, 'CYCLE_COUNT_QUANTITY = ' || P_CHANGED_ATTRIBUTES ( L_COUNTER ) .CYCLE_COUNT_QUANTITY );
5000: WSH_DEBUG_SV.logmsg(l_module_name, 'L_REQUEST_ID = ' || L_REQUEST_ID );
5001: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_ITEM_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5002: END IF;
5003:
5004: l_item_name := WSH_UTIL_CORE.Get_Item_Name(old_delivery_detail_rec.inventory_item_id,old_delivery_detail_rec.organization_id);
4997: --
4998: IF l_debug_on THEN
4999: WSH_DEBUG_SV.logmsg(l_module_name, 'CYCLE_COUNT_QUANTITY = ' || P_CHANGED_ATTRIBUTES ( L_COUNTER ) .CYCLE_COUNT_QUANTITY );
5000: WSH_DEBUG_SV.logmsg(l_module_name, 'L_REQUEST_ID = ' || L_REQUEST_ID );
5001: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_ITEM_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5002: END IF;
5003:
5004: l_item_name := WSH_UTIL_CORE.Get_Item_Name(old_delivery_detail_rec.inventory_item_id,old_delivery_detail_rec.organization_id);
5005: IF (old_delivery_detail_rec.ship_set_id IS NOT NULL) OR
5009: --
5010: -- Debug Statements
5011: --
5012: IF l_debug_on THEN
5013: WSH_DEBUG_SV.logmsg(l_module_name, 'CHECK FOR BACKORDER OF SHIP SET / SMC LINES' );
5014: END IF;
5015: --
5016: --
5017: -- Debug Statements
5016: --
5017: -- Debug Statements
5018: --
5019: IF l_debug_on THEN
5020: WSH_DEBUG_SV.logmsg(l_module_name,
5021: 'SS ID = '
5022: || OLD_DELIVERY_DETAIL_REC.SHIP_SET_ID
5023: || ' , SMC ID = '
5024: || OLD_DELIVERY_DETAIL_REC.TOP_MODEL_LINE_ID
5036: --
5037: -- Debug Statements
5038: --
5039: IF l_debug_on THEN
5040: WSH_DEBUG_SV.logmsg(l_module_name, 'SHIP SET IS DIFFERENT AND ASSIGNING BEFORE LOOP ' );
5041: END IF;
5042: --
5043: g_ss_smc_found := FALSE;
5044: g_move_order_line_id := NULL ;
5053: --
5054: -- Debug Statements
5055: --
5056: IF l_debug_on THEN
5057: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTEGRATION.G_BACKORDERREC_TBL',WSH_DEBUG_SV.C_PROC_LEVEL);
5058: END IF;
5059: --
5060: IF NVL(old_delivery_detail_rec.ship_set_id,0) =
5061: NVL(WSH_INTEGRATION.G_BackorderRec_Tbl(l_backorder_cnt).ship_set_id,0) THEN
5061: NVL(WSH_INTEGRATION.G_BackorderRec_Tbl(l_backorder_cnt).ship_set_id,0) THEN
5062: g_ss_smc_found := TRUE;
5063: --
5064: IF l_debug_on THEN
5065: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTEGRATION.G_BACKORDERREC_TBL',WSH_DEBUG_SV.C_PROC_LEVEL);
5066: END IF;
5067: --
5068: g_move_order_line_id := WSH_INTEGRATION.G_BackorderRec_Tbl(l_backorder_cnt).move_order_line_id;
5069: g_delivery_detail_id := WSH_INTEGRATION.G_BackorderRec_Tbl(l_backorder_cnt).delivery_detail_id;
5068: g_move_order_line_id := WSH_INTEGRATION.G_BackorderRec_Tbl(l_backorder_cnt).move_order_line_id;
5069: g_delivery_detail_id := WSH_INTEGRATION.G_BackorderRec_Tbl(l_backorder_cnt).delivery_detail_id;
5070: --
5071: IF l_debug_on THEN
5072: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTEGRATION.G_BACKORDERREC_TBL',WSH_DEBUG_SV.C_PROC_LEVEL);
5073: END IF;
5074: --
5075: g_ship_set_id := WSH_INTEGRATION.G_BackorderRec_Tbl(l_backorder_cnt).ship_set_id;
5076: g_ship_model_id := NULL;
5094: AND set_type = 'SHIP_SET';
5095: END IF;
5096:
5097: IF l_debug_on THEN
5098: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_ITEM_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5099: END IF;
5100: --
5101: g_backordered_item := WSH_UTIL_CORE.Get_Item_Name(l_backordered_item_id,old_delivery_detail_rec.organization_id);
5102: --
5101: g_backordered_item := WSH_UTIL_CORE.Get_Item_Name(l_backordered_item_id,old_delivery_detail_rec.organization_id);
5102: --
5103: --
5104: IF l_debug_on THEN
5105: WSH_DEBUG_SV.logmsg(l_module_name, 'FOUND NEW G_MOVE_ORDER_LINE_ID = ' || G_MOVE_ORDER_LINE_ID ||
5106: ' G_DELIVERY_DETAIL_ID = ' || G_DELIVERY_DETAIL_ID );
5107: END IF;
5108: --
5109: --
5109: --
5110: -- Debug Statements
5111: --
5112: IF l_debug_on THEN
5113: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTEGRATION.G_BACKORDERREC_TBL.DELETE',WSH_DEBUG_SV.C_PROC_LEVEL);
5114: END IF;
5115: --
5116: WSH_INTEGRATION.G_BackorderRec_Tbl.DELETE(l_backorder_cnt);
5117: EXIT;
5119: --
5120: -- Debug Statements
5121: --
5122: IF l_debug_on THEN
5123: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTEGRATION.G_BACKORDERREC_TBL.NEXT',WSH_DEBUG_SV.C_PROC_LEVEL);
5124: END IF;
5125: --
5126: l_backorder_cnt := WSH_INTEGRATION.G_BackorderRec_Tbl.NEXT(l_backorder_cnt);
5127: END LOOP;
5130: --
5131: -- Debug Statements
5132: --
5133: IF l_debug_on THEN
5134: WSH_DEBUG_SV.logmsg(l_module_name, 'SHIP MODEL IS DIFFERENT AND ASSIGNING BEFORE LOOP ' );
5135: END IF;
5136: --
5137: g_ss_smc_found := FALSE;
5138: g_move_order_line_id := NULL ;
5147: --
5148: -- Debug Statements
5149: --
5150: IF l_debug_on THEN
5151: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTEGRATION.G_BACKORDERREC_TBL',WSH_DEBUG_SV.C_PROC_LEVEL);
5152: END IF;
5153: --
5154: IF NVL(old_delivery_detail_rec.top_model_line_id,0) =
5155: NVL(WSH_INTEGRATION.G_BackorderRec_Tbl(l_backorder_cnt).ship_model_id,0) THEN
5158: --
5159: -- Debug Statements
5160: --
5161: IF l_debug_on THEN
5162: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTEGRATION.G_BACKORDERREC_TBL',WSH_DEBUG_SV.C_PROC_LEVEL);
5163: END IF;
5164: --
5165: g_move_order_line_id := WSH_INTEGRATION.G_BackorderRec_Tbl(l_backorder_cnt).move_order_line_id;
5166: g_delivery_detail_id := WSH_INTEGRATION.G_BackorderRec_Tbl(l_backorder_cnt).delivery_detail_id;
5168:
5169: -- Debug Statements
5170: --
5171: IF l_debug_on THEN
5172: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTEGRATION.G_BACKORDERREC_TBL',WSH_DEBUG_SV.C_PROC_LEVEL);
5173: WSH_DEBUG_SV.logmsg(l_module_name, 'FOUND NEW G_MOVE_ORDER_LINE_ID = ' || G_MOVE_ORDER_LINE_ID ||
5174: ' G_DELIVERY_DETAIL_ID = ' || G_DELIVERY_DETAIL_ID );
5175: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTEGRATION.G_BACKORDERREC_TBL.DELETE',WSH_DEBUG_SV.C_PROC_LEVEL);
5176: END IF;
5169: -- Debug Statements
5170: --
5171: IF l_debug_on THEN
5172: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTEGRATION.G_BACKORDERREC_TBL',WSH_DEBUG_SV.C_PROC_LEVEL);
5173: WSH_DEBUG_SV.logmsg(l_module_name, 'FOUND NEW G_MOVE_ORDER_LINE_ID = ' || G_MOVE_ORDER_LINE_ID ||
5174: ' G_DELIVERY_DETAIL_ID = ' || G_DELIVERY_DETAIL_ID );
5175: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTEGRATION.G_BACKORDERREC_TBL.DELETE',WSH_DEBUG_SV.C_PROC_LEVEL);
5176: END IF;
5177: --
5171: IF l_debug_on THEN
5172: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTEGRATION.G_BACKORDERREC_TBL',WSH_DEBUG_SV.C_PROC_LEVEL);
5173: WSH_DEBUG_SV.logmsg(l_module_name, 'FOUND NEW G_MOVE_ORDER_LINE_ID = ' || G_MOVE_ORDER_LINE_ID ||
5174: ' G_DELIVERY_DETAIL_ID = ' || G_DELIVERY_DETAIL_ID );
5175: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTEGRATION.G_BACKORDERREC_TBL.DELETE',WSH_DEBUG_SV.C_PROC_LEVEL);
5176: END IF;
5177: --
5178: g_ship_model_id := WSH_INTEGRATION.G_BackorderRec_Tbl(l_backorder_cnt).ship_model_id;
5179:
5196: WHERE line_id = g_ship_model_id;
5197: END IF;
5198: --
5199: IF l_debug_on THEN
5200: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_ITEM_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5201: END IF;
5202: --
5203: g_backordered_item := WSH_UTIL_CORE.Get_Item_Name(l_backordered_item_id,old_delivery_detail_rec.organization_id);
5204: --
5210: --
5211: -- Debug Statements
5212: --
5213: IF l_debug_on THEN
5214: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTEGRATION.G_BACKORDERREC_TBL.NEXT',WSH_DEBUG_SV.C_PROC_LEVEL);
5215: END IF;
5216: --
5217: l_backorder_cnt := WSH_INTEGRATION.G_BackorderRec_Tbl.NEXT(l_backorder_cnt);
5218: END LOOP;
5221: --
5222: -- Debug Statements
5223: --
5224: IF l_debug_on THEN
5225: WSH_DEBUG_SV.logmsg(l_module_name, 'BEFORE LOGGING EXCEPTION , G_MOVE_ORDER_LINE_ID = ' || G_MOVE_ORDER_LINE_ID ||
5226: ' G_DELIVERY_DETAIL_ID = ' || G_DELIVERY_DETAIL_ID );
5227: END IF;
5228: --
5229:
5234: --
5235: -- Debug Statements
5236: --
5237: IF l_debug_on THEN
5238: WSH_DEBUG_SV.logmsg(l_module_name, 'SHIPSET/SMC LINE GETTING BACKORDERED DUE TO ANOTHER LINE' );
5239: END IF;
5240: --
5241: IF g_ship_set_id IS NOT NULL THEN
5242: FND_MESSAGE.SET_NAME('WSH','WSH_PR_OTHER_SS_FAILED');
5256: --
5257: -- Debug Statements
5258: --
5259: IF l_debug_on THEN
5260: WSH_DEBUG_SV.logmsg(l_module_name, L_MSG );
5261: END IF;
5262: --
5263: l_exception_location_id := old_delivery_detail_rec.ship_from_location_id;
5264:
5280: -- 1729516
5281: p_batch_id => WSH_PICK_LIST.G_BATCH_ID
5282: );
5283: IF l_debug_on THEN
5284: WSH_DEBUG_SV.log(l_module_name,'log_exception l_exception_return_status',l_exception_return_status);
5285: END IF;
5286: Exception
5287: when others then
5288: --
5288: --
5289: -- Debug Statements
5290: --
5291: IF l_debug_on THEN
5292: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION RAISED BY LOG_EXCEPTION' );
5293: END IF;
5294: --
5295: End;
5296: --
5296: --
5297: -- Debug Statements
5298: --
5299: IF l_debug_on THEN
5300: WSH_DEBUG_SV.logmsg(l_module_name, L_EXCEPTION_ERROR_MESSAGE );
5301: END IF;
5302: --
5303:
5304: ELSE
5305: --
5306: -- Debug Statements
5307: --
5308: IF l_debug_on THEN
5309: WSH_DEBUG_SV.logmsg(l_module_name, 'SHIPSET/SMC LINE GETTING BACKORDERED DUE TO INSUFFICIENT QTY ' );
5310: END IF;
5311: --
5312: FND_MESSAGE.SET_NAME('WSH','WSH_PICK_BACKORDER');
5313: -- muom
5326: --
5327: -- Debug Statements
5328: --
5329: IF l_debug_on THEN
5330: WSH_DEBUG_SV.logmsg(l_module_name, L_MSG );
5331: END IF;
5332: --
5333: l_exception_location_id := old_delivery_detail_rec.ship_from_location_id;
5334:
5354: -- 1729516
5355: p_batch_id => WSH_PICK_LIST.G_BATCH_ID
5356: );
5357: IF l_debug_on THEN
5358: WSH_DEBUG_SV.log(l_module_name,'log_exception l_exception_return_status',l_exception_return_status);
5359: END IF;
5360: Exception
5361: when others then
5362: --
5362: --
5363: -- Debug Statements
5364: --
5365: IF l_debug_on THEN
5366: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION RAISED BY LOG_EXCEPTION' );
5367: END IF;
5368: --
5369: End;
5370: --
5370: --
5371: -- Debug Statements
5372: --
5373: IF l_debug_on THEN
5374: WSH_DEBUG_SV.logmsg(l_module_name, L_EXCEPTION_ERROR_MESSAGE );
5375: END IF;
5376: --
5377:
5378: END IF; -- End of Logging exceptions for Ship Sets / SMCs lines
5382: --
5383: -- Debug Statements
5384: --
5385: IF l_debug_on THEN
5386: WSH_DEBUG_SV.logmsg(l_module_name, 'LOGGING EXCEPTIONS FOR NON SHIPSET/SMC LINES ' );
5387: END IF;
5388: --
5389: FND_MESSAGE.SET_NAME('WSH','WSH_PICK_BACKORDER');
5390: -- muom
5403: --
5404: -- Debug Statements
5405: --
5406: IF l_debug_on THEN
5407: WSH_DEBUG_SV.logmsg(l_module_name, L_MSG );
5408: END IF;
5409: --
5410: l_exception_location_id := old_delivery_detail_rec.ship_from_location_id;
5411:
5432: -- 1729516
5433: p_batch_id => WSH_PICK_LIST.G_BATCH_ID
5434: );
5435: IF l_debug_on THEN
5436: WSH_DEBUG_SV.log(l_module_name,'log_exception l_exception_return_status',l_exception_return_status);
5437: END IF;
5438: Exception
5439: when others then
5440: --
5440: --
5441: -- Debug Statements
5442: --
5443: IF l_debug_on THEN
5444: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTION RAISED BY LOG_EXCEPTION' );
5445: END IF;
5446: --
5447: End;
5448: --
5448: --
5449: -- Debug Statements
5450: --
5451: IF l_debug_on THEN
5452: WSH_DEBUG_SV.logmsg(l_module_name, L_EXCEPTION_ERROR_MESSAGE );
5453: END IF;
5454: --
5455:
5456: END IF; -- End of check whether line belongs to Ship Set / SMC
5459: --
5460: -- Debug Statements
5461: --
5462: IF l_debug_on THEN
5463: WSH_DEBUG_SV.logmsg(l_module_name, 'L_REQUEST_ID = -1 , NOT LOGGING EXCEPTION FOR BACKORDERING' );
5464: END IF;
5465: --
5466: END IF;
5467: -- BUG#:1549665 hwahdani end of changes
5483: --
5484: -- Debug Statements
5485: --
5486: IF l_debug_on THEN
5487: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_SHIPPING_PARAMS_PVT. Get_Global_Parameters',WSH_DEBUG_SV.C_PROC_LEVEL);
5488: END IF;
5489: --
5490: WSH_SHIPPING_PARAMS_PVT. Get_Global_Parameters(l_global_param_rec_type,l_return_status);
5491: --
5489: --
5490: WSH_SHIPPING_PARAMS_PVT. Get_Global_Parameters(l_global_param_rec_type,l_return_status);
5491: --
5492: IF l_debug_on THEN
5493: WSH_DEBUG_SV.logmsg(l_module_name, 'After calling Get_Global_Parameters: ' || l_return_status );
5494: END IF;
5495: --
5496: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
5497: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5508: --
5509: -- Debug Statements
5510: --
5511: IF l_debug_on THEN
5512: WSH_DEBUG_SV.log(l_module_name, 'WSH_DELIVERY_DETAILS_ACTIONS.CONSOLIDATE_SOURCE_LINE being called with Del Det Id: ',p_Changed_attributes(l_counter).delivery_detail_id);
5513: END IF;
5514: --
5515: l_Cons_Source_Line_Rec_Tab(1).delivery_detail_id:= old_Delivery_detail_rec.delivery_detail_id ;
5516: l_Cons_Source_Line_Rec_Tab(1).delivery_id:= null;
5528: x_consolidate_ids => l_cons_dd_ids,
5529: x_return_status => l_return_status);
5530:
5531: IF l_debug_on THEN
5532: WSH_DEBUG_SV.log(l_module_name,'After calling CONSOLIDATE_SOURCE_LINE: ',l_return_status);
5533: END IF;
5534: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
5535: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5536: END IF;
5538:
5539: IF ( l_cons_dd_ids(1) <> p_Changed_attributes(l_counter).delivery_detail_id ) THEN
5540: l_cons_flag := 'Y';
5541: IF l_debug_on THEN
5542: WSH_DEBUG_SV.log(l_module_name,'Consolidated partial Qty for the Del Det Id: ',old_Delivery_detail_rec.delivery_detail_id);
5543: END IF;
5544:
5545: l_dummy_detail_id := 0;
5546: ELSE
5544:
5545: l_dummy_detail_id := 0;
5546: ELSE
5547: IF l_debug_on THEN
5548: WSH_DEBUG_SV.log(l_module_name,'Consolidation not happened for the the Del Det Id: ',old_Delivery_detail_rec.delivery_detail_id);
5549: END IF;
5550: END IF;
5551: END IF; --}, l_auto_consolidate
5552:
5554: IF ( l_cons_flag = 'N' ) THEN
5555: --{
5556: IF l_debug_on THEN
5557: -- muom
5558: WSH_DEBUG_SV.logmsg(l_module_name, 'SPLIT_DELIVERY_DETAILS BEING CALLED WITH ' || TO_CHAR ( L_SPLIT_QUANTITY )||' and '||TO_CHAR ( L_SPLIT_QUANTITY2 ) );
5559: END IF;
5560: --
5561: WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details(
5562: p_from_detail_id => p_Changed_attributes(l_counter).delivery_detail_id,
5565: x_return_status => l_return_status,
5566: p_req_quantity2 => l_split_quantity2,
5567: p_manual_split => p_changed_attributes(l_counter).action_flag);
5568: IF l_debug_on THEN
5569: WSH_DEBUG_SV.log(l_module_name,'Split_Delivery_Details l_return_status',l_return_status);
5570: END IF;
5571:
5572: -- Bug 3724578 : Return back to the caller if any error occures while
5573: -- splitting the delivery detail line
5590: -- If it is complete back order case then try to consolidate it
5591: IF ( l_auto_consolidate = 'Y' AND l_dummy_detail_id = p_Changed_attributes(l_counter).delivery_detail_id) THEN
5592: --{
5593: IF l_debug_on THEN
5594: WSH_DEBUG_SV.log(l_module_name, 'WSH_DELIVERY_DETAILS_ACTIONS.CONSOLIDATE_SOURCE_LINE being called with Del Det Id: ',old_Delivery_detail_rec.delivery_detail_id);
5595: END IF;
5596: l_Cons_Source_Line_Rec_Tab(1).delivery_detail_id:= old_Delivery_detail_rec.delivery_detail_id ;
5597: l_Cons_Source_Line_Rec_Tab(1).delivery_id:= null;
5598: l_Cons_Source_Line_Rec_Tab(1).source_line_id:= old_Delivery_detail_rec.source_line_id;
5608: x_consolidate_ids => l_cons_dd_ids,
5609: x_return_status => l_return_status);
5610:
5611: IF l_debug_on THEN
5612: WSH_DEBUG_SV.log(l_module_name,'After calling CONSOLIDATE_SOURCE_LINE: ',l_return_status);
5613: END IF;
5614:
5615: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
5616: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5618:
5619: IF ( l_cons_dd_ids(1) <> p_Changed_attributes(l_counter).delivery_detail_id ) THEN
5620: l_cons_flag := 'Y';
5621: IF l_debug_on THEN
5622: WSH_DEBUG_SV.log(l_module_name,'Consolidated the Del Det Id: ',old_Delivery_detail_rec.delivery_detail_id);
5623: END IF;
5624: ELSE
5625: IF l_debug_on THEN
5626: WSH_DEBUG_SV.log(l_module_name,'Consolidation not happened for the the Del Det Id: ',old_Delivery_detail_rec.delivery_detail_id);
5622: WSH_DEBUG_SV.log(l_module_name,'Consolidated the Del Det Id: ',old_Delivery_detail_rec.delivery_detail_id);
5623: END IF;
5624: ELSE
5625: IF l_debug_on THEN
5626: WSH_DEBUG_SV.log(l_module_name,'Consolidation not happened for the the Del Det Id: ',old_Delivery_detail_rec.delivery_detail_id);
5627: END IF;
5628: END IF;
5629:
5630: END IF; --}, End of consolidation for the complete back order case
5644: -- Debug Statements
5645: --
5646:
5647: IF l_debug_on THEN
5648: WSH_DEBUG_SV.log(l_module_name,'Calling program unit WSH_USA_INV_PVT. BACKORDERED_DELIVERY_DETAIL' ,WSH_DEBUG_SV.C_PROC_LEVEL);
5649: END IF;
5650: --
5651: --
5652: backorder_delivery_detail(
5709: END;
5710: --
5711: -- LSP PROJECT : debug stmt
5712: IF l_debug_on THEN
5713: WSH_DEBUG_SV.logmsg(l_module_name, 'TRANSFER LPN ID ' || p_changed_attributes(l_Counter).transfer_lpn_id);
5714: END IF;
5715: -- LSP PROJECT : end
5716: --
5717:
5720: --
5721: -- Debug Statements
5722: --
5723: IF l_debug_on THEN
5724: WSH_DEBUG_SV.logmsg(l_module_name, 'UPDATE TRANSFER LPN ID' );
5725: END IF;
5726: --
5727:
5728: IF ( l_reject_update = 'Y' ) THEN
5729: --
5730: -- Debug Statements
5731: --
5732: IF l_debug_on THEN
5733: WSH_DEBUG_SV.logmsg(l_module_name, 'UPDATE REJECTED' );
5734: END IF;
5735: --
5736: FND_MESSAGE.Set_Name('WSH', 'WSH_REJECT_UPDATE_REQUEST');
5737: FND_MESSAGE.Set_Token('SHIP_STATUS', l_ship_status);
5765: p_inventory_item_id => old_delivery_detail_rec.inventory_item_id,
5766: p_error_message => l_exception_error_message
5767: );
5768: IF l_debug_on THEN
5769: WSH_DEBUG_SV.log(l_module_name,'log_exception l_exception_return_status',l_exception_return_status);
5770: END IF;
5771: IF (l_exception_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
5772: --
5773: -- Debug Statements
5772: --
5773: -- Debug Statements
5774: --
5775: IF l_debug_on THEN
5776: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH_XC_UTIL.LOG_EXCEPTION PROCEDURE FAILED TO LOG EXCEPTION' );
5777: WSH_DEBUG_SV.logmsg(l_module_name, L_EXCEPTION_ERROR_MESSAGE );
5778: END IF;
5779: END IF;
5780:
5773: -- Debug Statements
5774: --
5775: IF l_debug_on THEN
5776: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH_XC_UTIL.LOG_EXCEPTION PROCEDURE FAILED TO LOG EXCEPTION' );
5777: WSH_DEBUG_SV.logmsg(l_module_name, L_EXCEPTION_ERROR_MESSAGE );
5778: END IF;
5779: END IF;
5780:
5781:
5785: --
5786: -- Debug Statements
5787: --
5788: IF l_debug_on THEN
5789: WSH_DEBUG_SV.logmsg(l_module_name, 'FETCHING LPN DETAILS' );
5790: END IF;
5791: --
5792:
5793: -- K LPN CONV. rvishnuv
5820: --
5821: -- Debug Statements
5822: --
5823: IF l_debug_on THEN
5824: WSH_DEBUG_SV.logmsg(l_module_name, TO_CHAR ( L_NUM_CONTAINERS ) || ' CONTAINER DELIVERY DETAILS FETCHED' );
5825: END IF;
5826: --
5827:
5828: IF ( l_num_containers = 0 ) then--{
5829: --
5830: -- Debug Statements
5831: --
5832: IF l_debug_on THEN
5833: WSH_DEBUG_SV.logmsg(l_module_name, 'CREATING CONTAINER WITH LPN ' );
5834: END IF;
5835: --
5836: -- Create container as it does not exist.
5837: -- K LPN CONV. rvishnuv
5859: --
5860: -- Debug Statements
5861: --
5862: IF l_debug_on THEN
5863: WSH_DEBUG_SV.logmsg(l_module_name, 'NO CONTAINERS WERE CREATED THROUGH CREATE_CONT_INSTANCE_MULTI' );
5864: WSH_DEBUG_SV.pop(l_module_name);
5865: END IF;
5866: --
5867: RETURN;
5860: -- Debug Statements
5861: --
5862: IF l_debug_on THEN
5863: WSH_DEBUG_SV.logmsg(l_module_name, 'NO CONTAINERS WERE CREATED THROUGH CREATE_CONT_INSTANCE_MULTI' );
5864: WSH_DEBUG_SV.pop(l_module_name);
5865: END IF;
5866: --
5867: RETURN;
5868: --
5870:
5871: l_cont_instance_id := l_cont_tab(1);
5872:
5873: IF l_debug_on THEN
5874: WSH_DEBUG_SV.log(l_module_name,'Create_Cont_Instance_Multi l_return_status',l_return_status);
5875: END IF;
5876:
5877: IF (l_return_status NOT IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS,
5878: WSH_UTIL_CORE.G_RET_STS_WARNING)) THEN
5877: IF (l_return_status NOT IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS,
5878: WSH_UTIL_CORE.G_RET_STS_WARNING)) THEN
5879: x_return_status := l_return_status;
5880: IF l_debug_on THEN
5881: WSH_DEBUG_SV.pop(l_module_name);
5882: END IF;
5883: RETURN; -- bug 3703648: should return immediately to avoid spurious messages created by subsequent calls
5884: END IF ;
5885: -- K LPN CONV. rvishnuv
5889: --
5890: -- Debug Statements
5891: --
5892: IF l_debug_on THEN
5893: WSH_DEBUG_SV.logmsg(l_module_name, 'FETCHING DELIVERY DETAIL OF CONTAINER WITH LPN' );
5894: END IF;
5895: --
5896: -- Bug 4093619(FP-4145867): Modified following query to fetch delivery grouping
5897: -- attributes of container record
5920: AND released_status = 'X'
5921: AND nvl(line_direction , 'O') IN ('O', 'IO'); -- J-IB-JCKWOK
5922:
5923: IF l_debug_on THEN
5924: WSH_DEBUG_SV.log(l_module_name, 'l_cont_instance_id', l_cont_instance_id);
5925: WSH_DEBUG_SV.log(l_module_name, 'l_customer_id', l_customer_id);
5926: WSH_DEBUG_SV.log(l_module_name, 'l_ship_to_location_id', l_ship_to_location_id);
5927: WSH_DEBUG_SV.log(l_module_name, 'l_intmed_ship_to_location_id', l_intmed_ship_to_location_id);
5928: WSH_DEBUG_SV.log(l_module_name, 'l_deliver_to_location_id', l_deliver_to_location_id);
5921: AND nvl(line_direction , 'O') IN ('O', 'IO'); -- J-IB-JCKWOK
5922:
5923: IF l_debug_on THEN
5924: WSH_DEBUG_SV.log(l_module_name, 'l_cont_instance_id', l_cont_instance_id);
5925: WSH_DEBUG_SV.log(l_module_name, 'l_customer_id', l_customer_id);
5926: WSH_DEBUG_SV.log(l_module_name, 'l_ship_to_location_id', l_ship_to_location_id);
5927: WSH_DEBUG_SV.log(l_module_name, 'l_intmed_ship_to_location_id', l_intmed_ship_to_location_id);
5928: WSH_DEBUG_SV.log(l_module_name, 'l_deliver_to_location_id', l_deliver_to_location_id);
5929: WSH_DEBUG_SV.log(l_module_name, 'l_fob_code', l_fob_code);
5922:
5923: IF l_debug_on THEN
5924: WSH_DEBUG_SV.log(l_module_name, 'l_cont_instance_id', l_cont_instance_id);
5925: WSH_DEBUG_SV.log(l_module_name, 'l_customer_id', l_customer_id);
5926: WSH_DEBUG_SV.log(l_module_name, 'l_ship_to_location_id', l_ship_to_location_id);
5927: WSH_DEBUG_SV.log(l_module_name, 'l_intmed_ship_to_location_id', l_intmed_ship_to_location_id);
5928: WSH_DEBUG_SV.log(l_module_name, 'l_deliver_to_location_id', l_deliver_to_location_id);
5929: WSH_DEBUG_SV.log(l_module_name, 'l_fob_code', l_fob_code);
5930: WSH_DEBUG_SV.log(l_module_name, 'l_freight_terms_code', l_freight_terms_code);
5923: IF l_debug_on THEN
5924: WSH_DEBUG_SV.log(l_module_name, 'l_cont_instance_id', l_cont_instance_id);
5925: WSH_DEBUG_SV.log(l_module_name, 'l_customer_id', l_customer_id);
5926: WSH_DEBUG_SV.log(l_module_name, 'l_ship_to_location_id', l_ship_to_location_id);
5927: WSH_DEBUG_SV.log(l_module_name, 'l_intmed_ship_to_location_id', l_intmed_ship_to_location_id);
5928: WSH_DEBUG_SV.log(l_module_name, 'l_deliver_to_location_id', l_deliver_to_location_id);
5929: WSH_DEBUG_SV.log(l_module_name, 'l_fob_code', l_fob_code);
5930: WSH_DEBUG_SV.log(l_module_name, 'l_freight_terms_code', l_freight_terms_code);
5931: WSH_DEBUG_SV.log(l_module_name, 'l_ship_method_code', l_ship_method_code);
5924: WSH_DEBUG_SV.log(l_module_name, 'l_cont_instance_id', l_cont_instance_id);
5925: WSH_DEBUG_SV.log(l_module_name, 'l_customer_id', l_customer_id);
5926: WSH_DEBUG_SV.log(l_module_name, 'l_ship_to_location_id', l_ship_to_location_id);
5927: WSH_DEBUG_SV.log(l_module_name, 'l_intmed_ship_to_location_id', l_intmed_ship_to_location_id);
5928: WSH_DEBUG_SV.log(l_module_name, 'l_deliver_to_location_id', l_deliver_to_location_id);
5929: WSH_DEBUG_SV.log(l_module_name, 'l_fob_code', l_fob_code);
5930: WSH_DEBUG_SV.log(l_module_name, 'l_freight_terms_code', l_freight_terms_code);
5931: WSH_DEBUG_SV.log(l_module_name, 'l_ship_method_code', l_ship_method_code);
5932: WSH_DEBUG_SV.log(l_module_name, 'l_line_direction', l_line_direction);
5925: WSH_DEBUG_SV.log(l_module_name, 'l_customer_id', l_customer_id);
5926: WSH_DEBUG_SV.log(l_module_name, 'l_ship_to_location_id', l_ship_to_location_id);
5927: WSH_DEBUG_SV.log(l_module_name, 'l_intmed_ship_to_location_id', l_intmed_ship_to_location_id);
5928: WSH_DEBUG_SV.log(l_module_name, 'l_deliver_to_location_id', l_deliver_to_location_id);
5929: WSH_DEBUG_SV.log(l_module_name, 'l_fob_code', l_fob_code);
5930: WSH_DEBUG_SV.log(l_module_name, 'l_freight_terms_code', l_freight_terms_code);
5931: WSH_DEBUG_SV.log(l_module_name, 'l_ship_method_code', l_ship_method_code);
5932: WSH_DEBUG_SV.log(l_module_name, 'l_line_direction', l_line_direction);
5933: WSH_DEBUG_SV.log(l_module_name, 'l_ignore_for_planning', l_ignore_for_planning);
5926: WSH_DEBUG_SV.log(l_module_name, 'l_ship_to_location_id', l_ship_to_location_id);
5927: WSH_DEBUG_SV.log(l_module_name, 'l_intmed_ship_to_location_id', l_intmed_ship_to_location_id);
5928: WSH_DEBUG_SV.log(l_module_name, 'l_deliver_to_location_id', l_deliver_to_location_id);
5929: WSH_DEBUG_SV.log(l_module_name, 'l_fob_code', l_fob_code);
5930: WSH_DEBUG_SV.log(l_module_name, 'l_freight_terms_code', l_freight_terms_code);
5931: WSH_DEBUG_SV.log(l_module_name, 'l_ship_method_code', l_ship_method_code);
5932: WSH_DEBUG_SV.log(l_module_name, 'l_line_direction', l_line_direction);
5933: WSH_DEBUG_SV.log(l_module_name, 'l_ignore_for_planning', l_ignore_for_planning);
5934: WSH_DEBUG_SV.log(l_module_name, 'l_shipping_control', l_shipping_control);
5927: WSH_DEBUG_SV.log(l_module_name, 'l_intmed_ship_to_location_id', l_intmed_ship_to_location_id);
5928: WSH_DEBUG_SV.log(l_module_name, 'l_deliver_to_location_id', l_deliver_to_location_id);
5929: WSH_DEBUG_SV.log(l_module_name, 'l_fob_code', l_fob_code);
5930: WSH_DEBUG_SV.log(l_module_name, 'l_freight_terms_code', l_freight_terms_code);
5931: WSH_DEBUG_SV.log(l_module_name, 'l_ship_method_code', l_ship_method_code);
5932: WSH_DEBUG_SV.log(l_module_name, 'l_line_direction', l_line_direction);
5933: WSH_DEBUG_SV.log(l_module_name, 'l_ignore_for_planning', l_ignore_for_planning);
5934: WSH_DEBUG_SV.log(l_module_name, 'l_shipping_control', l_shipping_control);
5935: WSH_DEBUG_SV.log(l_module_name, 'l_carrier_id', l_carrier_id);
5928: WSH_DEBUG_SV.log(l_module_name, 'l_deliver_to_location_id', l_deliver_to_location_id);
5929: WSH_DEBUG_SV.log(l_module_name, 'l_fob_code', l_fob_code);
5930: WSH_DEBUG_SV.log(l_module_name, 'l_freight_terms_code', l_freight_terms_code);
5931: WSH_DEBUG_SV.log(l_module_name, 'l_ship_method_code', l_ship_method_code);
5932: WSH_DEBUG_SV.log(l_module_name, 'l_line_direction', l_line_direction);
5933: WSH_DEBUG_SV.log(l_module_name, 'l_ignore_for_planning', l_ignore_for_planning);
5934: WSH_DEBUG_SV.log(l_module_name, 'l_shipping_control', l_shipping_control);
5935: WSH_DEBUG_SV.log(l_module_name, 'l_carrier_id', l_carrier_id);
5936: WSH_DEBUG_SV.log(l_module_name, 'l_service_level', l_service_level);
5929: WSH_DEBUG_SV.log(l_module_name, 'l_fob_code', l_fob_code);
5930: WSH_DEBUG_SV.log(l_module_name, 'l_freight_terms_code', l_freight_terms_code);
5931: WSH_DEBUG_SV.log(l_module_name, 'l_ship_method_code', l_ship_method_code);
5932: WSH_DEBUG_SV.log(l_module_name, 'l_line_direction', l_line_direction);
5933: WSH_DEBUG_SV.log(l_module_name, 'l_ignore_for_planning', l_ignore_for_planning);
5934: WSH_DEBUG_SV.log(l_module_name, 'l_shipping_control', l_shipping_control);
5935: WSH_DEBUG_SV.log(l_module_name, 'l_carrier_id', l_carrier_id);
5936: WSH_DEBUG_SV.log(l_module_name, 'l_service_level', l_service_level);
5937: WSH_DEBUG_SV.log(l_module_name, 'l_mode_of_transport', l_mode_of_transport);
5930: WSH_DEBUG_SV.log(l_module_name, 'l_freight_terms_code', l_freight_terms_code);
5931: WSH_DEBUG_SV.log(l_module_name, 'l_ship_method_code', l_ship_method_code);
5932: WSH_DEBUG_SV.log(l_module_name, 'l_line_direction', l_line_direction);
5933: WSH_DEBUG_SV.log(l_module_name, 'l_ignore_for_planning', l_ignore_for_planning);
5934: WSH_DEBUG_SV.log(l_module_name, 'l_shipping_control', l_shipping_control);
5935: WSH_DEBUG_SV.log(l_module_name, 'l_carrier_id', l_carrier_id);
5936: WSH_DEBUG_SV.log(l_module_name, 'l_service_level', l_service_level);
5937: WSH_DEBUG_SV.log(l_module_name, 'l_mode_of_transport', l_mode_of_transport);
5938: WSH_DEBUG_SV.log(l_module_name, 'l_client_id', l_client_id); -- LSP PROJECT
5931: WSH_DEBUG_SV.log(l_module_name, 'l_ship_method_code', l_ship_method_code);
5932: WSH_DEBUG_SV.log(l_module_name, 'l_line_direction', l_line_direction);
5933: WSH_DEBUG_SV.log(l_module_name, 'l_ignore_for_planning', l_ignore_for_planning);
5934: WSH_DEBUG_SV.log(l_module_name, 'l_shipping_control', l_shipping_control);
5935: WSH_DEBUG_SV.log(l_module_name, 'l_carrier_id', l_carrier_id);
5936: WSH_DEBUG_SV.log(l_module_name, 'l_service_level', l_service_level);
5937: WSH_DEBUG_SV.log(l_module_name, 'l_mode_of_transport', l_mode_of_transport);
5938: WSH_DEBUG_SV.log(l_module_name, 'l_client_id', l_client_id); -- LSP PROJECT
5939: END IF;
5932: WSH_DEBUG_SV.log(l_module_name, 'l_line_direction', l_line_direction);
5933: WSH_DEBUG_SV.log(l_module_name, 'l_ignore_for_planning', l_ignore_for_planning);
5934: WSH_DEBUG_SV.log(l_module_name, 'l_shipping_control', l_shipping_control);
5935: WSH_DEBUG_SV.log(l_module_name, 'l_carrier_id', l_carrier_id);
5936: WSH_DEBUG_SV.log(l_module_name, 'l_service_level', l_service_level);
5937: WSH_DEBUG_SV.log(l_module_name, 'l_mode_of_transport', l_mode_of_transport);
5938: WSH_DEBUG_SV.log(l_module_name, 'l_client_id', l_client_id); -- LSP PROJECT
5939: END IF;
5940: -- End of Bug 4093619(FP-4145867)
5933: WSH_DEBUG_SV.log(l_module_name, 'l_ignore_for_planning', l_ignore_for_planning);
5934: WSH_DEBUG_SV.log(l_module_name, 'l_shipping_control', l_shipping_control);
5935: WSH_DEBUG_SV.log(l_module_name, 'l_carrier_id', l_carrier_id);
5936: WSH_DEBUG_SV.log(l_module_name, 'l_service_level', l_service_level);
5937: WSH_DEBUG_SV.log(l_module_name, 'l_mode_of_transport', l_mode_of_transport);
5938: WSH_DEBUG_SV.log(l_module_name, 'l_client_id', l_client_id); -- LSP PROJECT
5939: END IF;
5940: -- End of Bug 4093619(FP-4145867)
5941:
5934: WSH_DEBUG_SV.log(l_module_name, 'l_shipping_control', l_shipping_control);
5935: WSH_DEBUG_SV.log(l_module_name, 'l_carrier_id', l_carrier_id);
5936: WSH_DEBUG_SV.log(l_module_name, 'l_service_level', l_service_level);
5937: WSH_DEBUG_SV.log(l_module_name, 'l_mode_of_transport', l_mode_of_transport);
5938: WSH_DEBUG_SV.log(l_module_name, 'l_client_id', l_client_id); -- LSP PROJECT
5939: END IF;
5940: -- End of Bug 4093619(FP-4145867)
5941:
5942: END IF ;--}
5951: p_changed_attributes(l_Counter).delivery_detail_id,
5952: l_cont_instance_id,
5953: l_return_status);
5954: IF l_debug_on THEN
5955: WSH_DEBUG_SV.log(l_module_name,'Assign_Detail_To_Cont l_return_status',l_return_status);
5956:
5957: END IF;
5958: --
5959: -- LPN CONV rv
5961: IF (nvl(l_num_containers,0) > 0 ) THEN
5962: --{
5963:
5964: IF l_debug_on THEN
5965: WSH_DEBUG_SV.logmsg(l_module_name,'Updating the master serial number of the container onto the line');
5966: END IF;
5967:
5968: UPDATE WSH_DELIVERY_DETAILS
5969: SET master_serial_number = (select master_serial_number
5985: RETURN;
5986: END IF ;
5987:
5988: IF l_debug_on THEN
5989: WSH_DEBUG_SV.logmsg(l_module_name, 'calling Calculate TP Dates for entity LPN' );
5990: END IF;
5991: --Modified Entity_Type and Entity_ids for bug 5234326
5992: l_cont_tab(1) := l_cont_instance_id;
5993: WSH_TP_RELEASE.calculate_cont_del_tpdates(
5995: p_entity_ids => l_cnt_tab,
5996: x_return_status => l_return_status);
5997:
5998: IF l_debug_on THEN
5999: WSH_DEBUG_SV.log(l_module_name,'calculate_cont_del_tpdates l_return_status',l_return_status);
6000: END IF;
6001:
6002: IF (l_return_status NOT IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS,
6003: WSH_UTIL_CORE.G_RET_STS_WARNING)) THEN
6027: -- code fix per WMS issue where grouping attributes were not updated for a reused container.
6028: -- IF (l_num_containers = 0) THEN
6029: --
6030: IF l_debug_on THEN
6031: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling Update_Cont_Hierarchy as Grouping attributes do not match');
6032: END IF;
6033: WSH_CONTAINER_ACTIONS.Update_Cont_Hierarchy (
6034: p_changed_attributes(l_Counter).delivery_detail_id,
6035: NULL,
6035: NULL,
6036: l_cont_instance_id,
6037: l_return_status);
6038: IF l_debug_on THEN
6039: WSH_DEBUG_SV.log(l_module_name,'Update_Cont_Hierarchy l_return_status',l_return_status);
6040: END IF;
6041:
6042: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6043: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_UPD_ATTR_ERROR');
6060: --
6061: -- Debug Statements
6062: --
6063: IF l_debug_on THEN
6064: WSH_DEBUG_SV.logmsg(l_module_name, 'UPDATE INVENTORY' );
6065: END IF;
6066: --
6067: IF ( l_reject_update = 'Y' ) THEN
6068: FND_MESSAGE.Set_Name('WSH', 'WSH_REJECT_UPDATE_REQUEST');
6086: --
6087: -- Debug Statements
6088: --
6089: IF l_debug_on THEN
6090: WSH_DEBUG_SV.logmsg(l_module_name, 'UPDATE LOCATOR' );
6091: END IF;
6092: --
6093: IF (l_reject_update = 'Y') THEN
6094: -- At least one line is shipped, reject user's request
6112: --
6113: -- Debug Statements
6114: --
6115: IF l_debug_on THEN
6116: WSH_DEBUG_SV.logmsg(l_module_name, 'UPDATE REVISION' );
6117: END IF;
6118: --
6119: IF (l_reject_update = 'Y') THEN
6120: -- At least one line is shipped, reject user's request
6145: --
6146: -- Debug Statements
6147: --
6148: IF l_debug_on THEN
6149: WSH_DEBUG_SV.logmsg(l_module_name, 'UPDATE LOT NUMBER' );
6150: END IF;
6151: --
6152: IF (l_reject_update = 'Y') THEN
6153: -- At least one line is shipped, reject user's request
6174: --
6175: -- Debug Statements
6176: --
6177: IF l_debug_on THEN
6178: WSH_DEBUG_SV.logmsg(l_module_name, 'PREFERRED GRADE' );
6179: END IF;
6180: --
6181: IF (l_reject_update = 'Y') THEN
6182: -- At least one line is shipped, reject user's request
6202: --
6203: -- Debug Statements
6204: --
6205: IF l_debug_on THEN
6206: WSH_DEBUG_SV.logmsg(l_module_name, 'UPDATE TRANSACTION TEMP ID with transaction_temp_id :'||
6207: l_transaction_temp_id ||
6208: ', picked_quantity :'||
6209: p_changed_attributes(l_Counter).picked_quantity );
6210: END IF;
6227: --
6228: -- Debug Statements
6229: --
6230: IF l_debug_on THEN
6231: WSH_DEBUG_SV.logmsg(l_module_name, 'UPDATE SERIAL NUMBER' );
6232: END IF;
6233: --
6234: IF (l_reject_update = 'Y') THEN
6235: -- At least one line is shipped, reject user's request
6253: --
6254: -- Debug Statements
6255: --
6256: IF l_debug_on THEN
6257: WSH_DEBUG_SV.logmsg(l_module_name, 'UPDATE RELEASED STATUS ' );
6258: END IF;
6259: --
6260: IF (l_reject_update = 'Y') THEN
6261: -- At least one line is shipped, reject user's request
6337: x_avail_req_quantity => l_avail_quantity,
6338: x_avail_req_quantity2 => l_avail_quantity2,
6339: x_return_status => l_rs);
6340: IF l_debug_on THEN
6341: WSH_DEBUG_SV.log(l_module_name,'check_quantity_to_pick l_rs',l_rs);
6342: WSH_DEBUG_SV.log(l_module_name,'l_detail_info.req.qty ', l_detail_info.requested_quantity);
6343: WSH_DEBUG_SV.log(l_module_name,'l_avail_qty ', l_avail_quantity);
6344: WSH_DEBUG_SV.log(l_module_name,'chgd.attr picked.qty ', p_changed_attributes(l_counter).picked_quantity);
6345: WSH_DEBUG_SV.log(l_module_name,'l_max_qty ', l_max_quantity);
6338: x_avail_req_quantity2 => l_avail_quantity2,
6339: x_return_status => l_rs);
6340: IF l_debug_on THEN
6341: WSH_DEBUG_SV.log(l_module_name,'check_quantity_to_pick l_rs',l_rs);
6342: WSH_DEBUG_SV.log(l_module_name,'l_detail_info.req.qty ', l_detail_info.requested_quantity);
6343: WSH_DEBUG_SV.log(l_module_name,'l_avail_qty ', l_avail_quantity);
6344: WSH_DEBUG_SV.log(l_module_name,'chgd.attr picked.qty ', p_changed_attributes(l_counter).picked_quantity);
6345: WSH_DEBUG_SV.log(l_module_name,'l_max_qty ', l_max_quantity);
6346: WSH_DEBUG_SV.log(l_module_name,'l_detail_info.req.qty2 ', l_detail_info.requested_quantity2);
6339: x_return_status => l_rs);
6340: IF l_debug_on THEN
6341: WSH_DEBUG_SV.log(l_module_name,'check_quantity_to_pick l_rs',l_rs);
6342: WSH_DEBUG_SV.log(l_module_name,'l_detail_info.req.qty ', l_detail_info.requested_quantity);
6343: WSH_DEBUG_SV.log(l_module_name,'l_avail_qty ', l_avail_quantity);
6344: WSH_DEBUG_SV.log(l_module_name,'chgd.attr picked.qty ', p_changed_attributes(l_counter).picked_quantity);
6345: WSH_DEBUG_SV.log(l_module_name,'l_max_qty ', l_max_quantity);
6346: WSH_DEBUG_SV.log(l_module_name,'l_detail_info.req.qty2 ', l_detail_info.requested_quantity2);
6347: WSH_DEBUG_SV.log(l_module_name,'l_avail_qty2 ', l_avail_quantity2);
6340: IF l_debug_on THEN
6341: WSH_DEBUG_SV.log(l_module_name,'check_quantity_to_pick l_rs',l_rs);
6342: WSH_DEBUG_SV.log(l_module_name,'l_detail_info.req.qty ', l_detail_info.requested_quantity);
6343: WSH_DEBUG_SV.log(l_module_name,'l_avail_qty ', l_avail_quantity);
6344: WSH_DEBUG_SV.log(l_module_name,'chgd.attr picked.qty ', p_changed_attributes(l_counter).picked_quantity);
6345: WSH_DEBUG_SV.log(l_module_name,'l_max_qty ', l_max_quantity);
6346: WSH_DEBUG_SV.log(l_module_name,'l_detail_info.req.qty2 ', l_detail_info.requested_quantity2);
6347: WSH_DEBUG_SV.log(l_module_name,'l_avail_qty2 ', l_avail_quantity2);
6348: WSH_DEBUG_SV.log(l_module_name,'chgd.attr picked.qty2 ', p_changed_attributes(l_counter).picked_quantity2);
6341: WSH_DEBUG_SV.log(l_module_name,'check_quantity_to_pick l_rs',l_rs);
6342: WSH_DEBUG_SV.log(l_module_name,'l_detail_info.req.qty ', l_detail_info.requested_quantity);
6343: WSH_DEBUG_SV.log(l_module_name,'l_avail_qty ', l_avail_quantity);
6344: WSH_DEBUG_SV.log(l_module_name,'chgd.attr picked.qty ', p_changed_attributes(l_counter).picked_quantity);
6345: WSH_DEBUG_SV.log(l_module_name,'l_max_qty ', l_max_quantity);
6346: WSH_DEBUG_SV.log(l_module_name,'l_detail_info.req.qty2 ', l_detail_info.requested_quantity2);
6347: WSH_DEBUG_SV.log(l_module_name,'l_avail_qty2 ', l_avail_quantity2);
6348: WSH_DEBUG_SV.log(l_module_name,'chgd.attr picked.qty2 ', p_changed_attributes(l_counter).picked_quantity2);
6349: WSH_DEBUG_SV.log(l_module_name,'l_max_qty2 ', l_max_quantity2);
6342: WSH_DEBUG_SV.log(l_module_name,'l_detail_info.req.qty ', l_detail_info.requested_quantity);
6343: WSH_DEBUG_SV.log(l_module_name,'l_avail_qty ', l_avail_quantity);
6344: WSH_DEBUG_SV.log(l_module_name,'chgd.attr picked.qty ', p_changed_attributes(l_counter).picked_quantity);
6345: WSH_DEBUG_SV.log(l_module_name,'l_max_qty ', l_max_quantity);
6346: WSH_DEBUG_SV.log(l_module_name,'l_detail_info.req.qty2 ', l_detail_info.requested_quantity2);
6347: WSH_DEBUG_SV.log(l_module_name,'l_avail_qty2 ', l_avail_quantity2);
6348: WSH_DEBUG_SV.log(l_module_name,'chgd.attr picked.qty2 ', p_changed_attributes(l_counter).picked_quantity2);
6349: WSH_DEBUG_SV.log(l_module_name,'l_max_qty2 ', l_max_quantity2);
6350: END IF;
6343: WSH_DEBUG_SV.log(l_module_name,'l_avail_qty ', l_avail_quantity);
6344: WSH_DEBUG_SV.log(l_module_name,'chgd.attr picked.qty ', p_changed_attributes(l_counter).picked_quantity);
6345: WSH_DEBUG_SV.log(l_module_name,'l_max_qty ', l_max_quantity);
6346: WSH_DEBUG_SV.log(l_module_name,'l_detail_info.req.qty2 ', l_detail_info.requested_quantity2);
6347: WSH_DEBUG_SV.log(l_module_name,'l_avail_qty2 ', l_avail_quantity2);
6348: WSH_DEBUG_SV.log(l_module_name,'chgd.attr picked.qty2 ', p_changed_attributes(l_counter).picked_quantity2);
6349: WSH_DEBUG_SV.log(l_module_name,'l_max_qty2 ', l_max_quantity2);
6350: END IF;
6351:
6344: WSH_DEBUG_SV.log(l_module_name,'chgd.attr picked.qty ', p_changed_attributes(l_counter).picked_quantity);
6345: WSH_DEBUG_SV.log(l_module_name,'l_max_qty ', l_max_quantity);
6346: WSH_DEBUG_SV.log(l_module_name,'l_detail_info.req.qty2 ', l_detail_info.requested_quantity2);
6347: WSH_DEBUG_SV.log(l_module_name,'l_avail_qty2 ', l_avail_quantity2);
6348: WSH_DEBUG_SV.log(l_module_name,'chgd.attr picked.qty2 ', p_changed_attributes(l_counter).picked_quantity2);
6349: WSH_DEBUG_SV.log(l_module_name,'l_max_qty2 ', l_max_quantity2);
6350: END IF;
6351:
6352: IF l_rs = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6345: WSH_DEBUG_SV.log(l_module_name,'l_max_qty ', l_max_quantity);
6346: WSH_DEBUG_SV.log(l_module_name,'l_detail_info.req.qty2 ', l_detail_info.requested_quantity2);
6347: WSH_DEBUG_SV.log(l_module_name,'l_avail_qty2 ', l_avail_quantity2);
6348: WSH_DEBUG_SV.log(l_module_name,'chgd.attr picked.qty2 ', p_changed_attributes(l_counter).picked_quantity2);
6349: WSH_DEBUG_SV.log(l_module_name,'l_max_qty2 ', l_max_quantity2);
6350: END IF;
6351:
6352: IF l_rs = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6353: IF l_debug_on THEN
6350: END IF;
6351:
6352: IF l_rs = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6353: IF l_debug_on THEN
6354: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_SHIPPING_PARAMS_PVT.GET', WSH_DEBUG_SV.C_PROC_LEVEL);
6355: END IF;
6356: wsh_shipping_params_pvt.get(
6357: p_organization_id => l_detail_info.organization_id,
6358: x_param_info => l_ship_params,
6358: x_param_info => l_ship_params,
6359: x_return_status => l_ret_status);
6360:
6361: IF l_debug_on THEN
6362: WSH_DEBUG_SV.log(l_module_name,'wsh_shipping_params_pvt.get l_ret_status',l_ret_status);
6363: WSH_DEBUG_SV.log(l_module_name,'l_ship_params.retain_nonstaged_det_flag',l_ship_params.retain_nonstaged_det_flag);
6364: END IF;
6365:
6366: -- bug 7131800
6359: x_return_status => l_ret_status);
6360:
6361: IF l_debug_on THEN
6362: WSH_DEBUG_SV.log(l_module_name,'wsh_shipping_params_pvt.get l_ret_status',l_ret_status);
6363: WSH_DEBUG_SV.log(l_module_name,'l_ship_params.retain_nonstaged_det_flag',l_ship_params.retain_nonstaged_det_flag);
6364: END IF;
6365:
6366: -- bug 7131800
6367: IF NOT INV_GMI_RSV_BRANCH.Process_Branch(p_organization_id => l_detail_info.organization_id) THEN
6370: l_process_flag := FND_API.G_TRUE;
6371: END IF;
6372:
6373: IF l_debug_on THEN
6374: WSH_DEBUG_SV.log(l_module_name,'l_process_flag',l_process_flag);
6375: END IF;
6376:
6377:
6378: IF l_ret_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6408: END IF;
6409: --Bug 7131800
6410: IF l_debug_on THEN
6411: -- muom
6412: WSH_DEBUG_SV.logmsg(l_module_name,'l_new_req_qty '||l_new_req_quantity||' l_new_req_quantity2 '||l_new_req_quantity2);
6413: END IF;
6414:
6415: IF l_new_req_quantity > l_detail_info.requested_quantity OR nvl(l_new_req_quantity2,0) > nvl(l_detail_info.requested_quantity2,0)THEN
6416:
6458: --
6459: -- Debug Statements
6460: --
6461: IF l_debug_on THEN
6462: WSH_DEBUG_SV.logmsg(l_module_name, ' l_update_transaction_temp_id '||l_update_transaction_temp_id||
6463: ' l_update_serial_number '||l_update_serial_number||
6464: ' p_changed_attributes(l_counter).picked_quantity '||p_changed_attributes(l_counter).picked_quantity||
6465: ' l_new_req_quantity '||l_new_req_quantity||
6466: ' l_new_req_quantity2 '||l_new_req_quantity2||
6502: --
6503: -- Debug Statements
6504: --
6505: IF l_debug_on THEN
6506: WSH_DEBUG_SV.logmsg(l_module_name, 'UPDATE WSH_DELIVERY_DETAILS' );
6507: END IF;
6508: --
6509:
6510: -- muom
6528: THEN
6529: l_under_pick_post_process_flag := 'Y'; --Bug7592072
6530: -- muom
6531: IF l_debug_on THEN
6532: WSH_DEBUG_SV.log(l_module_name, 'Inside Action U ');
6533: WSH_DEBUG_SV.log(l_module_name, 'l_fulfillment+base ', l_fulfillment_base);
6534: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity', l_pending_quantity);
6535: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity2', l_pending_quantity2);
6536: WSH_DEBUG_SV.log(l_module_name, 'l_picked_qty ', p_Changed_Attributes(l_counter).picked_quantity);
6529: l_under_pick_post_process_flag := 'Y'; --Bug7592072
6530: -- muom
6531: IF l_debug_on THEN
6532: WSH_DEBUG_SV.log(l_module_name, 'Inside Action U ');
6533: WSH_DEBUG_SV.log(l_module_name, 'l_fulfillment+base ', l_fulfillment_base);
6534: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity', l_pending_quantity);
6535: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity2', l_pending_quantity2);
6536: WSH_DEBUG_SV.log(l_module_name, 'l_picked_qty ', p_Changed_Attributes(l_counter).picked_quantity);
6537: WSH_DEBUG_SV.log(l_module_name, 'l_picked_qty2 ',p_Changed_Attributes(l_counter).picked_quantity2);
6530: -- muom
6531: IF l_debug_on THEN
6532: WSH_DEBUG_SV.log(l_module_name, 'Inside Action U ');
6533: WSH_DEBUG_SV.log(l_module_name, 'l_fulfillment+base ', l_fulfillment_base);
6534: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity', l_pending_quantity);
6535: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity2', l_pending_quantity2);
6536: WSH_DEBUG_SV.log(l_module_name, 'l_picked_qty ', p_Changed_Attributes(l_counter).picked_quantity);
6537: WSH_DEBUG_SV.log(l_module_name, 'l_picked_qty2 ',p_Changed_Attributes(l_counter).picked_quantity2);
6538: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity2', l_pending_quantity2);
6531: IF l_debug_on THEN
6532: WSH_DEBUG_SV.log(l_module_name, 'Inside Action U ');
6533: WSH_DEBUG_SV.log(l_module_name, 'l_fulfillment+base ', l_fulfillment_base);
6534: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity', l_pending_quantity);
6535: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity2', l_pending_quantity2);
6536: WSH_DEBUG_SV.log(l_module_name, 'l_picked_qty ', p_Changed_Attributes(l_counter).picked_quantity);
6537: WSH_DEBUG_SV.log(l_module_name, 'l_picked_qty2 ',p_Changed_Attributes(l_counter).picked_quantity2);
6538: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity2', l_pending_quantity2);
6539: END IF;
6532: WSH_DEBUG_SV.log(l_module_name, 'Inside Action U ');
6533: WSH_DEBUG_SV.log(l_module_name, 'l_fulfillment+base ', l_fulfillment_base);
6534: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity', l_pending_quantity);
6535: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity2', l_pending_quantity2);
6536: WSH_DEBUG_SV.log(l_module_name, 'l_picked_qty ', p_Changed_Attributes(l_counter).picked_quantity);
6537: WSH_DEBUG_SV.log(l_module_name, 'l_picked_qty2 ',p_Changed_Attributes(l_counter).picked_quantity2);
6538: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity2', l_pending_quantity2);
6539: END IF;
6540: if (l_pending_quantity2 is Null or l_pending_quantity2 = 0) and
6533: WSH_DEBUG_SV.log(l_module_name, 'l_fulfillment+base ', l_fulfillment_base);
6534: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity', l_pending_quantity);
6535: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity2', l_pending_quantity2);
6536: WSH_DEBUG_SV.log(l_module_name, 'l_picked_qty ', p_Changed_Attributes(l_counter).picked_quantity);
6537: WSH_DEBUG_SV.log(l_module_name, 'l_picked_qty2 ',p_Changed_Attributes(l_counter).picked_quantity2);
6538: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity2', l_pending_quantity2);
6539: END IF;
6540: if (l_pending_quantity2 is Null or l_pending_quantity2 = 0) and
6541: p_changed_attributes(l_counter).pending_quantity2 is not null then
6534: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity', l_pending_quantity);
6535: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity2', l_pending_quantity2);
6536: WSH_DEBUG_SV.log(l_module_name, 'l_picked_qty ', p_Changed_Attributes(l_counter).picked_quantity);
6537: WSH_DEBUG_SV.log(l_module_name, 'l_picked_qty2 ',p_Changed_Attributes(l_counter).picked_quantity2);
6538: WSH_DEBUG_SV.log(l_module_name, 'l_pending_quantity2', l_pending_quantity2);
6539: END IF;
6540: if (l_pending_quantity2 is Null or l_pending_quantity2 = 0) and
6541: p_changed_attributes(l_counter).pending_quantity2 is not null then
6542: l_pending_quantity2 := p_changed_attributes(l_counter).pending_quantity2;
6578: --
6579: -- Debug Statements
6580: --
6581: IF l_debug_on THEN
6582: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_SHIPPING_PARAMS_PVT. Get_Global_Parameters',WSH_DEBUG_SV.C_PROC_LEVEL);
6583: END IF;
6584: --
6585: WSH_SHIPPING_PARAMS_PVT. Get_Global_Parameters(l_global_param_rec_type,l_return_status);
6586: --
6584: --
6585: WSH_SHIPPING_PARAMS_PVT. Get_Global_Parameters(l_global_param_rec_type,l_return_status);
6586: --
6587: IF l_debug_on THEN
6588: WSH_DEBUG_SV.logmsg(l_module_name, 'After calling Get_Global_Parameters: ' || l_return_status );
6589: END IF;
6590: --
6591: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
6592: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6640: --
6641: -- Debug Statements
6642: --
6643: IF l_debug_on THEN
6644: WSH_DEBUG_SV.log(l_module_name, 'CONSOLIDATE_SOURCE_LINE BEING CALLED WITH FOLLOWING PARAMETERS');
6645: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',old_Delivery_detail_rec.delivery_detail_id);
6646: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',old_Delivery_detail_rec.requested_quantity);
6647: WSH_DEBUG_SV.log(l_module_name,'Back Order Qty:',old_Delivery_detail_rec.requested_quantity - l_split_quantity);
6648: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY2',old_Delivery_detail_rec.requested_quantity2);
6641: -- Debug Statements
6642: --
6643: IF l_debug_on THEN
6644: WSH_DEBUG_SV.log(l_module_name, 'CONSOLIDATE_SOURCE_LINE BEING CALLED WITH FOLLOWING PARAMETERS');
6645: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',old_Delivery_detail_rec.delivery_detail_id);
6646: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',old_Delivery_detail_rec.requested_quantity);
6647: WSH_DEBUG_SV.log(l_module_name,'Back Order Qty:',old_Delivery_detail_rec.requested_quantity - l_split_quantity);
6648: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY2',old_Delivery_detail_rec.requested_quantity2);
6649: WSH_DEBUG_SV.log(l_module_name,'Back Order Qty2:',l_Cons_Source_Line_Rec_Tab(1).bo_qty2);
6642: --
6643: IF l_debug_on THEN
6644: WSH_DEBUG_SV.log(l_module_name, 'CONSOLIDATE_SOURCE_LINE BEING CALLED WITH FOLLOWING PARAMETERS');
6645: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',old_Delivery_detail_rec.delivery_detail_id);
6646: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',old_Delivery_detail_rec.requested_quantity);
6647: WSH_DEBUG_SV.log(l_module_name,'Back Order Qty:',old_Delivery_detail_rec.requested_quantity - l_split_quantity);
6648: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY2',old_Delivery_detail_rec.requested_quantity2);
6649: WSH_DEBUG_SV.log(l_module_name,'Back Order Qty2:',l_Cons_Source_Line_Rec_Tab(1).bo_qty2);
6650:
6643: IF l_debug_on THEN
6644: WSH_DEBUG_SV.log(l_module_name, 'CONSOLIDATE_SOURCE_LINE BEING CALLED WITH FOLLOWING PARAMETERS');
6645: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',old_Delivery_detail_rec.delivery_detail_id);
6646: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',old_Delivery_detail_rec.requested_quantity);
6647: WSH_DEBUG_SV.log(l_module_name,'Back Order Qty:',old_Delivery_detail_rec.requested_quantity - l_split_quantity);
6648: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY2',old_Delivery_detail_rec.requested_quantity2);
6649: WSH_DEBUG_SV.log(l_module_name,'Back Order Qty2:',l_Cons_Source_Line_Rec_Tab(1).bo_qty2);
6650:
6651: END IF;
6644: WSH_DEBUG_SV.log(l_module_name, 'CONSOLIDATE_SOURCE_LINE BEING CALLED WITH FOLLOWING PARAMETERS');
6645: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',old_Delivery_detail_rec.delivery_detail_id);
6646: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',old_Delivery_detail_rec.requested_quantity);
6647: WSH_DEBUG_SV.log(l_module_name,'Back Order Qty:',old_Delivery_detail_rec.requested_quantity - l_split_quantity);
6648: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY2',old_Delivery_detail_rec.requested_quantity2);
6649: WSH_DEBUG_SV.log(l_module_name,'Back Order Qty2:',l_Cons_Source_Line_Rec_Tab(1).bo_qty2);
6650:
6651: END IF;
6652: --
6645: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',old_Delivery_detail_rec.delivery_detail_id);
6646: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',old_Delivery_detail_rec.requested_quantity);
6647: WSH_DEBUG_SV.log(l_module_name,'Back Order Qty:',old_Delivery_detail_rec.requested_quantity - l_split_quantity);
6648: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY2',old_Delivery_detail_rec.requested_quantity2);
6649: WSH_DEBUG_SV.log(l_module_name,'Back Order Qty2:',l_Cons_Source_Line_Rec_Tab(1).bo_qty2);
6650:
6651: END IF;
6652: --
6653: WSH_DELIVERY_DETAILS_ACTIONS.Consolidate_Source_Line(
6655: x_consolidate_ids => l_cons_dd_ids,
6656: x_return_status => l_return_status);
6657:
6658: IF l_debug_on THEN
6659: WSH_DEBUG_SV.log(l_module_name,'After calling CONSOLIDATE_SOURCE_LINE: ',l_return_status);
6660: END IF;
6661: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
6662: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6663: END IF;
6664:
6665: IF ( l_cons_dd_ids(1) <> p_Changed_attributes(l_counter).delivery_detail_id ) THEN
6666: l_cons_flag := 'Y';
6667: IF l_debug_on THEN
6668: WSH_DEBUG_SV.log(l_module_name,'Consolidated the Del Det Id: ',old_Delivery_detail_rec.delivery_detail_id);
6669: END IF;
6670: l_dummy_detail_id := p_Changed_attributes(l_counter).delivery_detail_id;
6671: ELSE
6672: IF l_debug_on THEN
6669: END IF;
6670: l_dummy_detail_id := p_Changed_attributes(l_counter).delivery_detail_id;
6671: ELSE
6672: IF l_debug_on THEN
6673: WSH_DEBUG_SV.log(l_module_name,'Consolidation not happened for the the Del Det Id: ',old_Delivery_detail_rec.delivery_detail_id);
6674: END IF;
6675: END IF;
6676:
6677: END IF; -- End of Consolidation of BO DD's
6679: -- IF no consolidation then Split the line
6680: -- muom
6681: IF ( l_cons_flag = 'N' and l_split_flag = 'Y' ) THEN
6682: IF l_debug_on THEN
6683: WSH_DEBUG_SV.log(l_module_name, 'Before Split Details API');
6684: WSH_DEBUG_SV.log(l_module_name, 'Req. Qty.', l_split_quantity);
6685: WSH_DEBUG_SV.log(l_module_name, 'Req. Qty2.', l_split_quantity2);
6686: END IF;
6687:
6680: -- muom
6681: IF ( l_cons_flag = 'N' and l_split_flag = 'Y' ) THEN
6682: IF l_debug_on THEN
6683: WSH_DEBUG_SV.log(l_module_name, 'Before Split Details API');
6684: WSH_DEBUG_SV.log(l_module_name, 'Req. Qty.', l_split_quantity);
6685: WSH_DEBUG_SV.log(l_module_name, 'Req. Qty2.', l_split_quantity2);
6686: END IF;
6687:
6688: WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details(
6681: IF ( l_cons_flag = 'N' and l_split_flag = 'Y' ) THEN
6682: IF l_debug_on THEN
6683: WSH_DEBUG_SV.log(l_module_name, 'Before Split Details API');
6684: WSH_DEBUG_SV.log(l_module_name, 'Req. Qty.', l_split_quantity);
6685: WSH_DEBUG_SV.log(l_module_name, 'Req. Qty2.', l_split_quantity2);
6686: END IF;
6687:
6688: WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details(
6689: p_from_detail_id => p_Changed_attributes(l_counter).delivery_detail_id,
6692: x_return_status => l_return_status,
6693: p_req_quantity2 => nvl(l_split_quantity2,0),
6694: p_manual_split => p_changed_attributes(l_counter).action_flag);
6695: IF l_debug_on THEN
6696: WSH_DEBUG_SV.log(l_module_name,'Split_Delivery_Details l_return_status',l_return_status);
6697: END IF;
6698:
6699:
6700: -- Bug 3724578 : Return back to the caller if any error occures while
6709: --
6710: -- Debug Statements
6711: --
6712: IF l_debug_on THEN
6713: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_USA_INV_PVT. BACKORDERED_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
6714: END IF;
6715: --
6716: --Bug# 5436033
6717: --do not calculate the qty2 convert from bo_Qty Cause this is like entering a new line
6766: , from_uom => old_Delivery_detail_rec.requested_quantity_uom2
6767: , to_uom => old_Delivery_detail_rec.requested_quantity_uom
6768: );
6769: IF l_debug_on THEN
6770: WSH_DEBUG_SV.log(l_module_name, 'Before BackOrder API');
6771: WSH_DEBUG_SV.log(l_module_name, 'New Req. Qty.', l_new_requested_quantity);
6772: WSH_DEBUG_SV.log(l_module_name, 'Req. Qty2.', (old_Delivery_detail_rec.requested_quantity2 - p_changed_attributes(l_Counter).picked_quantity2) );
6773: END IF;
6774:
6767: , to_uom => old_Delivery_detail_rec.requested_quantity_uom
6768: );
6769: IF l_debug_on THEN
6770: WSH_DEBUG_SV.log(l_module_name, 'Before BackOrder API');
6771: WSH_DEBUG_SV.log(l_module_name, 'New Req. Qty.', l_new_requested_quantity);
6772: WSH_DEBUG_SV.log(l_module_name, 'Req. Qty2.', (old_Delivery_detail_rec.requested_quantity2 - p_changed_attributes(l_Counter).picked_quantity2) );
6773: END IF;
6774:
6775: backorder_delivery_detail(
6768: );
6769: IF l_debug_on THEN
6770: WSH_DEBUG_SV.log(l_module_name, 'Before BackOrder API');
6771: WSH_DEBUG_SV.log(l_module_name, 'New Req. Qty.', l_new_requested_quantity);
6772: WSH_DEBUG_SV.log(l_module_name, 'Req. Qty2.', (old_Delivery_detail_rec.requested_quantity2 - p_changed_attributes(l_Counter).picked_quantity2) );
6773: END IF;
6774:
6775: backorder_delivery_detail(
6776: p_delivery_detail_id => p_changed_attributes(l_counter).delivery_detail_id,
6795: IF (l_update_transaction_temp_id = 'Y' OR l_update_serial_number = 'Y' or l_wms_enabled_flag = 'Y' ) THEN
6796: l_update_shipped_quantity := 'Y';
6797: END IF;
6798: IF l_debug_on THEN
6799: WSH_DEBUG_SV.log(l_module_name, 'Right before update');
6800: WSH_DEBUG_SV.log(l_module_name, 'l_new_req_quantity2', l_new_req_quantity2);
6801: END IF;
6802: -- bug 2120494
6803: UPDATE wsh_delivery_details
6796: l_update_shipped_quantity := 'Y';
6797: END IF;
6798: IF l_debug_on THEN
6799: WSH_DEBUG_SV.log(l_module_name, 'Right before update');
6800: WSH_DEBUG_SV.log(l_module_name, 'l_new_req_quantity2', l_new_req_quantity2);
6801: END IF;
6802: -- bug 2120494
6803: UPDATE wsh_delivery_details
6804: SET subinventory = decode(l_update_sub,'Y',p_Changed_Attributes(l_Counter).subinventory,subinventory),
6854: p_event => 'oracle.apps.wsh.line.gen.staged' ,
6855: p_organization_id => l_organization_id,
6856: x_return_status => l_wf_rs ) ;
6857: IF l_debug_on THEN
6858: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
6859: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
6860: END IF;
6861: --Done Raise Event : Pick To Pod Workflow
6862:
6855: p_organization_id => l_organization_id,
6856: x_return_status => l_wf_rs ) ;
6857: IF l_debug_on THEN
6858: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
6859: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
6860: END IF;
6861: --Done Raise Event : Pick To Pod Workflow
6862:
6863:
6867: -- Update of wsh_delivery_details where requested_quantity
6868: -- are changed, call DBI API after the update.
6869: -- DBI API checks for DBI Installed also
6870: IF l_debug_on THEN
6871: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Detail id-',l_dummy_detail_id);
6872: END IF;
6873: l_detail_tab(1) := l_dummy_detail_id;
6874: WSH_INTEGRATION.DBI_Update_Detail_Log
6875: (p_delivery_detail_id_tab => l_detail_tab,
6876: p_dml_type => 'UPDATE',
6877: x_return_status => l_dbi_rs);
6878:
6879: IF l_debug_on THEN
6880: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
6881: END IF;
6882: -- DBI API can only raise unexpected error, in that case need to
6883: -- pass it to the caller API for roll back of the whole transaction
6884: -- Only need to handle Unexpected error, rest are treated as success
6885: -- Since code is not proceeding, no need to reset x_return_status
6886: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
6887: x_return_status := l_dbi_rs;
6888: IF l_debug_on THEN
6889: WSH_DEBUG_SV.pop(l_module_name);
6890: END IF;
6891: RETURN;
6892: END IF;
6893:
6904: /* Bug 2740833: After updating the wdd with the overpick qty, the weight and the volume needs to be re-calculated.*/
6905: -- J: W/V Changes
6906: -- Bug7592072 Begin
6907: IF l_debug_on THEN
6908: WSH_DEBUG_SV.log(l_module_name,'l_under_pick_post_process_flag',l_under_pick_post_process_flag);
6909: WSH_DEBUG_SV.log(l_module_name,'p_changed_attributes(l_Counter).transfer_lpn_id',p_changed_attributes(l_Counter).transfer_lpn_id);
6910: WSH_DEBUG_SV.log(l_module_name,'l_cont_instance_id',l_cont_instance_id);
6911: WSH_DEBUG_SV.log(l_module_name,'l_wms_enabled_flag',l_wms_enabled_flag);
6912: END IF;
6905: -- J: W/V Changes
6906: -- Bug7592072 Begin
6907: IF l_debug_on THEN
6908: WSH_DEBUG_SV.log(l_module_name,'l_under_pick_post_process_flag',l_under_pick_post_process_flag);
6909: WSH_DEBUG_SV.log(l_module_name,'p_changed_attributes(l_Counter).transfer_lpn_id',p_changed_attributes(l_Counter).transfer_lpn_id);
6910: WSH_DEBUG_SV.log(l_module_name,'l_cont_instance_id',l_cont_instance_id);
6911: WSH_DEBUG_SV.log(l_module_name,'l_wms_enabled_flag',l_wms_enabled_flag);
6912: END IF;
6913: IF ( l_under_pick_post_process_flag = 'Y' AND l_cont_instance_id IS NOT NULL AND l_wms_enabled_flag = 'Y'
6906: -- Bug7592072 Begin
6907: IF l_debug_on THEN
6908: WSH_DEBUG_SV.log(l_module_name,'l_under_pick_post_process_flag',l_under_pick_post_process_flag);
6909: WSH_DEBUG_SV.log(l_module_name,'p_changed_attributes(l_Counter).transfer_lpn_id',p_changed_attributes(l_Counter).transfer_lpn_id);
6910: WSH_DEBUG_SV.log(l_module_name,'l_cont_instance_id',l_cont_instance_id);
6911: WSH_DEBUG_SV.log(l_module_name,'l_wms_enabled_flag',l_wms_enabled_flag);
6912: END IF;
6913: IF ( l_under_pick_post_process_flag = 'Y' AND l_cont_instance_id IS NOT NULL AND l_wms_enabled_flag = 'Y'
6914: AND p_changed_attributes(l_Counter).transfer_lpn_id IS NOT NULL) THEN
6907: IF l_debug_on THEN
6908: WSH_DEBUG_SV.log(l_module_name,'l_under_pick_post_process_flag',l_under_pick_post_process_flag);
6909: WSH_DEBUG_SV.log(l_module_name,'p_changed_attributes(l_Counter).transfer_lpn_id',p_changed_attributes(l_Counter).transfer_lpn_id);
6910: WSH_DEBUG_SV.log(l_module_name,'l_cont_instance_id',l_cont_instance_id);
6911: WSH_DEBUG_SV.log(l_module_name,'l_wms_enabled_flag',l_wms_enabled_flag);
6912: END IF;
6913: IF ( l_under_pick_post_process_flag = 'Y' AND l_cont_instance_id IS NOT NULL AND l_wms_enabled_flag = 'Y'
6914: AND p_changed_attributes(l_Counter).transfer_lpn_id IS NOT NULL) THEN
6915: --{
6913: IF ( l_under_pick_post_process_flag = 'Y' AND l_cont_instance_id IS NOT NULL AND l_wms_enabled_flag = 'Y'
6914: AND p_changed_attributes(l_Counter).transfer_lpn_id IS NOT NULL) THEN
6915: --{
6916: IF l_debug_on THEN
6917: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONTAINER_WEIGHT_VOLUME',WSH_DEBUG_SV.C_PROC_LEVEL);
6918: END IF;
6919: --
6920: WSH_WV_UTILS.Container_Weight_Volume (
6921: p_container_instance_id => l_cont_instance_id,
6930: x_return_status => x_return_status);
6931: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
6932: x_return_status := l_return_status;
6933: IF l_debug_on THEN
6934: WSH_DEBUG_SV.pop(l_module_name,'Container_Weight_Volume returned '||l_return_status);
6935: WSH_DEBUG_SV.pop(l_module_name);
6936: END IF;
6937: return;
6938: END IF;
6931: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
6932: x_return_status := l_return_status;
6933: IF l_debug_on THEN
6934: WSH_DEBUG_SV.pop(l_module_name,'Container_Weight_Volume returned '||l_return_status);
6935: WSH_DEBUG_SV.pop(l_module_name);
6936: END IF;
6937: return;
6938: END IF;
6939: --}
6947: l_post_process_flag := 'N';
6948: END IF;
6949: --
6950: IF l_debug_on THEN
6951: WSH_DEBUG_SV.log(l_module_name,'l_post_process_flag',l_post_process_flag);
6952: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.Detail_Weight_Volume',WSH_DEBUG_SV.C_PROC_LEVEL);
6953: END IF;
6954:
6955: WSH_WV_UTILS.Detail_Weight_Volume
6948: END IF;
6949: --
6950: IF l_debug_on THEN
6951: WSH_DEBUG_SV.log(l_module_name,'l_post_process_flag',l_post_process_flag);
6952: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.Detail_Weight_Volume',WSH_DEBUG_SV.C_PROC_LEVEL);
6953: END IF;
6954:
6955: WSH_WV_UTILS.Detail_Weight_Volume
6956: (p_delivery_detail_id =>l_dummy_detail_id,
6962: x_return_status => l_return_status);
6963: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
6964: x_return_status := l_return_status;
6965: IF l_debug_on THEN
6966: WSH_DEBUG_SV.pop(l_module_name,'Detail_Weight_Volume returned '||l_return_status);
6967: WSH_DEBUG_SV.pop(l_module_name);
6968: END IF;
6969: return;
6970: END IF;
6963: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
6964: x_return_status := l_return_status;
6965: IF l_debug_on THEN
6966: WSH_DEBUG_SV.pop(l_module_name,'Detail_Weight_Volume returned '||l_return_status);
6967: WSH_DEBUG_SV.pop(l_module_name);
6968: END IF;
6969: return;
6970: END IF;
6971:
6976: --
6977: -- Debug Statements
6978: --
6979: IF l_debug_on THEN
6980: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_USA_QUANTITY_PVT.UPDATE_ORDERED_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
6981: END IF;
6982: --
6983: -- bug 2942655 / 2936559
6984: -- overpick normalization will avoid canceling
7034: WSH_INTERFACE.Delete_Details(
7035: p_details_id => l_details_to_delete,
7036: x_return_status => l_return_status);
7037: IF l_debug_on THEN
7038: WSH_DEBUG_SV.log(l_module_name,'Delete_Details l_return_status',l_return_status);
7039: END IF;
7040: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
7041: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7042: END IF;
7052: p_call_lcss => 'Y',
7053: x_return_status => l_return_status);
7054:
7055: IF l_debug_on THEN
7056: WSH_DEBUG_SV.log(l_module_name,'Adjust_Planned_Flag returns ',l_return_status);
7057: END IF;
7058:
7059: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
7060: raise Adjust_Planned_Flag_Err;
7079: --
7080: -- Debug Statements
7081: --
7082: IF l_debug_on THEN
7083: WSH_DEBUG_SV.log(l_module_name,'update_inventory_info procedure returns ',x_return_status);
7084: WSH_DEBUG_SV.logmsg(l_module_name,'EXITING UPDATE_INVENTORY_INFO PROCEDURE ...' );
7085: END IF;
7086: --
7087:
7080: -- Debug Statements
7081: --
7082: IF l_debug_on THEN
7083: WSH_DEBUG_SV.log(l_module_name,'update_inventory_info procedure returns ',x_return_status);
7084: WSH_DEBUG_SV.logmsg(l_module_name,'EXITING UPDATE_INVENTORY_INFO PROCEDURE ...' );
7085: END IF;
7086: --
7087:
7088: --
7088: --
7089: -- Debug Statements
7090: --
7091: IF l_debug_on THEN
7092: WSH_DEBUG_SV.pop(l_module_name);
7093: END IF;
7094: --
7095: EXCEPTION
7096: -- inbound logistics --jckwok
7102: WSH_WMS_LPN_GRP.g_callback_required := l_orig_callback_reqd;
7103: -- LPN CONV rv
7104: --
7105: IF l_debug_on THEN
7106: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:Delivery_Line_Direction_Err');
7107: END IF;
7108: -- deliveryMerge
7109: WHEN Adjust_Planned_Flag_Err THEN
7110: FND_MESSAGE.SET_NAME('WSH', 'WSH_ADJUST_PLANNED_FLAG_ERR');
7117: WSH_WMS_LPN_GRP.g_callback_required := l_orig_callback_reqd;
7118: -- LPN CONV rv
7119: --
7120: IF l_debug_on THEN
7121: WSH_DEBUG_SV.logmsg(l_module_name,'Adjust_Planned_Flag_Err exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7122: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:Adjust_Planned_Flag_Err');
7123: END IF;
7124: --
7125:
7118: -- LPN CONV rv
7119: --
7120: IF l_debug_on THEN
7121: WSH_DEBUG_SV.logmsg(l_module_name,'Adjust_Planned_Flag_Err exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7122: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:Adjust_Planned_Flag_Err');
7123: END IF;
7124: --
7125:
7126: WHEN others THEN
7132: WSH_WMS_LPN_GRP.g_callback_required := l_orig_callback_reqd;
7133: -- LPN CONV rv
7134: --
7135: IF l_debug_on THEN
7136: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7137: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7138: END IF;
7139: --
7140: END Update_Inventory_Info;
7133: -- LPN CONV rv
7134: --
7135: IF l_debug_on THEN
7136: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7137: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7138: END IF;
7139: --
7140: END Update_Inventory_Info;
7141:
7182: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7183: --
7184: IF l_debug_on IS NULL
7185: THEN
7186: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7187: END IF;
7188: --
7189: IF l_debug_on THEN
7190: WSH_DEBUG_SV.push(l_module_name);
7186: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7187: END IF;
7188: --
7189: IF l_debug_on THEN
7190: WSH_DEBUG_SV.push(l_module_name);
7191: WSH_DEBUG_SV.log(l_module_name,'p_mo_line_id',p_mo_line_id);
7192: END IF;
7193:
7194: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7187: END IF;
7188: --
7189: IF l_debug_on THEN
7190: WSH_DEBUG_SV.push(l_module_name);
7191: WSH_DEBUG_SV.log(l_module_name,'p_mo_line_id',p_mo_line_id);
7192: END IF;
7193:
7194: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7195:
7196: OPEN c_detailed_qty(p_mo_line_id);
7197: FETCH c_detailed_qty INTO l_detailed_qty, l_detailed_qty2;
7198: IF c_detailed_qty%NOTFOUND THEN
7199: IF l_debug_on THEN
7200: WSH_DEBUG_SV.logmsg(l_module_name,'l_detailed_qty not found');
7201: raise qty_not_found;
7202: END IF;
7203: END IF;
7204:
7205: CLOSE c_detailed_qty;
7206:
7207:
7208: IF l_debug_on THEN
7209: WSH_DEBUG_SV.log(l_module_name,'l_detailed_qty',l_detailed_qty);
7210: -- HW OPMCONV - Print value of Qty2
7211: WSH_DEBUG_SV.log(l_module_name,'l_detailed_qty2',l_detailed_qty2);
7212: WSH_DEBUG_SV.pop(l_module_name);
7213: END IF;
7207:
7208: IF l_debug_on THEN
7209: WSH_DEBUG_SV.log(l_module_name,'l_detailed_qty',l_detailed_qty);
7210: -- HW OPMCONV - Print value of Qty2
7211: WSH_DEBUG_SV.log(l_module_name,'l_detailed_qty2',l_detailed_qty2);
7212: WSH_DEBUG_SV.pop(l_module_name);
7213: END IF;
7214:
7215: --fp bug 5347149/5253861: return 0, instead of NULL, so that
7208: IF l_debug_on THEN
7209: WSH_DEBUG_SV.log(l_module_name,'l_detailed_qty',l_detailed_qty);
7210: -- HW OPMCONV - Print value of Qty2
7211: WSH_DEBUG_SV.log(l_module_name,'l_detailed_qty2',l_detailed_qty2);
7212: WSH_DEBUG_SV.pop(l_module_name);
7213: END IF;
7214:
7215: --fp bug 5347149/5253861: return 0, instead of NULL, so that
7216: -- the callers can compute the non-null reservation quantity to transfer.
7225: IF c_detailed_qty%ISOPEN THEN
7226: CLOSE c_detailed_qty;
7227: END IF;
7228: IF l_debug_on THEN
7229: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:get_detailed_FAILED');
7230: END IF;
7231:
7232:
7233: WHEN OTHERS THEN
7236: IF c_detailed_qty%ISOPEN THEN
7237: CLOSE c_detailed_qty;
7238: END IF;
7239: IF l_debug_on THEN
7240: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7241: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7242: END IF;
7243: wsh_util_core.default_handler('WSH_USA_INV_PVT.get_detailed_quantity',l_module_name);
7244:
7237: CLOSE c_detailed_qty;
7238: END IF;
7239: IF l_debug_on THEN
7240: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7241: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7242: END IF;
7243: wsh_util_core.default_handler('WSH_USA_INV_PVT.get_detailed_quantity',l_module_name);
7244:
7245: END get_detailed_quantity;
7265:
7266: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7267: --
7268: IF l_debug_on IS NULL THEN
7269: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7270: END IF;
7271: --
7272: IF l_debug_on THEN
7273: WSH_DEBUG_SV.push(l_module_name);
7269: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7270: END IF;
7271: --
7272: IF l_debug_on THEN
7273: WSH_DEBUG_SV.push(l_module_name);
7274: WSH_DEBUG_SV.log(l_module_name,'p_move_order_line_id',p_move_order_line_id);
7275: END IF;
7276:
7277: l_is_putaway := 'N';
7270: END IF;
7271: --
7272: IF l_debug_on THEN
7273: WSH_DEBUG_SV.push(l_module_name);
7274: WSH_DEBUG_SV.log(l_module_name,'p_move_order_line_id',p_move_order_line_id);
7275: END IF;
7276:
7277: l_is_putaway := 'N';
7278:
7283: x_mo_type => l_mo_type,
7284: x_is_putaway_mo => l_is_putaway);
7285:
7286: IF l_debug_on THEN
7287: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7288: WSH_DEBUG_SV.log(l_module_name,'l_mo_header_id',l_mo_header_id);
7289: WSH_DEBUG_SV.log(l_module_name,'l_mo_type',l_mo_type);
7290: WSH_DEBUG_SV.log(l_module_name,'Is Type Putaway',l_is_putaway);
7291: WSH_DEBUG_SV.pop(l_module_name);
7284: x_is_putaway_mo => l_is_putaway);
7285:
7286: IF l_debug_on THEN
7287: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7288: WSH_DEBUG_SV.log(l_module_name,'l_mo_header_id',l_mo_header_id);
7289: WSH_DEBUG_SV.log(l_module_name,'l_mo_type',l_mo_type);
7290: WSH_DEBUG_SV.log(l_module_name,'Is Type Putaway',l_is_putaway);
7291: WSH_DEBUG_SV.pop(l_module_name);
7292: END IF;
7285:
7286: IF l_debug_on THEN
7287: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7288: WSH_DEBUG_SV.log(l_module_name,'l_mo_header_id',l_mo_header_id);
7289: WSH_DEBUG_SV.log(l_module_name,'l_mo_type',l_mo_type);
7290: WSH_DEBUG_SV.log(l_module_name,'Is Type Putaway',l_is_putaway);
7291: WSH_DEBUG_SV.pop(l_module_name);
7292: END IF;
7293:
7286: IF l_debug_on THEN
7287: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7288: WSH_DEBUG_SV.log(l_module_name,'l_mo_header_id',l_mo_header_id);
7289: WSH_DEBUG_SV.log(l_module_name,'l_mo_type',l_mo_type);
7290: WSH_DEBUG_SV.log(l_module_name,'Is Type Putaway',l_is_putaway);
7291: WSH_DEBUG_SV.pop(l_module_name);
7292: END IF;
7293:
7294: RETURN l_is_putaway;
7287: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7288: WSH_DEBUG_SV.log(l_module_name,'l_mo_header_id',l_mo_header_id);
7289: WSH_DEBUG_SV.log(l_module_name,'l_mo_type',l_mo_type);
7290: WSH_DEBUG_SV.log(l_module_name,'Is Type Putaway',l_is_putaway);
7291: WSH_DEBUG_SV.pop(l_module_name);
7292: END IF;
7293:
7294: RETURN l_is_putaway;
7295:
7296: EXCEPTION
7297:
7298: WHEN OTHERS THEN
7299: IF l_debug_on THEN
7300: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7301: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7302: END IF;
7303: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_USA_INV_PVT.is_mo_type_putaway',l_module_name);
7304: RETURN 'N';
7297:
7298: WHEN OTHERS THEN
7299: IF l_debug_on THEN
7300: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7301: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7302: END IF;
7303: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_USA_INV_PVT.is_mo_type_putaway',l_module_name);
7304: RETURN 'N';
7305:
7336:
7337: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7338: --
7339: IF l_debug_on IS NULL THEN
7340: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7341: END IF;
7342: --
7343: IF l_debug_on THEN
7344: WSH_DEBUG_SV.push(l_module_name);
7340: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7341: END IF;
7342: --
7343: IF l_debug_on THEN
7344: WSH_DEBUG_SV.push(l_module_name);
7345: WSH_DEBUG_SV.log(l_module_name,'p_detail_id',p_detail_id);
7346: WSH_DEBUG_SV.log(l_module_name,'p_released_status',p_released_status);
7347: WSH_DEBUG_SV.log(l_module_name,'p_move_order_line_id',p_move_order_line_id);
7348: END IF;
7341: END IF;
7342: --
7343: IF l_debug_on THEN
7344: WSH_DEBUG_SV.push(l_module_name);
7345: WSH_DEBUG_SV.log(l_module_name,'p_detail_id',p_detail_id);
7346: WSH_DEBUG_SV.log(l_module_name,'p_released_status',p_released_status);
7347: WSH_DEBUG_SV.log(l_module_name,'p_move_order_line_id',p_move_order_line_id);
7348: END IF;
7349:
7342: --
7343: IF l_debug_on THEN
7344: WSH_DEBUG_SV.push(l_module_name);
7345: WSH_DEBUG_SV.log(l_module_name,'p_detail_id',p_detail_id);
7346: WSH_DEBUG_SV.log(l_module_name,'p_released_status',p_released_status);
7347: WSH_DEBUG_SV.log(l_module_name,'p_move_order_line_id',p_move_order_line_id);
7348: END IF;
7349:
7350: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7343: IF l_debug_on THEN
7344: WSH_DEBUG_SV.push(l_module_name);
7345: WSH_DEBUG_SV.log(l_module_name,'p_detail_id',p_detail_id);
7346: WSH_DEBUG_SV.log(l_module_name,'p_released_status',p_released_status);
7347: WSH_DEBUG_SV.log(l_module_name,'p_move_order_line_id',p_move_order_line_id);
7348: END IF;
7349:
7350: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7351: -- Check if released_status and move_order_line_id have been specified
7377: x_detail_id := p_detail_id;
7378: END IF;
7379:
7380: IF l_debug_on THEN
7381: WSH_DEBUG_SV.log(l_module_name,'x_detail_id',x_detail_id);
7382: WSH_DEBUG_SV.pop(l_module_name);
7383: END IF;
7384:
7385: EXCEPTION
7378: END IF;
7379:
7380: IF l_debug_on THEN
7381: WSH_DEBUG_SV.log(l_module_name,'x_detail_id',x_detail_id);
7382: WSH_DEBUG_SV.pop(l_module_name);
7383: END IF;
7384:
7385: EXCEPTION
7386:
7390: END IF;
7391: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7392: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_USA_INV_PVT.get_putaway_detail_id',l_module_name);
7393: IF l_debug_on THEN
7394: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7395: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7396: END IF;
7397: END get_putaway_detail_id;
7398:
7391: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7392: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_USA_INV_PVT.get_putaway_detail_id',l_module_name);
7393: IF l_debug_on THEN
7394: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7395: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7396: END IF;
7397: END get_putaway_detail_id;
7398:
7399: END WSH_USA_INV_PVT;