[Home] [Help]
89: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
90: --
91: IF l_debug_on IS NULL
92: THEN
93: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
94: END IF;
95: --
96: IF l_debug_on THEN
97: WSH_DEBUG_SV.push(l_module_name);
93: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
94: END IF;
95: --
96: IF l_debug_on THEN
97: WSH_DEBUG_SV.push(l_module_name);
98: --
99: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
100: END IF;
101: --
95: --
96: IF l_debug_on THEN
97: WSH_DEBUG_SV.push(l_module_name);
98: --
99: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
100: END IF;
101: --
102: x_valid_flag := TRUE;
103: OPEN check_all_lines_imported;
137: --
138: -- Debug Statements
139: --
140: IF l_debug_on THEN
141: WSH_DEBUG_SV.pop(l_module_name);
142: END IF;
143: --
144: EXCEPTION
145: WHEN others THEN
149: --
150: -- Debug Statements
151: --
152: IF l_debug_on THEN
153: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
154: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
155: END IF;
156: --
157: END check_ship_set;
150: -- Debug Statements
151: --
152: IF l_debug_on THEN
153: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
154: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
155: END IF;
156: --
157: END check_ship_set;
158:
253: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
254: --
255: IF l_debug_on IS NULL
256: THEN
257: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
258: END IF;
259: --
260: IF l_debug_on THEN
261: WSH_DEBUG_SV.push(l_module_name);
257: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
258: END IF;
259: --
260: IF l_debug_on THEN
261: WSH_DEBUG_SV.push(l_module_name);
262: --
263: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
264: END IF;
265: --
259: --
260: IF l_debug_on THEN
261: WSH_DEBUG_SV.push(l_module_name);
262: --
263: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
264: END IF;
265: --
266: x_valid_flag := TRUE;
267:
270: -- Check for ATO Models and whether the Configured Item has been created or not
271:
272: --
273: IF l_debug_on THEN
274: WSH_DEBUG_SV.log(l_module_name,'Top Model Line ID',model_rec.top_model_line_id);
275: END IF;
276: --
277:
278: -- Get all the ATO Model IDs
278: -- Get all the ATO Model IDs
279: FOR get_ato_rec IN get_ato(model_rec.top_model_line_id) LOOP
280: --
281: IF l_debug_on THEN
282: WSH_DEBUG_SV.log(l_module_name,'ATO Line ID',get_ato_rec.ato_line_id);
283: END IF;
284: --
285:
286: -- Check if the Configured Item is available, if not SMC is broken
317: LOOP
318: qty := (model_rec.ordered_quantity * check_smc_rec.child_shp_qty) / check_smc_rec.child_ord_qty;
319:
320: IF l_debug_on THEN
321: WSH_DEBUG_SV.log(l_module_name,'Ordered Qty',model_rec.ordered_quantity);
322: WSH_DEBUG_SV.log(l_module_name,'Child Shp Qty',check_smc_rec.child_shp_qty);
323: WSH_DEBUG_SV.log(l_module_name,'Child Ord Qty',check_smc_rec.child_ord_qty);
324: WSH_DEBUG_SV.log(l_module_name,'Prev Qty',qty);
325: END IF;
318: qty := (model_rec.ordered_quantity * check_smc_rec.child_shp_qty) / check_smc_rec.child_ord_qty;
319:
320: IF l_debug_on THEN
321: WSH_DEBUG_SV.log(l_module_name,'Ordered Qty',model_rec.ordered_quantity);
322: WSH_DEBUG_SV.log(l_module_name,'Child Shp Qty',check_smc_rec.child_shp_qty);
323: WSH_DEBUG_SV.log(l_module_name,'Child Ord Qty',check_smc_rec.child_ord_qty);
324: WSH_DEBUG_SV.log(l_module_name,'Prev Qty',qty);
325: END IF;
326:
319:
320: IF l_debug_on THEN
321: WSH_DEBUG_SV.log(l_module_name,'Ordered Qty',model_rec.ordered_quantity);
322: WSH_DEBUG_SV.log(l_module_name,'Child Shp Qty',check_smc_rec.child_shp_qty);
323: WSH_DEBUG_SV.log(l_module_name,'Child Ord Qty',check_smc_rec.child_ord_qty);
324: WSH_DEBUG_SV.log(l_module_name,'Prev Qty',qty);
325: END IF;
326:
327: IF ( NVL(prev_qty,qty) <> qty ) THEN
320: IF l_debug_on THEN
321: WSH_DEBUG_SV.log(l_module_name,'Ordered Qty',model_rec.ordered_quantity);
322: WSH_DEBUG_SV.log(l_module_name,'Child Shp Qty',check_smc_rec.child_shp_qty);
323: WSH_DEBUG_SV.log(l_module_name,'Child Ord Qty',check_smc_rec.child_ord_qty);
324: WSH_DEBUG_SV.log(l_module_name,'Prev Qty',qty);
325: END IF;
326:
327: IF ( NVL(prev_qty,qty) <> qty ) THEN
328: x_valid_flag := FALSE;
351: --
352: -- Debug Statements
353: --
354: IF l_debug_on THEN
355: WSH_DEBUG_SV.pop(l_module_name);
356: END IF;
357: --
358: EXCEPTION
359: WHEN others THEN
363: --
364: -- Debug Statements
365: --
366: IF l_debug_on THEN
367: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
368: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
369: END IF;
370: --
371: END check_smc;
364: -- Debug Statements
365: --
366: IF l_debug_on THEN
367: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
368: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
369: END IF;
370: --
371: END check_smc;
372:
424: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
425: --
426: IF l_debug_on IS NULL
427: THEN
428: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
429: END IF;
430: --
431: IF l_debug_on THEN
432: WSH_DEBUG_SV.push(l_module_name);
428: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
429: END IF;
430: --
431: IF l_debug_on THEN
432: WSH_DEBUG_SV.push(l_module_name);
433: --
434: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
435: END IF;
436: --
430: --
431: IF l_debug_on THEN
432: WSH_DEBUG_SV.push(l_module_name);
433: --
434: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
435: END IF;
436: --
437: x_valid_flag := TRUE;
438: OPEN check_arrival_set;
451: --
452: -- Debug Statements
453: --
454: IF l_debug_on THEN
455: WSH_DEBUG_SV.pop(l_module_name);
456: END IF;
457: --
458: EXCEPTION
459: WHEN others THEN
463: --
464: -- Debug Statements
465: --
466: IF l_debug_on THEN
467: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
468: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
469: END IF;
470: --
471: END check_arrival_set;
464: -- Debug Statements
465: --
466: IF l_debug_on THEN
467: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
468: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
469: END IF;
470: --
471: END check_arrival_set;
472:
496: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
497: --
498: IF l_debug_on IS NULL
499: THEN
500: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
501: END IF;
502: --
503: IF l_debug_on THEN
504: WSH_DEBUG_SV.push(l_module_name);
500: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
501: END IF;
502: --
503: IF l_debug_on THEN
504: WSH_DEBUG_SV.push(l_module_name);
505: --
506: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
507: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_STATUS',P_DELIVERY_STATUS);
508: END IF;
502: --
503: IF l_debug_on THEN
504: WSH_DEBUG_SV.push(l_module_name);
505: --
506: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
507: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_STATUS',P_DELIVERY_STATUS);
508: END IF;
509: --
510: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
503: IF l_debug_on THEN
504: WSH_DEBUG_SV.push(l_module_name);
505: --
506: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
507: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_STATUS',P_DELIVERY_STATUS);
508: END IF;
509: --
510: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
511:
514: --
515: -- Debug Statements
516: --
517: IF l_debug_on THEN
518: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
519: END IF;
520: --
521: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
522: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
526: --
527: -- Debug Statements
528: --
529: IF l_debug_on THEN
530: WSH_DEBUG_SV.pop(l_module_name);
531: END IF;
532: --
533: EXCEPTION
534: WHEN others THEN
538: --
539: -- Debug Statements
540: --
541: IF l_debug_on THEN
542: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
543: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
544: END IF;
545: --
546: END check_del_not_i_t;
539: -- Debug Statements
540: --
541: IF l_debug_on THEN
542: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
543: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
544: END IF;
545: --
546: END check_del_not_i_t;
547:
572: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
573: --
574: IF l_debug_on IS NULL
575: THEN
576: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
577: END IF;
578: --
579: IF l_debug_on THEN
580: WSH_DEBUG_SV.push(l_module_name);
576: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
577: END IF;
578: --
579: IF l_debug_on THEN
580: WSH_DEBUG_SV.push(l_module_name);
581: --
582: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
583: WSH_DEBUG_SV.log(l_module_name,'REL_NUM',REL_NUM);
584: WSH_DEBUG_SV.log(l_module_name,'UNREL_NUM',UNREL_NUM);
578: --
579: IF l_debug_on THEN
580: WSH_DEBUG_SV.push(l_module_name);
581: --
582: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
583: WSH_DEBUG_SV.log(l_module_name,'REL_NUM',REL_NUM);
584: WSH_DEBUG_SV.log(l_module_name,'UNREL_NUM',UNREL_NUM);
585: END IF;
586: --
579: IF l_debug_on THEN
580: WSH_DEBUG_SV.push(l_module_name);
581: --
582: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
583: WSH_DEBUG_SV.log(l_module_name,'REL_NUM',REL_NUM);
584: WSH_DEBUG_SV.log(l_module_name,'UNREL_NUM',UNREL_NUM);
585: END IF;
586: --
587: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
580: WSH_DEBUG_SV.push(l_module_name);
581: --
582: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
583: WSH_DEBUG_SV.log(l_module_name,'REL_NUM',REL_NUM);
584: WSH_DEBUG_SV.log(l_module_name,'UNREL_NUM',UNREL_NUM);
585: END IF;
586: --
587: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
588:
597: --
598: -- Debug Statements
599: --
600: IF l_debug_on THEN
601: WSH_DEBUG_SV.pop(l_module_name);
602: END IF;
603: --
604: EXCEPTION
605: WHEN others THEN
609: --
610: -- Debug Statements
611: --
612: IF l_debug_on THEN
613: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
614: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
615: END IF;
616: --
617: END check_released_lines;
610: -- Debug Statements
611: --
612: IF l_debug_on THEN
613: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
614: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
615: END IF;
616: --
617: END check_released_lines;
618:
643: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
644: --
645: IF l_debug_on IS NULL
646: THEN
647: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
648: END IF;
649: --
650: IF l_debug_on THEN
651: WSH_DEBUG_SV.push(l_module_name);
647: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
648: END IF;
649: --
650: IF l_debug_on THEN
651: WSH_DEBUG_SV.push(l_module_name);
652: --
653: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
654: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
655: WSH_DEBUG_SV.log(l_module_name,'P_UNPACKED_FLAG',P_UNPACKED_FLAG);
649: --
650: IF l_debug_on THEN
651: WSH_DEBUG_SV.push(l_module_name);
652: --
653: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
654: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
655: WSH_DEBUG_SV.log(l_module_name,'P_UNPACKED_FLAG',P_UNPACKED_FLAG);
656: END IF;
657: --
650: IF l_debug_on THEN
651: WSH_DEBUG_SV.push(l_module_name);
652: --
653: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
654: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
655: WSH_DEBUG_SV.log(l_module_name,'P_UNPACKED_FLAG',P_UNPACKED_FLAG);
656: END IF;
657: --
658: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
651: WSH_DEBUG_SV.push(l_module_name);
652: --
653: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
654: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
655: WSH_DEBUG_SV.log(l_module_name,'P_UNPACKED_FLAG',P_UNPACKED_FLAG);
656: END IF;
657: --
658: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
659:
662: --
663: -- Debug Statements
664: --
665: IF l_debug_on THEN
666: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
667: END IF;
668: --
669: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
670: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
676: --
677: -- Debug Statements
678: --
679: IF l_debug_on THEN
680: WSH_DEBUG_SV.pop(l_module_name);
681: END IF;
682: --
683: EXCEPTION
684: WHEN others THEN
688: --
689: -- Debug Statements
690: --
691: IF l_debug_on THEN
692: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
693: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
694: END IF;
695: --
696: END check_del_unpacked;
689: -- Debug Statements
690: --
691: IF l_debug_on THEN
692: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
693: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
694: END IF;
695: --
696: END check_del_unpacked;
697:
722: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
723: --
724: IF l_debug_on IS NULL
725: THEN
726: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
727: END IF;
728: --
729: IF l_debug_on THEN
730: WSH_DEBUG_SV.push(l_module_name);
726: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
727: END IF;
728: --
729: IF l_debug_on THEN
730: WSH_DEBUG_SV.push(l_module_name);
731: --
732: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
733: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
734: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
728: --
729: IF l_debug_on THEN
730: WSH_DEBUG_SV.push(l_module_name);
731: --
732: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
733: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
734: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
735: END IF;
736: --
729: IF l_debug_on THEN
730: WSH_DEBUG_SV.push(l_module_name);
731: --
732: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
733: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
734: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
735: END IF;
736: --
737: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
730: WSH_DEBUG_SV.push(l_module_name);
731: --
732: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
733: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
734: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
735: END IF;
736: --
737: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
738:
743: --
744: -- Debug Statements
745: --
746: IF l_debug_on THEN
747: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
748: END IF;
749: --
750: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
751: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
757: --
758: -- Debug Statements
759: --
760: IF l_debug_on THEN
761: WSH_DEBUG_SV.pop(l_module_name);
762: END IF;
763: --
764: EXCEPTION
765: WHEN others THEN
769: --
770: -- Debug Statements
771: --
772: IF l_debug_on THEN
773: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
774: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
775: END IF;
776: --
777: END check_del_overfilled;
770: -- Debug Statements
771: --
772: IF l_debug_on THEN
773: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
774: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
775: END IF;
776: --
777: END check_del_overfilled;
778:
803: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
804: --
805: IF l_debug_on IS NULL
806: THEN
807: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
808: END IF;
809: --
810: IF l_debug_on THEN
811: WSH_DEBUG_SV.push(l_module_name);
807: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
808: END IF;
809: --
810: IF l_debug_on THEN
811: WSH_DEBUG_SV.push(l_module_name);
812: --
813: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
814: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
815: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
809: --
810: IF l_debug_on THEN
811: WSH_DEBUG_SV.push(l_module_name);
812: --
813: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
814: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
815: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
816: END IF;
817: --
810: IF l_debug_on THEN
811: WSH_DEBUG_SV.push(l_module_name);
812: --
813: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
814: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
815: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
816: END IF;
817: --
818: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
811: WSH_DEBUG_SV.push(l_module_name);
812: --
813: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
814: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
815: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
816: END IF;
817: --
818: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
819:
824: --
825: -- Debug Statements
826: --
827: IF l_debug_on THEN
828: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
829: END IF;
830: --
831: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
832: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
839: --
840: -- Debug Statements
841: --
842: IF l_debug_on THEN
843: WSH_DEBUG_SV.pop(l_module_name);
844: END IF;
845: --
846: EXCEPTION
847: WHEN others THEN
851: --
852: -- Debug Statements
853: --
854: IF l_debug_on THEN
855: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
856: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
857: END IF;
858: --
859: END check_del_underfilled;
852: -- Debug Statements
853: --
854: IF l_debug_on THEN
855: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
856: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
857: END IF;
858: --
859: END check_del_underfilled;
860:
886: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
887: --
888: IF l_debug_on IS NULL
889: THEN
890: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
891: END IF;
892: --
893: IF l_debug_on THEN
894: WSH_DEBUG_SV.push(l_module_name);
890: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
891: END IF;
892: --
893: IF l_debug_on THEN
894: WSH_DEBUG_SV.push(l_module_name);
895: --
896: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
897: WSH_DEBUG_SV.log(l_module_name,'P_FINAL_DROPOFF_ID',P_FINAL_DROPOFF_ID);
898: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_ID',P_ULTIMATE_DROPOFF_ID);
892: --
893: IF l_debug_on THEN
894: WSH_DEBUG_SV.push(l_module_name);
895: --
896: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
897: WSH_DEBUG_SV.log(l_module_name,'P_FINAL_DROPOFF_ID',P_FINAL_DROPOFF_ID);
898: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_ID',P_ULTIMATE_DROPOFF_ID);
899: END IF;
900: --
893: IF l_debug_on THEN
894: WSH_DEBUG_SV.push(l_module_name);
895: --
896: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
897: WSH_DEBUG_SV.log(l_module_name,'P_FINAL_DROPOFF_ID',P_FINAL_DROPOFF_ID);
898: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_ID',P_ULTIMATE_DROPOFF_ID);
899: END IF;
900: --
901: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
894: WSH_DEBUG_SV.push(l_module_name);
895: --
896: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
897: WSH_DEBUG_SV.log(l_module_name,'P_FINAL_DROPOFF_ID',P_FINAL_DROPOFF_ID);
898: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_ID',P_ULTIMATE_DROPOFF_ID);
899: END IF;
900: --
901: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
902:
905: --
906: -- Debug Statements
907: --
908: IF l_debug_on THEN
909: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
910: END IF;
911: --
912: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
913: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
917: --
918: -- Debug Statements
919: --
920: IF l_debug_on THEN
921: WSH_DEBUG_SV.pop(l_module_name);
922: END IF;
923: --
924: EXCEPTION
925: WHEN others THEN
929: --
930: -- Debug Statements
931: --
932: IF l_debug_on THEN
933: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
934: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
935: END IF;
936: --
937: END check_del_final_dest;
930: -- Debug Statements
931: --
932: IF l_debug_on THEN
933: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
934: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
935: END IF;
936: --
937: END check_del_final_dest;
938:
987: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
988: --
989: IF l_debug_on IS NULL
990: THEN
991: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
992: END IF;
993: --
994: IF l_debug_on THEN
995: WSH_DEBUG_SV.push(l_module_name);
991: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
992: END IF;
993: --
994: IF l_debug_on THEN
995: WSH_DEBUG_SV.push(l_module_name);
996: --
997: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_TYPE',P_ENTITY_TYPE);
998: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
999: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE',P_SHIP_DATE);
993: --
994: IF l_debug_on THEN
995: WSH_DEBUG_SV.push(l_module_name);
996: --
997: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_TYPE',P_ENTITY_TYPE);
998: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
999: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE',P_SHIP_DATE);
1000: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ASSOC_TYPE',P_SHIP_ASSOC_TYPE);
1001: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_LOCATION_ID',P_SHIP_LOCATION_ID);
994: IF l_debug_on THEN
995: WSH_DEBUG_SV.push(l_module_name);
996: --
997: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_TYPE',P_ENTITY_TYPE);
998: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
999: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE',P_SHIP_DATE);
1000: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ASSOC_TYPE',P_SHIP_ASSOC_TYPE);
1001: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_LOCATION_ID',P_SHIP_LOCATION_ID);
1002: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
995: WSH_DEBUG_SV.push(l_module_name);
996: --
997: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_TYPE',P_ENTITY_TYPE);
998: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
999: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE',P_SHIP_DATE);
1000: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ASSOC_TYPE',P_SHIP_ASSOC_TYPE);
1001: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_LOCATION_ID',P_SHIP_LOCATION_ID);
1002: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
1003: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_ORG_ID',P_FREIGHT_ORG_ID);
996: --
997: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_TYPE',P_ENTITY_TYPE);
998: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
999: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE',P_SHIP_DATE);
1000: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ASSOC_TYPE',P_SHIP_ASSOC_TYPE);
1001: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_LOCATION_ID',P_SHIP_LOCATION_ID);
1002: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
1003: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_ORG_ID',P_FREIGHT_ORG_ID);
1004: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_DATE',P_RECEIVE_DATE);
997: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_TYPE',P_ENTITY_TYPE);
998: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
999: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE',P_SHIP_DATE);
1000: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ASSOC_TYPE',P_SHIP_ASSOC_TYPE);
1001: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_LOCATION_ID',P_SHIP_LOCATION_ID);
1002: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
1003: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_ORG_ID',P_FREIGHT_ORG_ID);
1004: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_DATE',P_RECEIVE_DATE);
1005: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_ASSOC_TYPE',P_RECEIVE_ASSOC_TYPE);
998: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
999: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE',P_SHIP_DATE);
1000: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ASSOC_TYPE',P_SHIP_ASSOC_TYPE);
1001: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_LOCATION_ID',P_SHIP_LOCATION_ID);
1002: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
1003: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_ORG_ID',P_FREIGHT_ORG_ID);
1004: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_DATE',P_RECEIVE_DATE);
1005: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_ASSOC_TYPE',P_RECEIVE_ASSOC_TYPE);
1006: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_LOCATION_ID',P_RECEIVE_LOCATION_ID);
999: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE',P_SHIP_DATE);
1000: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ASSOC_TYPE',P_SHIP_ASSOC_TYPE);
1001: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_LOCATION_ID',P_SHIP_LOCATION_ID);
1002: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
1003: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_ORG_ID',P_FREIGHT_ORG_ID);
1004: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_DATE',P_RECEIVE_DATE);
1005: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_ASSOC_TYPE',P_RECEIVE_ASSOC_TYPE);
1006: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_LOCATION_ID',P_RECEIVE_LOCATION_ID);
1007: WSH_DEBUG_SV.log(l_module_name,'P_UPDATE_FLAG',P_UPDATE_FLAG);
1000: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ASSOC_TYPE',P_SHIP_ASSOC_TYPE);
1001: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_LOCATION_ID',P_SHIP_LOCATION_ID);
1002: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
1003: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_ORG_ID',P_FREIGHT_ORG_ID);
1004: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_DATE',P_RECEIVE_DATE);
1005: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_ASSOC_TYPE',P_RECEIVE_ASSOC_TYPE);
1006: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_LOCATION_ID',P_RECEIVE_LOCATION_ID);
1007: WSH_DEBUG_SV.log(l_module_name,'P_UPDATE_FLAG',P_UPDATE_FLAG);
1008: END IF;
1001: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_LOCATION_ID',P_SHIP_LOCATION_ID);
1002: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
1003: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_ORG_ID',P_FREIGHT_ORG_ID);
1004: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_DATE',P_RECEIVE_DATE);
1005: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_ASSOC_TYPE',P_RECEIVE_ASSOC_TYPE);
1006: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_LOCATION_ID',P_RECEIVE_LOCATION_ID);
1007: WSH_DEBUG_SV.log(l_module_name,'P_UPDATE_FLAG',P_UPDATE_FLAG);
1008: END IF;
1009: --
1002: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
1003: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_ORG_ID',P_FREIGHT_ORG_ID);
1004: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_DATE',P_RECEIVE_DATE);
1005: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_ASSOC_TYPE',P_RECEIVE_ASSOC_TYPE);
1006: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_LOCATION_ID',P_RECEIVE_LOCATION_ID);
1007: WSH_DEBUG_SV.log(l_module_name,'P_UPDATE_FLAG',P_UPDATE_FLAG);
1008: END IF;
1009: --
1010: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1003: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_ORG_ID',P_FREIGHT_ORG_ID);
1004: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_DATE',P_RECEIVE_DATE);
1005: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_ASSOC_TYPE',P_RECEIVE_ASSOC_TYPE);
1006: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_LOCATION_ID',P_RECEIVE_LOCATION_ID);
1007: WSH_DEBUG_SV.log(l_module_name,'P_UPDATE_FLAG',P_UPDATE_FLAG);
1008: END IF;
1009: --
1010: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1011:
1014: --
1015: -- Debug Statements
1016: --
1017: IF l_debug_on THEN
1018: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CAL_ASG_VALIDATIONS.TRANSPORT_DATES',WSH_DEBUG_SV.C_PROC_LEVEL);
1019: END IF;
1020: --
1021: wsh_cal_asg_validations.transport_dates(
1022: p_api_version_number => 1.0
1050: --
1051: -- Debug Statements
1052: --
1053: IF l_debug_on THEN
1054: WSH_DEBUG_SV.pop(l_module_name);
1055: END IF;
1056: --
1057: RETURN;
1058: END IF;
1066: --
1067: -- Debug Statements
1068: --
1069: IF l_debug_on THEN
1070: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1071: END IF;
1072: --
1073: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1074: FND_MESSAGE.SET_TOKEN('SHIP',fnd_date.date_to_chardate(p_ship_date));
1086: --
1087: -- Debug Statements
1088: --
1089: IF l_debug_on THEN
1090: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1091: END IF;
1092: --
1093: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1094: FND_MESSAGE.SET_TOKEN('RECEIVE',fnd_date.date_to_chardate(p_receive_date));
1102: --
1103: -- Debug Statements
1104: --
1105: IF l_debug_on THEN
1106: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1107: END IF;
1108: --
1109: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1110: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1132: --
1133: -- Debug Statements
1134: --
1135: IF l_debug_on THEN
1136: WSH_DEBUG_SV.pop(l_module_name);
1137: END IF;
1138: --
1139: EXCEPTION
1140: WHEN others THEN
1144: --
1145: -- Debug Statements
1146: --
1147: IF l_debug_on THEN
1148: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1149: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1150: END IF;
1151: --
1152: END Check_Calendar;
1145: -- Debug Statements
1146: --
1147: IF l_debug_on THEN
1148: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1149: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1150: END IF;
1151: --
1152: END Check_Calendar;
1153:
1248: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1249: --
1250: IF l_debug_on IS NULL
1251: THEN
1252: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1253: END IF;
1254: --
1255: IF l_debug_on THEN
1256: WSH_DEBUG_SV.push(l_module_name);
1252: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1253: END IF;
1254: --
1255: IF l_debug_on THEN
1256: WSH_DEBUG_SV.push(l_module_name);
1257: --
1258: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1259: WSH_DEBUG_SV.log(l_module_name,'p_called_for_sc',p_called_for_sc);
1260: END IF;
1254: --
1255: IF l_debug_on THEN
1256: WSH_DEBUG_SV.push(l_module_name);
1257: --
1258: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1259: WSH_DEBUG_SV.log(l_module_name,'p_called_for_sc',p_called_for_sc);
1260: END IF;
1261: --
1262: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1255: IF l_debug_on THEN
1256: WSH_DEBUG_SV.push(l_module_name);
1257: --
1258: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1259: WSH_DEBUG_SV.log(l_module_name,'p_called_for_sc',p_called_for_sc);
1260: END IF;
1261: --
1262: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1263:
1281: --
1282: -- Debug Statements
1283: --
1284: IF l_debug_on THEN
1285: WSH_DEBUG_SV.pop(l_module_name);
1286: END IF;
1287: --
1288: RETURN;
1289: ELSE
1312: --
1313: -- Debug Statements
1314: --
1315: IF l_debug_on THEN
1316: WSH_DEBUG_SV.pop(l_module_name);
1317: END IF;
1318: --
1319: RETURN;
1320: END IF;
1332: --
1333: -- Debug Statements
1334: --
1335: IF l_debug_on THEN
1336: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1337: END IF;
1338: --
1339: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
1340: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1342: --
1343: -- Debug Statements
1344: --
1345: IF l_debug_on THEN
1346: WSH_DEBUG_SV.pop(l_module_name);
1347: END IF;
1348: --
1349: RETURN;
1350: END IF;
1367: --
1368: -- Debug Statements
1369: --
1370: IF l_debug_on THEN
1371: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_PKG.CHECK_SMC',WSH_DEBUG_SV.C_PROC_LEVEL);
1372: END IF;
1373: --
1374: wsh_tpa_delivery_pkg.check_smc( p_delivery_id, l_valid_flag, l_return_status);
1375:
1378: --
1379: -- Debug Statements
1380: --
1381: IF l_debug_on THEN
1382: WSH_DEBUG_SV.pop(l_module_name);
1383: END IF;
1384: --
1385: RETURN;
1386: END IF;
1387:
1388: IF NOT (l_valid_flag) THEN
1389: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_SMC_INCOMPLETE');
1390: IF l_debug_on THEN
1391: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1392: END IF;
1393: --
1394: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
1395: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1399: --
1400: -- Debug Statements
1401: --
1402: IF l_debug_on THEN
1403: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_PKG.CHECK_SHIP_SET',WSH_DEBUG_SV.C_PROC_LEVEL);
1404: END IF;
1405: --
1406: wsh_tpa_delivery_pkg.check_ship_set( p_delivery_id, l_valid_flag, l_return_status);
1407:
1410: --
1411: -- Debug Statements
1412: --
1413: IF l_debug_on THEN
1414: WSH_DEBUG_SV.pop(l_module_name);
1415: END IF;
1416: --
1417: RETURN;
1418: END IF;
1424: --
1425: -- Debug Statements
1426: --
1427: IF l_debug_on THEN
1428: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1429: END IF;
1430: --
1431: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
1432: -- End Bug 2429632
1443: --
1444: -- Debug Statements
1445: --
1446: IF l_debug_on THEN
1447: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.UPDATE_LEG_SEQUENCE',WSH_DEBUG_SV.C_PROC_LEVEL);
1448: END IF;
1449: --
1450: wsh_new_delivery_actions.update_leg_sequence(
1451: p_delivery_id => p_delivery_id,
1456: --
1457: -- Debug Statements
1458: --
1459: IF l_debug_on THEN
1460: WSH_DEBUG_SV.pop(l_module_name);
1461: END IF;
1462: --
1463: RETURN;
1464: END IF;
1499: --
1500: -- Debug Statements
1501: --
1502: IF l_debug_on THEN
1503: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_PKG.CHECK_CALENDAR',WSH_DEBUG_SV.C_PROC_LEVEL);
1504: END IF;
1505: --
1506: wsh_tpa_delivery_pkg.check_calendar(p_entity_type => 'DELIVERY',
1507: p_entity_id => p_delivery_id,
1525: --
1526: -- Debug Statements
1527: --
1528: IF l_debug_on THEN
1529: WSH_DEBUG_SV.pop(l_module_name);
1530: END IF;
1531: --
1532: EXCEPTION
1533: WHEN NO_FREIGHT_CODE THEN
1537: --
1538: -- Debug Statements
1539: --
1540: IF l_debug_on THEN
1541: WSH_DEBUG_SV.logmsg(l_module_name,'NO_FREIGHT_CODE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1542: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_FREIGHT_CODE');
1543: END IF;
1544: --
1545: WHEN others THEN
1538: -- Debug Statements
1539: --
1540: IF l_debug_on THEN
1541: WSH_DEBUG_SV.logmsg(l_module_name,'NO_FREIGHT_CODE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1542: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_FREIGHT_CODE');
1543: END IF;
1544: --
1545: WHEN others THEN
1546: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.CHECK_PLAN');
1549: --
1550: -- Debug Statements
1551: --
1552: IF l_debug_on THEN
1553: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1554: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1555: END IF;
1556: --
1557: END Check_Plan;
1550: -- Debug Statements
1551: --
1552: IF l_debug_on THEN
1553: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1554: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1555: END IF;
1556: --
1557: END Check_Plan;
1558:
1600: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1601: --
1602: IF l_debug_on IS NULL
1603: THEN
1604: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1605: END IF;
1606: --
1607: IF l_debug_on THEN
1608: WSH_DEBUG_SV.push(l_module_name);
1604: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1605: END IF;
1606: --
1607: IF l_debug_on THEN
1608: WSH_DEBUG_SV.push(l_module_name);
1609: --
1610: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1611: END IF;
1612: --
1606: --
1607: IF l_debug_on THEN
1608: WSH_DEBUG_SV.push(l_module_name);
1609: --
1610: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1611: END IF;
1612: --
1613: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1614:
1623: --
1624: -- Debug Statements
1625: --
1626: IF l_debug_on THEN
1627: WSH_DEBUG_SV.pop(l_module_name);
1628: END IF;
1629: --
1630: RETURN;
1631: END IF;
1637: --
1638: -- Debug Statements
1639: --
1640: IF l_debug_on THEN
1641: WSH_DEBUG_SV.pop(l_module_name);
1642: END IF;
1643: --
1644: RETURN;
1645: END IF;
1649: --
1650: -- Debug Statements
1651: --
1652: IF l_debug_on THEN
1653: WSH_DEBUG_SV.pop(l_module_name);
1654: END IF;
1655: --
1656: EXCEPTION
1657: WHEN others THEN
1661: --
1662: -- Debug Statements
1663: --
1664: IF l_debug_on THEN
1665: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1666: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1667: END IF;
1668: --
1669: END Check_Unplan;
1662: -- Debug Statements
1663: --
1664: IF l_debug_on THEN
1665: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1666: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1667: END IF;
1668: --
1669: END Check_Unplan;
1670:
1717: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1718: --
1719: IF l_debug_on IS NULL
1720: THEN
1721: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1722: END IF;
1723: --
1724: IF l_debug_on THEN
1725: WSH_DEBUG_SV.push(l_module_name);
1721: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1722: END IF;
1723: --
1724: IF l_debug_on THEN
1725: WSH_DEBUG_SV.push(l_module_name);
1726: --
1727: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_LEG_ID',P_DELIVERY_LEG_ID);
1728: END IF;
1729: --
1723: --
1724: IF l_debug_on THEN
1725: WSH_DEBUG_SV.push(l_module_name);
1726: --
1727: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_LEG_ID',P_DELIVERY_LEG_ID);
1728: END IF;
1729: --
1730: OPEN delivery_details;
1731: FETCH delivery_details INTO l_delivery_id, l_gr_weight, l_net_weight, l_wt_uom, l_volume, l_vol_uom;
1743: --
1744: -- Debug Statements
1745: --
1746: IF l_debug_on THEN
1747: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1748: END IF;
1749: --
1750: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_delivery_id));
1751: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1753: --
1754: -- Debug Statements
1755: --
1756: IF l_debug_on THEN
1757: WSH_DEBUG_SV.pop(l_module_name);
1758: END IF;
1759: --
1760: RETURN;
1761: END IF;
1765: --
1766: -- Debug Statements
1767: --
1768: IF l_debug_on THEN
1769: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1770: END IF;
1771: --
1772: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_delivery_id));
1773: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1775: --
1776: -- Debug Statements
1777: --
1778: IF l_debug_on THEN
1779: WSH_DEBUG_SV.pop(l_module_name);
1780: END IF;
1781: --
1782: RETURN;
1783: END IF;
1793: --
1794: -- Debug Statements
1795: --
1796: IF l_debug_on THEN
1797: WSH_DEBUG_SV.pop(l_module_name);
1798: END IF;
1799: --
1800: EXCEPTION
1801: WHEN others THEN
1805: --
1806: -- Debug Statements
1807: --
1808: IF l_debug_on THEN
1809: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1810: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1811: END IF;
1812: --
1813: END Check_Tender_Load;
1806: -- Debug Statements
1807: --
1808: IF l_debug_on THEN
1809: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1810: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1811: END IF;
1812: --
1813: END Check_Tender_Load;
1814:
1935: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1936: --
1937: IF l_debug_on IS NULL
1938: THEN
1939: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1940: END IF;
1941: --
1942: IF l_debug_on THEN
1943: WSH_DEBUG_SV.push(l_module_name);
1939: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1940: END IF;
1941: --
1942: IF l_debug_on THEN
1943: WSH_DEBUG_SV.push(l_module_name);
1944: --
1945: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1946: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
1947: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
1941: --
1942: IF l_debug_on THEN
1943: WSH_DEBUG_SV.push(l_module_name);
1944: --
1945: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1946: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
1947: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
1948: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
1949: END IF;
1942: IF l_debug_on THEN
1943: WSH_DEBUG_SV.push(l_module_name);
1944: --
1945: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1946: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
1947: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
1948: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
1949: END IF;
1950: --
1943: WSH_DEBUG_SV.push(l_module_name);
1944: --
1945: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1946: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
1947: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
1948: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
1949: END IF;
1950: --
1951: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1944: --
1945: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1946: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
1947: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
1948: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
1949: END IF;
1950: --
1951: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1952:
1960:
1961: CLOSE delivery_status;
1962: --
1963: IF l_debug_on THEN
1964: wsh_debug_sv.log(l_module_name, 'l_del_status', l_del_status);
1965: wsh_debug_sv.log(l_module_name, 'l_shipment_direction', l_shipment_direction);
1966: wsh_debug_sv.log(l_module_name, 'l_del_ignore', l_del_ignore);
1967: END IF;
1968: --
1961: CLOSE delivery_status;
1962: --
1963: IF l_debug_on THEN
1964: wsh_debug_sv.log(l_module_name, 'l_del_status', l_del_status);
1965: wsh_debug_sv.log(l_module_name, 'l_shipment_direction', l_shipment_direction);
1966: wsh_debug_sv.log(l_module_name, 'l_del_ignore', l_del_ignore);
1967: END IF;
1968: --
1969:
1962: --
1963: IF l_debug_on THEN
1964: wsh_debug_sv.log(l_module_name, 'l_del_status', l_del_status);
1965: wsh_debug_sv.log(l_module_name, 'l_shipment_direction', l_shipment_direction);
1966: wsh_debug_sv.log(l_module_name, 'l_del_ignore', l_del_ignore);
1967: END IF;
1968: --
1969:
1970: /*
1972: IF l_shipment_direction NOT IN ('O','IO')
1973: THEN
1974: --{
1975: IF l_debug_on THEN
1976: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit GET_SHIPPING_CONTROL',WSH_DEBUG_SV.C_PROC_LEVEL);
1977: END IF;
1978: --
1979: GET_SHIPPING_CONTROL
1980: (
1986: );
1987: --
1988: --
1989: IF l_debug_on THEN
1990: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
1991: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
1992: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
1993: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
1994: --
1987: --
1988: --
1989: IF l_debug_on THEN
1990: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
1991: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
1992: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
1993: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
1994: --
1995: END IF;
1988: --
1989: IF l_debug_on THEN
1990: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
1991: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
1992: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
1993: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
1994: --
1995: END IF;
1996: --
1989: IF l_debug_on THEN
1990: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
1991: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
1992: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
1993: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
1994: --
1995: END IF;
1996: --
1997: --
2020: --
2021: -- Debug Statements
2022: --
2023: IF l_debug_on THEN
2024: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_PKG.CHECK_DEL_NOT_I_T',WSH_DEBUG_SV.C_PROC_LEVEL);
2025: END IF;
2026: --
2027: wsh_tpa_delivery_pkg.check_del_not_i_t(p_delivery_id, l_del_status, l_return_status);
2028:
2032: --
2033: -- Debug Statements
2034: --
2035: IF l_debug_on THEN
2036: WSH_DEBUG_SV.pop(l_module_name);
2037: END IF;
2038: --
2039: RETURN;
2040: END IF;
2053:
2054: CLOSE trip_status;
2055:
2056: IF l_debug_on THEN
2057: wsh_debug_sv.log(l_module_name, 'l_trip_planflag', l_trip_planflag);
2058: wsh_debug_sv.log(l_module_name, 'l_trip_ignore', l_trip_ignore);
2059: END IF;
2060:
2061: IF l_trip_planflag='F' THEN
2054: CLOSE trip_status;
2055:
2056: IF l_debug_on THEN
2057: wsh_debug_sv.log(l_module_name, 'l_trip_planflag', l_trip_planflag);
2058: wsh_debug_sv.log(l_module_name, 'l_trip_ignore', l_trip_ignore);
2059: END IF;
2060:
2061: IF l_trip_planflag='F' THEN
2062: raise trip_firm;
2111: --
2112: -- Debug Statements
2113: --
2114: IF l_debug_on THEN
2115: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.GET_GROUP_BY_ATTR',WSH_DEBUG_SV.C_PROC_LEVEL);
2116: END IF;
2117: --
2118: wsh_delivery_autocreate.get_group_by_attr( p_organization_id => l_org_id,
2119: x_group_by_flags => l_group_by_attr,
2124: --
2125: -- Debug Statements
2126: --
2127: IF l_debug_on THEN
2128: WSH_DEBUG_SV.pop(l_module_name);
2129: END IF;
2130: --
2131: RETURN;
2132: END IF;
2207: --
2208: -- Debug Statements
2209: --
2210: IF l_debug_on THEN
2211: WSH_DEBUG_SV.pop(l_module_name);
2212: END IF;
2213: --
2214: EXCEPTION
2215: -- J-IB-NPARIKH-{
2218:
2219: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2220: --
2221: IF l_debug_on THEN
2222: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2223: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2224: END IF;
2225: --
2226: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2219: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2220: --
2221: IF l_debug_on THEN
2222: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2223: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2224: END IF;
2225: --
2226: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2227:
2227:
2228: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2229: --
2230: IF l_debug_on THEN
2231: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2232: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2233: END IF;
2234: --
2235: -- J-IB-NPARIKH-}
2228: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2229: --
2230: IF l_debug_on THEN
2231: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2232: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2233: END IF;
2234: --
2235: -- J-IB-NPARIKH-}
2236:
2241: --
2242: -- Debug Statements
2243: --
2244: IF l_debug_on THEN
2245: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2246: END IF;
2247: --
2248: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2249: --
2249: --
2250: -- Debug Statements
2251: --
2252: IF l_debug_on THEN
2253: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2254: END IF;
2255: --
2256: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2257: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2260: --
2261: -- Debug Statements
2262: --
2263: IF l_debug_on THEN
2264: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_DEL_TRIP_SHIPMETHOD exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2265: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_DEL_TRIP_SHIPMETHOD');
2266: END IF;
2267: --
2268: WHEN invalid_tripshipmethod_del_org THEN
2261: -- Debug Statements
2262: --
2263: IF l_debug_on THEN
2264: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_DEL_TRIP_SHIPMETHOD exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2265: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_DEL_TRIP_SHIPMETHOD');
2266: END IF;
2267: --
2268: WHEN invalid_tripshipmethod_del_org THEN
2269: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_SM_ORG');
2270: --
2271: -- Debug Statements
2272: --
2273: IF l_debug_on THEN
2274: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2275: END IF;
2276: --
2277: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2278: --
2278: --
2279: -- Debug Statements
2280: --
2281: IF l_debug_on THEN
2282: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2283: END IF;
2284: --
2285: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2286: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2289: --
2290: -- Debug Statements
2291: --
2292: IF l_debug_on THEN
2293: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_TRIPSHIPMETHOD_DEL_ORG exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2294: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_TRIPSHIPMETHOD_DEL_ORG');
2295: END IF;
2296: --
2297: WHEN invalid_status THEN
2290: -- Debug Statements
2291: --
2292: IF l_debug_on THEN
2293: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_TRIPSHIPMETHOD_DEL_ORG exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2294: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_TRIPSHIPMETHOD_DEL_ORG');
2295: END IF;
2296: --
2297: WHEN invalid_status THEN
2298: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_STATUS');
2299: --
2300: -- Debug Statements
2301: --
2302: IF l_debug_on THEN
2303: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2304: END IF;
2305: --
2306: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2307: --
2307: --
2308: -- Debug Statements
2309: --
2310: IF l_debug_on THEN
2311: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2312: END IF;
2313: --
2314: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2315: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2318: --
2319: -- Debug Statements
2320: --
2321: IF l_debug_on THEN
2322: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_STATUS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2323: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_STATUS');
2324: END IF;
2325: --
2326:
2319: -- Debug Statements
2320: --
2321: IF l_debug_on THEN
2322: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_STATUS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2323: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_STATUS');
2324: END IF;
2325: --
2326:
2327: WHEN trip_firm THEN
2326:
2327: WHEN trip_firm THEN
2328: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_FIRM');
2329: IF l_debug_on THEN
2330: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2331: END IF;
2332: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2333: IF l_debug_on THEN
2334: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2330: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2331: END IF;
2332: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2333: IF l_debug_on THEN
2334: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2335: END IF;
2336: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2337: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2338: wsh_util_core.add_message(x_return_status);
2336: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2337: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2338: wsh_util_core.add_message(x_return_status);
2339: IF l_debug_on THEN
2340: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_FIRM exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2341: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_FIRM');
2342: END IF;
2343: WHEN trip_diffignore THEN
2344: FND_MESSAGE.SET_NAME('WSH','WSH_DELASSIGNTR_IGNORE');
2337: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2338: wsh_util_core.add_message(x_return_status);
2339: IF l_debug_on THEN
2340: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_FIRM exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2341: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_FIRM');
2342: END IF;
2343: WHEN trip_diffignore THEN
2344: FND_MESSAGE.SET_NAME('WSH','WSH_DELASSIGNTR_IGNORE');
2345: IF l_debug_on THEN
2342: END IF;
2343: WHEN trip_diffignore THEN
2344: FND_MESSAGE.SET_NAME('WSH','WSH_DELASSIGNTR_IGNORE');
2345: IF l_debug_on THEN
2346: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2347: END IF;
2348: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2349: IF l_debug_on THEN
2350: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2346: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2347: END IF;
2348: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2349: IF l_debug_on THEN
2350: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2351: END IF;
2352: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2353: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2354: wsh_util_core.add_message(x_return_status);
2352: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2353: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2354: wsh_util_core.add_message(x_return_status);
2355: IF l_debug_on THEN
2356: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_DIFFIGNORE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2357: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_DIFFIGNORE');
2358: END IF;
2359:
2360: WHEN others THEN
2353: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2354: wsh_util_core.add_message(x_return_status);
2355: IF l_debug_on THEN
2356: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_DIFFIGNORE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2357: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_DIFFIGNORE');
2358: END IF;
2359:
2360: WHEN others THEN
2361: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.CHECK_ASSIGN_TRIP');
2364: --
2365: -- Debug Statements
2366: --
2367: IF l_debug_on THEN
2368: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2369: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2370: END IF;
2371: --
2372: END Check_Assign_Trip;
2365: -- Debug Statements
2366: --
2367: IF l_debug_on THEN
2368: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2369: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2370: END IF;
2371: --
2372: END Check_Assign_Trip;
2373:
2418: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2419: --
2420: IF l_debug_on IS NULL
2421: THEN
2422: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2423: END IF;
2424: --
2425: IF l_debug_on THEN
2426: WSH_DEBUG_SV.push(l_module_name);
2422: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2423: END IF;
2424: --
2425: IF l_debug_on THEN
2426: WSH_DEBUG_SV.push(l_module_name);
2427: --
2428: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2429: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
2430: END IF;
2424: --
2425: IF l_debug_on THEN
2426: WSH_DEBUG_SV.push(l_module_name);
2427: --
2428: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2429: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
2430: END IF;
2431: --
2432: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2425: IF l_debug_on THEN
2426: WSH_DEBUG_SV.push(l_module_name);
2427: --
2428: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2429: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
2430: END IF;
2431: --
2432: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2433:
2448: --
2449: -- Debug Statements
2450: --
2451: IF l_debug_on THEN
2452: WSH_DEBUG_SV.pop(l_module_name);
2453: END IF;
2454: --
2455: RETURN;
2456: END IF;
2459: --
2460: -- Debug Statements
2461: --
2462: IF l_debug_on THEN
2463: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_PKG.CHECK_DEL_NOT_I_T',WSH_DEBUG_SV.C_PROC_LEVEL);
2464: END IF;
2465: --
2466: wsh_tpa_delivery_pkg.check_del_not_i_t(p_delivery_id, l_del_status, x_return_status);
2467:
2469: --
2470: -- Debug Statements
2471: --
2472: IF l_debug_on THEN
2473: WSH_DEBUG_SV.pop(l_module_name);
2474: END IF;
2475: --
2476: RETURN;
2477: END IF;
2493: --
2494: -- Debug Statements
2495: --
2496: IF l_debug_on THEN
2497: WSH_DEBUG_SV.pop(l_module_name);
2498: END IF;
2499: --
2500: RETURN;
2501: END IF;
2505: --
2506: -- Debug Statements
2507: --
2508: IF l_debug_on THEN
2509: WSH_DEBUG_SV.pop(l_module_name);
2510: END IF;
2511: --
2512: EXCEPTION
2513: WHEN others THEN
2517: --
2518: -- Debug Statements
2519: --
2520: IF l_debug_on THEN
2521: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2522: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2523: END IF;
2524: --
2525: END Check_Unassign_Trip;
2518: -- Debug Statements
2519: --
2520: IF l_debug_on THEN
2521: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2522: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2523: END IF;
2524: --
2525: END Check_Unassign_Trip;
2526: ************ */
2581: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2582: --
2583: IF l_debug_on IS NULL
2584: THEN
2585: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2586: END IF;
2587: --
2588: IF l_debug_on THEN
2589: WSH_DEBUG_SV.push(l_module_name);
2585: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2586: END IF;
2587: --
2588: IF l_debug_on THEN
2589: WSH_DEBUG_SV.push(l_module_name);
2590: --
2591: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2592: END IF;
2593: --
2587: --
2588: IF l_debug_on THEN
2589: WSH_DEBUG_SV.push(l_module_name);
2590: --
2591: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2592: END IF;
2593: --
2594: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2595:
2607: --
2608: -- Debug Statements
2609: --
2610: IF l_debug_on THEN
2611: WSH_DEBUG_SV.pop(l_module_name);
2612: END IF;
2613: --
2614: RETURN;
2615: END IF;
2619: --
2620: -- Debug Statements
2621: --
2622: IF l_debug_on THEN
2623: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2624: END IF;
2625: --
2626: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2627: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2629: --
2630: -- Debug Statements
2631: --
2632: IF l_debug_on THEN
2633: WSH_DEBUG_SV.pop(l_module_name);
2634: END IF;
2635: --
2636: RETURN;
2637: END IF;
2651: --
2652: -- Debug Statements
2653: --
2654: IF l_debug_on THEN
2655: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2656: END IF;
2657: --
2658: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2659: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2661: --
2662: -- Debug Statements
2663: --
2664: IF l_debug_on THEN
2665: WSH_DEBUG_SV.pop(l_module_name);
2666: END IF;
2667: --
2668: RETURN;
2669: END IF;
2671: --
2672: -- Debug Statements
2673: --
2674: IF l_debug_on THEN
2675: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CHECK_FILL_PC',WSH_DEBUG_SV.C_PROC_LEVEL);
2676: END IF;
2677: --
2678: wsh_wv_utils.check_fill_pc( p_container_instance_id => l_container_id,
2679: x_fill_status => l_fill_status,
2700: --
2701: -- Debug Statements
2702: --
2703: IF l_debug_on THEN
2704: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2705: END IF;
2706: --
2707: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2708: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2714: --
2715: -- Debug Statements
2716: --
2717: IF l_debug_on THEN
2718: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2719: END IF;
2720: --
2721: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2722: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2729: --
2730: -- Debug Statements
2731: --
2732: IF l_debug_on THEN
2733: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2734: END IF;
2735: --
2736: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2737: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2739: --
2740: -- Debug Statements
2741: --
2742: IF l_debug_on THEN
2743: WSH_DEBUG_SV.pop(l_module_name);
2744: END IF;
2745: --
2746: RETURN;
2747: END IF;
2749: --
2750: -- Debug Statements
2751: --
2752: IF l_debug_on THEN
2753: WSH_DEBUG_SV.pop(l_module_name);
2754: END IF;
2755: --
2756: EXCEPTION
2757: WHEN others THEN
2761: --
2762: -- Debug Statements
2763: --
2764: IF l_debug_on THEN
2765: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2766: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2767: END IF;
2768: --
2769: END Check_Pack;
2762: -- Debug Statements
2763: --
2764: IF l_debug_on THEN
2765: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2766: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2767: END IF;
2768: --
2769: END Check_Pack;
2770:
2857: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2858: --
2859: IF l_debug_on IS NULL
2860: THEN
2861: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2862: END IF;
2863: --
2864: IF l_debug_on THEN
2865: WSH_DEBUG_SV.push(l_module_name);
2861: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2862: END IF;
2863: --
2864: IF l_debug_on THEN
2865: WSH_DEBUG_SV.push(l_module_name);
2866: --
2867: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
2868: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_CREDIT_INIT_FLAG',P_CHECK_CREDIT_INIT_FLAG);
2869: END IF;
2863: --
2864: IF l_debug_on THEN
2865: WSH_DEBUG_SV.push(l_module_name);
2866: --
2867: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
2868: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_CREDIT_INIT_FLAG',P_CHECK_CREDIT_INIT_FLAG);
2869: END IF;
2870: --
2871: OPEN detail_info;
2864: IF l_debug_on THEN
2865: WSH_DEBUG_SV.push(l_module_name);
2866: --
2867: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
2868: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_CREDIT_INIT_FLAG',P_CHECK_CREDIT_INIT_FLAG);
2869: END IF;
2870: --
2871: OPEN detail_info;
2872: FETCH detail_info INTO l_line_inv_rec.delivery_detail_id,
2898: --
2899: -- Debug Statements
2900: --
2901: IF l_debug_on THEN
2902: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_CREDIT_HOLDS',WSH_DEBUG_SV.C_PROC_LEVEL);
2903: END IF;
2904: --
2905: wsh_details_validations.check_credit_holds(
2906: p_detail_id => p_detail_id,
2914: --
2915: -- Debug Statements
2916: --
2917: IF l_debug_on THEN
2918: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_CREDIT_HOLDS',WSH_DEBUG_SV.C_PROC_LEVEL);
2919: END IF;
2920: --
2921: wsh_details_validations.check_credit_holds(
2922: p_detail_id => p_detail_id,
2933: --
2934: -- Debug Statements
2935: --
2936: IF l_debug_on THEN
2937: WSH_DEBUG_SV.pop(l_module_name);
2938: END IF;
2939: --
2940: RETURN;
2941: END IF;
2950: AND (NVL(l_line_inv_rec.picked_quantity2,0) = 0) THEN
2951:
2952:
2953: IF l_debug_on THEN
2954: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.Check_Default_Catch_Weights',WSH_DEBUG_SV.C_PROC_LEVEL);
2955: END IF;
2956:
2957: WSH_DELIVERY_DETAILS_INV.Check_Default_Catch_Weights
2958: (p_line_inv_rec => l_line_inv_rec,
2960:
2961: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2962:
2963: IF l_debug_on THEN
2964: WSH_DEBUG_SV.pop(l_module_name);
2965: END IF;
2966:
2967: RETURN;
2968:
2980: --
2981: -- Debug Statements
2982: --
2983: IF l_debug_on THEN
2984: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.FETCH_INV_CONTROLS',WSH_DEBUG_SV.C_PROC_LEVEL);
2985: END IF;
2986: --
2987: wsh_delivery_details_inv.fetch_inv_controls(
2988: p_delivery_detail_id => l_line_inv_rec.delivery_detail_id,
2996: --
2997: -- Debug Statements
2998: --
2999: IF l_debug_on THEN
3000: WSH_DEBUG_SV.pop(l_module_name);
3001: END IF;
3002: --
3003: RETURN;
3004: END IF;
3009: --
3010: -- Debug Statements
3011: --
3012: IF l_debug_on THEN
3013: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.DETAILS_REQUIRED',WSH_DEBUG_SV.C_PROC_LEVEL);
3014: END IF;
3015: --
3016: wsh_delivery_details_inv.Details_Required (
3017: p_line_inv_rec => l_line_inv_rec,
3024: --
3025: -- Debug Statements
3026: --
3027: IF l_debug_on THEN
3028: WSH_DEBUG_SV.pop(l_module_name);
3029: END IF;
3030: --
3031: RETURN;
3032: END IF;
3042: --
3043: -- Debug Statements
3044: --
3045: IF l_debug_on THEN
3046: WSH_DEBUG_SV.logmsg(l_module_name, 'DETAILS REQUIRED ERROR ' || X_RETURN_STATUS );
3047: END IF;
3048: --
3049: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3050: ELSE
3056: END IF;
3057: x_line_inv_flag_rec := l_line_inv_flag_rec ;
3058:
3059: IF l_debug_on THEN
3060: wsh_debug_sv.log(l_module_name, 'x_line_inv_flag_rec.details_required_flag', x_line_inv_flag_rec.details_required_flag);
3061: END IF;
3062:
3063: /****************Material Status Control**************/
3064: IF l_line_inv_flag_rec.details_required_flag <> 'Y' THEN
3073: x_transaction_type_id => L_TRANSACTION_TYPE_ID ,
3074: x_return_status => x_return_status);
3075: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3076: IF l_debug_on THEN
3077: WSH_DEBUG_SV.pop(l_module_name);
3078: END IF;
3079: return;
3080: END IF;
3081:
3097: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3098: l_line_inv_flag_rec.invalid_material_status_flag := 'Y';
3099: x_line_inv_flag_rec := l_line_inv_flag_rec ;
3100: IF l_debug_on THEN
3101: WSH_DEBUG_SV.pop(l_module_name);
3102: END IF;
3103: return;
3104: END IF;
3105: ELSE
3134: l_line_inv_flag_rec.invalid_material_status_flag := 'Y';
3135: x_line_inv_flag_rec := l_line_inv_flag_rec ;
3136: FOR i in 1..x_errored_serials.count LOOP
3137: IF l_debug_on THEN
3138: wsh_debug_sv.log(l_module_name, 'errored serial_number'||to_char(i), x_errored_serials(i));
3139: END IF;
3140: END LOOP;
3141: IF l_debug_on THEN
3142: WSH_DEBUG_SV.pop(l_module_name);
3138: wsh_debug_sv.log(l_module_name, 'errored serial_number'||to_char(i), x_errored_serials(i));
3139: END IF;
3140: END LOOP;
3141: IF l_debug_on THEN
3142: WSH_DEBUG_SV.pop(l_module_name);
3143: END IF;
3144: return;
3145: END IF;
3146:
3163: l_line_inv_flag_rec.invalid_material_status_flag := 'Y';
3164: END IF;
3165: x_line_inv_flag_rec := l_line_inv_flag_rec ;
3166: IF l_debug_on THEN
3167: WSH_DEBUG_SV.pop(l_module_name);
3168: END IF;
3169: return;
3170: END IF;
3171: END IF;
3173: x_line_inv_flag_rec := l_line_inv_flag_rec ;
3174: END IF;
3175: /****************Material Status Control**************/
3176: IF l_debug_on THEN
3177: wsh_debug_sv.log(l_module_name, 'x_line_inv_flag_rec.invalid_material_status_flag', x_line_inv_flag_rec.invalid_material_status_flag);
3178: END IF;
3179: END IF;
3180: IF l_debug_on THEN
3181: WSH_DEBUG_SV.pop(l_module_name);
3177: wsh_debug_sv.log(l_module_name, 'x_line_inv_flag_rec.invalid_material_status_flag', x_line_inv_flag_rec.invalid_material_status_flag);
3178: END IF;
3179: END IF;
3180: IF l_debug_on THEN
3181: WSH_DEBUG_SV.pop(l_module_name);
3182: END IF;
3183: --
3184: EXCEPTION
3185: WHEN others THEN
3192: --
3193: -- Debug Statements
3194: --
3195: IF l_debug_on THEN
3196: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3197: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3198: END IF;
3199: END Check_Detail_for_Confirm;
3200:
3193: -- Debug Statements
3194: --
3195: IF l_debug_on THEN
3196: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3197: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3198: END IF;
3199: END Check_Detail_for_Confirm;
3200:
3201:
3275: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3276: --
3277: IF l_debug_on IS NULL
3278: THEN
3279: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3280: END IF;
3281: --
3282: IF l_debug_on THEN
3283: WSH_DEBUG_SV.push(l_module_name);
3279: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3280: END IF;
3281: --
3282: IF l_debug_on THEN
3283: WSH_DEBUG_SV.push(l_module_name);
3284: --
3285: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3286: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
3287: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_PACKING_FLAG',P_ENFORCE_PACKING_FLAG);
3281: --
3282: IF l_debug_on THEN
3283: WSH_DEBUG_SV.push(l_module_name);
3284: --
3285: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3286: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
3287: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_PACKING_FLAG',P_ENFORCE_PACKING_FLAG);
3288: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
3289: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
3282: IF l_debug_on THEN
3283: WSH_DEBUG_SV.push(l_module_name);
3284: --
3285: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3286: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
3287: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_PACKING_FLAG',P_ENFORCE_PACKING_FLAG);
3288: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
3289: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
3290: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_LOCATION',P_SHIP_FROM_LOCATION);
3283: WSH_DEBUG_SV.push(l_module_name);
3284: --
3285: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3286: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
3287: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_PACKING_FLAG',P_ENFORCE_PACKING_FLAG);
3288: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
3289: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
3290: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_LOCATION',P_SHIP_FROM_LOCATION);
3291: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_TO_LOCATION',P_SHIP_TO_LOCATION);
3284: --
3285: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3286: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
3287: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_PACKING_FLAG',P_ENFORCE_PACKING_FLAG);
3288: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
3289: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
3290: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_LOCATION',P_SHIP_FROM_LOCATION);
3291: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_TO_LOCATION',P_SHIP_TO_LOCATION);
3292: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
3285: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3286: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
3287: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_PACKING_FLAG',P_ENFORCE_PACKING_FLAG);
3288: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
3289: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
3290: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_LOCATION',P_SHIP_FROM_LOCATION);
3291: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_TO_LOCATION',P_SHIP_TO_LOCATION);
3292: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
3293: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3286: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
3287: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_PACKING_FLAG',P_ENFORCE_PACKING_FLAG);
3288: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
3289: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
3290: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_LOCATION',P_SHIP_FROM_LOCATION);
3291: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_TO_LOCATION',P_SHIP_TO_LOCATION);
3292: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
3293: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3294: WSH_DEBUG_SV.log(l_module_name,'P_INITIAL_PICKUP_DATE',P_INITIAL_PICKUP_DATE);
3287: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_PACKING_FLAG',P_ENFORCE_PACKING_FLAG);
3288: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
3289: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
3290: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_LOCATION',P_SHIP_FROM_LOCATION);
3291: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_TO_LOCATION',P_SHIP_TO_LOCATION);
3292: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
3293: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3294: WSH_DEBUG_SV.log(l_module_name,'P_INITIAL_PICKUP_DATE',P_INITIAL_PICKUP_DATE);
3295: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_DATE',P_ULTIMATE_DROPOFF_DATE);
3288: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
3289: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
3290: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_LOCATION',P_SHIP_FROM_LOCATION);
3291: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_TO_LOCATION',P_SHIP_TO_LOCATION);
3292: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
3293: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3294: WSH_DEBUG_SV.log(l_module_name,'P_INITIAL_PICKUP_DATE',P_INITIAL_PICKUP_DATE);
3295: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_DATE',P_ULTIMATE_DROPOFF_DATE);
3296: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
3289: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
3290: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_LOCATION',P_SHIP_FROM_LOCATION);
3291: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_TO_LOCATION',P_SHIP_TO_LOCATION);
3292: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
3293: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3294: WSH_DEBUG_SV.log(l_module_name,'P_INITIAL_PICKUP_DATE',P_INITIAL_PICKUP_DATE);
3295: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_DATE',P_ULTIMATE_DROPOFF_DATE);
3296: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
3297: END IF;
3290: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_LOCATION',P_SHIP_FROM_LOCATION);
3291: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_TO_LOCATION',P_SHIP_TO_LOCATION);
3292: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
3293: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3294: WSH_DEBUG_SV.log(l_module_name,'P_INITIAL_PICKUP_DATE',P_INITIAL_PICKUP_DATE);
3295: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_DATE',P_ULTIMATE_DROPOFF_DATE);
3296: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
3297: END IF;
3298: --
3291: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_TO_LOCATION',P_SHIP_TO_LOCATION);
3292: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
3293: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3294: WSH_DEBUG_SV.log(l_module_name,'P_INITIAL_PICKUP_DATE',P_INITIAL_PICKUP_DATE);
3295: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_DATE',P_ULTIMATE_DROPOFF_DATE);
3296: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
3297: END IF;
3298: --
3299: --
3292: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
3293: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3294: WSH_DEBUG_SV.log(l_module_name,'P_INITIAL_PICKUP_DATE',P_INITIAL_PICKUP_DATE);
3295: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_DATE',P_ULTIMATE_DROPOFF_DATE);
3296: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
3297: END IF;
3298: --
3299: --
3300: -- Debug Statements
3299: --
3300: -- Debug Statements
3301: --
3302: IF l_debug_on THEN
3303: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_PKG.CHECK_DEL_OVERFILLED',WSH_DEBUG_SV.C_PROC_LEVEL);
3304: END IF;
3305: --
3306: wsh_tpa_delivery_pkg.check_del_overfilled(p_delivery_id, p_cont_exists_flag, p_overfilled_flag, l_return_status);
3307:
3311: --
3312: -- Debug Statements
3313: --
3314: IF l_debug_on THEN
3315: WSH_DEBUG_SV.pop(l_module_name);
3316: END IF;
3317: --
3318: RETURN;
3319: END IF;
3323: --
3324: -- Debug Statements
3325: --
3326: IF l_debug_on THEN
3327: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_PKG.CHECK_DEL_UNDERFILLED',WSH_DEBUG_SV.C_PROC_LEVEL);
3328: END IF;
3329: --
3330: wsh_tpa_delivery_pkg.check_del_underfilled(p_delivery_id, p_cont_exists_flag, p_underfilled_flag, l_return_status);
3331:
3335: --
3336: -- Debug Statements
3337: --
3338: IF l_debug_on THEN
3339: WSH_DEBUG_SV.pop(l_module_name);
3340: END IF;
3341: --
3342: RETURN;
3343: END IF;
3347: --
3348: -- Debug Statements
3349: --
3350: IF l_debug_on THEN
3351: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_PKG.CHECK_SMC',WSH_DEBUG_SV.C_PROC_LEVEL);
3352: END IF;
3353: --
3354: wsh_tpa_delivery_pkg.check_smc( p_delivery_id, l_valid_flag, l_return_status);
3355:
3358: --
3359: -- Debug Statements
3360: --
3361: IF l_debug_on THEN
3362: WSH_DEBUG_SV.pop(l_module_name);
3363: END IF;
3364: --
3365: RETURN;
3366: END IF;
3369: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_SMC_INCOMPLETE');
3370: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3371:
3372: IF l_debug_on THEN
3373: WSH_DEBUG_SV.log(l_module_name,'g_break_smc_severity',g_break_smc_severity);
3374: END IF;
3375:
3376: If g_break_smc_severity is NULL then
3377: g_break_smc_severity := wsh_ru_actions.get_message_severity (wsh_new_delivery_actions.g_ship_confirm_act
3378: ,wsh_new_delivery_actions.g_break_smc_msg);
3379: End If;
3380:
3381: IF l_debug_on THEN
3382: WSH_DEBUG_SV.log(l_module_name,'g_break_smc_severity',g_break_smc_severity);
3383: END IF;
3384:
3385: If g_break_smc_severity = 'E' then
3386: --Note. Setting return status to 'W' and message severity to 'E'. The return
3389: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3390: WSH_UTIL_CORE.ADD_MESSAGE(WSH_UTIL_CORE.G_RET_STS_ERROR);
3391: WSH_NEW_DELIVERY_ACTIONS.g_break_ship_set_or_smc := nvl(WSH_NEW_DELIVERY_ACTIONS.g_break_ship_set_or_smc,0) + 1;
3392: IF l_debug_on THEN
3393: WSH_DEBUG_SV.log(l_module_name,'Going to exit wsh_delivery_validations due to message severity set to (SMC) ',g_break_smc_severity);
3394: WSH_DEBUG_SV.pop(l_module_name);
3395: END IF;
3396: RETURN;
3397: Else
3390: WSH_UTIL_CORE.ADD_MESSAGE(WSH_UTIL_CORE.G_RET_STS_ERROR);
3391: WSH_NEW_DELIVERY_ACTIONS.g_break_ship_set_or_smc := nvl(WSH_NEW_DELIVERY_ACTIONS.g_break_ship_set_or_smc,0) + 1;
3392: IF l_debug_on THEN
3393: WSH_DEBUG_SV.log(l_module_name,'Going to exit wsh_delivery_validations due to message severity set to (SMC) ',g_break_smc_severity);
3394: WSH_DEBUG_SV.pop(l_module_name);
3395: END IF;
3396: RETURN;
3397: Else
3398: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3404: --
3405: -- Debug Statements
3406: --
3407: IF l_debug_on THEN
3408: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_PKG.CHECK_SHIP_SET',WSH_DEBUG_SV.C_PROC_LEVEL);
3409: END IF;
3410: --
3411: wsh_tpa_delivery_pkg.check_ship_set( p_delivery_id, l_valid_flag, l_return_status);
3412:
3415: --
3416: -- Debug Statements
3417: --
3418: IF l_debug_on THEN
3419: WSH_DEBUG_SV.pop(l_module_name);
3420: END IF;
3421: --
3422: RETURN;
3423: END IF;
3426: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_SHIP_SET_INCOMPLETE');
3427: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3428:
3429: IF l_debug_on THEN
3430: WSH_DEBUG_SV.log(l_module_name,'g_break_ship_set_severity',g_break_ship_set_severity);
3431: END IF;
3432:
3433: If g_break_ship_set_severity is null then
3434: g_break_ship_set_severity := wsh_ru_actions.get_message_severity (wsh_new_delivery_actions.g_ship_confirm_act
3436:
3437: End If;
3438:
3439: IF l_debug_on THEN
3440: WSH_DEBUG_SV.log(l_module_name,'g_break_ship_set_severity',g_break_ship_set_severity);
3441: END IF;
3442:
3443: If g_break_ship_set_severity = 'E' then
3444: --Note. Setting return status to 'W' and message severity to 'E'. The return
3447: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3448: WSH_UTIL_CORE.ADD_MESSAGE(WSH_UTIL_CORE.G_RET_STS_ERROR);
3449: WSH_NEW_DELIVERY_ACTIONS.g_break_ship_set_or_smc := nvl(WSH_NEW_DELIVERY_ACTIONS.g_break_ship_set_or_smc,0) + 1;
3450: IF l_debug_on THEN
3451: WSH_DEBUG_SV.log(l_module_name,'Going to exit wsh_delivery_validations due to message severity set to (ShipSet) ',g_break_ship_set_severity);
3452: WSH_DEBUG_SV.pop(l_module_name);
3453: END IF;
3454: RETURN;
3455: Else
3448: WSH_UTIL_CORE.ADD_MESSAGE(WSH_UTIL_CORE.G_RET_STS_ERROR);
3449: WSH_NEW_DELIVERY_ACTIONS.g_break_ship_set_or_smc := nvl(WSH_NEW_DELIVERY_ACTIONS.g_break_ship_set_or_smc,0) + 1;
3450: IF l_debug_on THEN
3451: WSH_DEBUG_SV.log(l_module_name,'Going to exit wsh_delivery_validations due to message severity set to (ShipSet) ',g_break_ship_set_severity);
3452: WSH_DEBUG_SV.pop(l_module_name);
3453: END IF;
3454: RETURN;
3455: Else
3456: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3463: /** --
3464: -- Debug Statements
3465: --
3466: IF l_debug_on THEN
3467: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.UPDATE_LEG_SEQUENCE',WSH_DEBUG_SV.C_PROC_LEVEL);
3468: END IF;
3469: --
3470: wsh_new_delivery_actions.update_leg_sequence(
3471: p_delivery_id => p_delivery_id,
3476: --
3477: -- Debug Statements
3478: --
3479: IF l_debug_on THEN
3480: WSH_DEBUG_SV.pop(l_module_name);
3481: END IF;
3482: --
3483: RETURN;
3484: END IF;
3499: --Bug 6156495 -End of code addition
3500:
3501:
3502: IF l_debug_on THEN
3503: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_PKG.CHECK_CALENDAR',WSH_DEBUG_SV.C_PROC_LEVEL);
3504: END IF;
3505: -- modified ship_assoc type to 'HR_LOCATION' and receive_assoc_type to 'CUSTOMER_SITE' for bug 5880742
3506: --
3507: wsh_tpa_delivery_pkg.check_calendar(p_entity_type => 'DELIVERY',
3526: --
3527: -- Debug Statements
3528: --
3529: IF l_debug_on THEN
3530: WSH_DEBUG_SV.pop(l_module_name);
3531: END IF;
3532: --
3533: EXCEPTION
3534: WHEN others THEN
3538: --
3539: -- Debug Statements
3540: --
3541: IF l_debug_on THEN
3542: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3543: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3544: END IF;
3545: --
3546: END Check_Confirm;
3539: -- Debug Statements
3540: --
3541: IF l_debug_on THEN
3542: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3543: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3544: END IF;
3545: --
3546: END Check_Confirm;
3547:
3579: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3580: --
3581: IF l_debug_on IS NULL
3582: THEN
3583: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3584: END IF;
3585: --
3586: IF l_debug_on THEN
3587: WSH_DEBUG_SV.push(l_module_name);
3583: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3584: END IF;
3585: --
3586: IF l_debug_on THEN
3587: WSH_DEBUG_SV.push(l_module_name);
3588: --
3589: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3590: END IF;
3591: --
3585: --
3586: IF l_debug_on THEN
3587: WSH_DEBUG_SV.push(l_module_name);
3588: --
3589: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3590: END IF;
3591: --
3592: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3593:
3606: --
3607: -- Debug Statements
3608: --
3609: IF l_debug_on THEN
3610: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3611: END IF;
3612: --
3613: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3614: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3616: --
3617: -- Debug Statements
3618: --
3619: IF l_debug_on THEN
3620: WSH_DEBUG_SV.pop(l_module_name);
3621: END IF;
3622: --
3623: RETURN;
3624: END IF;
3626: --
3627: -- Debug Statements
3628: --
3629: IF l_debug_on THEN
3630: WSH_DEBUG_SV.pop(l_module_name);
3631: END IF;
3632: --
3633: EXCEPTION
3634: WHEN others THEN
3638: --
3639: -- Debug Statements
3640: --
3641: IF l_debug_on THEN
3642: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3643: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3644: END IF;
3645: --
3646: END Check_Reopen;
3639: -- Debug Statements
3640: --
3641: IF l_debug_on THEN
3642: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3643: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3644: END IF;
3645: --
3646: END Check_Reopen;
3647:
3692: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3693: --
3694: IF l_debug_on IS NULL
3695: THEN
3696: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3697: END IF;
3698: --
3699: IF l_debug_on THEN
3700: WSH_DEBUG_SV.push(l_module_name);
3696: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3697: END IF;
3698: --
3699: IF l_debug_on THEN
3700: WSH_DEBUG_SV.push(l_module_name);
3701: --
3702: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3703: END IF;
3704: --
3698: --
3699: IF l_debug_on THEN
3700: WSH_DEBUG_SV.push(l_module_name);
3701: --
3702: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3703: END IF;
3704: --
3705: -- J-IB-NPARIKH-{
3706: -- Stubbed out as no one is calling this API.
3722: --
3723: -- Debug Statements
3724: --
3725: IF l_debug_on THEN
3726: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3727: END IF;
3728: --
3729: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3730: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3732: --
3733: -- Debug Statements
3734: --
3735: IF l_debug_on THEN
3736: WSH_DEBUG_SV.pop(l_module_name);
3737: END IF;
3738: --
3739: RETURN;
3740: END IF;
3765: --
3766: -- Debug Statements
3767: --
3768: IF l_debug_on THEN
3769: WSH_DEBUG_SV.pop(l_module_name);
3770: END IF;
3771: --
3772: EXCEPTION
3773: WHEN others THEN
3777: --
3778: -- Debug Statements
3779: --
3780: IF l_debug_on THEN
3781: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3782: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3783: END IF;
3784: --
3785: END Check_Intransit;
3778: -- Debug Statements
3779: --
3780: IF l_debug_on THEN
3781: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3782: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3783: END IF;
3784: --
3785: END Check_Intransit;
3786:
3905: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3906: --
3907: IF l_debug_on IS NULL
3908: THEN
3909: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3910: END IF;
3911: --
3912: IF l_debug_on THEN
3913: WSH_DEBUG_SV.push(l_module_name);
3909: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3910: END IF;
3911: --
3912: IF l_debug_on THEN
3913: WSH_DEBUG_SV.push(l_module_name);
3914: --
3915: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3916: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_FLAG',P_MANUAL_FLAG);
3917: WSH_DEBUG_SV.log(l_module_name,'P_OLD_STATUS_CODE',P_OLD_STATUS_CODE);
3911: --
3912: IF l_debug_on THEN
3913: WSH_DEBUG_SV.push(l_module_name);
3914: --
3915: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3916: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_FLAG',P_MANUAL_FLAG);
3917: WSH_DEBUG_SV.log(l_module_name,'P_OLD_STATUS_CODE',P_OLD_STATUS_CODE);
3918: END IF;
3919:
3912: IF l_debug_on THEN
3913: WSH_DEBUG_SV.push(l_module_name);
3914: --
3915: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3916: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_FLAG',P_MANUAL_FLAG);
3917: WSH_DEBUG_SV.log(l_module_name,'P_OLD_STATUS_CODE',P_OLD_STATUS_CODE);
3918: END IF;
3919:
3920: /**
3913: WSH_DEBUG_SV.push(l_module_name);
3914: --
3915: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3916: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_FLAG',P_MANUAL_FLAG);
3917: WSH_DEBUG_SV.log(l_module_name,'P_OLD_STATUS_CODE',P_OLD_STATUS_CODE);
3918: END IF;
3919:
3920: /**
3921: -- J-IB-NPARIKH-{
3946: --
3947: -- Debug Statements
3948: --
3949: IF l_debug_on THEN
3950: WSH_DEBUG_SV.pop(l_module_name);
3951: END IF;
3952: --
3953: return;
3954: END IF;
3977: --
3978: -- Debug Statements
3979: --
3980: IF l_debug_on THEN
3981: WSH_DEBUG_SV.pop(l_module_name);
3982: END IF;
3983: --
3984: return;
3985: END IF;
4000: --
4001: -- Debug Statements
4002: --
4003: IF l_debug_on THEN
4004: WSH_DEBUG_SV.pop(l_module_name);
4005: END IF;
4006: --
4007: return;
4008: END IF;
4019: --
4020: -- Debug Statements
4021: --
4022: IF l_debug_on THEN
4023: WSH_DEBUG_SV.pop(l_module_name);
4024: END IF;
4025: --
4026: return;
4027: END IF;
4074: --
4075: -- Debug Statements
4076: --
4077: IF l_debug_on THEN
4078: WSH_DEBUG_SV.pop(l_module_name);
4079: END IF;
4080: --
4081: return;
4082: ELSE
4093: --
4094: -- Debug Statements
4095: --
4096: IF l_debug_on THEN
4097: WSH_DEBUG_SV.pop(l_module_name);
4098: END IF;
4099: --
4100: EXCEPTION
4101: WHEN others THEN
4105: --
4106: -- Debug Statements
4107: --
4108: IF l_debug_on THEN
4109: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4110: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4111: END IF;
4112: --
4113: END;
4106: -- Debug Statements
4107: --
4108: IF l_debug_on THEN
4109: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4110: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4111: END IF;
4112: --
4113: END;
4114:
4251: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4252: --
4253: IF l_debug_on IS NULL
4254: THEN
4255: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4256: END IF;
4257: --
4258: IF l_debug_on THEN
4259: WSH_DEBUG_SV.push(l_module_name);
4255: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4256: END IF;
4257: --
4258: IF l_debug_on THEN
4259: WSH_DEBUG_SV.push(l_module_name);
4260: --
4261: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
4262: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
4263: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
4257: --
4258: IF l_debug_on THEN
4259: WSH_DEBUG_SV.push(l_module_name);
4260: --
4261: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
4262: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
4263: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
4264: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
4265: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
4258: IF l_debug_on THEN
4259: WSH_DEBUG_SV.push(l_module_name);
4260: --
4261: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
4262: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
4263: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
4264: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
4265: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
4266: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
4259: WSH_DEBUG_SV.push(l_module_name);
4260: --
4261: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
4262: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
4263: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
4264: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
4265: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
4266: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
4267: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
4260: --
4261: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
4262: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
4263: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
4264: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
4265: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
4266: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
4267: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
4268: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
4261: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
4262: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
4263: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
4264: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
4265: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
4266: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
4267: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
4268: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
4269: END IF;
4262: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
4263: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
4264: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
4265: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
4266: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
4267: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
4268: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
4269: END IF;
4270: --
4263: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
4264: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
4265: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
4266: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
4267: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
4268: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
4269: END IF;
4270: --
4271: l_num_warnings := 0;
4264: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
4265: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
4266: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
4267: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
4268: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
4269: END IF;
4270: --
4271: l_num_warnings := 0;
4272: l_num_errors := 0;
4397: --
4398:
4399: -- Check for Exceptions against Delivery and its Contents
4400: IF l_debug_on THEN
4401: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.Check_Exceptions',WSH_DEBUG_SV.C_PROC_LEVEL); END IF;
4402: l_exceptions_tab.delete;
4403: l_exp_logged := FALSE;
4404: l_exp_warning := FALSE;
4405: WSH_XC_UTIL.Check_Exceptions (
4478: --
4479: -- Debug Statements
4480: --
4481: IF l_debug_on THEN
4482: WSH_DEBUG_SV.pop(l_module_name);
4483: END IF;
4484: --
4485: --}
4486: EXCEPTION
4496: x_allowed := 'N';
4497: --
4498: --
4499: IF l_debug_on THEN
4500: WSH_DEBUG_SV.logmsg(l_module_name,'wsh_util_core.e_not_allowed exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4501: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:wsh_util_core.e_not_allowed');
4502: END IF;
4503: --
4504: WHEN wsh_util_core.e_not_allowed_warning THEN
4497: --
4498: --
4499: IF l_debug_on THEN
4500: WSH_DEBUG_SV.logmsg(l_module_name,'wsh_util_core.e_not_allowed exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4501: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:wsh_util_core.e_not_allowed');
4502: END IF;
4503: --
4504: WHEN wsh_util_core.e_not_allowed_warning THEN
4505: IF l_num_warnings > 0
4512: x_allowed := 'NW';
4513: --
4514: --
4515: IF l_debug_on THEN
4516: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4517: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4518: END IF;
4519: --
4520: WHEN FND_API.G_EXC_ERROR THEN
4513: --
4514: --
4515: IF l_debug_on THEN
4516: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4517: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4518: END IF;
4519: --
4520: WHEN FND_API.G_EXC_ERROR THEN
4521:
4521:
4522: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4523: --
4524: IF l_debug_on THEN
4525: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4526: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4527: END IF;
4528: --
4529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4522: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4523: --
4524: IF l_debug_on THEN
4525: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4526: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4527: END IF;
4528: --
4529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4530:
4530:
4531: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4532: --
4533: IF l_debug_on THEN
4534: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4535: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4536: END IF;
4537: --
4538: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4531: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4532: --
4533: IF l_debug_on THEN
4534: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4535: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4536: END IF;
4537: --
4538: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4539: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4538: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4539: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4540: --
4541: IF l_debug_on THEN
4542: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4543: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4544: END IF;
4545: --
4546: WHEN OTHERS THEN
4539: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4540: --
4541: IF l_debug_on THEN
4542: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4543: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4544: END IF;
4545: --
4546: WHEN OTHERS THEN
4547:
4548: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4549: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.Check_Close',l_module_name);
4550: --
4551: IF l_debug_on THEN
4552: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4553: END IF;
4554: --
4555: --}
4556: END;
4628: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4629: --
4630: IF l_debug_on IS NULL
4631: THEN
4632: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4633: END IF;
4634: --
4635: IF l_debug_on THEN
4636: WSH_DEBUG_SV.push(l_module_name);
4632: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4633: END IF;
4634: --
4635: IF l_debug_on THEN
4636: WSH_DEBUG_SV.push(l_module_name);
4637: --
4638: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
4639: END IF;
4640: --
4634: --
4635: IF l_debug_on THEN
4636: WSH_DEBUG_SV.push(l_module_name);
4637: --
4638: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
4639: END IF;
4640: --
4641: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4642:
4676: --
4677: -- Debug Statements
4678: --
4679: IF l_debug_on THEN
4680: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4681: END IF;
4682: --
4683: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
4684: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4695: --
4696: -- Debug Statements
4697: --
4698: IF l_debug_on THEN
4699: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4700: END IF;
4701: --
4702: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
4703: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4728: --
4729: -- Debug Statements
4730: --
4731: IF l_debug_on THEN
4732: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4733: END IF;
4734: --
4735: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_delivery_id));
4736: wsh_util_core.add_message(x_return_status);
4747: --
4748: -- Debug Statements
4749: --
4750: IF l_debug_on THEN
4751: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4752: END IF;
4753: --
4754: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_delivery_id));
4755: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4759: --
4760: -- Debug Statements
4761: --
4762: IF l_debug_on THEN
4763: WSH_DEBUG_SV.pop(l_module_name);
4764: END IF;
4765: --
4766: EXCEPTION
4767: --OTM R12
4787: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4788: WSH_UTIL_CORE.add_message(x_return_status,l_module_name);
4789:
4790: IF l_debug_on THEN
4791: WSH_DEBUG_SV.logmsg(l_module_name,'CANNOT_DELETE_GC3_DELIVERY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4792: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CANNOT_DELETE_GC3_DELIVERY');
4793: END IF;
4794: --END OTM R12
4795:
4788: WSH_UTIL_CORE.add_message(x_return_status,l_module_name);
4789:
4790: IF l_debug_on THEN
4791: WSH_DEBUG_SV.logmsg(l_module_name,'CANNOT_DELETE_GC3_DELIVERY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4792: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CANNOT_DELETE_GC3_DELIVERY');
4793: END IF;
4794: --END OTM R12
4795:
4796: WHEN record_locked THEN
4817: wsh_util_core.add_message(x_return_status,l_module_name);
4818:
4819:
4820: IF l_debug_on THEN
4821: WSH_DEBUG_SV.logmsg(l_module_name,'record_locked has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4822: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:record_locked');
4823: END IF;
4824: --
4825:
4818:
4819:
4820: IF l_debug_on THEN
4821: WSH_DEBUG_SV.logmsg(l_module_name,'record_locked has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4822: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:record_locked');
4823: END IF;
4824: --
4825:
4826: WHEN others THEN
4844: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.CHECK_DELETE_DELIVERY');
4845: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4846:
4847: IF l_debug_on THEN
4848: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4849: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4850: END IF;
4851: --
4852: END Check_Delete_Delivery;
4845: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4846:
4847: IF l_debug_on THEN
4848: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4849: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4850: END IF;
4851: --
4852: END Check_Delete_Delivery;
4853:
4904: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4905: --
4906: IF l_debug_on IS NULL
4907: THEN
4908: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4909: END IF;
4910: --
4911: IF l_debug_on THEN
4912: WSH_DEBUG_SV.push(l_module_name);
4908: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4909: END IF;
4910: --
4911: IF l_debug_on THEN
4912: WSH_DEBUG_SV.push(l_module_name);
4913: --
4914: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
4915: END IF;
4916: --
4910: --
4911: IF l_debug_on THEN
4912: WSH_DEBUG_SV.push(l_module_name);
4913: --
4914: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
4915: END IF;
4916: --
4917: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4918:
4931: --
4932: -- Debug Statements
4933: --
4934: IF l_debug_on THEN
4935: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4936: END IF;
4937: --
4938: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
4939: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4941: --
4942: -- Debug Statements
4943: --
4944: IF l_debug_on THEN
4945: WSH_DEBUG_SV.pop(l_module_name);
4946: END IF;
4947: --
4948: RETURN;
4949: END IF;
4954: --
4955: -- Debug Statements
4956: --
4957: IF l_debug_on THEN
4958: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.GET_GROUP_BY_ATTR',WSH_DEBUG_SV.C_PROC_LEVEL);
4959: END IF;
4960: --
4961: wsh_delivery_autocreate.get_group_by_attr( p_organization_id => l_org_id,
4962: x_group_by_flags => l_group_by_attr,
4967: --
4968: -- Debug Statements
4969: --
4970: IF l_debug_on THEN
4971: WSH_DEBUG_SV.pop(l_module_name);
4972: END IF;
4973: --
4974: RETURN;
4975: END IF;
4991: --
4992: -- Debug Statements
4993: --
4994: IF l_debug_on THEN
4995: WSH_DEBUG_SV.pop(l_module_name);
4996: END IF;
4997: --
4998: EXCEPTION
4999: WHEN others THEN
5003: --
5004: -- Debug Statements
5005: --
5006: IF l_debug_on THEN
5007: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5008: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5009: END IF;
5010: --
5011: END Check_Change_Carrier;
5004: -- Debug Statements
5005: --
5006: IF l_debug_on THEN
5007: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5008: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5009: END IF;
5010: --
5011: END Check_Change_Carrier;
5012:
5078: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5079: --
5080: IF l_debug_on IS NULL
5081: THEN
5082: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5083: END IF;
5084: --
5085: IF l_debug_on THEN
5086: WSH_DEBUG_SV.push(l_module_name);
5082: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5083: END IF;
5084: --
5085: IF l_debug_on THEN
5086: WSH_DEBUG_SV.push(l_module_name);
5087: --
5088: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5089: WSH_DEBUG_SV.log(l_module_name,'P_LIST_TYPE',P_LIST_TYPE);
5090: END IF;
5084: --
5085: IF l_debug_on THEN
5086: WSH_DEBUG_SV.push(l_module_name);
5087: --
5088: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5089: WSH_DEBUG_SV.log(l_module_name,'P_LIST_TYPE',P_LIST_TYPE);
5090: END IF;
5091: --
5092: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5085: IF l_debug_on THEN
5086: WSH_DEBUG_SV.push(l_module_name);
5087: --
5088: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5089: WSH_DEBUG_SV.log(l_module_name,'P_LIST_TYPE',P_LIST_TYPE);
5090: END IF;
5091: --
5092: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5093:
5446: -- OR
5447: -- - routing request was not received for all delivery lines
5448: --
5449: IF l_debug_on THEN
5450: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit GET_SHIPPING_CONTROL',WSH_DEBUG_SV.C_PROC_LEVEL);
5451: END IF;
5452: --
5453: GET_SHIPPING_CONTROL
5454: (
5460: );
5461: --
5462: --
5463: IF l_debug_on THEN
5464: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
5465: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
5466: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
5467: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
5468: --
5461: --
5462: --
5463: IF l_debug_on THEN
5464: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
5465: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
5466: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
5467: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
5468: --
5469: END IF;
5462: --
5463: IF l_debug_on THEN
5464: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
5465: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
5466: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
5467: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
5468: --
5469: END IF;
5470: --
5463: IF l_debug_on THEN
5464: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
5465: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
5466: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
5467: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
5468: --
5469: END IF;
5470: --
5471: --
5506: --
5507: -- Debug Statements
5508: --
5509: IF l_debug_on THEN
5510: WSH_DEBUG_SV.pop(l_module_name);
5511: END IF;
5512: --
5513: EXCEPTION
5514: WHEN e_all_disabled THEN --3509004:public api changes
5517: FND_MESSAGE.Set_Token('ENTITY_ID',p_delivery_id);
5518: wsh_util_core.add_message(x_return_status,l_module_name);
5519: IF l_debug_on THEN
5520: -- Nothing is updateable
5521: WSH_DEBUG_SV.pop(l_module_name,'e_all_disabled');
5522: END IF;
5523:
5524:
5525: WHEN wsh_dp_no_entity THEN
5536: --
5537: -- Debug Statements
5538: --
5539: IF l_debug_on THEN
5540: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DP_NO_ENTITY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5541: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DP_NO_ENTITY');
5542: END IF;
5543: --
5544: WHEN wsh_inv_list_type THEN
5537: -- Debug Statements
5538: --
5539: IF l_debug_on THEN
5540: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DP_NO_ENTITY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5541: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DP_NO_ENTITY');
5542: END IF;
5543: --
5544: WHEN wsh_inv_list_type THEN
5545: x_return_status := FND_API.G_RET_STS_ERROR;
5555: --
5556: -- Debug Statements
5557: --
5558: IF l_debug_on THEN
5559: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_INV_LIST_TYPE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5560: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_INV_LIST_TYPE');
5561: END IF;
5562: --
5563: WHEN others THEN
5556: -- Debug Statements
5557: --
5558: IF l_debug_on THEN
5559: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_INV_LIST_TYPE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5560: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_INV_LIST_TYPE');
5561: END IF;
5562: --
5563: WHEN others THEN
5564: IF (get_delivery_status%ISOPEN) THEN
5573: --
5574: -- Debug Statements
5575: --
5576: IF l_debug_on THEN
5577: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5578: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5579: END IF;
5580: --
5581: END Get_Disabled_List;
5574: -- Debug Statements
5575: --
5576: IF l_debug_on THEN
5577: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5578: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5579: END IF;
5580: --
5581: END Get_Disabled_List;
5582:
5645: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5646: --
5647: IF l_debug_on IS NULL
5648: THEN
5649: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5650: END IF;
5651: --
5652: IF l_debug_on THEN
5653: WSH_DEBUG_SV.push(l_module_name);
5649: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5650: END IF;
5651: --
5652: IF l_debug_on THEN
5653: WSH_DEBUG_SV.push(l_module_name);
5654: --
5655: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
5656: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
5657: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
5651: --
5652: IF l_debug_on THEN
5653: WSH_DEBUG_SV.push(l_module_name);
5654: --
5655: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
5656: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
5657: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
5658: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_TRANSACTABLE',P_CHECK_TRANSACTABLE);
5659: END IF;
5652: IF l_debug_on THEN
5653: WSH_DEBUG_SV.push(l_module_name);
5654: --
5655: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
5656: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
5657: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
5658: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_TRANSACTABLE',P_CHECK_TRANSACTABLE);
5659: END IF;
5660: --
5653: WSH_DEBUG_SV.push(l_module_name);
5654: --
5655: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
5656: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
5657: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
5658: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_TRANSACTABLE',P_CHECK_TRANSACTABLE);
5659: END IF;
5660: --
5661: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5654: --
5655: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
5656: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
5657: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
5658: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_TRANSACTABLE',P_CHECK_TRANSACTABLE);
5659: END IF;
5660: --
5661: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5662:
5665: --
5666: -- Debug Statements
5667: --
5668: IF l_debug_on THEN
5669: WSH_DEBUG_SV.pop(l_module_name);
5670: END IF;
5671: --
5672: RETURN TRUE;
5673: END IF;
5676: --
5677: -- Debug Statements
5678: --
5679: IF l_debug_on THEN
5680: WSH_DEBUG_SV.logmsg(l_module_name, 'CHECKING FOR LINES NOT IMPORTED IN SHIP SET '||P_SHIP_SET_ID||' HEADER '||P_SOURCE_HEADER_ID );
5681: END IF;
5682: --
5683: /* Need to replace the following with OM API once it is available */
5684: OPEN c_pending_lines;
5691: --
5692: -- Debug Statements
5693: --
5694: IF l_debug_on THEN
5695: WSH_DEBUG_SV.logmsg(l_module_name, 'LINE '||L_LINE_ID||' IS NOT IMPORTED' );
5696: END IF;
5697: --
5698: END IF;
5699: CLOSE c_pending_lines;
5701: --
5702: -- Debug Statements
5703: --
5704: IF l_debug_on THEN
5705: WSH_DEBUG_SV.pop(l_module_name);
5706: END IF;
5707: --
5708: return l_lines_exist;
5709:
5714: --
5715: -- Debug Statements
5716: --
5717: IF l_debug_on THEN
5718: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5719: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5720: END IF;
5721: --
5722: END Check_SS_Imp_Pending;
5715: -- Debug Statements
5716: --
5717: IF l_debug_on THEN
5718: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5719: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5720: END IF;
5721: --
5722: END Check_SS_Imp_Pending;
5723:
5886: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5887: --
5888: IF l_debug_on IS NULL
5889: THEN
5890: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5891: END IF;
5892: --
5893: IF l_debug_on THEN
5894: WSH_DEBUG_SV.push(l_module_name);
5890: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5891: END IF;
5892: --
5893: IF l_debug_on THEN
5894: WSH_DEBUG_SV.push(l_module_name);
5895: --
5896: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5897: END IF;
5898: --
5892: --
5893: IF l_debug_on THEN
5894: WSH_DEBUG_SV.push(l_module_name);
5895: --
5896: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5897: END IF;
5898: --
5899: FOR dl in c_del_lines (p_delivery_id )
5900: LOOP
5915:
5916: -- Debug Statements
5917: --
5918: IF l_debug_on THEN
5919: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.GET_MIN_MAX_TOLERANCE_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
5920: END IF;
5921:
5922: WSH_DETAILS_VALIDATIONS.get_min_max_tolerance_quantity
5923: (p_in_attributes => l_minmaxinrectype,
5993: -- Debug Statements
5994:
5995:
5996: IF l_debug_on THEN
5997: WSH_DEBUG_SV.log(l_module_name,'l_total_quantities.expected_quantity',l_total_quantities.expected_quantity);
5998: END IF;
5999:
6000: if l_total_quantities.expected_quantity > l_max_quantity THEN
6001: x_source_line_id := dl.source_line_id ;
6010: INTO l_total_other_line_qty;
6011: CLOSE c_total_other_line_qty;
6012:
6013: IF l_debug_on THEN
6014: WSH_DEBUG_SV.log(l_module_name,'l_total_other_line_qty.expected_quantity',l_total_other_line_qty.expected_quantity);
6015: END IF;
6016:
6017: x_max_quantity := l_max_quantity - nvl(l_total_other_line_qty.expected_quantity,0);
6018: x_max_quantity2 := nvl(l_max_quantity2,0) - nvl(l_total_other_line_qty.expected_quantity2,0);
6037: --
6038: -- Debug Statements
6039: --
6040: IF l_debug_on THEN
6041: WSH_DEBUG_SV.pop(l_module_name);
6042: END IF;
6043: --
6044: EXCEPTION
6045: WHEN tolerance_exceeded THEN
6069: --
6070: -- Debug Statements
6071: --
6072: IF l_debug_on THEN
6073: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6074: END IF;
6075: --
6076: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6077: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6091: --
6092: -- Debug Statements
6093: --
6094: IF l_debug_on THEN
6095: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6096: END IF;
6097: --
6098: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6099: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6111: --
6112: -- Debug Statements
6113: --
6114: IF l_debug_on THEN
6115: WSH_DEBUG_SV.logmsg(l_module_name,'TOLERANCE_EXCEEDED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6116: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TOLERANCE_EXCEEDED');
6117: END IF;
6118: --
6119: WHEN others THEN
6112: -- Debug Statements
6113: --
6114: IF l_debug_on THEN
6115: WSH_DEBUG_SV.logmsg(l_module_name,'TOLERANCE_EXCEEDED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6116: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TOLERANCE_EXCEEDED');
6117: END IF;
6118: --
6119: WHEN others THEN
6120: if c_total_line_quantities%ISOPEN THEN
6126: --
6127: -- Debug Statements
6128: --
6129: IF l_debug_on THEN
6130: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6131: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6132: END IF;
6133: --
6134: END Check_Delivery_for_tolerances ;
6127: -- Debug Statements
6128: --
6129: IF l_debug_on THEN
6130: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6131: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6132: END IF;
6133: --
6134: END Check_Delivery_for_tolerances ;
6135:
6162: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6163: --
6164: IF l_debug_on IS NULL
6165: THEN
6166: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6167: END IF;
6168: --
6169: IF l_debug_on THEN
6170: WSH_DEBUG_SV.push(l_module_name);
6166: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6167: END IF;
6168: --
6169: IF l_debug_on THEN
6170: WSH_DEBUG_SV.push(l_module_name);
6171: --
6172: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
6173: END IF;
6174: --
6168: --
6169: IF l_debug_on THEN
6170: WSH_DEBUG_SV.push(l_module_name);
6171: --
6172: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
6173: END IF;
6174: --
6175: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6176:
6193: --
6194: -- Debug Statements
6195: --
6196: IF l_debug_on THEN
6197: WSH_DEBUG_SV.pop(l_module_name);
6198: END IF;
6199: --
6200: RETURN l_assigned;
6201:
6209: --
6210: -- Debug Statements
6211: --
6212: IF l_debug_on THEN
6213: WSH_DEBUG_SV.pop(l_module_name);
6214: END IF;
6215: --
6216: return NULL;
6217:
6218: --
6219: -- Debug Statements
6220: --
6221: IF l_debug_on THEN
6222: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6223: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6224: END IF;
6225: --
6226: END Del_Assigned_To_Trip;
6219: -- Debug Statements
6220: --
6221: IF l_debug_on THEN
6222: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6223: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6224: END IF;
6225: --
6226: END Del_Assigned_To_Trip;
6227:
6361: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6362: --
6363: IF l_debug_on IS NULL
6364: THEN
6365: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6366: END IF;
6367: --
6368: IF l_debug_on THEN
6369: WSH_DEBUG_SV.push(l_module_name);
6365: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6366: END IF;
6367: --
6368: IF l_debug_on THEN
6369: WSH_DEBUG_SV.push(l_module_name);
6370: --
6371: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
6372: WSH_DEBUG_SV.log(l_module_name,'p_action',p_action);
6373: END IF;
6367: --
6368: IF l_debug_on THEN
6369: WSH_DEBUG_SV.push(l_module_name);
6370: --
6371: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
6372: WSH_DEBUG_SV.log(l_module_name,'p_action',p_action);
6373: END IF;
6374:
6375:
6368: IF l_debug_on THEN
6369: WSH_DEBUG_SV.push(l_module_name);
6370: --
6371: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
6372: WSH_DEBUG_SV.log(l_module_name,'p_action',p_action);
6373: END IF;
6374:
6375:
6376: --OTM R12
6386: x_delivery_actions_tab => l_dlvy_actions_tab,
6387: x_return_status => x_return_status);
6388:
6389: IF l_debug_on THEN
6390: WSH_DEBUG_SV.log(l_module_name,'Init_Detail_Actions_Tbl x_return_status',x_return_status);
6391: WSH_DEBUG_SV.log(l_module_name,' Count of p_dlvy_rec_tab is',p_dlvy_rec_tab.count);
6392: END IF;
6393:
6394: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
6387: x_return_status => x_return_status);
6388:
6389: IF l_debug_on THEN
6390: WSH_DEBUG_SV.log(l_module_name,'Init_Detail_Actions_Tbl x_return_status',x_return_status);
6391: WSH_DEBUG_SV.log(l_module_name,' Count of p_dlvy_rec_tab is',p_dlvy_rec_tab.count);
6392: END IF;
6393:
6394: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
6395: raise error_in_init_actions;
6428:
6429: l_org_type := NULL;
6430: --
6431: IF l_debug_on THEN
6432: wsh_debug_sv.log(l_module_name, 'Organization Id', p_dlvy_rec_tab(j).organization_id);
6433: wsh_debug_sv.log(l_module_name, 'Cached Organization Id', l_cache_org_id);
6434: END IF;
6435: --
6436: IF p_dlvy_rec_tab(j).organization_id = l_cache_org_id THEN
6429: l_org_type := NULL;
6430: --
6431: IF l_debug_on THEN
6432: wsh_debug_sv.log(l_module_name, 'Organization Id', p_dlvy_rec_tab(j).organization_id);
6433: wsh_debug_sv.log(l_module_name, 'Cached Organization Id', l_cache_org_id);
6434: END IF;
6435: --
6436: IF p_dlvy_rec_tab(j).organization_id = l_cache_org_id THEN
6437: l_org_type := l_cache_org_type;
6437: l_org_type := l_cache_org_type;
6438: ELSE
6439: --
6440: IF l_debug_on THEN
6441: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.GET_ORG_TYPE',WSH_DEBUG_SV.C_PROC_LEVEL);
6442: END IF;
6443: --
6444: l_org_type := wsh_util_validate.get_org_type(
6445: p_organization_id => p_dlvy_rec_tab(j).organization_id,
6447: p_msg_display => 'N',
6448: x_return_status => l_return_status );
6449: --
6450: IF l_debug_on THEN
6451: wsh_debug_sv.log(l_module_name, 'Return status after wsh_util_validate.get_org_type', l_return_status);
6452: wsh_debug_sv.log(l_module_name, 'l_org_type is: ', l_org_type);
6453: END IF;
6454: --
6455: IF l_return_status = wsh_util_core.g_ret_sts_unexp_error THEN
6448: x_return_status => l_return_status );
6449: --
6450: IF l_debug_on THEN
6451: wsh_debug_sv.log(l_module_name, 'Return status after wsh_util_validate.get_org_type', l_return_status);
6452: wsh_debug_sv.log(l_module_name, 'l_org_type is: ', l_org_type);
6453: END IF;
6454: --
6455: IF l_return_status = wsh_util_core.g_ret_sts_unexp_error THEN
6456: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6484: --
6485:
6486: --
6487: IF l_debug_on THEN
6488: wsh_debug_sv.log(l_module_name, 'l_org_type', l_org_type);
6489: wsh_debug_sv.log(l_module_name, 'l_dlvy_actions_tab.Count', l_dlvy_actions_tab.count);
6490: END IF;
6491: --
6492: --
6485:
6486: --
6487: IF l_debug_on THEN
6488: wsh_debug_sv.log(l_module_name, 'l_org_type', l_org_type);
6489: wsh_debug_sv.log(l_module_name, 'l_dlvy_actions_tab.Count', l_dlvy_actions_tab.count);
6490: END IF;
6491: --
6492: --
6493: -- J-IB-NPARIKH-{
6497: l_planned_flag := p_dlvy_rec_tab(j).planned_flag;
6498: --
6499: --
6500: IF l_debug_on THEN
6501: wsh_debug_sv.log(l_module_name, 'l_dlvy_status_code', l_dlvy_status_code);
6502: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
6503: wsh_debug_sv.log(l_module_name, 'l_planned_flag', l_planned_flag);
6504: END IF;
6505: --
6498: --
6499: --
6500: IF l_debug_on THEN
6501: wsh_debug_sv.log(l_module_name, 'l_dlvy_status_code', l_dlvy_status_code);
6502: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
6503: wsh_debug_sv.log(l_module_name, 'l_planned_flag', l_planned_flag);
6504: END IF;
6505: --
6506: --
6499: --
6500: IF l_debug_on THEN
6501: wsh_debug_sv.log(l_module_name, 'l_dlvy_status_code', l_dlvy_status_code);
6502: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
6503: wsh_debug_sv.log(l_module_name, 'l_planned_flag', l_planned_flag);
6504: END IF;
6505: --
6506: --
6507: -- Actions on inbound/drop-ship deliveries are allowed only if caller
6556: -- OR
6557: -- - routing request was not received for all delivery lines
6558: --
6559: IF l_debug_on THEN
6560: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit GET_SHIPPING_CONTROL',WSH_DEBUG_SV.C_PROC_LEVEL);
6561: END IF;
6562: --
6563: -- Check if transportation is managed by supplier
6564: --
6572: );
6573: --
6574: --
6575: IF l_debug_on THEN
6576: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
6577: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
6578: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
6579: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
6580: --
6573: --
6574: --
6575: IF l_debug_on THEN
6576: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
6577: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
6578: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
6579: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
6580: --
6581: END IF;
6574: --
6575: IF l_debug_on THEN
6576: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
6577: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
6578: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
6579: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
6580: --
6581: END IF;
6582: --
6575: IF l_debug_on THEN
6576: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
6577: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
6578: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
6579: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
6580: --
6581: END IF;
6582: --
6583: --
6606: --
6607:
6608:
6609: IF l_debug_on THEN
6610: wsh_debug_sv.log(l_module_name, 'l_dlvy_status_code-modified', l_dlvy_status_code);
6611: wsh_debug_sv.log(l_module_name, 'l_caller-modified', l_caller);
6612: wsh_debug_sv.log(l_module_name, 'l_planned_flag-modified', l_planned_flag);
6613: END IF;
6614: --
6607:
6608:
6609: IF l_debug_on THEN
6610: wsh_debug_sv.log(l_module_name, 'l_dlvy_status_code-modified', l_dlvy_status_code);
6611: wsh_debug_sv.log(l_module_name, 'l_caller-modified', l_caller);
6612: wsh_debug_sv.log(l_module_name, 'l_planned_flag-modified', l_planned_flag);
6613: END IF;
6614: --
6615: -- J-IB-NPARIKH-}
6608:
6609: IF l_debug_on THEN
6610: wsh_debug_sv.log(l_module_name, 'l_dlvy_status_code-modified', l_dlvy_status_code);
6611: wsh_debug_sv.log(l_module_name, 'l_caller-modified', l_caller);
6612: wsh_debug_sv.log(l_module_name, 'l_planned_flag-modified', l_planned_flag);
6613: END IF;
6614: --
6615: -- J-IB-NPARIKH-}
6616: --
6619: For k in l_dlvy_actions_tab.FIRST..l_dlvy_actions_tab.LAST LOOP
6620:
6621: --bug 3301211 : adding debug msgs
6622: IF l_debug_on THEN
6623: wsh_debug_sv.log(l_module_name, 'Results from init_delivery_actions_tbl for index ', k);
6624: wsh_debug_sv.log(l_module_name, '---status_code', l_dlvy_actions_tab(k).status_code);
6625: wsh_debug_sv.log(l_module_name, '---planned_flag', l_dlvy_actions_tab(k).planned_flag);
6626: wsh_debug_sv.log(l_module_name, '---caller', l_dlvy_actions_tab(k).caller);
6627: wsh_debug_sv.log(l_module_name, '---org_type', l_dlvy_actions_tab(k).org_type);
6620:
6621: --bug 3301211 : adding debug msgs
6622: IF l_debug_on THEN
6623: wsh_debug_sv.log(l_module_name, 'Results from init_delivery_actions_tbl for index ', k);
6624: wsh_debug_sv.log(l_module_name, '---status_code', l_dlvy_actions_tab(k).status_code);
6625: wsh_debug_sv.log(l_module_name, '---planned_flag', l_dlvy_actions_tab(k).planned_flag);
6626: wsh_debug_sv.log(l_module_name, '---caller', l_dlvy_actions_tab(k).caller);
6627: wsh_debug_sv.log(l_module_name, '---org_type', l_dlvy_actions_tab(k).org_type);
6628: wsh_debug_sv.log(l_module_name, '---action_not_allowed', l_dlvy_actions_tab(k).action_not_allowed);
6621: --bug 3301211 : adding debug msgs
6622: IF l_debug_on THEN
6623: wsh_debug_sv.log(l_module_name, 'Results from init_delivery_actions_tbl for index ', k);
6624: wsh_debug_sv.log(l_module_name, '---status_code', l_dlvy_actions_tab(k).status_code);
6625: wsh_debug_sv.log(l_module_name, '---planned_flag', l_dlvy_actions_tab(k).planned_flag);
6626: wsh_debug_sv.log(l_module_name, '---caller', l_dlvy_actions_tab(k).caller);
6627: wsh_debug_sv.log(l_module_name, '---org_type', l_dlvy_actions_tab(k).org_type);
6628: wsh_debug_sv.log(l_module_name, '---action_not_allowed', l_dlvy_actions_tab(k).action_not_allowed);
6629: wsh_debug_sv.log(l_module_name, '---shipment direction', l_dlvy_actions_tab(k).shipment_direction||' , '||p_dlvy_rec_tab(j).shipment_direction);
6622: IF l_debug_on THEN
6623: wsh_debug_sv.log(l_module_name, 'Results from init_delivery_actions_tbl for index ', k);
6624: wsh_debug_sv.log(l_module_name, '---status_code', l_dlvy_actions_tab(k).status_code);
6625: wsh_debug_sv.log(l_module_name, '---planned_flag', l_dlvy_actions_tab(k).planned_flag);
6626: wsh_debug_sv.log(l_module_name, '---caller', l_dlvy_actions_tab(k).caller);
6627: wsh_debug_sv.log(l_module_name, '---org_type', l_dlvy_actions_tab(k).org_type);
6628: wsh_debug_sv.log(l_module_name, '---action_not_allowed', l_dlvy_actions_tab(k).action_not_allowed);
6629: wsh_debug_sv.log(l_module_name, '---shipment direction', l_dlvy_actions_tab(k).shipment_direction||' , '||p_dlvy_rec_tab(j).shipment_direction);
6630: --OTM R12
6623: wsh_debug_sv.log(l_module_name, 'Results from init_delivery_actions_tbl for index ', k);
6624: wsh_debug_sv.log(l_module_name, '---status_code', l_dlvy_actions_tab(k).status_code);
6625: wsh_debug_sv.log(l_module_name, '---planned_flag', l_dlvy_actions_tab(k).planned_flag);
6626: wsh_debug_sv.log(l_module_name, '---caller', l_dlvy_actions_tab(k).caller);
6627: wsh_debug_sv.log(l_module_name, '---org_type', l_dlvy_actions_tab(k).org_type);
6628: wsh_debug_sv.log(l_module_name, '---action_not_allowed', l_dlvy_actions_tab(k).action_not_allowed);
6629: wsh_debug_sv.log(l_module_name, '---shipment direction', l_dlvy_actions_tab(k).shipment_direction||' , '||p_dlvy_rec_tab(j).shipment_direction);
6630: --OTM R12
6631: wsh_debug_sv.log(l_module_name, '---ignore_for_planning', l_dlvy_actions_tab(k).ignore_for_planning);
6624: wsh_debug_sv.log(l_module_name, '---status_code', l_dlvy_actions_tab(k).status_code);
6625: wsh_debug_sv.log(l_module_name, '---planned_flag', l_dlvy_actions_tab(k).planned_flag);
6626: wsh_debug_sv.log(l_module_name, '---caller', l_dlvy_actions_tab(k).caller);
6627: wsh_debug_sv.log(l_module_name, '---org_type', l_dlvy_actions_tab(k).org_type);
6628: wsh_debug_sv.log(l_module_name, '---action_not_allowed', l_dlvy_actions_tab(k).action_not_allowed);
6629: wsh_debug_sv.log(l_module_name, '---shipment direction', l_dlvy_actions_tab(k).shipment_direction||' , '||p_dlvy_rec_tab(j).shipment_direction);
6630: --OTM R12
6631: wsh_debug_sv.log(l_module_name, '---ignore_for_planning', l_dlvy_actions_tab(k).ignore_for_planning);
6632: wsh_debug_sv.log(l_module_name, '---tms_interface_flag', l_dlvy_actions_tab(k).tms_interface_flag);
6625: wsh_debug_sv.log(l_module_name, '---planned_flag', l_dlvy_actions_tab(k).planned_flag);
6626: wsh_debug_sv.log(l_module_name, '---caller', l_dlvy_actions_tab(k).caller);
6627: wsh_debug_sv.log(l_module_name, '---org_type', l_dlvy_actions_tab(k).org_type);
6628: wsh_debug_sv.log(l_module_name, '---action_not_allowed', l_dlvy_actions_tab(k).action_not_allowed);
6629: wsh_debug_sv.log(l_module_name, '---shipment direction', l_dlvy_actions_tab(k).shipment_direction||' , '||p_dlvy_rec_tab(j).shipment_direction);
6630: --OTM R12
6631: wsh_debug_sv.log(l_module_name, '---ignore_for_planning', l_dlvy_actions_tab(k).ignore_for_planning);
6632: wsh_debug_sv.log(l_module_name, '---tms_interface_flag', l_dlvy_actions_tab(k).tms_interface_flag);
6633: -- OTM R12 Org Specific changes - 5399341
6627: wsh_debug_sv.log(l_module_name, '---org_type', l_dlvy_actions_tab(k).org_type);
6628: wsh_debug_sv.log(l_module_name, '---action_not_allowed', l_dlvy_actions_tab(k).action_not_allowed);
6629: wsh_debug_sv.log(l_module_name, '---shipment direction', l_dlvy_actions_tab(k).shipment_direction||' , '||p_dlvy_rec_tab(j).shipment_direction);
6630: --OTM R12
6631: wsh_debug_sv.log(l_module_name, '---ignore_for_planning', l_dlvy_actions_tab(k).ignore_for_planning);
6632: wsh_debug_sv.log(l_module_name, '---tms_interface_flag', l_dlvy_actions_tab(k).tms_interface_flag);
6633: -- OTM R12 Org Specific changes - 5399341
6634: wsh_debug_sv.log(l_module_name, '---otm_enabled', l_dlvy_actions_tab(k).otm_enabled);
6635: --
6628: wsh_debug_sv.log(l_module_name, '---action_not_allowed', l_dlvy_actions_tab(k).action_not_allowed);
6629: wsh_debug_sv.log(l_module_name, '---shipment direction', l_dlvy_actions_tab(k).shipment_direction||' , '||p_dlvy_rec_tab(j).shipment_direction);
6630: --OTM R12
6631: wsh_debug_sv.log(l_module_name, '---ignore_for_planning', l_dlvy_actions_tab(k).ignore_for_planning);
6632: wsh_debug_sv.log(l_module_name, '---tms_interface_flag', l_dlvy_actions_tab(k).tms_interface_flag);
6633: -- OTM R12 Org Specific changes - 5399341
6634: wsh_debug_sv.log(l_module_name, '---otm_enabled', l_dlvy_actions_tab(k).otm_enabled);
6635: --
6636: END IF;
6630: --OTM R12
6631: wsh_debug_sv.log(l_module_name, '---ignore_for_planning', l_dlvy_actions_tab(k).ignore_for_planning);
6632: wsh_debug_sv.log(l_module_name, '---tms_interface_flag', l_dlvy_actions_tab(k).tms_interface_flag);
6633: -- OTM R12 Org Specific changes - 5399341
6634: wsh_debug_sv.log(l_module_name, '---otm_enabled', l_dlvy_actions_tab(k).otm_enabled);
6635: --
6636: END IF;
6637:
6638: IF(
6679: l_is_del_eligible := Is_del_eligible_pick(
6680: p_delivery_id => p_dlvy_rec_tab(j).delivery_id,
6681: x_return_status => l_return_status);
6682: IF l_debug_on THEN
6683: WSH_DEBUG_SV.log(l_module_name,'Is_del_eligible_pick l_return_status',l_return_status);
6684: END IF;
6685: ELSE
6686: l_is_del_eligible := TRUE;
6687: END IF;
6686: l_is_del_eligible := TRUE;
6687: END IF;
6688:
6689: IF l_debug_on THEN
6690: WSH_DEBUG_SV.log(l_module_name,'l_is_del_eligible ',l_is_del_eligible);
6691: END IF;
6692:
6693: IF l_is_del_eligible
6694: THEN
6699: p_delivery_id => p_dlvy_rec_tab(j).delivery_id,
6700: p_msg_display => 'N');
6701:
6702: IF l_debug_on THEN
6703: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type||l_return_status);
6704: END IF;
6705:
6706: IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) = 'TPW' ) THEN
6707: open del_to_det_cur(p_dlvy_rec_tab(j).delivery_id);
6730: p_delivery_id => p_dlvy_rec_tab(j).delivery_id,
6731: p_msg_display => 'N');
6732:
6733: IF l_debug_on THEN
6734: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type||l_return_status);
6735: END IF;
6736:
6737: IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) = 'TPW' ) THEN
6738: raise e_record_ineligible;
6758: p_delivery_id => p_dlvy_rec_tab(j).delivery_id,
6759: p_msg_display => 'N');
6760:
6761: IF l_debug_on THEN
6762: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type|| l_return_status);
6763: END IF;
6764:
6765: IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) = 'CMS' ) THEN
6766: raise e_record_ineligible;
6779: p_delivery_id => p_dlvy_rec_tab(j).delivery_id,
6780: p_msg_display => 'N');
6781:
6782: IF l_debug_on THEN
6783: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type||l_return_status);
6784: END IF;
6785:
6786: IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) = 'CMS' ) THEN
6787: raise e_record_ineligible;
6798: p_delivery_id => p_dlvy_rec_tab(j).delivery_id,
6799: p_msg_display => 'N');
6800:
6801: IF l_debug_on THEN
6802: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type||l_return_status);
6803: END IF;
6804:
6805: IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) IN ('TPW','CMS') ) THEN
6806: open del_to_det_cur(p_dlvy_rec_tab(j).delivery_id);
6837: x_return_status => l_return_status,
6838: p_delivery_id => p_dlvy_rec_tab(j).delivery_id);
6839:
6840: IF l_debug_on THEN
6841: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type||l_return_status);
6842: END IF;
6843:
6844: IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) = FND_API.G_MISS_CHAR ) THEN
6845: open det_stat_cur(p_dlvy_rec_tab(j).delivery_id);
6897: p_delivery_id => p_dlvy_rec_tab(j).delivery_id,
6898: p_msg_display => 'N');
6899:
6900: IF l_debug_on THEN
6901: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type||l_return_status);
6902: END IF;
6903:
6904: IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) in ( 'CMS','TPW') )
6905:
6943: p_delivery_id => p_dlvy_rec_tab(j).delivery_id,
6944: p_msg_display => 'N');
6945:
6946: IF l_debug_on THEN
6947: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type||l_return_status);
6948: END IF;
6949:
6950: IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) IN ('TPW','CMS') ) THEN
6951: raise e_record_ineligible;
7032: --
7033: END IF;
7034:
7035: IF l_debug_on THEN
7036: WSH_DEBUG_SV.pop(l_module_name);
7037: END IF;
7038:
7039: EXCEPTION
7040: WHEN error_in_init_actions THEN
7038:
7039: EXCEPTION
7040: WHEN error_in_init_actions THEN
7041: IF l_debug_on THEN
7042: WSH_DEBUG_SV.logmsg(l_module_name,'error_in_init_actions exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7043: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:error_in_init_actions');
7044: END IF;
7045:
7046: WHEN OTHERS THEN
7039: EXCEPTION
7040: WHEN error_in_init_actions THEN
7041: IF l_debug_on THEN
7042: WSH_DEBUG_SV.logmsg(l_module_name,'error_in_init_actions exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7043: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:error_in_init_actions');
7044: END IF;
7045:
7046: WHEN OTHERS THEN
7047: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7045:
7046: WHEN OTHERS THEN
7047: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7048: IF l_debug_on THEN
7049: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
7050: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7051: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7052: END IF;
7053: END Is_Action_Enabled;
7046: WHEN OTHERS THEN
7047: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7048: IF l_debug_on THEN
7049: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
7050: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7051: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7052: END IF;
7053: END Is_Action_Enabled;
7054:
7047: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7048: IF l_debug_on THEN
7049: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
7050: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7051: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7052: END IF;
7053: END Is_Action_Enabled;
7054:
7055: /*
9490: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
9491: --
9492: IF l_debug_on IS NULL
9493: THEN
9494: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9495: END IF;
9496: --
9497: IF l_debug_on THEN
9498: WSH_DEBUG_SV.push(l_module_name);
9494: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9495: END IF;
9496: --
9497: IF l_debug_on THEN
9498: WSH_DEBUG_SV.push(l_module_name);
9499: WSH_DEBUG_SV.log(l_module_name,'DELIVERY_ID', p_delivery_rec.DELIVERY_ID);
9500: WSH_DEBUG_SV.log(l_module_name,'Action Code', p_in_rec.action_code);
9501: WSH_DEBUG_SV.log(l_module_name,'Caller', p_in_rec.caller);
9502: END IF;
9495: END IF;
9496: --
9497: IF l_debug_on THEN
9498: WSH_DEBUG_SV.push(l_module_name);
9499: WSH_DEBUG_SV.log(l_module_name,'DELIVERY_ID', p_delivery_rec.DELIVERY_ID);
9500: WSH_DEBUG_SV.log(l_module_name,'Action Code', p_in_rec.action_code);
9501: WSH_DEBUG_SV.log(l_module_name,'Caller', p_in_rec.caller);
9502: END IF;
9503: --
9496: --
9497: IF l_debug_on THEN
9498: WSH_DEBUG_SV.push(l_module_name);
9499: WSH_DEBUG_SV.log(l_module_name,'DELIVERY_ID', p_delivery_rec.DELIVERY_ID);
9500: WSH_DEBUG_SV.log(l_module_name,'Action Code', p_in_rec.action_code);
9501: WSH_DEBUG_SV.log(l_module_name,'Caller', p_in_rec.caller);
9502: END IF;
9503: --
9504: x_return_status := FND_API.G_RET_STS_SUCCESS;
9497: IF l_debug_on THEN
9498: WSH_DEBUG_SV.push(l_module_name);
9499: WSH_DEBUG_SV.log(l_module_name,'DELIVERY_ID', p_delivery_rec.DELIVERY_ID);
9500: WSH_DEBUG_SV.log(l_module_name,'Action Code', p_in_rec.action_code);
9501: WSH_DEBUG_SV.log(l_module_name,'Caller', p_in_rec.caller);
9502: END IF;
9503: --
9504: x_return_status := FND_API.G_RET_STS_SUCCESS;
9505: --
9505: --
9506: IF p_in_rec.action_code = 'CREATE' THEN
9507: --
9508: IF l_debug_on THEN
9509: WSH_DEBUG_SV.log(l_module_name,'calling eliminate_displayonly_fields');
9510: END IF;
9511: --
9512: -- nothing else need to be disabled
9513: --
9516: --
9517: --3509004: : public api changes
9518: /*
9519: IF l_debug_on THEN
9520: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
9521: WSH_DEBUG_SV.pop(l_module_name);
9522: END IF;
9523: --
9524: RETURN;
9517: --3509004: : public api changes
9518: /*
9519: IF l_debug_on THEN
9520: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
9521: WSH_DEBUG_SV.pop(l_module_name);
9522: END IF;
9523: --
9524: RETURN;
9525: --
9543: x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
9544: THEN
9545: --
9546: IF l_debug_on THEN
9547: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
9548: WSH_DEBUG_SV.pop(l_module_name);
9549: END IF;
9550: --
9551: RETURN;
9544: THEN
9545: --
9546: IF l_debug_on THEN
9547: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
9548: WSH_DEBUG_SV.pop(l_module_name);
9549: END IF;
9550: --
9551: RETURN;
9552: --
9595: --
9596: -- J-IB-NPARIKH-}
9597:
9598: IF l_debug_on THEN
9599: WSH_DEBUG_SV.log(l_module_name,'list.COUNT',l_disabled_list.COUNT);
9600: END IF;
9601: --
9602: IF l_disabled_list.COUNT = 0 THEN
9603: IF l_debug_on THEN
9600: END IF;
9601: --
9602: IF l_disabled_list.COUNT = 0 THEN
9603: IF l_debug_on THEN
9604: WSH_DEBUG_SV.log(l_module_name,'calling eliminate_displayonly_fields');
9605: END IF;
9606: --
9607: -- nothing else need to be disabled
9608: --
9614: --
9615: IF l_debug_on THEN
9616: FOR i in 1..l_disabled_list.COUNT
9617: LOOP
9618: WSH_DEBUG_SV.log(l_module_name,'list values',l_disabled_list(i));
9619: END LOOP;
9620: WSH_DEBUG_SV.log(l_module_name,'calling enable_from_list');
9621: END IF;
9622: --enable the columns matching the l_disabled_list
9616: FOR i in 1..l_disabled_list.COUNT
9617: LOOP
9618: WSH_DEBUG_SV.log(l_module_name,'list values',l_disabled_list(i));
9619: END LOOP;
9620: WSH_DEBUG_SV.log(l_module_name,'calling enable_from_list');
9621: END IF;
9622: --enable the columns matching the l_disabled_list
9623: enable_from_list(l_disabled_list,
9624: p_delivery_rec,
9635: --
9636: IF l_debug_on THEN
9637: FOR i in 1..l_disabled_list.COUNT
9638: LOOP
9639: WSH_DEBUG_SV.log(l_module_name,'list values',l_disabled_list(i));
9640: END LOOP;
9641: WSH_DEBUG_SV.log(l_module_name,'First element is not FULL');
9642: WSH_DEBUG_SV.log(l_module_name,'calling eliminate_displayonly_fields');
9643: END IF;
9637: FOR i in 1..l_disabled_list.COUNT
9638: LOOP
9639: WSH_DEBUG_SV.log(l_module_name,'list values',l_disabled_list(i));
9640: END LOOP;
9641: WSH_DEBUG_SV.log(l_module_name,'First element is not FULL');
9642: WSH_DEBUG_SV.log(l_module_name,'calling eliminate_displayonly_fields');
9643: END IF;
9644: --
9645: --tkt
9638: LOOP
9639: WSH_DEBUG_SV.log(l_module_name,'list values',l_disabled_list(i));
9640: END LOOP;
9641: WSH_DEBUG_SV.log(l_module_name,'First element is not FULL');
9642: WSH_DEBUG_SV.log(l_module_name,'calling eliminate_displayonly_fields');
9643: END IF;
9644: --
9645: --tkt
9646: eliminate_displayonly_fields (p_delivery_rec,p_in_rec,x_delivery_rec);
9645: --tkt
9646: eliminate_displayonly_fields (p_delivery_rec,p_in_rec,x_delivery_rec);
9647: --
9648: IF l_debug_on THEN
9649: WSH_DEBUG_SV.log(l_module_name,'calling disable_from_list');
9650: END IF;
9651: -- The fileds in the list are getting disabled
9652: disable_from_list(l_disabled_list,
9653: l_db_col_rec,
9681: --
9682: END IF;
9683: --
9684: IF l_debug_on THEN
9685: WSH_DEBUG_SV.pop(l_module_name);
9686: END IF;
9687:
9688: EXCEPTION
9689: WHEN e_all_disabled THEN
9696: FND_MESSAGE.Set_Token('ENTITY_ID',p_delivery_rec.delivery_id);
9697: wsh_util_core.add_message(x_return_status,l_module_name);
9698: IF l_debug_on THEN
9699: -- Nothing is updateable
9700: WSH_DEBUG_SV.pop(l_module_name,'e_all_disabled');
9701: END IF;
9702: WHEN e_dp_no_entity THEN
9703: IF (c_tbl_rec%ISOPEN) THEN
9704: CLOSE c_tbl_rec;
9706:
9707: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9708: -- the message for this is set in original get_disabled_list
9709: IF l_debug_on THEN
9710: WSH_DEBUG_SV.pop(l_module_name,'e_dp_no_entity');
9711: END IF;
9712: WHEN e_bad_field THEN
9713: IF (c_tbl_rec%ISOPEN) THEN
9714: CLOSE c_tbl_rec;
9718: FND_MESSAGE.SET_NAME('WSH','WSH_BAD_FIELD_NAME');
9719: FND_MESSAGE.Set_Token('FIELD_NAME',l_field_name);
9720: wsh_util_core.add_message(x_return_status,l_module_name);
9721: IF l_debug_on THEN
9722: WSH_DEBUG_SV.log(l_module_name,'Bad field name passed to the list:'
9723: ,l_field_name);
9724: WSH_DEBUG_SV.pop(l_module_name,'e_bad_field');
9725: END IF;
9726: --
9720: wsh_util_core.add_message(x_return_status,l_module_name);
9721: IF l_debug_on THEN
9722: WSH_DEBUG_SV.log(l_module_name,'Bad field name passed to the list:'
9723: ,l_field_name);
9724: WSH_DEBUG_SV.pop(l_module_name,'e_bad_field');
9725: END IF;
9726: --
9727: WHEN FND_API.G_EXC_ERROR THEN
9728: IF (c_tbl_rec%ISOPEN) THEN
9731:
9732: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9733: --
9734: IF l_debug_on THEN
9735: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9736: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9737: END IF;
9738: --
9739: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9732: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9733: --
9734: IF l_debug_on THEN
9735: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9736: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9737: END IF;
9738: --
9739: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9740: IF (c_tbl_rec%ISOPEN) THEN
9743:
9744: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
9745: --
9746: IF l_debug_on THEN
9747: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9748: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9749: END IF;
9750:
9751: WHEN OTHERS THEN
9744: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
9745: --
9746: IF l_debug_on THEN
9747: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9748: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9749: END IF;
9750:
9751: WHEN OTHERS THEN
9752: IF (c_tbl_rec%ISOPEN) THEN
9755:
9756: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
9757: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.get_disabled_list', l_module_name);
9758: IF l_debug_on THEN
9759: WSH_DEBUG_SV.log(l_module_name,'Error:',SUBSTR(SQLERRM,1,200));
9760: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9761: END IF;
9762: END Get_Disabled_List;
9763:
9756: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
9757: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.get_disabled_list', l_module_name);
9758: IF l_debug_on THEN
9759: WSH_DEBUG_SV.log(l_module_name,'Error:',SUBSTR(SQLERRM,1,200));
9760: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9761: END IF;
9762: END Get_Disabled_List;
9763:
9764:
9784: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
9785: --
9786: IF l_debug_on IS NULL
9787: THEN
9788: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9789: END IF;
9790: --
9791: IF l_debug_on THEN
9792: WSH_DEBUG_SV.push(l_module_name);
9788: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9789: END IF;
9790: --
9791: IF l_debug_on THEN
9792: WSH_DEBUG_SV.push(l_module_name);
9793: --
9794: WSH_DEBUG_SV.log(l_module_name,'p_action', p_action);
9795: END IF;
9796: --
9790: --
9791: IF l_debug_on THEN
9792: WSH_DEBUG_SV.push(l_module_name);
9793: --
9794: WSH_DEBUG_SV.log(l_module_name,'p_action', p_action);
9795: END IF;
9796: --
9797: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9798:
10179: --} IB-Phase-2
10180: END IF;
10181:
10182: IF l_debug_on THEN
10183: WSH_DEBUG_SV.pop(l_module_name);
10184: END IF;
10185: EXCEPTION
10186: WHEN OTHERS THEN
10187: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10186: WHEN OTHERS THEN
10187: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10188: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.get_disabled_list', l_module_name);
10189: IF l_debug_on THEN
10190: WSH_DEBUG_SV.log(l_module_name,'Error:',SUBSTR(SQLERRM,1,200));
10191: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10192: END IF;
10193:
10194: END Init_Delivery_Actions_Tbl;
10187: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10188: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.get_disabled_list', l_module_name);
10189: IF l_debug_on THEN
10190: WSH_DEBUG_SV.log(l_module_name,'Error:',SUBSTR(SQLERRM,1,200));
10191: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10192: END IF;
10193:
10194: END Init_Delivery_Actions_Tbl;
10195:
10246: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10247: --
10248: IF l_debug_on IS NULL
10249: THEN
10250: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10251: END IF;
10252: --
10253: IF l_debug_on THEN
10254: WSH_DEBUG_SV.push(l_module_name);
10250: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10251: END IF;
10252: --
10253: IF l_debug_on THEN
10254: WSH_DEBUG_SV.push(l_module_name);
10255: --
10256: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10257: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
10258: END IF;
10252: --
10253: IF l_debug_on THEN
10254: WSH_DEBUG_SV.push(l_module_name);
10255: --
10256: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10257: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
10258: END IF;
10259: --
10260: x_wt_nullify_flag := FALSE;
10253: IF l_debug_on THEN
10254: WSH_DEBUG_SV.push(l_module_name);
10255: --
10256: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10257: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
10258: END IF;
10259: --
10260: x_wt_nullify_flag := FALSE;
10261: x_vol_nullify_flag := FALSE;
10275: open l_get_classes_csr(p_organization_id);
10276: fetch l_get_classes_csr into l_wt_uom_class, l_vol_uom_class;
10277: close l_get_classes_csr;
10278: IF l_debug_on THEN
10279: WSH_DEBUG_SV.log(l_module_name,'l_wt_uom_class',l_wt_uom_class);
10280: WSH_DEBUG_SV.log(l_module_name,'l_vol_uom_class',l_vol_uom_class);
10281: END IF;
10282: --
10283: open l_check_uom_csr(l_wt_uom_class, l_wt_uom_code);
10276: fetch l_get_classes_csr into l_wt_uom_class, l_vol_uom_class;
10277: close l_get_classes_csr;
10278: IF l_debug_on THEN
10279: WSH_DEBUG_SV.log(l_module_name,'l_wt_uom_class',l_wt_uom_class);
10280: WSH_DEBUG_SV.log(l_module_name,'l_vol_uom_class',l_vol_uom_class);
10281: END IF;
10282: --
10283: open l_check_uom_csr(l_wt_uom_class, l_wt_uom_code);
10284: fetch l_check_uom_csr into l_wt_uom_code;
10314: --
10315: END IF;
10316: --
10317: IF l_debug_on THEN
10318: WSH_DEBUG_SV.log(l_module_name,'x_weight_uom_code',x_weight_uom_code);
10319: WSH_DEBUG_SV.log(l_module_name,'x_volume_uom_code',x_volume_uom_code);
10320: END IF;
10321: x_return_status := wsh_util_core.g_ret_sts_success;
10322: --
10315: END IF;
10316: --
10317: IF l_debug_on THEN
10318: WSH_DEBUG_SV.log(l_module_name,'x_weight_uom_code',x_weight_uom_code);
10319: WSH_DEBUG_SV.log(l_module_name,'x_volume_uom_code',x_volume_uom_code);
10320: END IF;
10321: x_return_status := wsh_util_core.g_ret_sts_success;
10322: --
10323: IF l_debug_on THEN
10320: END IF;
10321: x_return_status := wsh_util_core.g_ret_sts_success;
10322: --
10323: IF l_debug_on THEN
10324: WSH_DEBUG_SV.pop(l_module_name);
10325: END IF;
10326: --
10327: EXCEPTION
10328: WHEN FND_API.G_EXC_ERROR THEN
10328: WHEN FND_API.G_EXC_ERROR THEN
10329: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10330: --
10331: IF l_debug_on THEN
10332: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10333: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10334: END IF;
10335: --
10336: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10329: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10330: --
10331: IF l_debug_on THEN
10332: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10333: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10334: END IF;
10335: --
10336: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10337: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10336: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10337: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10338: --
10339: IF l_debug_on THEN
10340: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10341: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10342: END IF;
10343: --
10344: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10337: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10338: --
10339: IF l_debug_on THEN
10340: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10341: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10342: END IF;
10343: --
10344: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10345: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10344: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10345: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10346: --
10347: IF l_debug_on THEN
10348: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10349: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10350: END IF;
10351: --
10352: WHEN OTHERS THEN
10345: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10346: --
10347: IF l_debug_on THEN
10348: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10349: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10350: END IF;
10351: --
10352: WHEN OTHERS THEN
10353: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10353: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10354: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.DERIVE_DELIVERY_UOM');
10355: --
10356: IF l_debug_on THEN
10357: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10358: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10359: END IF;
10360: --
10361: END Derive_Delivery_Uom;
10354: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.DERIVE_DELIVERY_UOM');
10355: --
10356: IF l_debug_on THEN
10357: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10358: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10359: END IF;
10360: --
10361: END Derive_Delivery_Uom;
10362:
10379: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10380: --
10381: IF l_debug_on IS NULL
10382: THEN
10383: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10384: END IF;
10385: --
10386: IF l_debug_on THEN
10387: WSH_DEBUG_SV.push(l_module_name);
10383: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10384: END IF;
10385: --
10386: IF l_debug_on THEN
10387: WSH_DEBUG_SV.push(l_module_name);
10388: --
10389: WSH_DEBUG_SV.log(l_module_name,'x_rtd_expt_txn_code',x_rtd_expt_txn_code);
10390: WSH_DEBUG_SV.log(l_module_name,'p_rtd_expt_txn_meaning',p_rtd_expt_txn_meaning);
10391: END IF;
10385: --
10386: IF l_debug_on THEN
10387: WSH_DEBUG_SV.push(l_module_name);
10388: --
10389: WSH_DEBUG_SV.log(l_module_name,'x_rtd_expt_txn_code',x_rtd_expt_txn_code);
10390: WSH_DEBUG_SV.log(l_module_name,'p_rtd_expt_txn_meaning',p_rtd_expt_txn_meaning);
10391: END IF;
10392: --
10393: SAVEPOINT VALIDATE_ROUTED_EXPORT_TXN;
10386: IF l_debug_on THEN
10387: WSH_DEBUG_SV.push(l_module_name);
10388: --
10389: WSH_DEBUG_SV.log(l_module_name,'x_rtd_expt_txn_code',x_rtd_expt_txn_code);
10390: WSH_DEBUG_SV.log(l_module_name,'p_rtd_expt_txn_meaning',p_rtd_expt_txn_meaning);
10391: END IF;
10392: --
10393: SAVEPOINT VALIDATE_ROUTED_EXPORT_TXN;
10394: --
10404: p_meaning => p_rtd_expt_txn_meaning,
10405: x_return_status => x_return_status);
10406: --
10407: IF l_debug_on THEN
10408: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_lookup',x_return_status);
10409: END IF;
10410: --
10411: wsh_util_core.api_post_call(
10412: p_return_status => x_return_status,
10417: --
10418: x_return_status := wsh_util_core.g_ret_sts_success;
10419: --
10420: IF l_debug_on THEN
10421: WSH_DEBUG_SV.pop(l_module_name);
10422: END IF;
10423: --
10424: EXCEPTION
10425: WHEN FND_API.G_EXC_ERROR THEN
10426: ROLLBACK TO VALIDATE_ROUTED_EXPORT_TXN;
10427: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10428: --
10429: IF l_debug_on THEN
10430: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10431: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10432: END IF;
10433: --
10434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10427: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10428: --
10429: IF l_debug_on THEN
10430: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10431: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10432: END IF;
10433: --
10434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10435: ROLLBACK TO VALIDATE_ROUTED_EXPORT_TXN;
10435: ROLLBACK TO VALIDATE_ROUTED_EXPORT_TXN;
10436: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10437: --
10438: IF l_debug_on THEN
10439: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10440: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10441: END IF;
10442: --
10443: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10436: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10437: --
10438: IF l_debug_on THEN
10439: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10440: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10441: END IF;
10442: --
10443: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10444: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10443: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10444: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10445: --
10446: IF l_debug_on THEN
10447: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10448: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10449: END IF;
10450: --
10451: WHEN OTHERS THEN
10444: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10445: --
10446: IF l_debug_on THEN
10447: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10448: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10449: END IF;
10450: --
10451: WHEN OTHERS THEN
10452: ROLLBACK TO VALIDATE_ROUTED_EXPORT_TXN;
10453: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10454: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.VALIDATE_ROUTED_EXPORT_TXN');
10455: --
10456: IF l_debug_on THEN
10457: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10458: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10459: END IF;
10460: --
10461: END Validate_Routed_Export_Txn;
10454: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.VALIDATE_ROUTED_EXPORT_TXN');
10455: --
10456: IF l_debug_on THEN
10457: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10458: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10459: END IF;
10460: --
10461: END Validate_Routed_Export_Txn;
10462:
10486: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10487: --
10488: IF l_debug_on IS NULL
10489: THEN
10490: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10491: END IF;
10492: --
10493: IF l_debug_on THEN
10494: --
10491: END IF;
10492: --
10493: IF l_debug_on THEN
10494: --
10495: WSH_DEBUG_SV.push(l_module_name);
10496: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10497: WSH_DEBUG_SV.log(l_module_name,'x_number_of_lpn',x_number_of_lpn);
10498: --
10499: END IF;
10492: --
10493: IF l_debug_on THEN
10494: --
10495: WSH_DEBUG_SV.push(l_module_name);
10496: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10497: WSH_DEBUG_SV.log(l_module_name,'x_number_of_lpn',x_number_of_lpn);
10498: --
10499: END IF;
10500: --
10493: IF l_debug_on THEN
10494: --
10495: WSH_DEBUG_SV.push(l_module_name);
10496: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10497: WSH_DEBUG_SV.log(l_module_name,'x_number_of_lpn',x_number_of_lpn);
10498: --
10499: END IF;
10500: --
10501: SAVEPOINT DERIVE_NUMBER_OF_LPN;
10514:
10515: x_return_status := wsh_util_core.g_ret_sts_success;
10516: --
10517: IF l_debug_on THEN
10518: WSH_DEBUG_SV.pop(l_module_name);
10519: END IF;
10520: --
10521: EXCEPTION
10522: WHEN FND_API.G_EXC_ERROR THEN
10523: ROLLBACK TO DERIVE_NUMBER_OF_LPN;
10524: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10525: --
10526: IF l_debug_on THEN
10527: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10528: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10529: END IF;
10530: --
10531: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10524: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10525: --
10526: IF l_debug_on THEN
10527: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10528: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10529: END IF;
10530: --
10531: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10532: ROLLBACK TO DERIVE_NUMBER_OF_LPN;
10532: ROLLBACK TO DERIVE_NUMBER_OF_LPN;
10533: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10534: --
10535: IF l_debug_on THEN
10536: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10537: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10538: END IF;
10539: --
10540: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10533: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10534: --
10535: IF l_debug_on THEN
10536: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10537: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10538: END IF;
10539: --
10540: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10541: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10540: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10541: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10542: --
10543: IF l_debug_on THEN
10544: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10545: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10546: END IF;
10547: --
10548: WHEN OTHERS THEN
10541: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10542: --
10543: IF l_debug_on THEN
10544: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10545: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10546: END IF;
10547: --
10548: WHEN OTHERS THEN
10549: ROLLBACK TO DERIVE_NUMBER_OF_LPN;
10550: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10551: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.DERIVE_NUMBER_OF_LPN');
10552: --
10553: IF l_debug_on THEN
10554: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10555: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10556: END IF;
10557: --
10558: END Derive_Number_Of_LPN;
10551: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.DERIVE_NUMBER_OF_LPN');
10552: --
10553: IF l_debug_on THEN
10554: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10555: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10556: END IF;
10557: --
10558: END Derive_Number_Of_LPN;
10559: --Harmonization Project I
10618: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10619: --
10620: IF l_debug_on IS NULL
10621: THEN
10622: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10623: END IF;
10624: --
10625: IF l_debug_on THEN
10626: --
10623: END IF;
10624: --
10625: IF l_debug_on THEN
10626: --
10627: WSH_DEBUG_SV.push(l_module_name);
10628: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10629: WSH_DEBUG_SV.log(l_module_name,'p_pickup_location_id',p_pickup_location_id);
10630: WSH_DEBUG_SV.log(l_module_name,'p_dropoff_location_id',p_dropoff_location_id);
10631: --
10624: --
10625: IF l_debug_on THEN
10626: --
10627: WSH_DEBUG_SV.push(l_module_name);
10628: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10629: WSH_DEBUG_SV.log(l_module_name,'p_pickup_location_id',p_pickup_location_id);
10630: WSH_DEBUG_SV.log(l_module_name,'p_dropoff_location_id',p_dropoff_location_id);
10631: --
10632: END IF;
10625: IF l_debug_on THEN
10626: --
10627: WSH_DEBUG_SV.push(l_module_name);
10628: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10629: WSH_DEBUG_SV.log(l_module_name,'p_pickup_location_id',p_pickup_location_id);
10630: WSH_DEBUG_SV.log(l_module_name,'p_dropoff_location_id',p_dropoff_location_id);
10631: --
10632: END IF;
10633: IF nvl(p_delivery_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN
10626: --
10627: WSH_DEBUG_SV.push(l_module_name);
10628: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10629: WSH_DEBUG_SV.log(l_module_name,'p_pickup_location_id',p_pickup_location_id);
10630: WSH_DEBUG_SV.log(l_module_name,'p_dropoff_location_id',p_dropoff_location_id);
10631: --
10632: END IF;
10633: IF nvl(p_delivery_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN
10634: --
10637: close l_pick_up_leg_csr;
10638: --
10639: IF l_trip_name IS NOT NULL THEN
10640: IF l_debug_on THEN
10641: WSH_DEBUG_SV.logmsg(l_module_name,'The Pickup Location is not a valid location for this Delivery');
10642: END IF;
10643: l_loc_description := wsh_util_core.get_location_description
10644: (p_location_id => p_pickup_location_id,
10645: p_format => 'NEW UI CODE');
10658: close l_drop_off_leg_csr;
10659: --
10660: IF l_trip_name IS NOT NULL THEN
10661: IF l_debug_on THEN
10662: WSH_DEBUG_SV.logmsg(l_module_name,'The Dropoff Location is not a valid location for this Delivery');
10663: END IF;
10664: l_loc_description := wsh_util_core.get_location_description
10665: (p_location_id => p_dropoff_location_id,
10666: p_format => 'NEW UI CODE');
10677:
10678: x_return_status := wsh_util_core.g_ret_sts_success;
10679: --
10680: IF l_debug_on THEN
10681: WSH_DEBUG_SV.logmsg(l_module_name,'These Pickup and Drop off Locations are valid for this Delivery');
10682: WSH_DEBUG_SV.pop(l_module_name);
10683: END IF;
10684: --
10685: EXCEPTION
10678: x_return_status := wsh_util_core.g_ret_sts_success;
10679: --
10680: IF l_debug_on THEN
10681: WSH_DEBUG_SV.logmsg(l_module_name,'These Pickup and Drop off Locations are valid for this Delivery');
10682: WSH_DEBUG_SV.pop(l_module_name);
10683: END IF;
10684: --
10685: EXCEPTION
10686: WHEN FND_API.G_EXC_ERROR THEN
10686: WHEN FND_API.G_EXC_ERROR THEN
10687: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10688: --
10689: IF l_debug_on THEN
10690: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10691: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10692: END IF;
10693: --
10694: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10687: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10688: --
10689: IF l_debug_on THEN
10690: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10691: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10692: END IF;
10693: --
10694: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10695: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10694: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10695: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10696: --
10697: IF l_debug_on THEN
10698: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10699: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10700: END IF;
10701: --
10702: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10695: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10696: --
10697: IF l_debug_on THEN
10698: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10699: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10700: END IF;
10701: --
10702: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10703: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10702: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10703: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10704: --
10705: IF l_debug_on THEN
10706: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10707: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10708: END IF;
10709: --
10710: WHEN OTHERS THEN
10703: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10704: --
10705: IF l_debug_on THEN
10706: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10707: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10708: END IF;
10709: --
10710: WHEN OTHERS THEN
10711: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10711: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10712: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.CHK_DUP_PICKUP_DROPOFF_LOCNS');
10713: --
10714: IF l_debug_on THEN
10715: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10716: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10717: END IF;
10718: --
10719: END Chk_Dup_Pickup_Dropoff_Locns;
10712: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.CHK_DUP_PICKUP_DROPOFF_LOCNS');
10713: --
10714: IF l_debug_on THEN
10715: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10716: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10717: END IF;
10718: --
10719: END Chk_Dup_Pickup_Dropoff_Locns;
10720:
10758: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10759: --
10760: IF l_debug_on IS NULL
10761: THEN
10762: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10763: END IF;
10764: --
10765: IF l_debug_on THEN
10766: --
10763: END IF;
10764: --
10765: IF l_debug_on THEN
10766: --
10767: WSH_DEBUG_SV.push(l_module_name);
10768: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10769: --
10770: END IF;
10771:
10764: --
10765: IF l_debug_on THEN
10766: --
10767: WSH_DEBUG_SV.push(l_module_name);
10768: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10769: --
10770: END IF;
10771:
10772:
10780: l_Item_Condn1Tab(1).g_number_val := p_delivery_id;
10781: l_Item_Condn1Tab(1).g_Bind_Literal := ':b_delivery_id';
10782:
10783: IF l_debug_on THEN
10784: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ITM_QUERY_CUSTOM.ADD_CONDITION',WSH_DEBUG_SV.C_PROC_LEVEL);
10785: END IF;
10786: WSH_ITM_QUERY_CUSTOM.ADD_CONDITION(l_del_Table, ' AND WND.delivery_id = :b_delivery_id', l_Item_Condn1Tab, 'NUMBER');
10787:
10788:
10789:
10790: --Call the customized API
10791:
10792: IF l_debug_on THEN
10793: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ITM_CUSTOMIZE.ALTER_DELIVERY_MARK',WSH_DEBUG_SV.C_PROC_LEVEL);
10794: END IF;
10795: WSH_ITM_CUSTOMIZE.ALTER_DELIVERY_MARK(l_del_Table, x_return_status);
10796:
10797: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10795: WSH_ITM_CUSTOMIZE.ALTER_DELIVERY_MARK(l_del_Table, x_return_status);
10796:
10797: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10798: IF l_debug_on THEN
10799: WSH_DEBUG_SV.pop(l_module_name);
10800: END IF;
10801: RETURN 'N';
10802: END IF;
10803:
10816: DBMS_SQL.PARSE(l_CursorID, l_strQuery, DBMS_SQL.v7);
10817: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, v_delivery_id);
10818:
10819: IF l_debug_on THEN
10820: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ITM_QUERY_CUSTOM.BIND_VALUES',WSH_DEBUG_SV.C_PROC_LEVEL);
10821: END IF;
10822: WSH_ITM_QUERY_CUSTOM.BIND_VALUES(l_del_Table, l_CursorID);
10823:
10824: l_ignore := DBMS_SQL.EXECUTE(l_CursorID);
10828:
10829: IF (l_rows_fetched = 0) THEN
10830:
10831: IF l_debug_on THEN
10832: WSH_DEBUG_SV.log(l_module_name,'Return','N');
10833: WSH_DEBUG_SV.pop(l_module_name);
10834: END IF;
10835:
10836: RETURN 'N';
10829: IF (l_rows_fetched = 0) THEN
10830:
10831: IF l_debug_on THEN
10832: WSH_DEBUG_SV.log(l_module_name,'Return','N');
10833: WSH_DEBUG_SV.pop(l_module_name);
10834: END IF;
10835:
10836: RETURN 'N';
10837:
10837:
10838: END IF;
10839:
10840: IF l_debug_on THEN
10841: WSH_DEBUG_SV.log(l_module_name,'Return','Y');
10842: WSH_DEBUG_SV.pop(l_module_name);
10843: END IF;
10844:
10845: RETURN 'Y';
10838: END IF;
10839:
10840: IF l_debug_on THEN
10841: WSH_DEBUG_SV.log(l_module_name,'Return','Y');
10842: WSH_DEBUG_SV.pop(l_module_name);
10843: END IF;
10844:
10845: RETURN 'Y';
10846:
10851: WSH_UTIL_CORE.add_message (x_return_status);
10852: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_VALIDATIONS.Check_ITM_REQD');
10853: --
10854: IF l_debug_on THEN
10855: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10856: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10857: END IF;
10858: END Check_ITM_REQUIRED;
10859:
10852: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_VALIDATIONS.Check_ITM_REQD');
10853: --
10854: IF l_debug_on THEN
10855: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10856: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10857: END IF;
10858: END Check_ITM_REQUIRED;
10859:
10860:
10894: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10895: --
10896: IF l_debug_on IS NULL
10897: THEN
10898: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10899: END IF;
10900: --
10901: IF l_debug_on THEN
10902: --
10899: END IF;
10900: --
10901: IF l_debug_on THEN
10902: --
10903: WSH_DEBUG_SV.push(l_module_name);
10904: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10905: WSH_DEBUG_SV.log(l_module_name,'p_ship_from_location_id',p_ship_from_location_id);
10906: WSH_DEBUG_SV.log(l_module_name,'p_action_type',p_action_type);
10907: --
10900: --
10901: IF l_debug_on THEN
10902: --
10903: WSH_DEBUG_SV.push(l_module_name);
10904: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10905: WSH_DEBUG_SV.log(l_module_name,'p_ship_from_location_id',p_ship_from_location_id);
10906: WSH_DEBUG_SV.log(l_module_name,'p_action_type',p_action_type);
10907: --
10908: END IF;
10901: IF l_debug_on THEN
10902: --
10903: WSH_DEBUG_SV.push(l_module_name);
10904: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10905: WSH_DEBUG_SV.log(l_module_name,'p_ship_from_location_id',p_ship_from_location_id);
10906: WSH_DEBUG_SV.log(l_module_name,'p_action_type',p_action_type);
10907: --
10908: END IF;
10909:
10902: --
10903: WSH_DEBUG_SV.push(l_module_name);
10904: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10905: WSH_DEBUG_SV.log(l_module_name,'p_ship_from_location_id',p_ship_from_location_id);
10906: WSH_DEBUG_SV.log(l_module_name,'p_action_type',p_action_type);
10907: --
10908: END IF;
10909:
10910: IF p_action_type = 'SHIP_CONFIRM' THEN
10915: l_msg := FND_MESSAGE.Get_String('WSH', 'WSH_PR_ITM_REQD');
10916: END IF;
10917:
10918: IF l_debug_on THEN
10919: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_xc_util.log_exception',WSH_DEBUG_SV.C_PROC_LEVEL);
10920: END IF;
10921: wsh_xc_util.log_exception(
10922: p_api_version => 1.0,
10923: x_return_status => x_return_status,
10933: p_delivery_id => p_delivery_id
10934: );
10935:
10936: IF l_debug_on THEN
10937: WSH_DEBUG_SV.pop(l_module_name);
10938: END IF;
10939:
10940: EXCEPTION
10941:
10944: WSH_UTIL_CORE.add_message (x_return_status);
10945: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_VALIDATIONS.Log_ITM_Exception');
10946: --
10947: IF l_debug_on THEN
10948: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10949: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10950: END IF;
10951: END Log_ITM_Exception;
10952:
10945: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_VALIDATIONS.Log_ITM_Exception');
10946: --
10947: IF l_debug_on THEN
10948: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10949: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10950: END IF;
10951: END Log_ITM_Exception;
10952:
10953:
10978: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10979: --
10980: IF l_debug_on IS NULL
10981: THEN
10982: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10983: END IF;
10984: --
10985: IF l_debug_on THEN
10986: --
10983: END IF;
10984: --
10985: IF l_debug_on THEN
10986: --
10987: WSH_DEBUG_SV.push(l_module_name);
10988: --
10989: END IF;
10990:
10991: x_exceptions_exist := 'N';
11008:
11009: END LOOP;
11010:
11011: IF l_debug_on THEN
11012: WSH_DEBUG_SV.pop(l_module_name);
11013: END IF;
11014:
11015: EXCEPTION
11016: WHEN others THEN
11019: END IF;
11020: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
11021: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_VALIDATIONS.check_exception','WSH_DELIVERY_VALIDATIONS');
11022: IF l_debug_on THEN
11023: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11024: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
11025: END IF;
11026: --
11027: END check_exception;
11020: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
11021: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_VALIDATIONS.check_exception','WSH_DELIVERY_VALIDATIONS');
11022: IF l_debug_on THEN
11023: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11024: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
11025: END IF;
11026: --
11027: END check_exception;
11028:
11068: --
11069: l_debug_on := wsh_debug_interface.g_debug;
11070: --
11071: IF l_debug_on IS NULL THEN
11072: l_debug_on := wsh_debug_sv.is_debug_enabled;
11073: END IF;
11074: --
11075: IF l_debug_on THEN
11076: wsh_debug_sv.push(l_module_name);
11072: l_debug_on := wsh_debug_sv.is_debug_enabled;
11073: END IF;
11074: --
11075: IF l_debug_on THEN
11076: wsh_debug_sv.push(l_module_name);
11077: --
11078: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
11079: END IF;
11080: --
11074: --
11075: IF l_debug_on THEN
11076: wsh_debug_sv.push(l_module_name);
11077: --
11078: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
11079: END IF;
11080: --
11081: --
11082: l_has_lines := 'N';
11086: CLOSE line_csr;
11087: --
11088: --
11089: IF l_debug_on THEN
11090: wsh_debug_sv.pop(l_module_name);
11091: END IF;
11092: --
11093: RETURN(l_has_lines);
11094: --}
11096: WHEN OTHERS THEN
11097: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.has_lines',l_module_name);
11098: --
11099: IF l_debug_on THEN
11100: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
11101: END IF;
11102: --
11103: RAISE;
11104: --
11155: --
11156: l_debug_on := wsh_debug_interface.g_debug;
11157: --
11158: IF l_debug_on IS NULL THEN
11159: l_debug_on := wsh_debug_sv.is_debug_enabled;
11160: END IF;
11161: --
11162: IF l_debug_on THEN
11163: wsh_debug_sv.push(l_module_name);
11159: l_debug_on := wsh_debug_sv.is_debug_enabled;
11160: END IF;
11161: --
11162: IF l_debug_on THEN
11163: wsh_debug_sv.push(l_module_name);
11164: --
11165: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
11166: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
11167: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
11161: --
11162: IF l_debug_on THEN
11163: wsh_debug_sv.push(l_module_name);
11164: --
11165: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
11166: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
11167: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
11168: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
11169: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
11162: IF l_debug_on THEN
11163: wsh_debug_sv.push(l_module_name);
11164: --
11165: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
11166: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
11167: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
11168: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
11169: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
11170: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
11163: wsh_debug_sv.push(l_module_name);
11164: --
11165: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
11166: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
11167: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
11168: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
11169: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
11170: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
11171: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
11164: --
11165: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
11166: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
11167: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
11168: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
11169: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
11170: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
11171: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
11172: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
11165: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
11166: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
11167: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
11168: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
11169: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
11170: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
11171: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
11172: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
11173: END IF;
11166: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
11167: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
11168: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
11169: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
11170: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
11171: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
11172: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
11173: END IF;
11174: --
11167: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
11168: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
11169: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
11170: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
11171: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
11172: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
11173: END IF;
11174: --
11175: --
11168: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
11169: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
11170: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
11171: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
11172: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
11173: END IF;
11174: --
11175: --
11176: l_num_warnings := 0;
11195: --
11196:
11197: -- Check for Exceptions against Delivery and its Contents
11198: IF l_debug_on THEN
11199: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.Check_Exceptions',WSH_DEBUG_SV.C_PROC_LEVEL); END IF;
11200: l_exceptions_tab.delete;
11201: l_exp_logged := FALSE;
11202: l_exp_warning := FALSE;
11203: WSH_XC_UTIL.Check_Exceptions (
11276: --
11277: -- Debug Statements
11278: --
11279: IF l_debug_on THEN
11280: WSH_DEBUG_SV.pop(l_module_name);
11281: END IF;
11282: --
11283: --
11284: EXCEPTION
11294: x_allowed := 'N';
11295: --
11296: --
11297: IF l_debug_on THEN
11298: WSH_DEBUG_SV.logmsg(l_module_name,'wsh_util_core.e_not_allowed exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11299: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:wsh_util_core.e_not_allowed');
11300: END IF;
11301: --
11302: WHEN wsh_util_core.e_not_allowed_warning THEN
11295: --
11296: --
11297: IF l_debug_on THEN
11298: WSH_DEBUG_SV.logmsg(l_module_name,'wsh_util_core.e_not_allowed exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11299: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:wsh_util_core.e_not_allowed');
11300: END IF;
11301: --
11302: WHEN wsh_util_core.e_not_allowed_warning THEN
11303: IF l_num_warnings > 0
11310: x_allowed := 'NW';
11311: --
11312: --
11313: IF l_debug_on THEN
11314: WSH_DEBUG_SV.logmsg(l_module_name,'wsh_util_core.e_not_allowed_warning exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11315: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:wsh_util_core.e_not_allowed_warning');
11316: END IF;
11317: --
11318: WHEN FND_API.G_EXC_ERROR THEN
11311: --
11312: --
11313: IF l_debug_on THEN
11314: WSH_DEBUG_SV.logmsg(l_module_name,'wsh_util_core.e_not_allowed_warning exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11315: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:wsh_util_core.e_not_allowed_warning');
11316: END IF;
11317: --
11318: WHEN FND_API.G_EXC_ERROR THEN
11319:
11319:
11320: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11321: --
11322: IF l_debug_on THEN
11323: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11324: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
11325: END IF;
11326: --
11327: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11320: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11321: --
11322: IF l_debug_on THEN
11323: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11324: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
11325: END IF;
11326: --
11327: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11328:
11328:
11329: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
11330: --
11331: IF l_debug_on THEN
11332: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11333: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
11334: END IF;
11335: --
11336: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
11329: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
11330: --
11331: IF l_debug_on THEN
11332: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11333: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
11334: END IF;
11335: --
11336: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
11337: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11336: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
11337: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11338: --
11339: IF l_debug_on THEN
11340: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11341: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
11342: END IF;
11343: --
11344: WHEN OTHERS THEN
11337: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11338: --
11339: IF l_debug_on THEN
11340: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11341: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
11342: END IF;
11343: --
11344: WHEN OTHERS THEN
11345:
11346: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
11347: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.check_inTransit',l_module_name);
11348: --
11349: IF l_debug_on THEN
11350: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
11351: END IF;
11352: --
11353: --}
11354: END check_inTransit;
11413: --
11414: l_debug_on := wsh_debug_interface.g_debug;
11415: --
11416: IF l_debug_on IS NULL THEN
11417: l_debug_on := wsh_debug_sv.is_debug_enabled;
11418: END IF;
11419: --
11420: IF l_debug_on THEN
11421: wsh_debug_sv.push(l_module_name);
11417: l_debug_on := wsh_debug_sv.is_debug_enabled;
11418: END IF;
11419: --
11420: IF l_debug_on THEN
11421: wsh_debug_sv.push(l_module_name);
11422: --
11423: wsh_debug_sv.LOG(l_module_name, 'p_DELIVERY_ID ', p_delivery_id );
11424: END IF;
11425: --
11419: --
11420: IF l_debug_on THEN
11421: wsh_debug_sv.push(l_module_name);
11422: --
11423: wsh_debug_sv.LOG(l_module_name, 'p_DELIVERY_ID ', p_delivery_id );
11424: END IF;
11425: --
11426: --
11427: l_num_warnings := 0;
11444: --
11445: CLOSE dlvy_csr;
11446: --
11447: IF l_debug_on THEN
11448: wsh_debug_sv.LOG(l_module_name, 'l_dlvy_rec.shipping_control ', l_dlvy_rec.shipping_control );
11449: wsh_debug_sv.LOG(l_module_name, 'l_dlvy_rec.routing_response_id ', l_dlvy_rec.routing_response_id );
11450: END IF;
11451: --
11452: --
11445: CLOSE dlvy_csr;
11446: --
11447: IF l_debug_on THEN
11448: wsh_debug_sv.LOG(l_module_name, 'l_dlvy_rec.shipping_control ', l_dlvy_rec.shipping_control );
11449: wsh_debug_sv.LOG(l_module_name, 'l_dlvy_rec.routing_response_id ', l_dlvy_rec.routing_response_id );
11450: END IF;
11451: --
11452: --
11453: x_shipping_control := l_dlvy_rec.shipping_control;
11469: THEN
11470: x_routing_request_flag := 'N';
11471: --
11472: IF l_debug_on THEN
11473: wsh_debug_sv.LOGMSG(l_module_name, 'No Lines with Routing request' );
11474: END IF;
11475: ELSE
11476: x_routing_request_flag := 'Y';
11477: --
11475: ELSE
11476: x_routing_request_flag := 'Y';
11477: --
11478: IF l_debug_on THEN
11479: wsh_debug_sv.LOGMSG(l_module_name, 'At least one Line with Routing request' );
11480: END IF;
11481: END IF;
11482: --
11483: CLOSE line_csr;
11488: --
11489: -- Debug Statements
11490: --
11491: IF l_debug_on THEN
11492: WSH_DEBUG_SV.pop(l_module_name);
11493: END IF;
11494: --
11495: --}
11496: EXCEPTION
11499:
11500: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11501: --
11502: IF l_debug_on THEN
11503: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11504: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
11505: END IF;
11506: --
11507: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11500: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11501: --
11502: IF l_debug_on THEN
11503: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11504: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
11505: END IF;
11506: --
11507: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11508:
11508:
11509: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
11510: --
11511: IF l_debug_on THEN
11512: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11513: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
11514: END IF;
11515: --
11516: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
11509: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
11510: --
11511: IF l_debug_on THEN
11512: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11513: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
11514: END IF;
11515: --
11516: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
11517: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11516: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
11517: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11518: --
11519: IF l_debug_on THEN
11520: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11521: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
11522: END IF;
11523: --
11524: WHEN OTHERS THEN
11517: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11518: --
11519: IF l_debug_on THEN
11520: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11521: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
11522: END IF;
11523: --
11524: WHEN OTHERS THEN
11525:
11526: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
11527: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.get_shipping_control',l_module_name);
11528: --
11529: IF l_debug_on THEN
11530: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
11531: END IF;
11532: --
11533: --}
11534: END get_shipping_control;
11555: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
11556: --
11557: IF l_debug_on IS NULL
11558: THEN
11559: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
11560: END IF;
11561: --
11562: IF l_debug_on THEN
11563: --
11560: END IF;
11561: --
11562: IF l_debug_on THEN
11563: --
11564: WSH_DEBUG_SV.push(l_module_name);
11565: WSH_DEBUG_SV.log(l_module_name,'p_in_rec.caller',p_in_rec.caller);
11566: --
11567: END IF;
11568: --
11561: --
11562: IF l_debug_on THEN
11563: --
11564: WSH_DEBUG_SV.push(l_module_name);
11565: WSH_DEBUG_SV.log(l_module_name,'p_in_rec.caller',p_in_rec.caller);
11566: --
11567: END IF;
11568: --
11569: x_return_status := FND_API.G_RET_STS_SUCCESS;
12520: l_attributes := l_attributes || 'PACKING_SLIP, ';
12521: END IF;
12522:
12523: IF l_debug_on THEN
12524: WSH_DEBUG_SV.log(l_module_name,'l_attributes',l_attributes);
12525: WSH_DEBUG_SV.log(l_module_name,'length(l_attributes)',length(l_attributes));
12526: END IF;
12527:
12528:
12521: END IF;
12522:
12523: IF l_debug_on THEN
12524: WSH_DEBUG_SV.log(l_module_name,'l_attributes',l_attributes);
12525: WSH_DEBUG_SV.log(l_module_name,'length(l_attributes)',length(l_attributes));
12526: END IF;
12527:
12528:
12529: IF l_attributes IS NULL THEN
12528:
12529: IF l_attributes IS NULL THEN
12530: --no message to be shown to the user
12531: IF l_debug_on THEN
12532: WSH_DEBUG_SV.pop(l_module_name);
12533: END IF;
12534: --
12535: RETURN;
12536: ELSE
12544: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
12545: THEN
12546: x_return_status := l_return_status;
12547: IF l_debug_on THEN
12548: wsh_debug_sv.logmsg(l_module_name,'Error returned by wsh_utilities.process_message',WSH_DEBUG_SV.C_PROC_LEVEL);
12549: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
12550: wsh_debug_sv.pop(l_module_name);
12551: END IF;
12552: return;
12545: THEN
12546: x_return_status := l_return_status;
12547: IF l_debug_on THEN
12548: wsh_debug_sv.logmsg(l_module_name,'Error returned by wsh_utilities.process_message',WSH_DEBUG_SV.C_PROC_LEVEL);
12549: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
12550: wsh_debug_sv.pop(l_module_name);
12551: END IF;
12552: return;
12553: ELSE
12546: x_return_status := l_return_status;
12547: IF l_debug_on THEN
12548: wsh_debug_sv.logmsg(l_module_name,'Error returned by wsh_utilities.process_message',WSH_DEBUG_SV.C_PROC_LEVEL);
12549: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
12550: wsh_debug_sv.pop(l_module_name);
12551: END IF;
12552: return;
12553: ELSE
12554: x_return_status := wsh_util_core.G_RET_STS_WARNING;
12557:
12558:
12559:
12560: IF l_debug_on THEN
12561: WSH_DEBUG_SV.pop(l_module_name);
12562: END IF;
12563: --
12564:
12565:
12567: WHEN OTHERS THEN
12568: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
12569: --
12570: IF l_debug_on THEN
12571: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
12572: END IF;
12573: --
12574: END user_non_updatable_columns;
12575:
12614: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
12615: --
12616: IF l_debug_on IS NULL
12617: THEN
12618: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
12619: END IF;
12620: --
12621: x_return_status := wsh_util_core.G_RET_STS_SUCCESS;
12622: l_is_del_eligible := FALSE;
12621: x_return_status := wsh_util_core.G_RET_STS_SUCCESS;
12622: l_is_del_eligible := FALSE;
12623:
12624: IF l_debug_on THEN
12625: WSH_DEBUG_SV.push(l_module_name);
12626: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id', p_delivery_id);
12627: END IF;
12628:
12629: OPEN c_detail(p_delivery_id);
12622: l_is_del_eligible := FALSE;
12623:
12624: IF l_debug_on THEN
12625: WSH_DEBUG_SV.push(l_module_name);
12626: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id', p_delivery_id);
12627: END IF;
12628:
12629: OPEN c_detail(p_delivery_id);
12630: FETCH c_detail into l_del_det_exists;
12640: WHEN OTHERS THEN
12641: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
12642: WSH_UTIL_CORE.default_handler('WSH_DELIVERIES_GRP.is_del_eligible_pick');
12643: IF l_debug_on THEN
12644: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
12645: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
12646: END IF;
12647: RETURN FALSE;
12648:
12641: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
12642: WSH_UTIL_CORE.default_handler('WSH_DELIVERIES_GRP.is_del_eligible_pick');
12643: IF l_debug_on THEN
12644: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
12645: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
12646: END IF;
12647: RETURN FALSE;
12648:
12649: END Is_del_eligible_pick;
12687:
12688: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
12689: --
12690: IF l_debug_on IS NULL THEN
12691: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
12692: END IF;
12693: --
12694: IF l_debug_on THEN
12695: WSH_DEBUG_SV.push(l_module_name);
12691: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
12692: END IF;
12693: --
12694: IF l_debug_on THEN
12695: WSH_DEBUG_SV.push(l_module_name);
12696: WSH_DEBUG_SV.log(l_module_name, 'delivery id', p_delivery_id);
12697: END IF;
12698:
12699: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
12692: END IF;
12693: --
12694: IF l_debug_on THEN
12695: WSH_DEBUG_SV.push(l_module_name);
12696: WSH_DEBUG_SV.log(l_module_name, 'delivery id', p_delivery_id);
12697: END IF;
12698:
12699: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
12700:
12710: END IF;
12711:
12712:
12713: IF l_debug_on THEN
12714: WSH_DEBUG_SV.log(l_module_name, 'trip id', x_trip_info_rec.trip_id);
12715: WSH_DEBUG_SV.log(l_module_name, 'trip name', x_trip_info_rec.name);
12716: WSH_DEBUG_SV.log(l_module_name, 'trip status code', x_trip_info_rec.status_code);
12717: WSH_DEBUG_SV.pop(l_module_name);
12718: END IF;
12711:
12712:
12713: IF l_debug_on THEN
12714: WSH_DEBUG_SV.log(l_module_name, 'trip id', x_trip_info_rec.trip_id);
12715: WSH_DEBUG_SV.log(l_module_name, 'trip name', x_trip_info_rec.name);
12716: WSH_DEBUG_SV.log(l_module_name, 'trip status code', x_trip_info_rec.status_code);
12717: WSH_DEBUG_SV.pop(l_module_name);
12718: END IF;
12719: EXCEPTION
12712:
12713: IF l_debug_on THEN
12714: WSH_DEBUG_SV.log(l_module_name, 'trip id', x_trip_info_rec.trip_id);
12715: WSH_DEBUG_SV.log(l_module_name, 'trip name', x_trip_info_rec.name);
12716: WSH_DEBUG_SV.log(l_module_name, 'trip status code', x_trip_info_rec.status_code);
12717: WSH_DEBUG_SV.pop(l_module_name);
12718: END IF;
12719: EXCEPTION
12720:
12713: IF l_debug_on THEN
12714: WSH_DEBUG_SV.log(l_module_name, 'trip id', x_trip_info_rec.trip_id);
12715: WSH_DEBUG_SV.log(l_module_name, 'trip name', x_trip_info_rec.name);
12716: WSH_DEBUG_SV.log(l_module_name, 'trip status code', x_trip_info_rec.status_code);
12717: WSH_DEBUG_SV.pop(l_module_name);
12718: END IF;
12719: EXCEPTION
12720:
12721: WHEN Others THEN
12725: WSH_UTIL_CORE.Default_Handler('WSH_DELIVERY_VALIDATIONS.GET_TRIP_INFORMATION', l_module_name);
12726: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
12727:
12728: IF l_debug_on THEN
12729: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
12730: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
12731: END IF;
12732: END GET_TRIP_INFORMATION;
12733:
12726: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
12727:
12728: IF l_debug_on THEN
12729: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
12730: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
12731: END IF;
12732: END GET_TRIP_INFORMATION;
12733:
12734: -------------------------------------------------------------------------------
12781: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
12782: --
12783: IF l_debug_on IS NULL
12784: THEN
12785: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
12786: END IF;
12787: --
12788: IF l_debug_on THEN
12789: WSH_DEBUG_SV.push(l_module_name);
12785: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
12786: END IF;
12787: --
12788: IF l_debug_on THEN
12789: WSH_DEBUG_SV.push(l_module_name);
12790: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id', p_delivery_id);
12791: END IF;
12792: --
12793:
12786: END IF;
12787: --
12788: IF l_debug_on THEN
12789: WSH_DEBUG_SV.push(l_module_name);
12790: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id', p_delivery_id);
12791: END IF;
12792: --
12793:
12794: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
12827: END IF;
12828: CLOSE c_get_delivery_info;
12829:
12830: IF l_debug_on THEN
12831: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
12832: WSH_DEBUG_SV.pop(l_module_name);
12833: END IF;
12834:
12835: EXCEPTION
12828: CLOSE c_get_delivery_info;
12829:
12830: IF l_debug_on THEN
12831: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
12832: WSH_DEBUG_SV.pop(l_module_name);
12833: END IF;
12834:
12835: EXCEPTION
12836: WHEN NO_DATA_FOUND THEN
12842: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12843: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
12844: --
12845: IF l_debug_on THEN
12846: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
12847: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
12848: END IF;
12849: --
12850: WHEN OTHERS THEN
12843: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
12844: --
12845: IF l_debug_on THEN
12846: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
12847: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
12848: END IF;
12849: --
12850: WHEN OTHERS THEN
12851: IF c_get_delivery_info%ISOPEN THEN
12856: --
12857: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATION.get_delivery_information',l_module_name);
12858: --
12859: IF l_debug_on THEN
12860: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
12861: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
12862: END IF;
12863: --
12864: END GET_DELIVERY_INFORMATION;
12857: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATION.get_delivery_information',l_module_name);
12858: --
12859: IF l_debug_on THEN
12860: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
12861: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
12862: END IF;
12863: --
12864: END GET_DELIVERY_INFORMATION;
12865: