[Home] [Help]
77: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
78: --
79: IF l_debug_on IS NULL
80: THEN
81: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
82: END IF;
83: --
84: --
85: -- Debug Statements
84: --
85: -- Debug Statements
86: --
87: IF l_debug_on THEN
88: WSH_DEBUG_SV.push(l_module_name);
89: --
90: WSH_DEBUG_SV.log(l_module_name,'P_PO_LINE_LOCATION_ID',P_PO_LINE_LOCATION_ID);
91: WSH_DEBUG_SV.log(l_module_name,'P_PREV_LINE_REC_INDEX',P_PREV_LINE_REC_INDEX);
92: END IF;
86: --
87: IF l_debug_on THEN
88: WSH_DEBUG_SV.push(l_module_name);
89: --
90: WSH_DEBUG_SV.log(l_module_name,'P_PO_LINE_LOCATION_ID',P_PO_LINE_LOCATION_ID);
91: WSH_DEBUG_SV.log(l_module_name,'P_PREV_LINE_REC_INDEX',P_PREV_LINE_REC_INDEX);
92: END IF;
93: --
94: x_return_status := wsh_util_core.g_ret_sts_success;
87: IF l_debug_on THEN
88: WSH_DEBUG_SV.push(l_module_name);
89: --
90: WSH_DEBUG_SV.log(l_module_name,'P_PO_LINE_LOCATION_ID',P_PO_LINE_LOCATION_ID);
91: WSH_DEBUG_SV.log(l_module_name,'P_PREV_LINE_REC_INDEX',P_PREV_LINE_REC_INDEX);
92: END IF;
93: --
94: x_return_status := wsh_util_core.g_ret_sts_success;
95:
263: --
264: -- Debug Statements
265: --
266: IF l_debug_on THEN
267: WSH_DEBUG_SV.log(l_module_name,'Return Status after calling the API Extend_tables is ', l_return_status);
268: WSH_DEBUG_SV.log(l_module_name,'l_tab_count', l_tab_count);
269: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
270: END IF;
271: --
264: -- Debug Statements
265: --
266: IF l_debug_on THEN
267: WSH_DEBUG_SV.log(l_module_name,'Return Status after calling the API Extend_tables is ', l_return_status);
268: WSH_DEBUG_SV.log(l_module_name,'l_tab_count', l_tab_count);
269: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
270: END IF;
271: --
272: wsh_util_core.api_post_call(
265: --
266: IF l_debug_on THEN
267: WSH_DEBUG_SV.log(l_module_name,'Return Status after calling the API Extend_tables is ', l_return_status);
268: WSH_DEBUG_SV.log(l_module_name,'l_tab_count', l_tab_count);
269: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
270: END IF;
271: --
272: wsh_util_core.api_post_call(
273: p_return_status => l_return_status,
279: END IF;
280:
281:
282: IF l_debug_on THEN
283: WSH_DEBUG_SV.log(l_module_name,'count of x_line_rec',l_tab_count);
284: END IF;
285:
286: IF ( p_prev_line_rec_index IS NULL ) THEN
287: --{
285:
286: IF ( p_prev_line_rec_index IS NULL ) THEN
287: --{
288: IF l_debug_on THEN
289: WSH_DEBUG_SV.logmsg(l_module_name,'Before initializing the attributes');
290: END IF;
291: x_line_rec.org_id(l_tab_count) := p_po_line_rec.org_id;
292: x_line_rec.header_id(l_tab_count) := p_po_line_rec.header_id;
293: x_line_rec.line_id(l_tab_count) := p_po_line_rec.line_id;
314: x_line_rec.fob_point_code(l_tab_count) := p_po_line_rec.fob_point_code;
315: --}
316: END IF;
317: IF l_debug_on THEN
318: WSH_DEBUG_SV.logmsg(l_module_name,'Middle 1');
319: END IF;
320: x_line_rec.shipping_control(l_tab_count) := p_po_line_rec.shipping_control;
321: x_line_rec.po_revision(l_tab_count) := p_po_line_rec.po_revision;
322: x_line_rec.currency_code(l_tab_count) := p_po_line_rec.currency_code;
325: x_line_rec.supplier_item_num(l_tab_count) := p_po_line_rec.supplier_item_num;
326: x_line_rec.source_line_type_code(l_tab_count) := p_po_line_rec.source_line_type_code;
327: x_line_rec.hazard_class_id(l_tab_count) := p_po_line_rec.hazard_class_id;
328: IF l_debug_on THEN
329: WSH_DEBUG_SV.logmsg(l_module_name,'Middle 2');
330: END IF;
331: x_line_rec.inventory_item_id(l_tab_count) := p_po_line_rec.inventory_item_id;
332: x_line_rec.item_description(l_tab_count) := p_po_line_rec.item_description;
333: x_line_rec.revision(l_tab_count) := p_po_line_rec.revision;
341: x_line_rec.order_quantity_uom(l_tab_count) := p_po_line_rec.order_quantity_uom;
342: x_line_rec.unit_list_price(l_tab_count) := p_po_line_rec.unit_list_price;
343: --x_line_rec.status_code(l_tab_count) := p_po_line_rec.status_code;
344: IF l_debug_on THEN
345: WSH_DEBUG_SV.logmsg(l_module_name,'Middle 3');
346: END IF;
347: x_line_rec.preferred_grade(l_tab_count) := p_po_line_rec.preferred_grade;
348: x_line_rec.cancelled_quantity(l_tab_count) := p_po_line_rec.cancelled_quantity;
349: x_line_rec.ordered_quantity2(l_tab_count) := p_po_line_rec.ordered_quantity2;
364: x_line_rec.closed_code(l_tab_count) := p_po_line_rec.closed_code;
365: x_line_rec.cancelled_flag(l_tab_count) := p_po_line_rec.cancelled_flag;
366: x_line_rec.source_code(l_tab_count) := 'PO';
367: IF l_debug_on THEN
368: WSH_DEBUG_SV.logmsg(l_module_name,'Middle 4');
369: END IF;
370: x_line_rec.shipping_interfaced_flag(l_tab_count) := 'Y';
371: x_line_rec.shipping_eligible_flag(l_tab_count) := 'Y';
372: IF l_debug_on THEN
369: END IF;
370: x_line_rec.shipping_interfaced_flag(l_tab_count) := 'Y';
371: x_line_rec.shipping_eligible_flag(l_tab_count) := 'Y';
372: IF l_debug_on THEN
373: WSH_DEBUG_SV.logmsg(l_module_name,'Middle 5');
374: END IF;
375: -- bug 3151205
376: x_line_rec.source_header_type_id(l_tab_count) := p_po_line_rec.source_header_type_id;
377: x_line_rec.source_header_type_name(l_tab_count) := p_po_line_rec.source_header_type_name;
380: x_line_rec.volume(l_tab_count) := p_po_line_rec.volume;
381: x_line_rec.volume_uom_code(l_tab_count) := p_po_line_rec.volume_uom_code;
382: x_line_rec.cancelled_quantity2(l_tab_count) := p_po_line_rec.cancelled_quantity2;
383: IF l_debug_on THEN
384: WSH_DEBUG_SV.logmsg(l_module_name,'After assigning the values');
385: END IF;
386: IF (nvl(x_line_rec.drop_ship_flag(l_tab_count),'N') = 'Y') THEN
387: --{
388: get_drop_ship_info(
392: --
393: -- Debug Statements
394: --
395: IF l_debug_on THEN
396: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
397: END IF;
398: --
399: wsh_util_core.api_post_call(
400: p_return_status => l_return_status,
405: --}
406: ELSE
407: --{
408: IF l_debug_on THEN
409: WSH_DEBUG_SV.logmsg(l_module_name,'Before assigning the values');
410: END IF;
411: x_line_rec.org_id(l_tab_count) := x_line_rec.org_id(p_prev_line_rec_index);
412: x_line_rec.header_id(l_tab_count) := x_line_rec.header_id(p_prev_line_rec_index);
413: x_line_rec.line_id(l_tab_count) := x_line_rec.line_id(p_prev_line_rec_index);
469: x_line_rec.volume(l_tab_count) := x_line_rec.volume(p_prev_line_rec_index);
470: x_line_rec.volume_uom_code(l_tab_count) := x_line_rec.volume_uom_code(p_prev_line_rec_index);
471: x_line_rec.cancelled_quantity2(l_tab_count) := p_po_line_rec.cancelled_quantity2;
472: IF l_debug_on THEN
473: WSH_DEBUG_SV.logmsg(l_module_name,'After assigning the values');
474: END IF;
475: --}
476: END IF;
477: --
489: --
490: -- Debug Statements
491: --
492: IF l_debug_on THEN
493: WSH_DEBUG_SV.pop(l_module_name);
494: END IF;
495: --
496: EXCEPTION
497: --{
500: --
501: -- Debug Statements
502: --
503: IF l_debug_on THEN
504: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
505: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
506: END IF;
507: --
508: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
501: -- Debug Statements
502: --
503: IF l_debug_on THEN
504: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
505: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
506: END IF;
507: --
508: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
509: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
510: --
511: -- Debug Statements
512: --
513: IF l_debug_on THEN
514: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
515: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
516: END IF;
517: --
518: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
511: -- Debug Statements
512: --
513: IF l_debug_on THEN
514: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
515: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
516: END IF;
517: --
518: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
519: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
520: --
521: -- Debug Statements
522: --
523: IF l_debug_on THEN
524: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
525: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
526: END IF;
527: --
528: WHEN OTHERS THEN
521: -- Debug Statements
522: --
523: IF l_debug_on THEN
524: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
525: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
526: END IF;
527: --
528: WHEN OTHERS THEN
529: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
532: --
533: -- Debug Statements
534: --
535: IF l_debug_on THEN
536: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
537: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
538: END IF;
539: --
540: END copy_po_rec_to_line_rec;
533: -- Debug Statements
534: --
535: IF l_debug_on THEN
536: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
537: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
538: END IF;
539: --
540: END copy_po_rec_to_line_rec;
541:
624: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
625: --
626: IF l_debug_on IS NULL
627: THEN
628: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
629: END IF;
630: --
631: --
632: -- Debug Statements
631: --
632: -- Debug Statements
633: --
634: IF l_debug_on THEN
635: WSH_DEBUG_SV.push(l_module_name);
636: --
637: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_LINE_ID',P_SHIPMENT_LINE_ID);
638: END IF;
639: --
633: --
634: IF l_debug_on THEN
635: WSH_DEBUG_SV.push(l_module_name);
636: --
637: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_LINE_ID',P_SHIPMENT_LINE_ID);
638: END IF;
639: --
640: l_line_rec_count := x_line_rec.po_shipment_line_id.count;
641:
655: x_line_rec.shipment_header_id(l_line_rec_count);
656: close l_shipment_line_csr;
657:
658: IF l_debug_on THEN
659: WSH_DEBUG_SV.logmsg(l_module_name,'After fetching the shipment line');
660: END IF;
661: open l_shipment_header_csr(x_line_rec.shipment_header_id(l_line_rec_count));
662: fetch l_shipment_header_csr into x_line_rec.shipment_num(l_line_rec_count),
663: x_line_rec.receipt_num(l_line_rec_count),
683: --
684: -- Debug Statements
685: --
686: IF l_debug_on THEN
687: WSH_DEBUG_SV.pop(l_module_name);
688: END IF;
689: --
690: EXCEPTION
691: --{
694: --
695: -- Debug Statements
696: --
697: IF l_debug_on THEN
698: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
699: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
700: END IF;
701: --
702: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
695: -- Debug Statements
696: --
697: IF l_debug_on THEN
698: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
699: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
700: END IF;
701: --
702: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
703: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
704: --
705: -- Debug Statements
706: --
707: IF l_debug_on THEN
708: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
709: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
710: END IF;
711: --
712: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
705: -- Debug Statements
706: --
707: IF l_debug_on THEN
708: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
709: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
710: END IF;
711: --
712: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
713: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
714: --
715: -- Debug Statements
716: --
717: IF l_debug_on THEN
718: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
719: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
720: END IF;
721: --
722: WHEN OTHERS THEN
715: -- Debug Statements
716: --
717: IF l_debug_on THEN
718: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
719: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
720: END IF;
721: --
722: WHEN OTHERS THEN
723: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
726: --
727: -- Debug Statements
728: --
729: IF l_debug_on THEN
730: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
731: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
732: END IF;
733: --
734: END get_rcv_line_attribs;
727: -- Debug Statements
728: --
729: IF l_debug_on THEN
730: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
731: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
732: END IF;
733: --
734: END get_rcv_line_attribs;
735: --========================================================================
779: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
780: --
781: IF l_debug_on IS NULL
782: THEN
783: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
784: END IF;
785: --
786: --
787: -- Debug Statements
786: --
787: -- Debug Statements
788: --
789: IF l_debug_on THEN
790: WSH_DEBUG_SV.push(l_module_name);
791: --
792: WSH_DEBUG_SV.log(l_module_name,'P_PO_LINE_LOCATION_ID',P_PO_LINE_LOCATION_ID);
793: WSH_DEBUG_SV.log(l_module_name,'P_RCV_SHIPMENT_LINE_ID',P_RCV_SHIPMENT_LINE_ID);
794: END IF;
788: --
789: IF l_debug_on THEN
790: WSH_DEBUG_SV.push(l_module_name);
791: --
792: WSH_DEBUG_SV.log(l_module_name,'P_PO_LINE_LOCATION_ID',P_PO_LINE_LOCATION_ID);
793: WSH_DEBUG_SV.log(l_module_name,'P_RCV_SHIPMENT_LINE_ID',P_RCV_SHIPMENT_LINE_ID);
794: END IF;
795: --
796: x_return_status := wsh_util_core.g_ret_sts_success;
789: IF l_debug_on THEN
790: WSH_DEBUG_SV.push(l_module_name);
791: --
792: WSH_DEBUG_SV.log(l_module_name,'P_PO_LINE_LOCATION_ID',P_PO_LINE_LOCATION_ID);
793: WSH_DEBUG_SV.log(l_module_name,'P_RCV_SHIPMENT_LINE_ID',P_RCV_SHIPMENT_LINE_ID);
794: END IF;
795: --
796: x_return_status := wsh_util_core.g_ret_sts_success;
797: --
822: --
823: -- Debug Statements
824: --
825: IF l_debug_on THEN
826: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit PO_FTE_INTEGRATION_GRP.GET_PO_RELEASE_ATTRIBUTES',WSH_DEBUG_SV.C_PROC_LEVEL);
827: END IF;
828: --
829: PO_FTE_INTEGRATION_GRP.get_po_release_attributes(
830: p_api_version => 1.0,
836: --
837: -- Debug Statements
838: --
839: IF l_debug_on THEN
840: WSH_DEBUG_SV.log(l_module_name,'l_return_status is',l_return_status);
841: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
842: END IF;
843: --
844: wsh_util_core.api_post_call(
837: -- Debug Statements
838: --
839: IF l_debug_on THEN
840: WSH_DEBUG_SV.log(l_module_name,'l_return_status is',l_return_status);
841: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
842: END IF;
843: --
844: wsh_util_core.api_post_call(
845: p_return_status => l_return_status,
848: --}
849: ELSE
850: --{
851: IF l_debug_on THEN
852: WSH_DEBUG_SV.logmsg(l_module_name,'PO Release less than 11.5.10');
853: END IF;
854: RAISE FND_API.G_EXC_ERROR;
855: --}
856: END IF;
866: --
867: -- Debug Statements
868: --
869: IF l_debug_on THEN
870: WSH_DEBUG_SV.log(l_module_name,'l_return_status is',l_return_status);
871: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
872: END IF;
873: --
874: wsh_util_core.api_post_call(
867: -- Debug Statements
868: --
869: IF l_debug_on THEN
870: WSH_DEBUG_SV.log(l_module_name,'l_return_status is',l_return_status);
871: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
872: END IF;
873: --
874: wsh_util_core.api_post_call(
875: p_return_status => l_return_status,
887: --
888: -- Debug Statements
889: --
890: IF l_debug_on THEN
891: WSH_DEBUG_SV.log(l_module_name,'l_return_status is',l_return_status);
892: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
893: END IF;
894: --
895: wsh_util_core.api_post_call(
888: -- Debug Statements
889: --
890: IF l_debug_on THEN
891: WSH_DEBUG_SV.log(l_module_name,'l_return_status is',l_return_status);
892: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
893: END IF;
894: --
895: wsh_util_core.api_post_call(
896: p_return_status => l_return_status,
913: --
914: -- Debug Statements
915: --
916: IF l_debug_on THEN
917: WSH_DEBUG_SV.pop(l_module_name);
918: END IF;
919: --
920: EXCEPTION
921: --{
924: --
925: -- Debug Statements
926: --
927: IF l_debug_on THEN
928: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
929: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
930: END IF;
931: --
932: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
925: -- Debug Statements
926: --
927: IF l_debug_on THEN
928: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
929: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
930: END IF;
931: --
932: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
933: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
934: --
935: -- Debug Statements
936: --
937: IF l_debug_on THEN
938: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
939: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
940: END IF;
941: --
942: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
935: -- Debug Statements
936: --
937: IF l_debug_on THEN
938: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
939: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
940: END IF;
941: --
942: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
943: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
944: --
945: -- Debug Statements
946: --
947: IF l_debug_on THEN
948: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
949: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
950: END IF;
951: --
952: WHEN OTHERS THEN
945: -- Debug Statements
946: --
947: IF l_debug_on THEN
948: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
949: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
950: END IF;
951: --
952: WHEN OTHERS THEN
953: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
956: --
957: -- Debug Statements
958: --
959: IF l_debug_on THEN
960: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
961: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
962: END IF;
963: --
964: END get_po_rcv_attributes;
957: -- Debug Statements
958: --
959: IF l_debug_on THEN
960: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
961: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
962: END IF;
963: --
964: END get_po_rcv_attributes;
965:
1049: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1050: --
1051: IF l_debug_on IS NULL
1052: THEN
1053: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1054: END IF;
1055: --
1056: --
1057: -- Debug Statements
1056: --
1057: -- Debug Statements
1058: --
1059: IF l_debug_on THEN
1060: WSH_DEBUG_SV.push(l_module_name);
1061: WSH_DEBUG_SV.log(l_module_name,'P_INDEX',P_INDEX);
1062: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.po_shipment_line_id(p_index)',p_line_rec.po_shipment_line_id(p_index));
1063: END IF;
1064: --
1057: -- Debug Statements
1058: --
1059: IF l_debug_on THEN
1060: WSH_DEBUG_SV.push(l_module_name);
1061: WSH_DEBUG_SV.log(l_module_name,'P_INDEX',P_INDEX);
1062: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.po_shipment_line_id(p_index)',p_line_rec.po_shipment_line_id(p_index));
1063: END IF;
1064: --
1065: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1058: --
1059: IF l_debug_on THEN
1060: WSH_DEBUG_SV.push(l_module_name);
1061: WSH_DEBUG_SV.log(l_module_name,'P_INDEX',P_INDEX);
1062: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.po_shipment_line_id(p_index)',p_line_rec.po_shipment_line_id(p_index));
1063: END IF;
1064: --
1065: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1066:
1098:
1099:
1100:
1101: IF l_debug_on THEN
1102: WSH_DEBUG_SV.log(l_module_name,' p_line_rec.deliver_to_org_id(p_index)', p_line_rec.deliver_to_org_id(p_index));
1103: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.intermed_ship_to_org_id(p_index)',p_line_rec.intermed_ship_to_org_id(p_index));
1104: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.ship_to_location_id(p_index)',p_line_rec.ship_to_location_id(p_index));
1105: END IF;
1106:
1099:
1100:
1101: IF l_debug_on THEN
1102: WSH_DEBUG_SV.log(l_module_name,' p_line_rec.deliver_to_org_id(p_index)', p_line_rec.deliver_to_org_id(p_index));
1103: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.intermed_ship_to_org_id(p_index)',p_line_rec.intermed_ship_to_org_id(p_index));
1104: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.ship_to_location_id(p_index)',p_line_rec.ship_to_location_id(p_index));
1105: END IF;
1106:
1107: --Deriving deliver_to_location from ship_to_location_id or deliver_to_org_id
1100:
1101: IF l_debug_on THEN
1102: WSH_DEBUG_SV.log(l_module_name,' p_line_rec.deliver_to_org_id(p_index)', p_line_rec.deliver_to_org_id(p_index));
1103: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.intermed_ship_to_org_id(p_index)',p_line_rec.intermed_ship_to_org_id(p_index));
1104: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.ship_to_location_id(p_index)',p_line_rec.ship_to_location_id(p_index));
1105: END IF;
1106:
1107: --Deriving deliver_to_location from ship_to_location_id or deliver_to_org_id
1108: IF (p_line_rec.deliver_to_org_id(p_index) IS NOT NULL) THEN
1109: --
1110: -- Debug Statements
1111: --
1112: IF l_debug_on THEN
1113: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_LOCATION_ID',WSH_DEBUG_SV.C_PROC_LEVEL);
1114: END IF;
1115: --
1116: --Call API WSH_UTIL_CORE.GET_LOCATION_ID to get the Deliver_to_location_id.
1117: WSH_UTIL_CORE.GET_LOCATION_ID(
1123: --
1124: -- Debug Statements
1125: --
1126: IF l_debug_on THEN
1127: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1128: END IF;
1129: --
1130: wsh_util_core.api_post_call(
1131: p_return_status => l_return_status,
1143: --
1144: -- Debug Statements
1145: --
1146: IF l_debug_on THEN
1147: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_LOCATION_ID',WSH_DEBUG_SV.C_PROC_LEVEL);
1148: END IF;
1149: --
1150: --Call API WSH_UTIL_CORE.GET_LOCATION_ID to get the intmed_ship_to_location_id.
1151: WSH_UTIL_CORE.GET_LOCATION_ID(
1157: --
1158: -- Debug Statements
1159: --
1160: IF l_debug_on THEN
1161: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1162: END IF;
1163: --
1164: wsh_util_core.api_post_call(
1165: p_return_status => l_return_status,
1181: --
1182: -- Debug Statements
1183: --
1184: IF l_debug_on THEN
1185: WSH_DEBUG_SV.pop(l_module_name);
1186: END IF;
1187: --
1188: EXCEPTION
1189: WHEN FND_API.G_EXC_ERROR THEN
1193: --
1194: -- Debug Statements
1195: --
1196: IF l_debug_on THEN
1197: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1198: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1199: END IF;
1200: --
1201: WHEN INVALID_DROP_SHIP_INFO THEN
1194: -- Debug Statements
1195: --
1196: IF l_debug_on THEN
1197: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1198: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1199: END IF;
1200: --
1201: WHEN INVALID_DROP_SHIP_INFO THEN
1202: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1205: --
1206: -- Debug Statements
1207: --
1208: IF l_debug_on THEN
1209: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_DROP_SHIP_INFO exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1210: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_DROP_SHIP_INFO');
1211: END IF;
1212: --
1213: WHEN OTHERS THEN
1206: -- Debug Statements
1207: --
1208: IF l_debug_on THEN
1209: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_DROP_SHIP_INFO exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1210: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_DROP_SHIP_INFO');
1211: END IF;
1212: --
1213: WHEN OTHERS THEN
1214: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1216: --
1217: -- Debug Statements
1218: --
1219: IF l_debug_on THEN
1220: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1221: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1222: END IF;
1223: --
1224: END get_drop_ship_info;
1217: -- Debug Statements
1218: --
1219: IF l_debug_on THEN
1220: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1221: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1222: END IF;
1223: --
1224: END get_drop_ship_info;
1225:
1334: --
1335: l_debug_on := wsh_debug_interface.g_debug;
1336: --
1337: IF l_debug_on IS NULL THEN
1338: l_debug_on := wsh_debug_sv.is_debug_enabled;
1339: END IF;
1340: --
1341: IF l_debug_on THEN
1342: wsh_debug_sv.push(l_module_name);
1338: l_debug_on := wsh_debug_sv.is_debug_enabled;
1339: END IF;
1340: --
1341: IF l_debug_on THEN
1342: wsh_debug_sv.push(l_module_name);
1343: --
1344: wsh_debug_sv.LOG(l_module_name, 'p_delivery_id', p_delivery_id);
1345: wsh_debug_sv.log(l_module_name, 'p_delivery_detail_id_tbl.COUNT', p_delivery_detail_id_tbl.COUNT);
1346: END IF;
1340: --
1341: IF l_debug_on THEN
1342: wsh_debug_sv.push(l_module_name);
1343: --
1344: wsh_debug_sv.LOG(l_module_name, 'p_delivery_id', p_delivery_id);
1345: wsh_debug_sv.log(l_module_name, 'p_delivery_detail_id_tbl.COUNT', p_delivery_detail_id_tbl.COUNT);
1346: END IF;
1347: --
1348: x_return_status := wsh_util_core.g_ret_sts_success;
1341: IF l_debug_on THEN
1342: wsh_debug_sv.push(l_module_name);
1343: --
1344: wsh_debug_sv.LOG(l_module_name, 'p_delivery_id', p_delivery_id);
1345: wsh_debug_sv.log(l_module_name, 'p_delivery_detail_id_tbl.COUNT', p_delivery_detail_id_tbl.COUNT);
1346: END IF;
1347: --
1348: x_return_status := wsh_util_core.g_ret_sts_success;
1349: --
1414: l_delivery_rec.wv_frozen_flag := 'N';
1415: l_delivery_rec.routing_response_id := FND_API.G_MISS_NUM ;
1416:
1417: IF l_debug_on THEN
1418: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.clone',WSH_DEBUG_SV.C_PROC_LEVEL);
1419: END IF;
1420: --
1421: -- Clone the input delivery
1422: --
1471: FETCH wda_csr BULK COLLECT INTO l_wdd_id_tbl, l_parent_wdd_id_tbl;
1472: CLOSE wda_csr;
1473: --
1474: IF l_debug_on THEN
1475: wsh_debug_sv.log(l_module_name, 'l_wdd_id_tbl.COUNT', l_wdd_id_tbl.COUNT);
1476: wsh_debug_sv.log(l_module_name, 'l_parent_wdd_id_tbl.COUNT', l_parent_wdd_id_tbl.COUNT);
1477: END IF;
1478: --
1479: l_index := l_parent_wdd_id_tbl.FIRST;
1472: CLOSE wda_csr;
1473: --
1474: IF l_debug_on THEN
1475: wsh_debug_sv.log(l_module_name, 'l_wdd_id_tbl.COUNT', l_wdd_id_tbl.COUNT);
1476: wsh_debug_sv.log(l_module_name, 'l_parent_wdd_id_tbl.COUNT', l_parent_wdd_id_tbl.COUNT);
1477: END IF;
1478: --
1479: l_index := l_parent_wdd_id_tbl.FIRST;
1480: l_count := 1;
1485: l_txn_type:='RECEIPT';
1486: END IF;
1487: --
1488: IF l_debug_on THEN
1489: wsh_debug_sv.log(l_module_name, 'l_txn_type', l_txn_type);
1490: END IF;
1491: --
1492: IF l_index IS NOT NULL THEN
1493: --{
1497: --{
1498: l_current_parent_wdd_id := l_parent_wdd_id_tbl(nvl(l_index,l_parent_wdd_id_tbl.LAST));
1499: --
1500: IF l_debug_on THEN
1501: wsh_debug_sv.logmsg(l_module_name, '---------------------------------');
1502: wsh_debug_sv.log(l_module_name, 'l_index', l_index);
1503: wsh_debug_sv.log(l_module_name, 'l_prev_parent_wdd_id', l_prev_parent_wdd_id);
1504: wsh_debug_sv.log(l_module_name, 'l_current_parent_wdd_id', l_current_parent_wdd_id);
1505: END IF;
1498: l_current_parent_wdd_id := l_parent_wdd_id_tbl(nvl(l_index,l_parent_wdd_id_tbl.LAST));
1499: --
1500: IF l_debug_on THEN
1501: wsh_debug_sv.logmsg(l_module_name, '---------------------------------');
1502: wsh_debug_sv.log(l_module_name, 'l_index', l_index);
1503: wsh_debug_sv.log(l_module_name, 'l_prev_parent_wdd_id', l_prev_parent_wdd_id);
1504: wsh_debug_sv.log(l_module_name, 'l_current_parent_wdd_id', l_current_parent_wdd_id);
1505: END IF;
1506: --
1499: --
1500: IF l_debug_on THEN
1501: wsh_debug_sv.logmsg(l_module_name, '---------------------------------');
1502: wsh_debug_sv.log(l_module_name, 'l_index', l_index);
1503: wsh_debug_sv.log(l_module_name, 'l_prev_parent_wdd_id', l_prev_parent_wdd_id);
1504: wsh_debug_sv.log(l_module_name, 'l_current_parent_wdd_id', l_current_parent_wdd_id);
1505: END IF;
1506: --
1507: IF l_current_parent_wdd_id <> l_prev_parent_wdd_id or l_index IS NULL
1500: IF l_debug_on THEN
1501: wsh_debug_sv.logmsg(l_module_name, '---------------------------------');
1502: wsh_debug_sv.log(l_module_name, 'l_index', l_index);
1503: wsh_debug_sv.log(l_module_name, 'l_prev_parent_wdd_id', l_prev_parent_wdd_id);
1504: wsh_debug_sv.log(l_module_name, 'l_current_parent_wdd_id', l_current_parent_wdd_id);
1505: END IF;
1506: --
1507: IF l_current_parent_wdd_id <> l_prev_parent_wdd_id or l_index IS NULL
1508: THEN
1509: --{
1510: l_parent_wdd_id := l_prev_parent_wdd_id;
1511: --
1512: IF l_debug_on THEN
1513: wsh_debug_sv.logmsg(l_module_name, '-----------------------------');
1514: wsh_debug_sv.log(l_module_name, 'Processing LPN', l_parent_wdd_id);
1515: wsh_debug_sv.logmsg(l_module_name, '------------------------------');
1516: END IF;
1517: --
1510: l_parent_wdd_id := l_prev_parent_wdd_id;
1511: --
1512: IF l_debug_on THEN
1513: wsh_debug_sv.logmsg(l_module_name, '-----------------------------');
1514: wsh_debug_sv.log(l_module_name, 'Processing LPN', l_parent_wdd_id);
1515: wsh_debug_sv.logmsg(l_module_name, '------------------------------');
1516: END IF;
1517: --
1518: OPEN wdd_csr(p_delivery_detail_id =>l_parent_wdd_id);
1511: --
1512: IF l_debug_on THEN
1513: wsh_debug_sv.logmsg(l_module_name, '-----------------------------');
1514: wsh_debug_sv.log(l_module_name, 'Processing LPN', l_parent_wdd_id);
1515: wsh_debug_sv.logmsg(l_module_name, '------------------------------');
1516: END IF;
1517: --
1518: OPEN wdd_csr(p_delivery_detail_id =>l_parent_wdd_id);
1519: FETCH wdd_csr INTO l_lpn_id, l_lpn_name, l_waybill;
1519: FETCH wdd_csr INTO l_lpn_id, l_lpn_name, l_waybill;
1520: CLOSE wdd_csr;
1521: --
1522: IF l_debug_on THEN
1523: wsh_debug_sv.log(l_module_name, 'l_lpn_id', l_lpn_id);
1524: wsh_debug_sv.log(l_module_name, 'l_lpn_name', l_lpn_name);
1525: wsh_debug_sv.log(l_module_name, 'l_waybill', l_waybill);
1526: END IF;
1527: --
1520: CLOSE wdd_csr;
1521: --
1522: IF l_debug_on THEN
1523: wsh_debug_sv.log(l_module_name, 'l_lpn_id', l_lpn_id);
1524: wsh_debug_sv.log(l_module_name, 'l_lpn_name', l_lpn_name);
1525: wsh_debug_sv.log(l_module_name, 'l_waybill', l_waybill);
1526: END IF;
1527: --
1528: l_new_parent_wdd_id :=NULL;
1521: --
1522: IF l_debug_on THEN
1523: wsh_debug_sv.log(l_module_name, 'l_lpn_id', l_lpn_id);
1524: wsh_debug_sv.log(l_module_name, 'l_lpn_name', l_lpn_name);
1525: wsh_debug_sv.log(l_module_name, 'l_waybill', l_waybill);
1526: END IF;
1527: --
1528: l_new_parent_wdd_id :=NULL;
1529: --
1544: --}
1545: END;
1546: --
1547: IF l_debug_on THEN
1548: wsh_debug_sv.log(l_module_name, 'l_new_parent_wdd_id', l_new_parent_wdd_id);
1549: END IF;
1550: --
1551: IF l_new_parent_wdd_id IS NOT NULL THEN
1552: --{
1556: SET parent_delivery_detail_id = l_new_parent_wdd_id
1557: WHERE delivery_detail_id = l_tmp_wdd_id_tbl(i);
1558: --
1559: IF l_debug_on THEN
1560: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TP_RELEASE.CALCULATE_CONT_DEL_TPDATES',WSH_DEBUG_SV.C_PROC_LEVEL);
1561: END IF;
1562: --
1563: l_temp_tbl.delete ;
1564: l_temp_tbl(1) := l_parent_wdd_id; --used to pass l_parent_wdd_id in the procedure below
1577: --}
1578: ELSE
1579: --{
1580: IF l_debug_on THEN
1581: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_ACTIONS.PACK_INBOUND_LINES',WSH_DEBUG_SV.C_PROC_LEVEL);
1582: WSH_DEBUG_SV.log(l_module_name, 'l_tmp_wdd_id_tbl.COUNT', l_tmp_wdd_id_tbl.COUNT);
1583: END IF;
1584: --
1585: wsh_container_actions.pack_inbound_lines(
1578: ELSE
1579: --{
1580: IF l_debug_on THEN
1581: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_ACTIONS.PACK_INBOUND_LINES',WSH_DEBUG_SV.C_PROC_LEVEL);
1582: WSH_DEBUG_SV.log(l_module_name, 'l_tmp_wdd_id_tbl.COUNT', l_tmp_wdd_id_tbl.COUNT);
1583: END IF;
1584: --
1585: wsh_container_actions.pack_inbound_lines(
1586: p_lines_tbl => l_tmp_wdd_id_tbl,
1607: AND parent_delivery_detail_id = l_parent_wdd_id
1608: AND nvl(type,'S') IN ('S','O');
1609: --
1610: IF l_debug_on THEN
1611: wsh_debug_sv.log(l_module_name, 'l_query_count', l_query_count);
1612: END IF;
1613: --
1614: IF l_query_count = 0 THEN
1615: --{
1619: DELETE FROM wsh_delivery_details
1620: WHERE delivery_detail_id = l_parent_wdd_id;
1621: --
1622: IF l_debug_on THEN
1623: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTEGRATION.DBI_UPDATE_DETAIL_LOG',WSH_DEBUG_SV.C_PROC_LEVEL);
1624: END IF;
1625: --
1626: l_temp_tbl.delete;
1627: l_temp_tbl(1) := l_parent_wdd_id; -- to pass l_parent_wdd_id in procedure below
1664: --}
1665: END IF; -- if p_caller = 'WSH_VENDOR_MERGE'
1666: --
1667: IF l_debug_on THEN
1668: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.update_freight_terms',WSH_DEBUG_SV.C_PROC_LEVEL);
1669: END IF;
1670: --
1671: -- Update freight terms for original delivery
1672: --
1687: );
1688: --
1689: --
1690: IF l_debug_on THEN
1691: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.update_freight_terms',WSH_DEBUG_SV.C_PROC_LEVEL);
1692: END IF;
1693: --
1694: -- Update freight terms for new delivery
1695: --
1714: --
1715: --
1716: --
1717: IF l_debug_on THEN
1718: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_tp_release.calculate_cont_del_tpdates',WSH_DEBUG_SV.C_PROC_LEVEL);
1719: END IF;
1720: --
1721: --
1722: -- Calculate dates for new and original delivery.
1745: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1746: END IF;
1747: --
1748: IF l_debug_on THEN
1749: wsh_debug_sv.pop(l_module_name);
1750: END IF;
1751: --
1752: --}
1753: EXCEPTION
1758: ROLLBACK TO split_inbound_delivery_sp;
1759: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1760: --
1761: IF l_debug_on THEN
1762: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1763: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1764: END IF;
1765: --
1766: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1759: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1760: --
1761: IF l_debug_on THEN
1762: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1763: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1764: END IF;
1765: --
1766: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1767:
1768: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1769: ROLLBACK TO split_inbound_delivery_sp;
1770: --
1771: IF l_debug_on THEN
1772: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1773: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1774: END IF;
1775: --
1776: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1769: ROLLBACK TO split_inbound_delivery_sp;
1770: --
1771: IF l_debug_on THEN
1772: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1773: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1774: END IF;
1775: --
1776: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1777: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1776: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1777: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1778: --
1779: IF l_debug_on THEN
1780: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1781: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1782: END IF;
1783: --
1784: WHEN OTHERS THEN
1777: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1778: --
1779: IF l_debug_on THEN
1780: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1781: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1782: END IF;
1783: --
1784: WHEN OTHERS THEN
1785:
1786: ROLLBACK TO split_inbound_delivery_sp;
1787: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1788: wsh_util_core.default_handler('split_inbound_delivery', l_module_name);
1789: IF l_debug_on THEN
1790: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1791: END IF;
1792: --
1793: --}
1794:
1868: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1869: --
1870: IF l_debug_on IS NULL
1871: THEN
1872: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1873: END IF;
1874: --
1875: IF l_debug_on THEN
1876: WSH_DEBUG_SV.push(l_module_name);
1872: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1873: END IF;
1874: --
1875: IF l_debug_on THEN
1876: WSH_DEBUG_SV.push(l_module_name);
1877: --
1878: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id_tab.count',p_delivery_id_tab.count);
1879: END IF;
1880: --
1874: --
1875: IF l_debug_on THEN
1876: WSH_DEBUG_SV.push(l_module_name);
1877: --
1878: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id_tab.count',p_delivery_id_tab.count);
1879: END IF;
1880: --
1881: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1882: --
1900: IF trips_Rec.reprice_required = 'Y'
1901: THEN
1902: --{
1903: IF l_debug_on THEN
1904: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.get_Cached_value',WSH_DEBUG_SV.C_PROC_LEVEL);
1905: END IF;
1906: --
1907: WSH_UTIL_CORE.get_Cached_value
1908: (
1924: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
1925: THEN
1926: --{
1927: IF l_debug_on THEN
1928: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit FND_REQUEST.SUBMIT_REQUEST',WSH_DEBUG_SV.C_PROC_LEVEL);
1929: END IF;
1930: --
1931: l_requestId :=
1932: FND_REQUEST.SUBMIT_REQUEST
1940: argument2 => trips_rec.name
1941: );
1942: --
1943: IF l_debug_on THEN
1944: WSH_DEBUG_SV.log(l_module_name,'l_requestId',l_requestId);
1945: END IF;
1946: --
1947: IF l_requestId <> 0
1948: THEN
1970: END IF;
1971: --
1972: --
1973: IF l_debug_on THEN
1974: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.get_Cached_value',WSH_DEBUG_SV.C_PROC_LEVEL);
1975: END IF;
1976: --
1977: WSH_UTIL_CORE.get_Cached_value
1978: (
1984: x_return_status => l_return_status
1985: );
1986: --
1987: IF l_debug_on THEN
1988: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1989: END IF;
1990: --
1991: WSH_UTIL_CORE.api_post_call
1992: (
2028: THEN
2029: --{
2030:
2031: IF l_debug_on THEN
2032: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.get_Cached_value',WSH_DEBUG_SV.C_PROC_LEVEL);
2033: END IF;
2034: --
2035: WSH_UTIL_CORE.get_Cached_value
2036: (
2053: --{
2054: l_action_params.trip_id_list(l_action_params.trip_id_list.count + 1) := trips_rec.trip_id;
2055:
2056: IF l_debug_on THEN
2057: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.get_Cached_value',WSH_DEBUG_SV.C_PROC_LEVEL);
2058: END IF;
2059: --
2060: WSH_UTIL_CORE.get_Cached_value
2061: (
2067: x_return_status => l_return_status
2068: );
2069: --
2070: IF l_debug_on THEN
2071: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2072: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2073: END IF;
2074: --
2075: wsh_util_core.api_post_call
2068: );
2069: --
2070: IF l_debug_on THEN
2071: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2072: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2073: END IF;
2074: --
2075: wsh_util_core.api_post_call
2076: (
2099: THEN
2100: --{
2101: SAVEPOINT handle_rate_fail_sp; -- bugfix 4535358
2102: IF l_debug_on THEN
2103: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit FTE_TRIP_RATING_GRP.Rate_Trip',WSH_DEBUG_SV.C_PROC_LEVEL);
2104: END IF;
2105: --
2106: --
2107: FTE_TRIP_RATING_GRP.Rate_Trip (
2114: x_msg_count => l_msg_count,
2115: x_msg_data => l_msg_data);
2116:
2117: IF l_debug_on THEN
2118: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2119: END IF;
2120:
2121: --bugfix 4535358
2122: --{
2122: --{
2123: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
2124: THEN
2125: IF l_debug_on THEN
2126: wsh_debug_sv.logmsg(l_module_name, 'Rating has failed');
2127: END IF;
2128: --Even if Rating fails for any Reason, IB will proceed with auto-matching of Receipt by
2129: --reverting to the State before Rating was initiated.
2130: ROLLBACK TO handle_rate_fail_sp;
2155: --
2156: -- Debug Statements
2157: --
2158: IF l_debug_on THEN
2159: WSH_DEBUG_SV.pop(l_module_name);
2160: END IF;
2161: --
2162: --}
2163: EXCEPTION
2170: WSH_INBOUND_UTIL_PKG.G_ASN_RECEIPT_MATCH_TYPE := null; -- IB-Phase-2
2171: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2172: --
2173: IF l_debug_on THEN
2174: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2175: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2176: END IF;
2177: --
2178: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2171: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2172: --
2173: IF l_debug_on THEN
2174: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2175: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2176: END IF;
2177: --
2178: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2179:
2182: WSH_INBOUND_UTIL_PKG.G_ASN_RECEIPT_MATCH_TYPE := null; -- IB-Phase-2
2183: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2184: --
2185: IF l_debug_on THEN
2186: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2187: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2188: END IF;
2189: --
2190: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2183: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2184: --
2185: IF l_debug_on THEN
2186: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2187: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2188: END IF;
2189: --
2190: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2191: WSH_INBOUND_UTIL_PKG.G_ASN_RECEIPT_MATCH_TYPE := null; -- IB-Phase-2
2191: WSH_INBOUND_UTIL_PKG.G_ASN_RECEIPT_MATCH_TYPE := null; -- IB-Phase-2
2192: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2193: --
2194: IF l_debug_on THEN
2195: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2196: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2197: END IF;
2198: WHEN others THEN
2199: wsh_util_core.default_handler('WSH_INBOUND_UTIL_PKG.reRateDeliveries',l_module_name);
2192: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2193: --
2194: IF l_debug_on THEN
2195: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2196: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2197: END IF;
2198: WHEN others THEN
2199: wsh_util_core.default_handler('WSH_INBOUND_UTIL_PKG.reRateDeliveries',l_module_name);
2200: --
2205: --
2206: -- Debug Statements
2207: --
2208: IF l_debug_on THEN
2209: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2210: END IF;
2211: --
2212: --}
2213: END reRateDeliveries;
2261: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2262: --
2263: IF l_debug_on IS NULL
2264: THEN
2265: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2266: END IF;
2267: --
2268: IF l_debug_on THEN
2269: WSH_DEBUG_SV.push(l_module_name);
2265: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2266: END IF;
2267: --
2268: IF l_debug_on THEN
2269: WSH_DEBUG_SV.push(l_module_name);
2270: --
2271: WSH_DEBUG_SV.log(l_module_name,'p_stop_id',p_stop_id);
2272: WSH_DEBUG_SV.log(l_module_name,'p_status_code',p_status_code);
2273: WSH_DEBUG_SV.log(l_module_name,'p_shipements_type_flag',p_shipements_type_flag);
2267: --
2268: IF l_debug_on THEN
2269: WSH_DEBUG_SV.push(l_module_name);
2270: --
2271: WSH_DEBUG_SV.log(l_module_name,'p_stop_id',p_stop_id);
2272: WSH_DEBUG_SV.log(l_module_name,'p_status_code',p_status_code);
2273: WSH_DEBUG_SV.log(l_module_name,'p_shipements_type_flag',p_shipements_type_flag);
2274: WSH_DEBUG_SV.log(l_module_name,'p_action_code',p_action_code);
2275: END IF;
2268: IF l_debug_on THEN
2269: WSH_DEBUG_SV.push(l_module_name);
2270: --
2271: WSH_DEBUG_SV.log(l_module_name,'p_stop_id',p_stop_id);
2272: WSH_DEBUG_SV.log(l_module_name,'p_status_code',p_status_code);
2273: WSH_DEBUG_SV.log(l_module_name,'p_shipements_type_flag',p_shipements_type_flag);
2274: WSH_DEBUG_SV.log(l_module_name,'p_action_code',p_action_code);
2275: END IF;
2276: --
2269: WSH_DEBUG_SV.push(l_module_name);
2270: --
2271: WSH_DEBUG_SV.log(l_module_name,'p_stop_id',p_stop_id);
2272: WSH_DEBUG_SV.log(l_module_name,'p_status_code',p_status_code);
2273: WSH_DEBUG_SV.log(l_module_name,'p_shipements_type_flag',p_shipements_type_flag);
2274: WSH_DEBUG_SV.log(l_module_name,'p_action_code',p_action_code);
2275: END IF;
2276: --
2277: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2270: --
2271: WSH_DEBUG_SV.log(l_module_name,'p_stop_id',p_stop_id);
2272: WSH_DEBUG_SV.log(l_module_name,'p_status_code',p_status_code);
2273: WSH_DEBUG_SV.log(l_module_name,'p_shipements_type_flag',p_shipements_type_flag);
2274: WSH_DEBUG_SV.log(l_module_name,'p_action_code',p_action_code);
2275: END IF;
2276: --
2277: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2278: --
2354: l_stop_in_rec.actual_date := SYSDATE;
2355: --
2356: --
2357: IF l_debug_on THEN
2358: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_STOPS_ACTIONS.autoCLOSE',WSH_DEBUG_SV.C_PROC_LEVEL);
2359: END IF;
2360: --
2361: WSH_TRIP_STOPS_ACTIONS.autoCloseOpen
2362: (
2382: --
2383: --
2384: --
2385: IF l_debug_on THEN
2386: WSH_DEBUG_SV.logmsg(l_module_name,
2387: 'Number of Errors='||l_num_errors||',Number of Warnings='||l_num_warnings);
2388: END IF;
2389: --
2390: IF l_num_errors > 0
2400: --
2401: -- Debug Statements
2402: --
2403: IF l_debug_on THEN
2404: WSH_DEBUG_SV.pop(l_module_name);
2405: END IF;
2406: --
2407: --}
2408: EXCEPTION
2414: --
2415: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2416: --
2417: IF l_debug_on THEN
2418: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2419: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2420: END IF;
2421: --
2422: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2415: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2416: --
2417: IF l_debug_on THEN
2418: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2419: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2420: END IF;
2421: --
2422: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2423:
2425: --
2426: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2427: --
2428: IF l_debug_on THEN
2429: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2430: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2431: END IF;
2432: --
2433: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2426: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2427: --
2428: IF l_debug_on THEN
2429: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2430: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2431: END IF;
2432: --
2433: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2434: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2433: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2434: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2435: --
2436: IF l_debug_on THEN
2437: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2438: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2439: END IF;
2440: WHEN others THEN
2441: wsh_util_core.default_handler('WSH_INBOUND_UTIL_PKG.processStop',l_module_name);
2434: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2435: --
2436: IF l_debug_on THEN
2437: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2438: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2439: END IF;
2440: WHEN others THEN
2441: wsh_util_core.default_handler('WSH_INBOUND_UTIL_PKG.processStop',l_module_name);
2442: --
2446: --
2447: -- Debug Statements
2448: --
2449: IF l_debug_on THEN
2450: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2451: END IF;
2452: --
2453: --}
2454: END processStop;
2582: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2583: --
2584: IF l_debug_on IS NULL
2585: THEN
2586: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2587: END IF;
2588: --
2589: IF l_debug_on THEN
2590: WSH_DEBUG_SV.push(l_module_name);
2586: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2587: END IF;
2588: --
2589: IF l_debug_on THEN
2590: WSH_DEBUG_SV.push(l_module_name);
2591: --
2592: WSH_DEBUG_SV.log(l_module_name,'p_transaction_code',p_transaction_code);
2593: WSH_DEBUG_SV.log(l_module_name,'p_action_code',p_action_code);
2594: END IF;
2588: --
2589: IF l_debug_on THEN
2590: WSH_DEBUG_SV.push(l_module_name);
2591: --
2592: WSH_DEBUG_SV.log(l_module_name,'p_transaction_code',p_transaction_code);
2593: WSH_DEBUG_SV.log(l_module_name,'p_action_code',p_action_code);
2594: END IF;
2595: --
2596: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2589: IF l_debug_on THEN
2590: WSH_DEBUG_SV.push(l_module_name);
2591: --
2592: WSH_DEBUG_SV.log(l_module_name,'p_transaction_code',p_transaction_code);
2593: WSH_DEBUG_SV.log(l_module_name,'p_action_code',p_action_code);
2594: END IF;
2595: --
2596: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2597: --
2613: LOOP
2614: --{
2615: --
2616: IF l_debug_on THEN
2617: WSH_DEBUG_SV.log(l_module_name,'l_index',l_index);
2618: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id_tab(l_index)',p_delivery_id_tab(l_index));
2619: END IF;
2620: --
2621: <
2614: --{
2615: --
2616: IF l_debug_on THEN
2617: WSH_DEBUG_SV.log(l_module_name,'l_index',l_index);
2618: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id_tab(l_index)',p_delivery_id_tab(l_index));
2619: END IF;
2620: --
2621: <
2622: FOR first_leg_rec IN first_leg_csr(p_delivery_id_tab(l_index))
2635: p_action => 'PUT',
2636: x_return_status => l_return_status);
2637:
2638: IF l_debug_on THEN
2639: WSH_DEBUG_SV.log(l_module_name,'wsh_util_core.get_cached_value l_return_status',l_return_status);
2640: WSH_DEBUG_SV.log(l_module_name,'l_trip_tbl.count',l_trip_tbl.count);
2641: END IF;
2642:
2643: wsh_util_core.api_post_call
2636: x_return_status => l_return_status);
2637:
2638: IF l_debug_on THEN
2639: WSH_DEBUG_SV.log(l_module_name,'wsh_util_core.get_cached_value l_return_status',l_return_status);
2640: WSH_DEBUG_SV.log(l_module_name,'l_trip_tbl.count',l_trip_tbl.count);
2641: END IF;
2642:
2643: wsh_util_core.api_post_call
2644: (
2711: END IF;
2712: --
2713: --
2714: IF l_debug_on THEN
2715: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INBOUND_UTIL_PKG.processStop',WSH_DEBUG_SV.C_PROC_LEVEL);
2716: END IF;
2717: --
2718: --
2719: WSH_INBOUND_UTIL_PKG.processStop
2728: --
2729: --
2730: --
2731: IF l_debug_on THEN
2732: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2733: WSH_DEBUG_SV.log(l_module_name,'l_stop_processed',l_stop_processed);
2734: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_util_core.api_post_call',WSH_DEBUG_SV.C_PROC_LEVEL);
2735: END IF;
2736: --
2729: --
2730: --
2731: IF l_debug_on THEN
2732: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2733: WSH_DEBUG_SV.log(l_module_name,'l_stop_processed',l_stop_processed);
2734: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_util_core.api_post_call',WSH_DEBUG_SV.C_PROC_LEVEL);
2735: END IF;
2736: --
2737: wsh_util_core.api_post_call
2730: --
2731: IF l_debug_on THEN
2732: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2733: WSH_DEBUG_SV.log(l_module_name,'l_stop_processed',l_stop_processed);
2734: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_util_core.api_post_call',WSH_DEBUG_SV.C_PROC_LEVEL);
2735: END IF;
2736: --
2737: wsh_util_core.api_post_call
2738: (
2751: IF l_stop_processed = 'Y'
2752: THEN
2753: --{
2754: IF l_debug_on THEN
2755: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INBOUND_UTIL_PKG.processStop',WSH_DEBUG_SV.C_PROC_LEVEL);
2756: END IF;
2757: --
2758: --
2759: WSH_INBOUND_UTIL_PKG.processStop
2768: --
2769: --
2770: --
2771: IF l_debug_on THEN
2772: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2773: WSH_DEBUG_SV.log(l_module_name,'l_stop_processed',l_stop_processed);
2774: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_util_core.api_post_call',WSH_DEBUG_SV.C_PROC_LEVEL);
2775: END IF;
2776: --
2769: --
2770: --
2771: IF l_debug_on THEN
2772: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2773: WSH_DEBUG_SV.log(l_module_name,'l_stop_processed',l_stop_processed);
2774: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_util_core.api_post_call',WSH_DEBUG_SV.C_PROC_LEVEL);
2775: END IF;
2776: --
2777: wsh_util_core.api_post_call
2770: --
2771: IF l_debug_on THEN
2772: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2773: WSH_DEBUG_SV.log(l_module_name,'l_stop_processed',l_stop_processed);
2774: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_util_core.api_post_call',WSH_DEBUG_SV.C_PROC_LEVEL);
2775: END IF;
2776: --
2777: wsh_util_core.api_post_call
2778: (
2807: p_action => 'PUT',
2808: x_return_status => l_return_status);
2809:
2810: IF l_debug_on THEN
2811: WSH_DEBUG_SV.log(l_module_name,'wsh_util_core.get_cached_value l_return_status',l_return_status);
2812: WSH_DEBUG_SV.log(l_module_name,'l_trip_tbl.count',l_trip_tbl.count);
2813: END IF;
2814:
2815: wsh_util_core.api_post_call (
2808: x_return_status => l_return_status);
2809:
2810: IF l_debug_on THEN
2811: WSH_DEBUG_SV.log(l_module_name,'wsh_util_core.get_cached_value l_return_status',l_return_status);
2812: WSH_DEBUG_SV.log(l_module_name,'l_trip_tbl.count',l_trip_tbl.count);
2813: END IF;
2814:
2815: wsh_util_core.api_post_call (
2816: p_return_status => l_return_status,
2819:
2820: --Bug 3410681 fixed
2821:
2822: IF l_debug_on THEN
2823: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INBOUND_UTIL_PKG.processStop',WSH_DEBUG_SV.C_PROC_LEVEL);
2824: END IF;
2825: --
2826: --
2827: WSH_INBOUND_UTIL_PKG.processStop
2836: --
2837: --
2838: --
2839: IF l_debug_on THEN
2840: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2841: WSH_DEBUG_SV.log(l_module_name,'l_stop_processed',l_stop_processed);
2842: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_util_core.api_post_call',WSH_DEBUG_SV.C_PROC_LEVEL);
2843: END IF;
2844: --
2837: --
2838: --
2839: IF l_debug_on THEN
2840: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2841: WSH_DEBUG_SV.log(l_module_name,'l_stop_processed',l_stop_processed);
2842: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_util_core.api_post_call',WSH_DEBUG_SV.C_PROC_LEVEL);
2843: END IF;
2844: --
2845: wsh_util_core.api_post_call
2838: --
2839: IF l_debug_on THEN
2840: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2841: WSH_DEBUG_SV.log(l_module_name,'l_stop_processed',l_stop_processed);
2842: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_util_core.api_post_call',WSH_DEBUG_SV.C_PROC_LEVEL);
2843: END IF;
2844: --
2845: wsh_util_core.api_post_call
2846: (
2858: IF l_stop_processed = 'Y'
2859: THEN
2860: --{
2861: IF l_debug_on THEN
2862: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INBOUND_UTIL_PKG.processStop',WSH_DEBUG_SV.C_PROC_LEVEL);
2863: END IF;
2864: --
2865: --
2866: WSH_INBOUND_UTIL_PKG.processStop
2875: --
2876: --
2877: --
2878: IF l_debug_on THEN
2879: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2880: WSH_DEBUG_SV.log(l_module_name,'l_stop_processed',l_stop_processed);
2881: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_util_core.api_post_call',WSH_DEBUG_SV.C_PROC_LEVEL);
2882: END IF;
2883: --
2876: --
2877: --
2878: IF l_debug_on THEN
2879: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2880: WSH_DEBUG_SV.log(l_module_name,'l_stop_processed',l_stop_processed);
2881: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_util_core.api_post_call',WSH_DEBUG_SV.C_PROC_LEVEL);
2882: END IF;
2883: --
2884: wsh_util_core.api_post_call
2877: --
2878: IF l_debug_on THEN
2879: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2880: WSH_DEBUG_SV.log(l_module_name,'l_stop_processed',l_stop_processed);
2881: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_util_core.api_post_call',WSH_DEBUG_SV.C_PROC_LEVEL);
2882: END IF;
2883: --
2884: wsh_util_core.api_post_call
2885: (
2924: FOR dlvy_rec IN dlvy_csr(p_delivery_id_tab(l_index))
2925: LOOP
2926: --{
2927: IF l_debug_on THEN
2928: WSH_DEBUG_SV.log(l_module_name,'Delivery Id',p_delivery_id_tab(l_index));
2929: WSH_DEBUG_SV.log(l_module_name,'dlvy_rec.planned_flag',dlvy_rec.planned_flag);
2930: WSH_DEBUG_SV.log(l_module_name,'dlvy_rec.ignore_for_planning',dlvy_rec.ignore_for_planning);
2931: END IF;
2932: --
2925: LOOP
2926: --{
2927: IF l_debug_on THEN
2928: WSH_DEBUG_SV.log(l_module_name,'Delivery Id',p_delivery_id_tab(l_index));
2929: WSH_DEBUG_SV.log(l_module_name,'dlvy_rec.planned_flag',dlvy_rec.planned_flag);
2930: WSH_DEBUG_SV.log(l_module_name,'dlvy_rec.ignore_for_planning',dlvy_rec.ignore_for_planning);
2931: END IF;
2932: --
2933: --
2926: --{
2927: IF l_debug_on THEN
2928: WSH_DEBUG_SV.log(l_module_name,'Delivery Id',p_delivery_id_tab(l_index));
2929: WSH_DEBUG_SV.log(l_module_name,'dlvy_rec.planned_flag',dlvy_rec.planned_flag);
2930: WSH_DEBUG_SV.log(l_module_name,'dlvy_rec.ignore_for_planning',dlvy_rec.ignore_for_planning);
2931: END IF;
2932: --
2933: --
2934: IF dlvy_rec.planned_flag <> 'F'
2953: IF l_count > 0
2954: THEN
2955: --{
2956: IF l_debug_on THEN
2957: WSH_DEBUG_SV.log(l_module_name,'l_count',l_count);
2958: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.Plan',WSH_DEBUG_SV.C_PROC_LEVEL);
2959: END IF;
2960: --
2961: --
2954: THEN
2955: --{
2956: IF l_debug_on THEN
2957: WSH_DEBUG_SV.log(l_module_name,'l_count',l_count);
2958: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.Plan',WSH_DEBUG_SV.C_PROC_LEVEL);
2959: END IF;
2960: --
2961: --
2962: WSH_NEW_DELIVERY_ACTIONS.Plan
2967: );
2968: --
2969: --
2970: IF l_debug_on THEN
2971: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2972: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2973: END IF;
2974: --
2975: --
2968: --
2969: --
2970: IF l_debug_on THEN
2971: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2972: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2973: END IF;
2974: --
2975: --
2976: wsh_util_core.api_post_call
2983: END IF;
2984: --
2985: --
2986: IF l_debug_on THEN
2987: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INBOUND_UTIL_PKG.reRateDeliveries',WSH_DEBUG_SV.C_PROC_LEVEL);
2988: END IF;
2989: --
2990: --
2991: WSH_INBOUND_UTIL_PKG.reRateDeliveries
2995: );
2996: --
2997: --
2998: IF l_debug_on THEN
2999: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
3000: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3001: END IF;
3002: --
3003: --
2996: --
2997: --
2998: IF l_debug_on THEN
2999: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
3000: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3001: END IF;
3002: --
3003: --
3004: wsh_util_core.api_post_call
3022: OPEN stop_csr(l_index);
3023: FETCH stop_csr INTO l_stop_count;
3024:
3025: IF l_debug_on THEN
3026: WSH_DEBUG_SV.log(l_module_name,'trip_id',l_index);
3027: WSH_DEBUG_SV.log(l_module_name,'l_stop_count',l_stop_count);
3028: END IF;
3029:
3030: IF (l_stop_count > 0) THEN
3023: FETCH stop_csr INTO l_stop_count;
3024:
3025: IF l_debug_on THEN
3026: WSH_DEBUG_SV.log(l_module_name,'trip_id',l_index);
3027: WSH_DEBUG_SV.log(l_module_name,'l_stop_count',l_stop_count);
3028: END IF;
3029:
3030: IF (l_stop_count > 0) THEN
3031: FND_MESSAGE.SET_NAME('WSH', 'WSH_IB_TRIP_NOT_CLOSE');
3062:
3063: --
3064: --
3065: IF l_debug_on THEN
3066: WSH_DEBUG_SV.logmsg(l_module_name,
3067: 'Number of Errors='||l_num_errors||',Number of Warnings='||l_num_warnings);
3068: END IF;
3069: --
3070: IF l_num_errors > 0
3080: --
3081: -- Debug Statements
3082: --
3083: IF l_debug_on THEN
3084: WSH_DEBUG_SV.pop(l_module_name);
3085: END IF;
3086: --
3087: --}
3088: EXCEPTION
3094: --
3095: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3096: --
3097: IF l_debug_on THEN
3098: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3099: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3100: END IF;
3101: --
3102: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3095: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3096: --
3097: IF l_debug_on THEN
3098: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3099: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3100: END IF;
3101: --
3102: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3103:
3105: --
3106: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3107: --
3108: IF l_debug_on THEN
3109: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3110: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3111: END IF;
3112: --
3113: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
3106: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3107: --
3108: IF l_debug_on THEN
3109: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3110: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3111: END IF;
3112: --
3113: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
3114: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3113: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
3114: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3115: --
3116: IF l_debug_on THEN
3117: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3118: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
3119: END IF;
3120: WHEN others THEN
3121: wsh_util_core.default_handler('WSH_INBOUND_UTIL_PKG.setTripStopStatus',l_module_name);
3114: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3115: --
3116: IF l_debug_on THEN
3117: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3118: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
3119: END IF;
3120: WHEN others THEN
3121: wsh_util_core.default_handler('WSH_INBOUND_UTIL_PKG.setTripStopStatus',l_module_name);
3122: --
3126: --
3127: -- Debug Statements
3128: --
3129: IF l_debug_on THEN
3130: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3131: END IF;
3132: --
3133: --}
3134: END setTripStopStatus;
3192: --
3193: -- Debug Statements
3194: --
3195: IF l_debug_on THEN
3196: WSH_DEBUG_SV.push(l_module_name);
3197: WSH_DEBUG_SV.log(l_module_name,'p_inv_item_id',p_inv_item_id);
3198: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
3199: WSH_DEBUG_SV.log(l_module_name,'p_primary_uom_code',p_primary_uom_code);
3200: WSH_DEBUG_SV.log(l_module_name,'p_quantity',p_quantity);
3193: -- Debug Statements
3194: --
3195: IF l_debug_on THEN
3196: WSH_DEBUG_SV.push(l_module_name);
3197: WSH_DEBUG_SV.log(l_module_name,'p_inv_item_id',p_inv_item_id);
3198: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
3199: WSH_DEBUG_SV.log(l_module_name,'p_primary_uom_code',p_primary_uom_code);
3200: WSH_DEBUG_SV.log(l_module_name,'p_quantity',p_quantity);
3201: WSH_DEBUG_SV.log(l_module_name,'p_qty_uom_code',p_qty_uom_code);
3194: --
3195: IF l_debug_on THEN
3196: WSH_DEBUG_SV.push(l_module_name);
3197: WSH_DEBUG_SV.log(l_module_name,'p_inv_item_id',p_inv_item_id);
3198: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
3199: WSH_DEBUG_SV.log(l_module_name,'p_primary_uom_code',p_primary_uom_code);
3200: WSH_DEBUG_SV.log(l_module_name,'p_quantity',p_quantity);
3201: WSH_DEBUG_SV.log(l_module_name,'p_qty_uom_code',p_qty_uom_code);
3202: END IF;
3195: IF l_debug_on THEN
3196: WSH_DEBUG_SV.push(l_module_name);
3197: WSH_DEBUG_SV.log(l_module_name,'p_inv_item_id',p_inv_item_id);
3198: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
3199: WSH_DEBUG_SV.log(l_module_name,'p_primary_uom_code',p_primary_uom_code);
3200: WSH_DEBUG_SV.log(l_module_name,'p_quantity',p_quantity);
3201: WSH_DEBUG_SV.log(l_module_name,'p_qty_uom_code',p_qty_uom_code);
3202: END IF;
3203: --
3196: WSH_DEBUG_SV.push(l_module_name);
3197: WSH_DEBUG_SV.log(l_module_name,'p_inv_item_id',p_inv_item_id);
3198: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
3199: WSH_DEBUG_SV.log(l_module_name,'p_primary_uom_code',p_primary_uom_code);
3200: WSH_DEBUG_SV.log(l_module_name,'p_quantity',p_quantity);
3201: WSH_DEBUG_SV.log(l_module_name,'p_qty_uom_code',p_qty_uom_code);
3202: END IF;
3203: --
3204:
3197: WSH_DEBUG_SV.log(l_module_name,'p_inv_item_id',p_inv_item_id);
3198: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
3199: WSH_DEBUG_SV.log(l_module_name,'p_primary_uom_code',p_primary_uom_code);
3200: WSH_DEBUG_SV.log(l_module_name,'p_quantity',p_quantity);
3201: WSH_DEBUG_SV.log(l_module_name,'p_qty_uom_code',p_qty_uom_code);
3202: END IF;
3203: --
3204:
3205:
3216: --
3217: -- Debug Statements
3218: --
3219: IF l_debug_on THEN
3220: WSH_DEBUG_SV.pop(l_module_name);
3221: END IF;
3222: --
3223: return;
3224: END IF;
3256: --
3257: -- Debug Statements
3258: --
3259: IF l_debug_on THEN
3260: WSH_DEBUG_SV.pop(l_module_name);
3261: END IF;
3262: --
3263:
3264: EXCEPTION
3265: WHEN OTHERS THEN
3266: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3267: WSH_UTIL_CORE.Default_Handler('WSH_INBOUND_UTIL_PKG.convert_quantity',l_module_name);
3268: IF l_debug_on THEN
3269: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3270: END IF;
3271:
3272: END convert_quantity;
3273:
3343: --
3344: -- Debug Statements
3345: --
3346: IF l_debug_on THEN
3347: WSH_DEBUG_SV.push(l_module_name);
3348: WSH_DEBUG_SV.log(l_module_name,'p_lpn_id',p_lpn_id);
3349: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id',p_shipment_header_id);
3350: WSH_DEBUG_SV.log(l_module_name,'p_lpn_context',p_lpn_context);
3351: END IF;
3344: -- Debug Statements
3345: --
3346: IF l_debug_on THEN
3347: WSH_DEBUG_SV.push(l_module_name);
3348: WSH_DEBUG_SV.log(l_module_name,'p_lpn_id',p_lpn_id);
3349: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id',p_shipment_header_id);
3350: WSH_DEBUG_SV.log(l_module_name,'p_lpn_context',p_lpn_context);
3351: END IF;
3352: --
3345: --
3346: IF l_debug_on THEN
3347: WSH_DEBUG_SV.push(l_module_name);
3348: WSH_DEBUG_SV.log(l_module_name,'p_lpn_id',p_lpn_id);
3349: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id',p_shipment_header_id);
3350: WSH_DEBUG_SV.log(l_module_name,'p_lpn_context',p_lpn_context);
3351: END IF;
3352: --
3353:
3346: IF l_debug_on THEN
3347: WSH_DEBUG_SV.push(l_module_name);
3348: WSH_DEBUG_SV.log(l_module_name,'p_lpn_id',p_lpn_id);
3349: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id',p_shipment_header_id);
3350: WSH_DEBUG_SV.log(l_module_name,'p_lpn_context',p_lpn_context);
3351: END IF;
3352: --
3353:
3354:
3362: p_lpn_context )
3363: LOOP
3364:
3365: IF l_debug_on THEN
3366: WSH_DEBUG_SV.log(l_module_name,'get_outer_most_lpn_id_rec.parent_lpn_id',get_outer_most_lpn_id_rec.parent_lpn_id);
3367: WSH_DEBUG_SV.log(l_module_name,'get_outer_most_lpn_id_rec.parent_license_plate_number',get_outer_most_lpn_id_rec.parent_license_plate_number);
3368: END IF;
3369: x_outermost_lpn := get_outer_most_lpn_id_rec.parent_lpn_id;
3370: x_outermost_lpn_name := get_outer_most_lpn_id_rec.parent_license_plate_number;
3363: LOOP
3364:
3365: IF l_debug_on THEN
3366: WSH_DEBUG_SV.log(l_module_name,'get_outer_most_lpn_id_rec.parent_lpn_id',get_outer_most_lpn_id_rec.parent_lpn_id);
3367: WSH_DEBUG_SV.log(l_module_name,'get_outer_most_lpn_id_rec.parent_license_plate_number',get_outer_most_lpn_id_rec.parent_license_plate_number);
3368: END IF;
3369: x_outermost_lpn := get_outer_most_lpn_id_rec.parent_lpn_id;
3370: x_outermost_lpn_name := get_outer_most_lpn_id_rec.parent_license_plate_number;
3371:
3382: --
3383: -- Debug Statements
3384: --
3385: IF l_debug_on THEN
3386: WSH_DEBUG_SV.pop(l_module_name);
3387: END IF;
3388: --
3389:
3390: EXCEPTION
3391: WHEN OTHERS THEN
3392: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3393: WSH_UTIL_CORE.Default_Handler('WSH_INBOUND_UTIL_PKG.GET_OUTERMOST_LPN',l_module_name);
3394: IF l_debug_on THEN
3395: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3396: END IF;
3397:
3398: END GET_OUTERMOST_LPN;
3399:
3417: l_status boolean:=false;
3418: BEGIN
3419: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3420: IF l_debug_on IS NULL THEN
3421: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3422: END IF;
3423:
3424: IF l_debug_on THEN
3425: WSH_DEBUG_SV.push(l_module_name);
3421: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3422: END IF;
3423:
3424: IF l_debug_on THEN
3425: WSH_DEBUG_SV.push(l_module_name);
3426: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_id',p_delivery_detail_id);
3427: END IF;
3428:
3429: OPEN get_routing_response;
3422: END IF;
3423:
3424: IF l_debug_on THEN
3425: WSH_DEBUG_SV.push(l_module_name);
3426: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_id',p_delivery_detail_id);
3427: END IF;
3428:
3429: OPEN get_routing_response;
3430: FETCH get_routing_response INTO x_routing_response_id;
3433: END IF;
3434: CLOSE get_routing_response;
3435:
3436: IF l_debug_on THEN
3437: WSH_DEBUG_SV.log(l_module_name,'x_routing_response_id',x_routing_response_id);
3438: WSH_DEBUG_SV.pop(l_module_name);
3439: END IF;
3440:
3441: RETURN l_status;
3434: CLOSE get_routing_response;
3435:
3436: IF l_debug_on THEN
3437: WSH_DEBUG_SV.log(l_module_name,'x_routing_response_id',x_routing_response_id);
3438: WSH_DEBUG_SV.pop(l_module_name);
3439: END IF;
3440:
3441: RETURN l_status;
3442:
3442:
3443: EXCEPTION
3444: WHEN OTHERS THEN
3445: IF l_debug_on THEN
3446: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
3447: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3448: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3449: END IF;
3450: RETURN false;
3443: EXCEPTION
3444: WHEN OTHERS THEN
3445: IF l_debug_on THEN
3446: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
3447: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3448: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3449: END IF;
3450: RETURN false;
3451: END Is_Routing_Response_Send;
3444: WHEN OTHERS THEN
3445: IF l_debug_on THEN
3446: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
3447: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3448: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3449: END IF;
3450: RETURN false;
3451: END Is_Routing_Response_Send;
3452: --HACMS }