[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:
258: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
259: --
260: IF l_debug_on IS NULL
261: THEN
262: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
263: END IF;
264: --
265: IF l_debug_on THEN
266: WSH_DEBUG_SV.push(l_module_name);
262: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
263: END IF;
264: --
265: IF l_debug_on THEN
266: WSH_DEBUG_SV.push(l_module_name);
267: --
268: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
269: END IF;
270: --
264: --
265: IF l_debug_on THEN
266: WSH_DEBUG_SV.push(l_module_name);
267: --
268: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
269: END IF;
270: --
271: x_valid_flag := TRUE;
272:
275: -- Check for ATO Models and whether the Configured Item has been created or not
276:
277: --
278: IF l_debug_on THEN
279: WSH_DEBUG_SV.log(l_module_name,'Top Model Line ID',model_rec.top_model_line_id);
280: END IF;
281: --
282:
283: -- Get all the ATO Model IDs
283: -- Get all the ATO Model IDs
284: FOR get_ato_rec IN get_ato(model_rec.top_model_line_id) LOOP
285: --
286: IF l_debug_on THEN
287: WSH_DEBUG_SV.log(l_module_name,'ATO Line ID',get_ato_rec.ato_line_id);
288: END IF;
289: --
290:
291: -- Check if the Configured Item is available, if not SMC is broken
322: LOOP
323: qty := (model_rec.ordered_quantity * check_smc_rec.child_shp_qty) / check_smc_rec.child_ord_qty;
324:
325: IF l_debug_on THEN
326: WSH_DEBUG_SV.log(l_module_name,'Ordered Qty',model_rec.ordered_quantity);
327: WSH_DEBUG_SV.log(l_module_name,'Child Shp Qty',check_smc_rec.child_shp_qty);
328: WSH_DEBUG_SV.log(l_module_name,'Child Ord Qty',check_smc_rec.child_ord_qty);
329: WSH_DEBUG_SV.log(l_module_name,'Prev Qty',qty);
330: END IF;
323: qty := (model_rec.ordered_quantity * check_smc_rec.child_shp_qty) / check_smc_rec.child_ord_qty;
324:
325: IF l_debug_on THEN
326: WSH_DEBUG_SV.log(l_module_name,'Ordered Qty',model_rec.ordered_quantity);
327: WSH_DEBUG_SV.log(l_module_name,'Child Shp Qty',check_smc_rec.child_shp_qty);
328: WSH_DEBUG_SV.log(l_module_name,'Child Ord Qty',check_smc_rec.child_ord_qty);
329: WSH_DEBUG_SV.log(l_module_name,'Prev Qty',qty);
330: END IF;
331:
324:
325: IF l_debug_on THEN
326: WSH_DEBUG_SV.log(l_module_name,'Ordered Qty',model_rec.ordered_quantity);
327: WSH_DEBUG_SV.log(l_module_name,'Child Shp Qty',check_smc_rec.child_shp_qty);
328: WSH_DEBUG_SV.log(l_module_name,'Child Ord Qty',check_smc_rec.child_ord_qty);
329: WSH_DEBUG_SV.log(l_module_name,'Prev Qty',qty);
330: END IF;
331:
332: IF ( NVL(prev_qty,qty) <> qty ) THEN
325: IF l_debug_on THEN
326: WSH_DEBUG_SV.log(l_module_name,'Ordered Qty',model_rec.ordered_quantity);
327: WSH_DEBUG_SV.log(l_module_name,'Child Shp Qty',check_smc_rec.child_shp_qty);
328: WSH_DEBUG_SV.log(l_module_name,'Child Ord Qty',check_smc_rec.child_ord_qty);
329: WSH_DEBUG_SV.log(l_module_name,'Prev Qty',qty);
330: END IF;
331:
332: IF ( NVL(prev_qty,qty) <> qty ) THEN
333: x_valid_flag := FALSE;
356: --
357: -- Debug Statements
358: --
359: IF l_debug_on THEN
360: WSH_DEBUG_SV.pop(l_module_name);
361: END IF;
362: --
363: EXCEPTION
364: WHEN others THEN
368: --
369: -- Debug Statements
370: --
371: IF l_debug_on THEN
372: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
373: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
374: END IF;
375: --
376: END check_smc;
369: -- Debug Statements
370: --
371: IF l_debug_on THEN
372: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
373: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
374: END IF;
375: --
376: END check_smc;
377:
429: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
430: --
431: IF l_debug_on IS NULL
432: THEN
433: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
434: END IF;
435: --
436: IF l_debug_on THEN
437: WSH_DEBUG_SV.push(l_module_name);
433: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
434: END IF;
435: --
436: IF l_debug_on THEN
437: WSH_DEBUG_SV.push(l_module_name);
438: --
439: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
440: END IF;
441: --
435: --
436: IF l_debug_on THEN
437: WSH_DEBUG_SV.push(l_module_name);
438: --
439: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
440: END IF;
441: --
442: x_valid_flag := TRUE;
443: OPEN check_arrival_set;
456: --
457: -- Debug Statements
458: --
459: IF l_debug_on THEN
460: WSH_DEBUG_SV.pop(l_module_name);
461: END IF;
462: --
463: EXCEPTION
464: WHEN others THEN
468: --
469: -- Debug Statements
470: --
471: IF l_debug_on THEN
472: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
473: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
474: END IF;
475: --
476: END check_arrival_set;
469: -- Debug Statements
470: --
471: IF l_debug_on THEN
472: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
473: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
474: END IF;
475: --
476: END check_arrival_set;
477:
501: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
502: --
503: IF l_debug_on IS NULL
504: THEN
505: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
506: END IF;
507: --
508: IF l_debug_on THEN
509: WSH_DEBUG_SV.push(l_module_name);
505: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
506: END IF;
507: --
508: IF l_debug_on THEN
509: WSH_DEBUG_SV.push(l_module_name);
510: --
511: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
512: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_STATUS',P_DELIVERY_STATUS);
513: END IF;
507: --
508: IF l_debug_on THEN
509: WSH_DEBUG_SV.push(l_module_name);
510: --
511: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
512: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_STATUS',P_DELIVERY_STATUS);
513: END IF;
514: --
515: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
508: IF l_debug_on THEN
509: WSH_DEBUG_SV.push(l_module_name);
510: --
511: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
512: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_STATUS',P_DELIVERY_STATUS);
513: END IF;
514: --
515: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
516:
519: --
520: -- Debug Statements
521: --
522: IF l_debug_on THEN
523: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
524: END IF;
525: --
526: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
527: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
531: --
532: -- Debug Statements
533: --
534: IF l_debug_on THEN
535: WSH_DEBUG_SV.pop(l_module_name);
536: END IF;
537: --
538: EXCEPTION
539: WHEN others THEN
543: --
544: -- Debug Statements
545: --
546: IF l_debug_on THEN
547: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
548: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
549: END IF;
550: --
551: END check_del_not_i_t;
544: -- Debug Statements
545: --
546: IF l_debug_on THEN
547: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
548: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
549: END IF;
550: --
551: END check_del_not_i_t;
552:
577: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
578: --
579: IF l_debug_on IS NULL
580: THEN
581: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
582: END IF;
583: --
584: IF l_debug_on THEN
585: WSH_DEBUG_SV.push(l_module_name);
581: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
582: END IF;
583: --
584: IF l_debug_on THEN
585: WSH_DEBUG_SV.push(l_module_name);
586: --
587: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
588: WSH_DEBUG_SV.log(l_module_name,'REL_NUM',REL_NUM);
589: WSH_DEBUG_SV.log(l_module_name,'UNREL_NUM',UNREL_NUM);
583: --
584: IF l_debug_on THEN
585: WSH_DEBUG_SV.push(l_module_name);
586: --
587: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
588: WSH_DEBUG_SV.log(l_module_name,'REL_NUM',REL_NUM);
589: WSH_DEBUG_SV.log(l_module_name,'UNREL_NUM',UNREL_NUM);
590: END IF;
591: --
584: IF l_debug_on THEN
585: WSH_DEBUG_SV.push(l_module_name);
586: --
587: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
588: WSH_DEBUG_SV.log(l_module_name,'REL_NUM',REL_NUM);
589: WSH_DEBUG_SV.log(l_module_name,'UNREL_NUM',UNREL_NUM);
590: END IF;
591: --
592: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
585: WSH_DEBUG_SV.push(l_module_name);
586: --
587: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
588: WSH_DEBUG_SV.log(l_module_name,'REL_NUM',REL_NUM);
589: WSH_DEBUG_SV.log(l_module_name,'UNREL_NUM',UNREL_NUM);
590: END IF;
591: --
592: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
593:
602: --
603: -- Debug Statements
604: --
605: IF l_debug_on THEN
606: WSH_DEBUG_SV.pop(l_module_name);
607: END IF;
608: --
609: EXCEPTION
610: WHEN others THEN
614: --
615: -- Debug Statements
616: --
617: IF l_debug_on THEN
618: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
619: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
620: END IF;
621: --
622: END check_released_lines;
615: -- Debug Statements
616: --
617: IF l_debug_on THEN
618: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
619: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
620: END IF;
621: --
622: END check_released_lines;
623:
648: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
649: --
650: IF l_debug_on IS NULL
651: THEN
652: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
653: END IF;
654: --
655: IF l_debug_on THEN
656: WSH_DEBUG_SV.push(l_module_name);
652: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
653: END IF;
654: --
655: IF l_debug_on THEN
656: WSH_DEBUG_SV.push(l_module_name);
657: --
658: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
659: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
660: WSH_DEBUG_SV.log(l_module_name,'P_UNPACKED_FLAG',P_UNPACKED_FLAG);
654: --
655: IF l_debug_on THEN
656: WSH_DEBUG_SV.push(l_module_name);
657: --
658: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
659: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
660: WSH_DEBUG_SV.log(l_module_name,'P_UNPACKED_FLAG',P_UNPACKED_FLAG);
661: END IF;
662: --
655: IF l_debug_on THEN
656: WSH_DEBUG_SV.push(l_module_name);
657: --
658: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
659: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
660: WSH_DEBUG_SV.log(l_module_name,'P_UNPACKED_FLAG',P_UNPACKED_FLAG);
661: END IF;
662: --
663: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
656: WSH_DEBUG_SV.push(l_module_name);
657: --
658: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
659: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
660: WSH_DEBUG_SV.log(l_module_name,'P_UNPACKED_FLAG',P_UNPACKED_FLAG);
661: END IF;
662: --
663: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
664:
667: --
668: -- Debug Statements
669: --
670: IF l_debug_on THEN
671: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
672: END IF;
673: --
674: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
675: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
681: --
682: -- Debug Statements
683: --
684: IF l_debug_on THEN
685: WSH_DEBUG_SV.pop(l_module_name);
686: END IF;
687: --
688: EXCEPTION
689: WHEN others THEN
693: --
694: -- Debug Statements
695: --
696: IF l_debug_on THEN
697: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
698: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
699: END IF;
700: --
701: END check_del_unpacked;
694: -- Debug Statements
695: --
696: IF l_debug_on THEN
697: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
698: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
699: END IF;
700: --
701: END check_del_unpacked;
702:
727: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
728: --
729: IF l_debug_on IS NULL
730: THEN
731: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
732: END IF;
733: --
734: IF l_debug_on THEN
735: WSH_DEBUG_SV.push(l_module_name);
731: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
732: END IF;
733: --
734: IF l_debug_on THEN
735: WSH_DEBUG_SV.push(l_module_name);
736: --
737: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
738: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
739: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
733: --
734: IF l_debug_on THEN
735: WSH_DEBUG_SV.push(l_module_name);
736: --
737: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
738: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
739: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
740: END IF;
741: --
734: IF l_debug_on THEN
735: WSH_DEBUG_SV.push(l_module_name);
736: --
737: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
738: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
739: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
740: END IF;
741: --
742: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
735: WSH_DEBUG_SV.push(l_module_name);
736: --
737: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
738: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
739: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
740: END IF;
741: --
742: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
743:
748: --
749: -- Debug Statements
750: --
751: IF l_debug_on THEN
752: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
753: END IF;
754: --
755: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
756: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
762: --
763: -- Debug Statements
764: --
765: IF l_debug_on THEN
766: WSH_DEBUG_SV.pop(l_module_name);
767: END IF;
768: --
769: EXCEPTION
770: WHEN others THEN
774: --
775: -- Debug Statements
776: --
777: IF l_debug_on THEN
778: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
779: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
780: END IF;
781: --
782: END check_del_overfilled;
775: -- Debug Statements
776: --
777: IF l_debug_on THEN
778: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
779: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
780: END IF;
781: --
782: END check_del_overfilled;
783:
808: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
809: --
810: IF l_debug_on IS NULL
811: THEN
812: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
813: END IF;
814: --
815: IF l_debug_on THEN
816: WSH_DEBUG_SV.push(l_module_name);
812: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
813: END IF;
814: --
815: IF l_debug_on THEN
816: WSH_DEBUG_SV.push(l_module_name);
817: --
818: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
819: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
820: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
814: --
815: IF l_debug_on THEN
816: WSH_DEBUG_SV.push(l_module_name);
817: --
818: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
819: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
820: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
821: END IF;
822: --
815: IF l_debug_on THEN
816: WSH_DEBUG_SV.push(l_module_name);
817: --
818: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
819: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
820: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
821: END IF;
822: --
823: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
816: WSH_DEBUG_SV.push(l_module_name);
817: --
818: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
819: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
820: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
821: END IF;
822: --
823: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
824:
829: --
830: -- Debug Statements
831: --
832: IF l_debug_on THEN
833: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
834: END IF;
835: --
836: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
837: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
844: --
845: -- Debug Statements
846: --
847: IF l_debug_on THEN
848: WSH_DEBUG_SV.pop(l_module_name);
849: END IF;
850: --
851: EXCEPTION
852: WHEN others THEN
856: --
857: -- Debug Statements
858: --
859: IF l_debug_on THEN
860: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
861: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
862: END IF;
863: --
864: END check_del_underfilled;
857: -- Debug Statements
858: --
859: IF l_debug_on THEN
860: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
861: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
862: END IF;
863: --
864: END check_del_underfilled;
865:
891: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
892: --
893: IF l_debug_on IS NULL
894: THEN
895: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
896: END IF;
897: --
898: IF l_debug_on THEN
899: WSH_DEBUG_SV.push(l_module_name);
895: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
896: END IF;
897: --
898: IF l_debug_on THEN
899: WSH_DEBUG_SV.push(l_module_name);
900: --
901: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
902: WSH_DEBUG_SV.log(l_module_name,'P_FINAL_DROPOFF_ID',P_FINAL_DROPOFF_ID);
903: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_ID',P_ULTIMATE_DROPOFF_ID);
897: --
898: IF l_debug_on THEN
899: WSH_DEBUG_SV.push(l_module_name);
900: --
901: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
902: WSH_DEBUG_SV.log(l_module_name,'P_FINAL_DROPOFF_ID',P_FINAL_DROPOFF_ID);
903: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_ID',P_ULTIMATE_DROPOFF_ID);
904: END IF;
905: --
898: IF l_debug_on THEN
899: WSH_DEBUG_SV.push(l_module_name);
900: --
901: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
902: WSH_DEBUG_SV.log(l_module_name,'P_FINAL_DROPOFF_ID',P_FINAL_DROPOFF_ID);
903: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_ID',P_ULTIMATE_DROPOFF_ID);
904: END IF;
905: --
906: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
899: WSH_DEBUG_SV.push(l_module_name);
900: --
901: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
902: WSH_DEBUG_SV.log(l_module_name,'P_FINAL_DROPOFF_ID',P_FINAL_DROPOFF_ID);
903: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_ID',P_ULTIMATE_DROPOFF_ID);
904: END IF;
905: --
906: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
907:
910: --
911: -- Debug Statements
912: --
913: IF l_debug_on THEN
914: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
915: END IF;
916: --
917: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
918: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
922: --
923: -- Debug Statements
924: --
925: IF l_debug_on THEN
926: WSH_DEBUG_SV.pop(l_module_name);
927: END IF;
928: --
929: EXCEPTION
930: WHEN others THEN
934: --
935: -- Debug Statements
936: --
937: IF l_debug_on THEN
938: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
939: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
940: END IF;
941: --
942: END check_del_final_dest;
935: -- Debug Statements
936: --
937: IF l_debug_on THEN
938: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
939: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
940: END IF;
941: --
942: END check_del_final_dest;
943:
993: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
994: --
995: IF l_debug_on IS NULL
996: THEN
997: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
998: END IF;
999: --
1000: IF l_debug_on THEN
1001: WSH_DEBUG_SV.push(l_module_name);
997: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
998: END IF;
999: --
1000: IF l_debug_on THEN
1001: WSH_DEBUG_SV.push(l_module_name);
1002: --
1003: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_TYPE',P_ENTITY_TYPE);
1004: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
1005: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE',P_SHIP_DATE);
999: --
1000: IF l_debug_on THEN
1001: WSH_DEBUG_SV.push(l_module_name);
1002: --
1003: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_TYPE',P_ENTITY_TYPE);
1004: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
1005: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE',P_SHIP_DATE);
1006: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ASSOC_TYPE',P_SHIP_ASSOC_TYPE);
1007: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_LOCATION_ID',P_SHIP_LOCATION_ID);
1000: IF l_debug_on THEN
1001: WSH_DEBUG_SV.push(l_module_name);
1002: --
1003: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_TYPE',P_ENTITY_TYPE);
1004: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
1005: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE',P_SHIP_DATE);
1006: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ASSOC_TYPE',P_SHIP_ASSOC_TYPE);
1007: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_LOCATION_ID',P_SHIP_LOCATION_ID);
1008: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
1001: WSH_DEBUG_SV.push(l_module_name);
1002: --
1003: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_TYPE',P_ENTITY_TYPE);
1004: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
1005: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE',P_SHIP_DATE);
1006: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ASSOC_TYPE',P_SHIP_ASSOC_TYPE);
1007: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_LOCATION_ID',P_SHIP_LOCATION_ID);
1008: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
1009: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_ORG_ID',P_FREIGHT_ORG_ID);
1002: --
1003: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_TYPE',P_ENTITY_TYPE);
1004: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
1005: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE',P_SHIP_DATE);
1006: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ASSOC_TYPE',P_SHIP_ASSOC_TYPE);
1007: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_LOCATION_ID',P_SHIP_LOCATION_ID);
1008: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
1009: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_ORG_ID',P_FREIGHT_ORG_ID);
1010: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_DATE',P_RECEIVE_DATE);
1003: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_TYPE',P_ENTITY_TYPE);
1004: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
1005: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE',P_SHIP_DATE);
1006: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ASSOC_TYPE',P_SHIP_ASSOC_TYPE);
1007: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_LOCATION_ID',P_SHIP_LOCATION_ID);
1008: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
1009: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_ORG_ID',P_FREIGHT_ORG_ID);
1010: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_DATE',P_RECEIVE_DATE);
1011: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_ASSOC_TYPE',P_RECEIVE_ASSOC_TYPE);
1004: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
1005: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE',P_SHIP_DATE);
1006: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ASSOC_TYPE',P_SHIP_ASSOC_TYPE);
1007: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_LOCATION_ID',P_SHIP_LOCATION_ID);
1008: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
1009: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_ORG_ID',P_FREIGHT_ORG_ID);
1010: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_DATE',P_RECEIVE_DATE);
1011: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_ASSOC_TYPE',P_RECEIVE_ASSOC_TYPE);
1012: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_LOCATION_ID',P_RECEIVE_LOCATION_ID);
1005: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE',P_SHIP_DATE);
1006: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ASSOC_TYPE',P_SHIP_ASSOC_TYPE);
1007: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_LOCATION_ID',P_SHIP_LOCATION_ID);
1008: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
1009: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_ORG_ID',P_FREIGHT_ORG_ID);
1010: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_DATE',P_RECEIVE_DATE);
1011: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_ASSOC_TYPE',P_RECEIVE_ASSOC_TYPE);
1012: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_LOCATION_ID',P_RECEIVE_LOCATION_ID);
1013: WSH_DEBUG_SV.log(l_module_name,'P_UPDATE_FLAG',P_UPDATE_FLAG);
1006: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ASSOC_TYPE',P_SHIP_ASSOC_TYPE);
1007: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_LOCATION_ID',P_SHIP_LOCATION_ID);
1008: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
1009: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_ORG_ID',P_FREIGHT_ORG_ID);
1010: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_DATE',P_RECEIVE_DATE);
1011: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_ASSOC_TYPE',P_RECEIVE_ASSOC_TYPE);
1012: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_LOCATION_ID',P_RECEIVE_LOCATION_ID);
1013: WSH_DEBUG_SV.log(l_module_name,'P_UPDATE_FLAG',P_UPDATE_FLAG);
1014: END IF;
1007: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_LOCATION_ID',P_SHIP_LOCATION_ID);
1008: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
1009: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_ORG_ID',P_FREIGHT_ORG_ID);
1010: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_DATE',P_RECEIVE_DATE);
1011: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_ASSOC_TYPE',P_RECEIVE_ASSOC_TYPE);
1012: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_LOCATION_ID',P_RECEIVE_LOCATION_ID);
1013: WSH_DEBUG_SV.log(l_module_name,'P_UPDATE_FLAG',P_UPDATE_FLAG);
1014: END IF;
1015: --
1008: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
1009: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_ORG_ID',P_FREIGHT_ORG_ID);
1010: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_DATE',P_RECEIVE_DATE);
1011: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_ASSOC_TYPE',P_RECEIVE_ASSOC_TYPE);
1012: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_LOCATION_ID',P_RECEIVE_LOCATION_ID);
1013: WSH_DEBUG_SV.log(l_module_name,'P_UPDATE_FLAG',P_UPDATE_FLAG);
1014: END IF;
1015: --
1016: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1009: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_ORG_ID',P_FREIGHT_ORG_ID);
1010: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_DATE',P_RECEIVE_DATE);
1011: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_ASSOC_TYPE',P_RECEIVE_ASSOC_TYPE);
1012: WSH_DEBUG_SV.log(l_module_name,'P_RECEIVE_LOCATION_ID',P_RECEIVE_LOCATION_ID);
1013: WSH_DEBUG_SV.log(l_module_name,'P_UPDATE_FLAG',P_UPDATE_FLAG);
1014: END IF;
1015: --
1016: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1017:
1020: --
1021: -- Debug Statements
1022: --
1023: IF l_debug_on THEN
1024: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CAL_ASG_VALIDATIONS.TRANSPORT_DATES',WSH_DEBUG_SV.C_PROC_LEVEL);
1025: END IF;
1026: --
1027: wsh_cal_asg_validations.transport_dates(
1028: p_api_version_number => 1.0
1056: --
1057: -- Debug Statements
1058: --
1059: IF l_debug_on THEN
1060: WSH_DEBUG_SV.pop(l_module_name);
1061: END IF;
1062: --
1063: RETURN;
1064: END IF;
1072: --
1073: -- Debug Statements
1074: --
1075: IF l_debug_on THEN
1076: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1077: END IF;
1078: --
1079: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1080: FND_MESSAGE.SET_TOKEN('SHIP',fnd_date.date_to_chardate(p_ship_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1114: --
1115: -- Debug Statements
1116: --
1117: IF l_debug_on THEN
1118: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1119: END IF;
1120: --
1121: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1122: wsh_util_core.add_message(x_return_status);
1127: --
1128: -- Debug Statements
1129: --
1130: IF l_debug_on THEN
1131: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1132: END IF;
1133: --
1134: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1135: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1157: --
1158: -- Debug Statements
1159: --
1160: IF l_debug_on THEN
1161: WSH_DEBUG_SV.pop(l_module_name);
1162: END IF;
1163: --
1164: EXCEPTION
1165: WHEN others THEN
1169: --
1170: -- Debug Statements
1171: --
1172: IF l_debug_on THEN
1173: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1174: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1175: END IF;
1176: --
1177: END Check_Calendar;
1170: -- Debug Statements
1171: --
1172: IF l_debug_on THEN
1173: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1174: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1175: END IF;
1176: --
1177: END Check_Calendar;
1178:
1275: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1276: --
1277: IF l_debug_on IS NULL
1278: THEN
1279: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1280: END IF;
1281: --
1282: IF l_debug_on THEN
1283: WSH_DEBUG_SV.push(l_module_name);
1279: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1280: END IF;
1281: --
1282: IF l_debug_on THEN
1283: WSH_DEBUG_SV.push(l_module_name);
1284: --
1285: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1286: WSH_DEBUG_SV.log(l_module_name,'p_called_for_sc',p_called_for_sc);
1287: END IF;
1281: --
1282: IF l_debug_on THEN
1283: WSH_DEBUG_SV.push(l_module_name);
1284: --
1285: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1286: WSH_DEBUG_SV.log(l_module_name,'p_called_for_sc',p_called_for_sc);
1287: END IF;
1288: --
1289: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1282: IF l_debug_on THEN
1283: WSH_DEBUG_SV.push(l_module_name);
1284: --
1285: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1286: WSH_DEBUG_SV.log(l_module_name,'p_called_for_sc',p_called_for_sc);
1287: END IF;
1288: --
1289: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1290:
1308: --
1309: -- Debug Statements
1310: --
1311: IF l_debug_on THEN
1312: WSH_DEBUG_SV.pop(l_module_name);
1313: END IF;
1314: --
1315: RETURN;
1316: ELSE
1339: --
1340: -- Debug Statements
1341: --
1342: IF l_debug_on THEN
1343: WSH_DEBUG_SV.pop(l_module_name);
1344: END IF;
1345: --
1346: RETURN;
1347: END IF;
1359: --
1360: -- Debug Statements
1361: --
1362: IF l_debug_on THEN
1363: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1364: END IF;
1365: --
1366: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
1367: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1369: --
1370: -- Debug Statements
1371: --
1372: IF l_debug_on THEN
1373: WSH_DEBUG_SV.pop(l_module_name);
1374: END IF;
1375: --
1376: RETURN;
1377: END IF;
1394: --
1395: -- Debug Statements
1396: --
1397: IF l_debug_on THEN
1398: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_PKG.CHECK_SMC',WSH_DEBUG_SV.C_PROC_LEVEL);
1399: END IF;
1400: --
1401: wsh_tpa_delivery_pkg.check_smc( p_delivery_id, l_valid_flag, l_return_status);
1402:
1405: --
1406: -- Debug Statements
1407: --
1408: IF l_debug_on THEN
1409: WSH_DEBUG_SV.pop(l_module_name);
1410: END IF;
1411: --
1412: RETURN;
1413: END IF;
1414:
1415: IF NOT (l_valid_flag) THEN
1416: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_SMC_INCOMPLETE');
1417: IF l_debug_on THEN
1418: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1419: END IF;
1420: --
1421: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
1422: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1426: --
1427: -- Debug Statements
1428: --
1429: IF l_debug_on THEN
1430: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_PKG.CHECK_SHIP_SET',WSH_DEBUG_SV.C_PROC_LEVEL);
1431: END IF;
1432: --
1433: wsh_tpa_delivery_pkg.check_ship_set( p_delivery_id, l_valid_flag, l_return_status);
1434:
1437: --
1438: -- Debug Statements
1439: --
1440: IF l_debug_on THEN
1441: WSH_DEBUG_SV.pop(l_module_name);
1442: END IF;
1443: --
1444: RETURN;
1445: END IF;
1451: --
1452: -- Debug Statements
1453: --
1454: IF l_debug_on THEN
1455: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1456: END IF;
1457: --
1458: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
1459: -- End Bug 2429632
1470: --
1471: -- Debug Statements
1472: --
1473: IF l_debug_on THEN
1474: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.UPDATE_LEG_SEQUENCE',WSH_DEBUG_SV.C_PROC_LEVEL);
1475: END IF;
1476: --
1477: wsh_new_delivery_actions.update_leg_sequence(
1478: p_delivery_id => p_delivery_id,
1483: --
1484: -- Debug Statements
1485: --
1486: IF l_debug_on THEN
1487: WSH_DEBUG_SV.pop(l_module_name);
1488: END IF;
1489: --
1490: RETURN;
1491: END IF;
1494:
1495: FND_PROFILE.Get('WSH_CHK_SHPG_RCV_CAL', l_chk_shp_rcvg_calendar);
1496:
1497: IF l_debug_on THEN
1498: WSH_DEBUG_SV.log(l_module_name,'profile:: l_chk_shp_rcvg calendar : ', l_chk_shp_rcvg_calendar);
1499: END IF;
1500:
1501: -- 10365977: Only if this profile has Value of N it will Skip Calendar Check (Y and Null will enforce check Calendar)
1502: IF ( nvl(l_chk_shp_rcvg_calendar, 'Y') = 'Y' ) THEN
1538: --
1539: -- Debug Statements
1540: --
1541: IF l_debug_on THEN
1542: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_PKG.CHECK_CALENDAR',WSH_DEBUG_SV.C_PROC_LEVEL);
1543: END IF;
1544: --
1545: wsh_tpa_delivery_pkg.check_calendar(p_entity_type => 'DELIVERY',
1546: p_entity_id => p_delivery_id,
1565: --
1566: -- Debug Statements
1567: --
1568: IF l_debug_on THEN
1569: WSH_DEBUG_SV.pop(l_module_name);
1570: END IF;
1571: --
1572: EXCEPTION
1573: WHEN NO_FREIGHT_CODE THEN
1577: --
1578: -- Debug Statements
1579: --
1580: IF l_debug_on THEN
1581: WSH_DEBUG_SV.logmsg(l_module_name,'NO_FREIGHT_CODE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1582: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_FREIGHT_CODE');
1583: END IF;
1584: --
1585: WHEN others THEN
1578: -- Debug Statements
1579: --
1580: IF l_debug_on THEN
1581: WSH_DEBUG_SV.logmsg(l_module_name,'NO_FREIGHT_CODE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1582: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_FREIGHT_CODE');
1583: END IF;
1584: --
1585: WHEN others THEN
1586: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.CHECK_PLAN');
1589: --
1590: -- Debug Statements
1591: --
1592: IF l_debug_on THEN
1593: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1594: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1595: END IF;
1596: --
1597: END Check_Plan;
1590: -- Debug Statements
1591: --
1592: IF l_debug_on THEN
1593: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1594: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1595: END IF;
1596: --
1597: END Check_Plan;
1598:
1640: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1641: --
1642: IF l_debug_on IS NULL
1643: THEN
1644: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1645: END IF;
1646: --
1647: IF l_debug_on THEN
1648: WSH_DEBUG_SV.push(l_module_name);
1644: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1645: END IF;
1646: --
1647: IF l_debug_on THEN
1648: WSH_DEBUG_SV.push(l_module_name);
1649: --
1650: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1651: END IF;
1652: --
1646: --
1647: IF l_debug_on THEN
1648: WSH_DEBUG_SV.push(l_module_name);
1649: --
1650: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1651: END IF;
1652: --
1653: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1654:
1663: --
1664: -- Debug Statements
1665: --
1666: IF l_debug_on THEN
1667: WSH_DEBUG_SV.pop(l_module_name);
1668: END IF;
1669: --
1670: RETURN;
1671: END IF;
1677: --
1678: -- Debug Statements
1679: --
1680: IF l_debug_on THEN
1681: WSH_DEBUG_SV.pop(l_module_name);
1682: END IF;
1683: --
1684: RETURN;
1685: END IF;
1689: --
1690: -- Debug Statements
1691: --
1692: IF l_debug_on THEN
1693: WSH_DEBUG_SV.pop(l_module_name);
1694: END IF;
1695: --
1696: EXCEPTION
1697: WHEN others THEN
1701: --
1702: -- Debug Statements
1703: --
1704: IF l_debug_on THEN
1705: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1706: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1707: END IF;
1708: --
1709: END Check_Unplan;
1702: -- Debug Statements
1703: --
1704: IF l_debug_on THEN
1705: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1706: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1707: END IF;
1708: --
1709: END Check_Unplan;
1710:
1757: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1758: --
1759: IF l_debug_on IS NULL
1760: THEN
1761: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1762: END IF;
1763: --
1764: IF l_debug_on THEN
1765: WSH_DEBUG_SV.push(l_module_name);
1761: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1762: END IF;
1763: --
1764: IF l_debug_on THEN
1765: WSH_DEBUG_SV.push(l_module_name);
1766: --
1767: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_LEG_ID',P_DELIVERY_LEG_ID);
1768: END IF;
1769: --
1763: --
1764: IF l_debug_on THEN
1765: WSH_DEBUG_SV.push(l_module_name);
1766: --
1767: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_LEG_ID',P_DELIVERY_LEG_ID);
1768: END IF;
1769: --
1770: OPEN delivery_details;
1771: FETCH delivery_details INTO l_delivery_id, l_gr_weight, l_net_weight, l_wt_uom, l_volume, l_vol_uom;
1783: --
1784: -- Debug Statements
1785: --
1786: IF l_debug_on THEN
1787: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1788: END IF;
1789: --
1790: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_delivery_id));
1791: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1793: --
1794: -- Debug Statements
1795: --
1796: IF l_debug_on THEN
1797: WSH_DEBUG_SV.pop(l_module_name);
1798: END IF;
1799: --
1800: RETURN;
1801: END IF;
1805: --
1806: -- Debug Statements
1807: --
1808: IF l_debug_on THEN
1809: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1810: END IF;
1811: --
1812: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_delivery_id));
1813: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1815: --
1816: -- Debug Statements
1817: --
1818: IF l_debug_on THEN
1819: WSH_DEBUG_SV.pop(l_module_name);
1820: END IF;
1821: --
1822: RETURN;
1823: END IF;
1833: --
1834: -- Debug Statements
1835: --
1836: IF l_debug_on THEN
1837: WSH_DEBUG_SV.pop(l_module_name);
1838: END IF;
1839: --
1840: EXCEPTION
1841: WHEN others THEN
1845: --
1846: -- Debug Statements
1847: --
1848: IF l_debug_on THEN
1849: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1850: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1851: END IF;
1852: --
1853: END Check_Tender_Load;
1846: -- Debug Statements
1847: --
1848: IF l_debug_on THEN
1849: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1850: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1851: END IF;
1852: --
1853: END Check_Tender_Load;
1854:
1975: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1976: --
1977: IF l_debug_on IS NULL
1978: THEN
1979: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1980: END IF;
1981: --
1982: IF l_debug_on THEN
1983: WSH_DEBUG_SV.push(l_module_name);
1979: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1980: END IF;
1981: --
1982: IF l_debug_on THEN
1983: WSH_DEBUG_SV.push(l_module_name);
1984: --
1985: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1986: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
1987: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
1981: --
1982: IF l_debug_on THEN
1983: WSH_DEBUG_SV.push(l_module_name);
1984: --
1985: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1986: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
1987: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
1988: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
1989: END IF;
1982: IF l_debug_on THEN
1983: WSH_DEBUG_SV.push(l_module_name);
1984: --
1985: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1986: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
1987: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
1988: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
1989: END IF;
1990: --
1983: WSH_DEBUG_SV.push(l_module_name);
1984: --
1985: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1986: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
1987: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
1988: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
1989: END IF;
1990: --
1991: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1984: --
1985: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1986: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
1987: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
1988: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
1989: END IF;
1990: --
1991: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1992:
2000:
2001: CLOSE delivery_status;
2002: --
2003: IF l_debug_on THEN
2004: wsh_debug_sv.log(l_module_name, 'l_del_status', l_del_status);
2005: wsh_debug_sv.log(l_module_name, 'l_shipment_direction', l_shipment_direction);
2006: wsh_debug_sv.log(l_module_name, 'l_del_ignore', l_del_ignore);
2007: END IF;
2008: --
2001: CLOSE delivery_status;
2002: --
2003: IF l_debug_on THEN
2004: wsh_debug_sv.log(l_module_name, 'l_del_status', l_del_status);
2005: wsh_debug_sv.log(l_module_name, 'l_shipment_direction', l_shipment_direction);
2006: wsh_debug_sv.log(l_module_name, 'l_del_ignore', l_del_ignore);
2007: END IF;
2008: --
2009:
2002: --
2003: IF l_debug_on THEN
2004: wsh_debug_sv.log(l_module_name, 'l_del_status', l_del_status);
2005: wsh_debug_sv.log(l_module_name, 'l_shipment_direction', l_shipment_direction);
2006: wsh_debug_sv.log(l_module_name, 'l_del_ignore', l_del_ignore);
2007: END IF;
2008: --
2009:
2010: /*
2012: IF l_shipment_direction NOT IN ('O','IO')
2013: THEN
2014: --{
2015: IF l_debug_on THEN
2016: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit GET_SHIPPING_CONTROL',WSH_DEBUG_SV.C_PROC_LEVEL);
2017: END IF;
2018: --
2019: GET_SHIPPING_CONTROL
2020: (
2026: );
2027: --
2028: --
2029: IF l_debug_on THEN
2030: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
2031: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
2032: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
2033: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
2034: --
2027: --
2028: --
2029: IF l_debug_on THEN
2030: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
2031: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
2032: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
2033: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
2034: --
2035: END IF;
2028: --
2029: IF l_debug_on THEN
2030: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
2031: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
2032: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
2033: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
2034: --
2035: END IF;
2036: --
2029: IF l_debug_on THEN
2030: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
2031: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
2032: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
2033: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
2034: --
2035: END IF;
2036: --
2037: --
2060: --
2061: -- Debug Statements
2062: --
2063: IF l_debug_on THEN
2064: 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);
2065: END IF;
2066: --
2067: wsh_tpa_delivery_pkg.check_del_not_i_t(p_delivery_id, l_del_status, l_return_status);
2068:
2072: --
2073: -- Debug Statements
2074: --
2075: IF l_debug_on THEN
2076: WSH_DEBUG_SV.pop(l_module_name);
2077: END IF;
2078: --
2079: RETURN;
2080: END IF;
2093:
2094: CLOSE trip_status;
2095:
2096: IF l_debug_on THEN
2097: wsh_debug_sv.log(l_module_name, 'l_trip_planflag', l_trip_planflag);
2098: wsh_debug_sv.log(l_module_name, 'l_trip_ignore', l_trip_ignore);
2099: END IF;
2100:
2101: IF l_trip_planflag='F' THEN
2094: CLOSE trip_status;
2095:
2096: IF l_debug_on THEN
2097: wsh_debug_sv.log(l_module_name, 'l_trip_planflag', l_trip_planflag);
2098: wsh_debug_sv.log(l_module_name, 'l_trip_ignore', l_trip_ignore);
2099: END IF;
2100:
2101: IF l_trip_planflag='F' THEN
2102: raise trip_firm;
2151: --
2152: -- Debug Statements
2153: --
2154: IF l_debug_on THEN
2155: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.GET_GROUP_BY_ATTR',WSH_DEBUG_SV.C_PROC_LEVEL);
2156: END IF;
2157: --
2158: wsh_delivery_autocreate.get_group_by_attr( p_organization_id => l_org_id,
2159: x_group_by_flags => l_group_by_attr,
2164: --
2165: -- Debug Statements
2166: --
2167: IF l_debug_on THEN
2168: WSH_DEBUG_SV.pop(l_module_name);
2169: END IF;
2170: --
2171: RETURN;
2172: END IF;
2247: --
2248: -- Debug Statements
2249: --
2250: IF l_debug_on THEN
2251: WSH_DEBUG_SV.pop(l_module_name);
2252: END IF;
2253: --
2254: EXCEPTION
2255: -- J-IB-NPARIKH-{
2258:
2259: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2260: --
2261: IF l_debug_on THEN
2262: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2263: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2264: END IF;
2265: --
2266: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2259: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2260: --
2261: IF l_debug_on THEN
2262: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2263: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2264: END IF;
2265: --
2266: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2267:
2267:
2268: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2269: --
2270: IF l_debug_on THEN
2271: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2272: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2273: END IF;
2274: --
2275: -- J-IB-NPARIKH-}
2268: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2269: --
2270: IF l_debug_on THEN
2271: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2272: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2273: END IF;
2274: --
2275: -- J-IB-NPARIKH-}
2276:
2281: --
2282: -- Debug Statements
2283: --
2284: IF l_debug_on THEN
2285: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2286: END IF;
2287: --
2288: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2289: --
2289: --
2290: -- Debug Statements
2291: --
2292: IF l_debug_on THEN
2293: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2294: END IF;
2295: --
2296: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2297: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2300: --
2301: -- Debug Statements
2302: --
2303: IF l_debug_on THEN
2304: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_DEL_TRIP_SHIPMETHOD exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2305: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_DEL_TRIP_SHIPMETHOD');
2306: END IF;
2307: --
2308: WHEN invalid_tripshipmethod_del_org THEN
2301: -- Debug Statements
2302: --
2303: IF l_debug_on THEN
2304: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_DEL_TRIP_SHIPMETHOD exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2305: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_DEL_TRIP_SHIPMETHOD');
2306: END IF;
2307: --
2308: WHEN invalid_tripshipmethod_del_org THEN
2309: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_SM_ORG');
2310: --
2311: -- Debug Statements
2312: --
2313: IF l_debug_on THEN
2314: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2315: END IF;
2316: --
2317: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2318: --
2318: --
2319: -- Debug Statements
2320: --
2321: IF l_debug_on THEN
2322: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2323: END IF;
2324: --
2325: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2326: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2329: --
2330: -- Debug Statements
2331: --
2332: IF l_debug_on THEN
2333: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_TRIPSHIPMETHOD_DEL_ORG exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2334: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_TRIPSHIPMETHOD_DEL_ORG');
2335: END IF;
2336: --
2337: WHEN invalid_status THEN
2330: -- Debug Statements
2331: --
2332: IF l_debug_on THEN
2333: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_TRIPSHIPMETHOD_DEL_ORG exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2334: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_TRIPSHIPMETHOD_DEL_ORG');
2335: END IF;
2336: --
2337: WHEN invalid_status THEN
2338: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_STATUS');
2339: --
2340: -- Debug Statements
2341: --
2342: IF l_debug_on THEN
2343: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2344: END IF;
2345: --
2346: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2347: --
2347: --
2348: -- Debug Statements
2349: --
2350: IF l_debug_on THEN
2351: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2352: END IF;
2353: --
2354: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2355: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2358: --
2359: -- Debug Statements
2360: --
2361: IF l_debug_on THEN
2362: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_STATUS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2363: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_STATUS');
2364: END IF;
2365: --
2366:
2359: -- Debug Statements
2360: --
2361: IF l_debug_on THEN
2362: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_STATUS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2363: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_STATUS');
2364: END IF;
2365: --
2366:
2367: WHEN trip_firm THEN
2366:
2367: WHEN trip_firm THEN
2368: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_FIRM');
2369: IF l_debug_on THEN
2370: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2371: END IF;
2372: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2373: IF l_debug_on THEN
2374: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2370: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2371: END IF;
2372: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2373: IF l_debug_on THEN
2374: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2375: END IF;
2376: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2377: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2378: wsh_util_core.add_message(x_return_status);
2376: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2377: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2378: wsh_util_core.add_message(x_return_status);
2379: IF l_debug_on THEN
2380: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_FIRM exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2381: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_FIRM');
2382: END IF;
2383: WHEN trip_diffignore THEN
2384: FND_MESSAGE.SET_NAME('WSH','WSH_DELASSIGNTR_IGNORE');
2377: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2378: wsh_util_core.add_message(x_return_status);
2379: IF l_debug_on THEN
2380: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_FIRM exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2381: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_FIRM');
2382: END IF;
2383: WHEN trip_diffignore THEN
2384: FND_MESSAGE.SET_NAME('WSH','WSH_DELASSIGNTR_IGNORE');
2385: IF l_debug_on THEN
2382: END IF;
2383: WHEN trip_diffignore THEN
2384: FND_MESSAGE.SET_NAME('WSH','WSH_DELASSIGNTR_IGNORE');
2385: IF l_debug_on THEN
2386: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2387: END IF;
2388: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2389: IF l_debug_on THEN
2390: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2386: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2387: END IF;
2388: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2389: IF l_debug_on THEN
2390: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2391: END IF;
2392: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2393: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2394: wsh_util_core.add_message(x_return_status);
2392: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2393: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2394: wsh_util_core.add_message(x_return_status);
2395: IF l_debug_on THEN
2396: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_DIFFIGNORE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2397: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_DIFFIGNORE');
2398: END IF;
2399:
2400: WHEN others THEN
2393: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2394: wsh_util_core.add_message(x_return_status);
2395: IF l_debug_on THEN
2396: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_DIFFIGNORE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2397: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_DIFFIGNORE');
2398: END IF;
2399:
2400: WHEN others THEN
2401: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.CHECK_ASSIGN_TRIP');
2404: --
2405: -- Debug Statements
2406: --
2407: IF l_debug_on THEN
2408: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2409: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2410: END IF;
2411: --
2412: END Check_Assign_Trip;
2405: -- Debug Statements
2406: --
2407: IF l_debug_on THEN
2408: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2409: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2410: END IF;
2411: --
2412: END Check_Assign_Trip;
2413:
2458: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2459: --
2460: IF l_debug_on IS NULL
2461: THEN
2462: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2463: END IF;
2464: --
2465: IF l_debug_on THEN
2466: WSH_DEBUG_SV.push(l_module_name);
2462: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2463: END IF;
2464: --
2465: IF l_debug_on THEN
2466: WSH_DEBUG_SV.push(l_module_name);
2467: --
2468: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2469: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
2470: END IF;
2464: --
2465: IF l_debug_on THEN
2466: WSH_DEBUG_SV.push(l_module_name);
2467: --
2468: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2469: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
2470: END IF;
2471: --
2472: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2465: IF l_debug_on THEN
2466: WSH_DEBUG_SV.push(l_module_name);
2467: --
2468: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2469: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
2470: END IF;
2471: --
2472: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2473:
2488: --
2489: -- Debug Statements
2490: --
2491: IF l_debug_on THEN
2492: WSH_DEBUG_SV.pop(l_module_name);
2493: END IF;
2494: --
2495: RETURN;
2496: END IF;
2499: --
2500: -- Debug Statements
2501: --
2502: IF l_debug_on THEN
2503: 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);
2504: END IF;
2505: --
2506: wsh_tpa_delivery_pkg.check_del_not_i_t(p_delivery_id, l_del_status, x_return_status);
2507:
2509: --
2510: -- Debug Statements
2511: --
2512: IF l_debug_on THEN
2513: WSH_DEBUG_SV.pop(l_module_name);
2514: END IF;
2515: --
2516: RETURN;
2517: END IF;
2533: --
2534: -- Debug Statements
2535: --
2536: IF l_debug_on THEN
2537: WSH_DEBUG_SV.pop(l_module_name);
2538: END IF;
2539: --
2540: RETURN;
2541: END IF;
2545: --
2546: -- Debug Statements
2547: --
2548: IF l_debug_on THEN
2549: WSH_DEBUG_SV.pop(l_module_name);
2550: END IF;
2551: --
2552: EXCEPTION
2553: WHEN others THEN
2557: --
2558: -- Debug Statements
2559: --
2560: IF l_debug_on THEN
2561: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2562: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2563: END IF;
2564: --
2565: END Check_Unassign_Trip;
2558: -- Debug Statements
2559: --
2560: IF l_debug_on THEN
2561: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2562: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2563: END IF;
2564: --
2565: END Check_Unassign_Trip;
2566: ************ */
2621: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2622: --
2623: IF l_debug_on IS NULL
2624: THEN
2625: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2626: END IF;
2627: --
2628: IF l_debug_on THEN
2629: WSH_DEBUG_SV.push(l_module_name);
2625: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2626: END IF;
2627: --
2628: IF l_debug_on THEN
2629: WSH_DEBUG_SV.push(l_module_name);
2630: --
2631: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2632: END IF;
2633: --
2627: --
2628: IF l_debug_on THEN
2629: WSH_DEBUG_SV.push(l_module_name);
2630: --
2631: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2632: END IF;
2633: --
2634: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2635:
2647: --
2648: -- Debug Statements
2649: --
2650: IF l_debug_on THEN
2651: WSH_DEBUG_SV.pop(l_module_name);
2652: END IF;
2653: --
2654: RETURN;
2655: END IF;
2659: --
2660: -- Debug Statements
2661: --
2662: IF l_debug_on THEN
2663: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2664: END IF;
2665: --
2666: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2667: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2669: --
2670: -- Debug Statements
2671: --
2672: IF l_debug_on THEN
2673: WSH_DEBUG_SV.pop(l_module_name);
2674: END IF;
2675: --
2676: RETURN;
2677: END IF;
2691: --
2692: -- Debug Statements
2693: --
2694: IF l_debug_on THEN
2695: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2696: END IF;
2697: --
2698: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2699: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2701: --
2702: -- Debug Statements
2703: --
2704: IF l_debug_on THEN
2705: WSH_DEBUG_SV.pop(l_module_name);
2706: END IF;
2707: --
2708: RETURN;
2709: END IF;
2711: --
2712: -- Debug Statements
2713: --
2714: IF l_debug_on THEN
2715: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CHECK_FILL_PC',WSH_DEBUG_SV.C_PROC_LEVEL);
2716: END IF;
2717: --
2718: wsh_wv_utils.check_fill_pc( p_container_instance_id => l_container_id,
2719: x_fill_status => l_fill_status,
2740: --
2741: -- Debug Statements
2742: --
2743: IF l_debug_on THEN
2744: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2745: END IF;
2746: --
2747: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2748: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2754: --
2755: -- Debug Statements
2756: --
2757: IF l_debug_on THEN
2758: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2759: END IF;
2760: --
2761: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2762: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2769: --
2770: -- Debug Statements
2771: --
2772: IF l_debug_on THEN
2773: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2774: END IF;
2775: --
2776: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2777: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2779: --
2780: -- Debug Statements
2781: --
2782: IF l_debug_on THEN
2783: WSH_DEBUG_SV.pop(l_module_name);
2784: END IF;
2785: --
2786: RETURN;
2787: END IF;
2789: --
2790: -- Debug Statements
2791: --
2792: IF l_debug_on THEN
2793: WSH_DEBUG_SV.pop(l_module_name);
2794: END IF;
2795: --
2796: EXCEPTION
2797: WHEN others THEN
2801: --
2802: -- Debug Statements
2803: --
2804: IF l_debug_on THEN
2805: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2806: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2807: END IF;
2808: --
2809: END Check_Pack;
2802: -- Debug Statements
2803: --
2804: IF l_debug_on THEN
2805: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2806: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2807: END IF;
2808: --
2809: END Check_Pack;
2810:
2911: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2912: --
2913: IF l_debug_on IS NULL
2914: THEN
2915: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2916: END IF;
2917: --
2918: IF l_debug_on THEN
2919: WSH_DEBUG_SV.push(l_module_name);
2915: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2916: END IF;
2917: --
2918: IF l_debug_on THEN
2919: WSH_DEBUG_SV.push(l_module_name);
2920: --
2921: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
2922: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_CREDIT_INIT_FLAG',P_CHECK_CREDIT_INIT_FLAG);
2923: END IF;
2917: --
2918: IF l_debug_on THEN
2919: WSH_DEBUG_SV.push(l_module_name);
2920: --
2921: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
2922: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_CREDIT_INIT_FLAG',P_CHECK_CREDIT_INIT_FLAG);
2923: END IF;
2924: --
2925: OPEN detail_info;
2918: IF l_debug_on THEN
2919: WSH_DEBUG_SV.push(l_module_name);
2920: --
2921: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
2922: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_CREDIT_INIT_FLAG',P_CHECK_CREDIT_INIT_FLAG);
2923: END IF;
2924: --
2925: OPEN detail_info;
2926: FETCH detail_info INTO l_line_inv_rec.delivery_detail_id,
2952: --
2953: -- Debug Statements
2954: --
2955: IF l_debug_on THEN
2956: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_CREDIT_HOLDS',WSH_DEBUG_SV.C_PROC_LEVEL);
2957: END IF;
2958: --
2959: wsh_details_validations.check_credit_holds(
2960: p_detail_id => p_detail_id,
2968: --
2969: -- Debug Statements
2970: --
2971: IF l_debug_on THEN
2972: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_CREDIT_HOLDS',WSH_DEBUG_SV.C_PROC_LEVEL);
2973: END IF;
2974: --
2975: wsh_details_validations.check_credit_holds(
2976: p_detail_id => p_detail_id,
2987: --
2988: -- Debug Statements
2989: --
2990: IF l_debug_on THEN
2991: WSH_DEBUG_SV.pop(l_module_name);
2992: END IF;
2993: --
2994: RETURN;
2995: END IF;
3006: AND l_line_inv_rec.inventory_item_id IS NOT NULL THEN
3007:
3008:
3009: IF l_debug_on THEN
3010: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.Check_Default_Catch_Weights',WSH_DEBUG_SV.C_PROC_LEVEL);
3011: END IF;
3012:
3013: WSH_DELIVERY_DETAILS_INV.Check_Default_Catch_Weights
3014: (p_line_inv_rec => l_line_inv_rec,
3016:
3017: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3018:
3019: IF l_debug_on THEN
3020: WSH_DEBUG_SV.pop(l_module_name);
3021: END IF;
3022:
3023: RETURN;
3024:
3036: --
3037: -- Debug Statements
3038: --
3039: IF l_debug_on THEN
3040: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.FETCH_INV_CONTROLS',WSH_DEBUG_SV.C_PROC_LEVEL);
3041: END IF;
3042: --
3043: wsh_delivery_details_inv.fetch_inv_controls(
3044: p_delivery_detail_id => l_line_inv_rec.delivery_detail_id,
3052: --
3053: -- Debug Statements
3054: --
3055: IF l_debug_on THEN
3056: WSH_DEBUG_SV.pop(l_module_name);
3057: END IF;
3058: --
3059: RETURN;
3060: END IF;
3065: --
3066: -- Debug Statements
3067: --
3068: IF l_debug_on THEN
3069: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.DETAILS_REQUIRED',WSH_DEBUG_SV.C_PROC_LEVEL);
3070: END IF;
3071: --
3072: wsh_delivery_details_inv.Details_Required (
3073: p_line_inv_rec => l_line_inv_rec,
3080: --
3081: -- Debug Statements
3082: --
3083: IF l_debug_on THEN
3084: WSH_DEBUG_SV.pop(l_module_name);
3085: END IF;
3086: --
3087: RETURN;
3088: END IF;
3098: --
3099: -- Debug Statements
3100: --
3101: IF l_debug_on THEN
3102: WSH_DEBUG_SV.logmsg(l_module_name, 'DETAILS REQUIRED ERROR ' || X_RETURN_STATUS );
3103: END IF;
3104: --
3105: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3106: ELSE
3112: END IF;
3113: x_line_inv_flag_rec := l_line_inv_flag_rec ;
3114:
3115: IF l_debug_on THEN
3116: wsh_debug_sv.log(l_module_name, 'x_line_inv_flag_rec.details_required_flag', x_line_inv_flag_rec.details_required_flag);
3117: END IF;
3118:
3119: /****************Material Status Control**************/
3120: -- Bug 9220228:Added condition on inventory item id to skip material status
3131: x_transaction_type_id => L_TRANSACTION_TYPE_ID ,
3132: x_return_status => x_return_status);
3133: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3134: IF l_debug_on THEN
3135: WSH_DEBUG_SV.pop(l_module_name);
3136: END IF;
3137: return;
3138: END IF;
3139:
3146: FETCH c_get_lpn_id INTO l_lpn_id;
3147: CLOSE c_get_lpn_id;
3148: --
3149: IF l_debug_on THEN
3150: wsh_debug_sv.log(l_module_name, 'WMS Enabled, lpn_id ', l_lpn_id);
3151: END IF;
3152: --
3153: END IF;
3154: -- 11728970: Calling INV API - Calling Inventory Over-loaded api by passing lpn-id
3171: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3172: l_line_inv_flag_rec.invalid_material_status_flag := 'Y';
3173: x_line_inv_flag_rec := l_line_inv_flag_rec ;
3174: IF l_debug_on THEN
3175: WSH_DEBUG_SV.pop(l_module_name);
3176: END IF;
3177: return;
3178: END IF;
3179: ELSE
3208: l_line_inv_flag_rec.invalid_material_status_flag := 'Y';
3209: x_line_inv_flag_rec := l_line_inv_flag_rec ;
3210: FOR i in 1..x_errored_serials.count LOOP
3211: IF l_debug_on THEN
3212: wsh_debug_sv.log(l_module_name, 'errored serial_number'||to_char(i), x_errored_serials(i));
3213: END IF;
3214: END LOOP;
3215: IF l_debug_on THEN
3216: WSH_DEBUG_SV.pop(l_module_name);
3212: wsh_debug_sv.log(l_module_name, 'errored serial_number'||to_char(i), x_errored_serials(i));
3213: END IF;
3214: END LOOP;
3215: IF l_debug_on THEN
3216: WSH_DEBUG_SV.pop(l_module_name);
3217: END IF;
3218: return;
3219: END IF;
3220:
3237: l_line_inv_flag_rec.invalid_material_status_flag := 'Y';
3238: END IF;
3239: x_line_inv_flag_rec := l_line_inv_flag_rec ;
3240: IF l_debug_on THEN
3241: WSH_DEBUG_SV.pop(l_module_name);
3242: END IF;
3243: return;
3244: END IF;
3245: END IF;
3247: x_line_inv_flag_rec := l_line_inv_flag_rec ;
3248: END IF;
3249: /****************Material Status Control**************/
3250: IF l_debug_on THEN
3251: 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);
3252: END IF;
3253: END IF;
3254: IF l_debug_on THEN
3255: WSH_DEBUG_SV.pop(l_module_name);
3251: 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);
3252: END IF;
3253: END IF;
3254: IF l_debug_on THEN
3255: WSH_DEBUG_SV.pop(l_module_name);
3256: END IF;
3257: --
3258: EXCEPTION
3259: WHEN others THEN
3266: --
3267: -- Debug Statements
3268: --
3269: IF l_debug_on THEN
3270: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3271: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3272: END IF;
3273: END Check_Detail_for_Confirm;
3274:
3267: -- Debug Statements
3268: --
3269: IF l_debug_on THEN
3270: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3271: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3272: END IF;
3273: END Check_Detail_for_Confirm;
3274:
3275:
3351: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3352: --
3353: IF l_debug_on IS NULL
3354: THEN
3355: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3356: END IF;
3357: --
3358: IF l_debug_on THEN
3359: WSH_DEBUG_SV.push(l_module_name);
3355: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3356: END IF;
3357: --
3358: IF l_debug_on THEN
3359: WSH_DEBUG_SV.push(l_module_name);
3360: --
3361: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3362: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
3363: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_PACKING_FLAG',P_ENFORCE_PACKING_FLAG);
3357: --
3358: IF l_debug_on THEN
3359: WSH_DEBUG_SV.push(l_module_name);
3360: --
3361: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3362: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
3363: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_PACKING_FLAG',P_ENFORCE_PACKING_FLAG);
3364: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
3365: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
3358: IF l_debug_on THEN
3359: WSH_DEBUG_SV.push(l_module_name);
3360: --
3361: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3362: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
3363: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_PACKING_FLAG',P_ENFORCE_PACKING_FLAG);
3364: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
3365: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
3366: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_LOCATION',P_SHIP_FROM_LOCATION);
3359: WSH_DEBUG_SV.push(l_module_name);
3360: --
3361: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3362: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
3363: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_PACKING_FLAG',P_ENFORCE_PACKING_FLAG);
3364: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
3365: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
3366: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_LOCATION',P_SHIP_FROM_LOCATION);
3367: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_TO_LOCATION',P_SHIP_TO_LOCATION);
3360: --
3361: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3362: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
3363: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_PACKING_FLAG',P_ENFORCE_PACKING_FLAG);
3364: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
3365: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
3366: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_LOCATION',P_SHIP_FROM_LOCATION);
3367: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_TO_LOCATION',P_SHIP_TO_LOCATION);
3368: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
3361: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3362: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
3363: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_PACKING_FLAG',P_ENFORCE_PACKING_FLAG);
3364: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
3365: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
3366: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_LOCATION',P_SHIP_FROM_LOCATION);
3367: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_TO_LOCATION',P_SHIP_TO_LOCATION);
3368: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
3369: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3362: WSH_DEBUG_SV.log(l_module_name,'P_CONT_EXISTS_FLAG',P_CONT_EXISTS_FLAG);
3363: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_PACKING_FLAG',P_ENFORCE_PACKING_FLAG);
3364: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
3365: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
3366: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_LOCATION',P_SHIP_FROM_LOCATION);
3367: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_TO_LOCATION',P_SHIP_TO_LOCATION);
3368: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
3369: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3370: WSH_DEBUG_SV.log(l_module_name,'P_INITIAL_PICKUP_DATE',P_INITIAL_PICKUP_DATE);
3363: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_PACKING_FLAG',P_ENFORCE_PACKING_FLAG);
3364: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
3365: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
3366: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_LOCATION',P_SHIP_FROM_LOCATION);
3367: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_TO_LOCATION',P_SHIP_TO_LOCATION);
3368: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
3369: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3370: WSH_DEBUG_SV.log(l_module_name,'P_INITIAL_PICKUP_DATE',P_INITIAL_PICKUP_DATE);
3371: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_DATE',P_ULTIMATE_DROPOFF_DATE);
3364: WSH_DEBUG_SV.log(l_module_name,'P_OVERFILLED_FLAG',P_OVERFILLED_FLAG);
3365: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
3366: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_LOCATION',P_SHIP_FROM_LOCATION);
3367: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_TO_LOCATION',P_SHIP_TO_LOCATION);
3368: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
3369: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3370: WSH_DEBUG_SV.log(l_module_name,'P_INITIAL_PICKUP_DATE',P_INITIAL_PICKUP_DATE);
3371: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_DATE',P_ULTIMATE_DROPOFF_DATE);
3372: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
3365: WSH_DEBUG_SV.log(l_module_name,'P_UNDERFILLED_FLAG',P_UNDERFILLED_FLAG);
3366: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_LOCATION',P_SHIP_FROM_LOCATION);
3367: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_TO_LOCATION',P_SHIP_TO_LOCATION);
3368: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
3369: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3370: WSH_DEBUG_SV.log(l_module_name,'P_INITIAL_PICKUP_DATE',P_INITIAL_PICKUP_DATE);
3371: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_DATE',P_ULTIMATE_DROPOFF_DATE);
3372: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
3373: END IF;
3366: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_LOCATION',P_SHIP_FROM_LOCATION);
3367: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_TO_LOCATION',P_SHIP_TO_LOCATION);
3368: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
3369: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3370: WSH_DEBUG_SV.log(l_module_name,'P_INITIAL_PICKUP_DATE',P_INITIAL_PICKUP_DATE);
3371: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_DATE',P_ULTIMATE_DROPOFF_DATE);
3372: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
3373: END IF;
3374: --
3367: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_TO_LOCATION',P_SHIP_TO_LOCATION);
3368: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
3369: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3370: WSH_DEBUG_SV.log(l_module_name,'P_INITIAL_PICKUP_DATE',P_INITIAL_PICKUP_DATE);
3371: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_DATE',P_ULTIMATE_DROPOFF_DATE);
3372: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
3373: END IF;
3374: --
3375: --
3368: WSH_DEBUG_SV.log(l_module_name,'P_FREIGHT_CODE',P_FREIGHT_CODE);
3369: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3370: WSH_DEBUG_SV.log(l_module_name,'P_INITIAL_PICKUP_DATE',P_INITIAL_PICKUP_DATE);
3371: WSH_DEBUG_SV.log(l_module_name,'P_ULTIMATE_DROPOFF_DATE',P_ULTIMATE_DROPOFF_DATE);
3372: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
3373: END IF;
3374: --
3375: --
3376: -- Debug Statements
3375: --
3376: -- Debug Statements
3377: --
3378: IF l_debug_on THEN
3379: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_PKG.CHECK_DEL_OVERFILLED',WSH_DEBUG_SV.C_PROC_LEVEL);
3380: END IF;
3381: --
3382: wsh_tpa_delivery_pkg.check_del_overfilled(p_delivery_id, p_cont_exists_flag, p_overfilled_flag, l_return_status);
3383:
3387: --
3388: -- Debug Statements
3389: --
3390: IF l_debug_on THEN
3391: WSH_DEBUG_SV.pop(l_module_name);
3392: END IF;
3393: --
3394: RETURN;
3395: END IF;
3399: --
3400: -- Debug Statements
3401: --
3402: IF l_debug_on THEN
3403: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_PKG.CHECK_DEL_UNDERFILLED',WSH_DEBUG_SV.C_PROC_LEVEL);
3404: END IF;
3405: --
3406: wsh_tpa_delivery_pkg.check_del_underfilled(p_delivery_id, p_cont_exists_flag, p_underfilled_flag, l_return_status);
3407:
3411: --
3412: -- Debug Statements
3413: --
3414: IF l_debug_on THEN
3415: WSH_DEBUG_SV.pop(l_module_name);
3416: END IF;
3417: --
3418: RETURN;
3419: END IF;
3423: --
3424: -- Debug Statements
3425: --
3426: IF l_debug_on THEN
3427: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_PKG.CHECK_SMC',WSH_DEBUG_SV.C_PROC_LEVEL);
3428: END IF;
3429: --
3430: wsh_tpa_delivery_pkg.check_smc( p_delivery_id, l_valid_flag, l_return_status);
3431:
3434: --
3435: -- Debug Statements
3436: --
3437: IF l_debug_on THEN
3438: WSH_DEBUG_SV.pop(l_module_name);
3439: END IF;
3440: --
3441: RETURN;
3442: END IF;
3445: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_SMC_INCOMPLETE');
3446: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3447:
3448: IF l_debug_on THEN
3449: WSH_DEBUG_SV.log(l_module_name,'g_break_smc_severity',g_break_smc_severity);
3450: END IF;
3451:
3452: If g_break_smc_severity is NULL then
3453: g_break_smc_severity := wsh_ru_actions.get_message_severity (wsh_new_delivery_actions.g_ship_confirm_act
3454: ,wsh_new_delivery_actions.g_break_smc_msg);
3455: End If;
3456:
3457: IF l_debug_on THEN
3458: WSH_DEBUG_SV.log(l_module_name,'g_break_smc_severity',g_break_smc_severity);
3459: END IF;
3460:
3461: If g_break_smc_severity = 'E' then
3462: --Note. Setting return status to 'W' and message severity to 'E'. The return
3465: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3466: WSH_UTIL_CORE.ADD_MESSAGE(WSH_UTIL_CORE.G_RET_STS_ERROR);
3467: WSH_NEW_DELIVERY_ACTIONS.g_break_ship_set_or_smc := nvl(WSH_NEW_DELIVERY_ACTIONS.g_break_ship_set_or_smc,0) + 1;
3468: IF l_debug_on THEN
3469: WSH_DEBUG_SV.log(l_module_name,'Going to exit wsh_delivery_validations due to message severity set to (SMC) ',g_break_smc_severity);
3470: WSH_DEBUG_SV.pop(l_module_name);
3471: END IF;
3472: RETURN;
3473: Else
3466: WSH_UTIL_CORE.ADD_MESSAGE(WSH_UTIL_CORE.G_RET_STS_ERROR);
3467: WSH_NEW_DELIVERY_ACTIONS.g_break_ship_set_or_smc := nvl(WSH_NEW_DELIVERY_ACTIONS.g_break_ship_set_or_smc,0) + 1;
3468: IF l_debug_on THEN
3469: WSH_DEBUG_SV.log(l_module_name,'Going to exit wsh_delivery_validations due to message severity set to (SMC) ',g_break_smc_severity);
3470: WSH_DEBUG_SV.pop(l_module_name);
3471: END IF;
3472: RETURN;
3473: Else
3474: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3480: --
3481: -- Debug Statements
3482: --
3483: IF l_debug_on THEN
3484: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_PKG.CHECK_SHIP_SET',WSH_DEBUG_SV.C_PROC_LEVEL);
3485: END IF;
3486: --
3487: wsh_tpa_delivery_pkg.check_ship_set( p_delivery_id, l_valid_flag, l_return_status);
3488:
3491: --
3492: -- Debug Statements
3493: --
3494: IF l_debug_on THEN
3495: WSH_DEBUG_SV.pop(l_module_name);
3496: END IF;
3497: --
3498: RETURN;
3499: END IF;
3502: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_SHIP_SET_INCOMPLETE');
3503: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3504:
3505: IF l_debug_on THEN
3506: WSH_DEBUG_SV.log(l_module_name,'g_break_ship_set_severity',g_break_ship_set_severity);
3507: END IF;
3508:
3509: If g_break_ship_set_severity is null then
3510: g_break_ship_set_severity := wsh_ru_actions.get_message_severity (wsh_new_delivery_actions.g_ship_confirm_act
3512:
3513: End If;
3514:
3515: IF l_debug_on THEN
3516: WSH_DEBUG_SV.log(l_module_name,'g_break_ship_set_severity',g_break_ship_set_severity);
3517: END IF;
3518:
3519: If g_break_ship_set_severity = 'E' then
3520: --Note. Setting return status to 'W' and message severity to 'E'. The return
3523: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3524: WSH_UTIL_CORE.ADD_MESSAGE(WSH_UTIL_CORE.G_RET_STS_ERROR);
3525: WSH_NEW_DELIVERY_ACTIONS.g_break_ship_set_or_smc := nvl(WSH_NEW_DELIVERY_ACTIONS.g_break_ship_set_or_smc,0) + 1;
3526: IF l_debug_on THEN
3527: 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);
3528: WSH_DEBUG_SV.pop(l_module_name);
3529: END IF;
3530: RETURN;
3531: Else
3524: WSH_UTIL_CORE.ADD_MESSAGE(WSH_UTIL_CORE.G_RET_STS_ERROR);
3525: WSH_NEW_DELIVERY_ACTIONS.g_break_ship_set_or_smc := nvl(WSH_NEW_DELIVERY_ACTIONS.g_break_ship_set_or_smc,0) + 1;
3526: IF l_debug_on THEN
3527: 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);
3528: WSH_DEBUG_SV.pop(l_module_name);
3529: END IF;
3530: RETURN;
3531: Else
3532: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3539: /** --
3540: -- Debug Statements
3541: --
3542: IF l_debug_on THEN
3543: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.UPDATE_LEG_SEQUENCE',WSH_DEBUG_SV.C_PROC_LEVEL);
3544: END IF;
3545: --
3546: wsh_new_delivery_actions.update_leg_sequence(
3547: p_delivery_id => p_delivery_id,
3552: --
3553: -- Debug Statements
3554: --
3555: IF l_debug_on THEN
3556: WSH_DEBUG_SV.pop(l_module_name);
3557: END IF;
3558: --
3559: RETURN;
3560: END IF;
3564:
3565: FND_PROFILE.Get('WSH_CHK_SHPG_RCV_CAL', l_chk_shp_rcvg_calendar);
3566:
3567: IF l_debug_on THEN
3568: WSH_DEBUG_SV.log(l_module_name,'Profile: - l_chk_shp_rcvg calendar : ', l_chk_shp_rcvg_calendar);
3569: END IF;
3570:
3571: -- 10365977: Only if this profile has Value of N it will Skip Calendar Check (Y and Null will enforce check Calendar)
3572: IF ( nvl(l_chk_shp_rcvg_calendar, 'Y') = 'Y' ) THEN
3587: --Bug 6156495 -End of code addition
3588:
3589:
3590: IF l_debug_on THEN
3591: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_PKG.CHECK_CALENDAR',WSH_DEBUG_SV.C_PROC_LEVEL);
3592: END IF;
3593: -- modified ship_assoc type to 'HR_LOCATION' and receive_assoc_type to 'CUSTOMER_SITE' for bug 5880742
3594: --
3595: wsh_tpa_delivery_pkg.check_calendar(p_entity_type => 'DELIVERY',
3616: --
3617: -- Debug Statements
3618: --
3619: IF l_debug_on THEN
3620: WSH_DEBUG_SV.pop(l_module_name);
3621: END IF;
3622: --
3623: EXCEPTION
3624: WHEN others THEN
3628: --
3629: -- Debug Statements
3630: --
3631: IF l_debug_on THEN
3632: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3633: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3634: END IF;
3635: --
3636: END Check_Confirm;
3629: -- Debug Statements
3630: --
3631: IF l_debug_on THEN
3632: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3633: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3634: END IF;
3635: --
3636: END Check_Confirm;
3637:
3669: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3670: --
3671: IF l_debug_on IS NULL
3672: THEN
3673: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3674: END IF;
3675: --
3676: IF l_debug_on THEN
3677: WSH_DEBUG_SV.push(l_module_name);
3673: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3674: END IF;
3675: --
3676: IF l_debug_on THEN
3677: WSH_DEBUG_SV.push(l_module_name);
3678: --
3679: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3680: END IF;
3681: --
3675: --
3676: IF l_debug_on THEN
3677: WSH_DEBUG_SV.push(l_module_name);
3678: --
3679: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3680: END IF;
3681: --
3682: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3683:
3696: --
3697: -- Debug Statements
3698: --
3699: IF l_debug_on THEN
3700: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3701: END IF;
3702: --
3703: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3704: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3706: --
3707: -- Debug Statements
3708: --
3709: IF l_debug_on THEN
3710: WSH_DEBUG_SV.pop(l_module_name);
3711: END IF;
3712: --
3713: RETURN;
3714: END IF;
3716: --
3717: -- Debug Statements
3718: --
3719: IF l_debug_on THEN
3720: WSH_DEBUG_SV.pop(l_module_name);
3721: END IF;
3722: --
3723: EXCEPTION
3724: WHEN others THEN
3728: --
3729: -- Debug Statements
3730: --
3731: IF l_debug_on THEN
3732: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3733: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3734: END IF;
3735: --
3736: END Check_Reopen;
3729: -- Debug Statements
3730: --
3731: IF l_debug_on THEN
3732: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3733: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3734: END IF;
3735: --
3736: END Check_Reopen;
3737:
3782: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3783: --
3784: IF l_debug_on IS NULL
3785: THEN
3786: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3787: END IF;
3788: --
3789: IF l_debug_on THEN
3790: WSH_DEBUG_SV.push(l_module_name);
3786: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3787: END IF;
3788: --
3789: IF l_debug_on THEN
3790: WSH_DEBUG_SV.push(l_module_name);
3791: --
3792: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3793: END IF;
3794: --
3788: --
3789: IF l_debug_on THEN
3790: WSH_DEBUG_SV.push(l_module_name);
3791: --
3792: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3793: END IF;
3794: --
3795: -- J-IB-NPARIKH-{
3796: -- Stubbed out as no one is calling this API.
3812: --
3813: -- Debug Statements
3814: --
3815: IF l_debug_on THEN
3816: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3817: END IF;
3818: --
3819: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3820: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3822: --
3823: -- Debug Statements
3824: --
3825: IF l_debug_on THEN
3826: WSH_DEBUG_SV.pop(l_module_name);
3827: END IF;
3828: --
3829: RETURN;
3830: END IF;
3855: --
3856: -- Debug Statements
3857: --
3858: IF l_debug_on THEN
3859: WSH_DEBUG_SV.pop(l_module_name);
3860: END IF;
3861: --
3862: EXCEPTION
3863: WHEN others THEN
3867: --
3868: -- Debug Statements
3869: --
3870: IF l_debug_on THEN
3871: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3872: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3873: END IF;
3874: --
3875: END Check_Intransit;
3868: -- Debug Statements
3869: --
3870: IF l_debug_on THEN
3871: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3872: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3873: END IF;
3874: --
3875: END Check_Intransit;
3876:
3995: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3996: --
3997: IF l_debug_on IS NULL
3998: THEN
3999: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4000: END IF;
4001: --
4002: IF l_debug_on THEN
4003: WSH_DEBUG_SV.push(l_module_name);
3999: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4000: END IF;
4001: --
4002: IF l_debug_on THEN
4003: WSH_DEBUG_SV.push(l_module_name);
4004: --
4005: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
4006: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_FLAG',P_MANUAL_FLAG);
4007: WSH_DEBUG_SV.log(l_module_name,'P_OLD_STATUS_CODE',P_OLD_STATUS_CODE);
4001: --
4002: IF l_debug_on THEN
4003: WSH_DEBUG_SV.push(l_module_name);
4004: --
4005: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
4006: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_FLAG',P_MANUAL_FLAG);
4007: WSH_DEBUG_SV.log(l_module_name,'P_OLD_STATUS_CODE',P_OLD_STATUS_CODE);
4008: END IF;
4009:
4002: IF l_debug_on THEN
4003: WSH_DEBUG_SV.push(l_module_name);
4004: --
4005: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
4006: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_FLAG',P_MANUAL_FLAG);
4007: WSH_DEBUG_SV.log(l_module_name,'P_OLD_STATUS_CODE',P_OLD_STATUS_CODE);
4008: END IF;
4009:
4010: /**
4003: WSH_DEBUG_SV.push(l_module_name);
4004: --
4005: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
4006: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_FLAG',P_MANUAL_FLAG);
4007: WSH_DEBUG_SV.log(l_module_name,'P_OLD_STATUS_CODE',P_OLD_STATUS_CODE);
4008: END IF;
4009:
4010: /**
4011: -- J-IB-NPARIKH-{
4036: --
4037: -- Debug Statements
4038: --
4039: IF l_debug_on THEN
4040: WSH_DEBUG_SV.pop(l_module_name);
4041: END IF;
4042: --
4043: return;
4044: END IF;
4067: --
4068: -- Debug Statements
4069: --
4070: IF l_debug_on THEN
4071: WSH_DEBUG_SV.pop(l_module_name);
4072: END IF;
4073: --
4074: return;
4075: END IF;
4090: --
4091: -- Debug Statements
4092: --
4093: IF l_debug_on THEN
4094: WSH_DEBUG_SV.pop(l_module_name);
4095: END IF;
4096: --
4097: return;
4098: END IF;
4109: --
4110: -- Debug Statements
4111: --
4112: IF l_debug_on THEN
4113: WSH_DEBUG_SV.pop(l_module_name);
4114: END IF;
4115: --
4116: return;
4117: END IF;
4164: --
4165: -- Debug Statements
4166: --
4167: IF l_debug_on THEN
4168: WSH_DEBUG_SV.pop(l_module_name);
4169: END IF;
4170: --
4171: return;
4172: ELSE
4183: --
4184: -- Debug Statements
4185: --
4186: IF l_debug_on THEN
4187: WSH_DEBUG_SV.pop(l_module_name);
4188: END IF;
4189: --
4190: EXCEPTION
4191: WHEN others THEN
4195: --
4196: -- Debug Statements
4197: --
4198: IF l_debug_on THEN
4199: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4200: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4201: END IF;
4202: --
4203: END;
4196: -- Debug Statements
4197: --
4198: IF l_debug_on THEN
4199: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4200: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4201: END IF;
4202: --
4203: END;
4204:
4341: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4342: --
4343: IF l_debug_on IS NULL
4344: THEN
4345: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4346: END IF;
4347: --
4348: IF l_debug_on THEN
4349: WSH_DEBUG_SV.push(l_module_name);
4345: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4346: END IF;
4347: --
4348: IF l_debug_on THEN
4349: WSH_DEBUG_SV.push(l_module_name);
4350: --
4351: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
4352: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
4353: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
4347: --
4348: IF l_debug_on THEN
4349: WSH_DEBUG_SV.push(l_module_name);
4350: --
4351: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
4352: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
4353: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
4354: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
4355: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
4348: IF l_debug_on THEN
4349: WSH_DEBUG_SV.push(l_module_name);
4350: --
4351: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
4352: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
4353: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
4354: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
4355: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
4356: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
4349: WSH_DEBUG_SV.push(l_module_name);
4350: --
4351: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
4352: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
4353: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
4354: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
4355: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
4356: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
4357: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
4350: --
4351: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
4352: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
4353: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
4354: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
4355: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
4356: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
4357: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
4358: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
4351: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
4352: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
4353: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
4354: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
4355: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
4356: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
4357: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
4358: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
4359: END IF;
4352: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
4353: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
4354: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
4355: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
4356: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
4357: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
4358: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
4359: END IF;
4360: --
4353: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
4354: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
4355: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
4356: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
4357: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
4358: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
4359: END IF;
4360: --
4361: l_num_warnings := 0;
4354: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
4355: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
4356: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
4357: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
4358: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
4359: END IF;
4360: --
4361: l_num_warnings := 0;
4362: l_num_errors := 0;
4487: --
4488:
4489: -- Check for Exceptions against Delivery and its Contents
4490: IF l_debug_on THEN
4491: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.Check_Exceptions',WSH_DEBUG_SV.C_PROC_LEVEL); END IF;
4492: l_exceptions_tab.delete;
4493: l_exp_logged := FALSE;
4494: l_exp_warning := FALSE;
4495: WSH_XC_UTIL.Check_Exceptions (
4568: --
4569: -- Debug Statements
4570: --
4571: IF l_debug_on THEN
4572: WSH_DEBUG_SV.pop(l_module_name);
4573: END IF;
4574: --
4575: --}
4576: EXCEPTION
4586: x_allowed := 'N';
4587: --
4588: --
4589: IF l_debug_on THEN
4590: WSH_DEBUG_SV.logmsg(l_module_name,'wsh_util_core.e_not_allowed exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4591: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:wsh_util_core.e_not_allowed');
4592: END IF;
4593: --
4594: WHEN wsh_util_core.e_not_allowed_warning THEN
4587: --
4588: --
4589: IF l_debug_on THEN
4590: WSH_DEBUG_SV.logmsg(l_module_name,'wsh_util_core.e_not_allowed exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4591: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:wsh_util_core.e_not_allowed');
4592: END IF;
4593: --
4594: WHEN wsh_util_core.e_not_allowed_warning THEN
4595: IF l_num_warnings > 0
4602: x_allowed := 'NW';
4603: --
4604: --
4605: IF l_debug_on THEN
4606: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4607: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4608: END IF;
4609: --
4610: WHEN FND_API.G_EXC_ERROR THEN
4603: --
4604: --
4605: IF l_debug_on THEN
4606: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4607: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4608: END IF;
4609: --
4610: WHEN FND_API.G_EXC_ERROR THEN
4611:
4611:
4612: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4613: --
4614: IF l_debug_on THEN
4615: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4616: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4617: END IF;
4618: --
4619: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4612: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4613: --
4614: IF l_debug_on THEN
4615: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4616: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4617: END IF;
4618: --
4619: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4620:
4620:
4621: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4622: --
4623: IF l_debug_on THEN
4624: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4625: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4626: END IF;
4627: --
4628: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4621: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4622: --
4623: IF l_debug_on THEN
4624: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4625: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4626: END IF;
4627: --
4628: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4629: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4628: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4629: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4630: --
4631: IF l_debug_on THEN
4632: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4633: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4634: END IF;
4635: --
4636: WHEN OTHERS THEN
4629: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4630: --
4631: IF l_debug_on THEN
4632: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4633: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4634: END IF;
4635: --
4636: WHEN OTHERS THEN
4637:
4638: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4639: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.Check_Close',l_module_name);
4640: --
4641: IF l_debug_on THEN
4642: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4643: END IF;
4644: --
4645: --}
4646: END;
4718: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4719: --
4720: IF l_debug_on IS NULL
4721: THEN
4722: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4723: END IF;
4724: --
4725: IF l_debug_on THEN
4726: WSH_DEBUG_SV.push(l_module_name);
4722: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4723: END IF;
4724: --
4725: IF l_debug_on THEN
4726: WSH_DEBUG_SV.push(l_module_name);
4727: --
4728: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
4729: END IF;
4730: --
4724: --
4725: IF l_debug_on THEN
4726: WSH_DEBUG_SV.push(l_module_name);
4727: --
4728: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
4729: END IF;
4730: --
4731: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4732:
4766: --
4767: -- Debug Statements
4768: --
4769: IF l_debug_on THEN
4770: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4771: END IF;
4772: --
4773: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
4774: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4785: --
4786: -- Debug Statements
4787: --
4788: IF l_debug_on THEN
4789: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4790: END IF;
4791: --
4792: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
4793: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4818: --
4819: -- Debug Statements
4820: --
4821: IF l_debug_on THEN
4822: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4823: END IF;
4824: --
4825: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_delivery_id));
4826: wsh_util_core.add_message(x_return_status);
4837: --
4838: -- Debug Statements
4839: --
4840: IF l_debug_on THEN
4841: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4842: END IF;
4843: --
4844: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_delivery_id));
4845: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4849: --
4850: -- Debug Statements
4851: --
4852: IF l_debug_on THEN
4853: WSH_DEBUG_SV.pop(l_module_name);
4854: END IF;
4855: --
4856: EXCEPTION
4857: --OTM R12
4877: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4878: WSH_UTIL_CORE.add_message(x_return_status,l_module_name);
4879:
4880: IF l_debug_on THEN
4881: WSH_DEBUG_SV.logmsg(l_module_name,'CANNOT_DELETE_GC3_DELIVERY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4882: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CANNOT_DELETE_GC3_DELIVERY');
4883: END IF;
4884: --END OTM R12
4885:
4878: WSH_UTIL_CORE.add_message(x_return_status,l_module_name);
4879:
4880: IF l_debug_on THEN
4881: WSH_DEBUG_SV.logmsg(l_module_name,'CANNOT_DELETE_GC3_DELIVERY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4882: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CANNOT_DELETE_GC3_DELIVERY');
4883: END IF;
4884: --END OTM R12
4885:
4886: WHEN record_locked THEN
4907: wsh_util_core.add_message(x_return_status,l_module_name);
4908:
4909:
4910: IF l_debug_on THEN
4911: WSH_DEBUG_SV.logmsg(l_module_name,'record_locked has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4912: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:record_locked');
4913: END IF;
4914: --
4915:
4908:
4909:
4910: IF l_debug_on THEN
4911: WSH_DEBUG_SV.logmsg(l_module_name,'record_locked has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4912: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:record_locked');
4913: END IF;
4914: --
4915:
4916: WHEN others THEN
4934: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.CHECK_DELETE_DELIVERY');
4935: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4936:
4937: IF l_debug_on THEN
4938: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4939: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4940: END IF;
4941: --
4942: END Check_Delete_Delivery;
4935: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4936:
4937: IF l_debug_on THEN
4938: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4939: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4940: END IF;
4941: --
4942: END Check_Delete_Delivery;
4943:
4994: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4995: --
4996: IF l_debug_on IS NULL
4997: THEN
4998: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4999: END IF;
5000: --
5001: IF l_debug_on THEN
5002: WSH_DEBUG_SV.push(l_module_name);
4998: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4999: END IF;
5000: --
5001: IF l_debug_on THEN
5002: WSH_DEBUG_SV.push(l_module_name);
5003: --
5004: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5005: END IF;
5006: --
5000: --
5001: IF l_debug_on THEN
5002: WSH_DEBUG_SV.push(l_module_name);
5003: --
5004: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5005: END IF;
5006: --
5007: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5008:
5021: --
5022: -- Debug Statements
5023: --
5024: IF l_debug_on THEN
5025: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5026: END IF;
5027: --
5028: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
5029: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5031: --
5032: -- Debug Statements
5033: --
5034: IF l_debug_on THEN
5035: WSH_DEBUG_SV.pop(l_module_name);
5036: END IF;
5037: --
5038: RETURN;
5039: END IF;
5044: --
5045: -- Debug Statements
5046: --
5047: IF l_debug_on THEN
5048: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.GET_GROUP_BY_ATTR',WSH_DEBUG_SV.C_PROC_LEVEL);
5049: END IF;
5050: --
5051: wsh_delivery_autocreate.get_group_by_attr( p_organization_id => l_org_id,
5052: x_group_by_flags => l_group_by_attr,
5057: --
5058: -- Debug Statements
5059: --
5060: IF l_debug_on THEN
5061: WSH_DEBUG_SV.pop(l_module_name);
5062: END IF;
5063: --
5064: RETURN;
5065: END IF;
5081: --
5082: -- Debug Statements
5083: --
5084: IF l_debug_on THEN
5085: WSH_DEBUG_SV.pop(l_module_name);
5086: END IF;
5087: --
5088: EXCEPTION
5089: WHEN others THEN
5093: --
5094: -- Debug Statements
5095: --
5096: IF l_debug_on THEN
5097: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5098: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5099: END IF;
5100: --
5101: END Check_Change_Carrier;
5094: -- Debug Statements
5095: --
5096: IF l_debug_on THEN
5097: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5098: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5099: END IF;
5100: --
5101: END Check_Change_Carrier;
5102:
5168: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5169: --
5170: IF l_debug_on IS NULL
5171: THEN
5172: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5173: END IF;
5174: --
5175: IF l_debug_on THEN
5176: WSH_DEBUG_SV.push(l_module_name);
5172: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5173: END IF;
5174: --
5175: IF l_debug_on THEN
5176: WSH_DEBUG_SV.push(l_module_name);
5177: --
5178: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5179: WSH_DEBUG_SV.log(l_module_name,'P_LIST_TYPE',P_LIST_TYPE);
5180: END IF;
5174: --
5175: IF l_debug_on THEN
5176: WSH_DEBUG_SV.push(l_module_name);
5177: --
5178: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5179: WSH_DEBUG_SV.log(l_module_name,'P_LIST_TYPE',P_LIST_TYPE);
5180: END IF;
5181: --
5182: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5175: IF l_debug_on THEN
5176: WSH_DEBUG_SV.push(l_module_name);
5177: --
5178: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5179: WSH_DEBUG_SV.log(l_module_name,'P_LIST_TYPE',P_LIST_TYPE);
5180: END IF;
5181: --
5182: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5183:
5549: -- OR
5550: -- - routing request was not received for all delivery lines
5551: --
5552: IF l_debug_on THEN
5553: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit GET_SHIPPING_CONTROL',WSH_DEBUG_SV.C_PROC_LEVEL);
5554: END IF;
5555: --
5556: GET_SHIPPING_CONTROL
5557: (
5563: );
5564: --
5565: --
5566: IF l_debug_on THEN
5567: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
5568: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
5569: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
5570: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
5571: --
5564: --
5565: --
5566: IF l_debug_on THEN
5567: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
5568: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
5569: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
5570: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
5571: --
5572: END IF;
5565: --
5566: IF l_debug_on THEN
5567: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
5568: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
5569: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
5570: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
5571: --
5572: END IF;
5573: --
5566: IF l_debug_on THEN
5567: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
5568: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
5569: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
5570: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
5571: --
5572: END IF;
5573: --
5574: --
5609: --
5610: -- Debug Statements
5611: --
5612: IF l_debug_on THEN
5613: WSH_DEBUG_SV.pop(l_module_name);
5614: END IF;
5615: --
5616: EXCEPTION
5617: WHEN e_all_disabled THEN --3509004:public api changes
5620: FND_MESSAGE.Set_Token('ENTITY_ID',p_delivery_id);
5621: wsh_util_core.add_message(x_return_status,l_module_name);
5622: IF l_debug_on THEN
5623: -- Nothing is updateable
5624: WSH_DEBUG_SV.pop(l_module_name,'e_all_disabled');
5625: END IF;
5626:
5627:
5628: WHEN wsh_dp_no_entity THEN
5639: --
5640: -- Debug Statements
5641: --
5642: IF l_debug_on THEN
5643: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DP_NO_ENTITY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5644: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DP_NO_ENTITY');
5645: END IF;
5646: --
5647: WHEN wsh_inv_list_type THEN
5640: -- Debug Statements
5641: --
5642: IF l_debug_on THEN
5643: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DP_NO_ENTITY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5644: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DP_NO_ENTITY');
5645: END IF;
5646: --
5647: WHEN wsh_inv_list_type THEN
5648: x_return_status := FND_API.G_RET_STS_ERROR;
5658: --
5659: -- Debug Statements
5660: --
5661: IF l_debug_on THEN
5662: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_INV_LIST_TYPE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5663: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_INV_LIST_TYPE');
5664: END IF;
5665: --
5666: WHEN others THEN
5659: -- Debug Statements
5660: --
5661: IF l_debug_on THEN
5662: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_INV_LIST_TYPE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5663: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_INV_LIST_TYPE');
5664: END IF;
5665: --
5666: WHEN others THEN
5667: IF (get_delivery_status%ISOPEN) THEN
5676: --
5677: -- Debug Statements
5678: --
5679: IF l_debug_on THEN
5680: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5681: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5682: END IF;
5683: --
5684: END Get_Disabled_List;
5677: -- Debug Statements
5678: --
5679: IF l_debug_on THEN
5680: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5681: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5682: END IF;
5683: --
5684: END Get_Disabled_List;
5685:
5748: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5749: --
5750: IF l_debug_on IS NULL
5751: THEN
5752: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5753: END IF;
5754: --
5755: IF l_debug_on THEN
5756: WSH_DEBUG_SV.push(l_module_name);
5752: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5753: END IF;
5754: --
5755: IF l_debug_on THEN
5756: WSH_DEBUG_SV.push(l_module_name);
5757: --
5758: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
5759: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
5760: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
5754: --
5755: IF l_debug_on THEN
5756: WSH_DEBUG_SV.push(l_module_name);
5757: --
5758: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
5759: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
5760: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
5761: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_TRANSACTABLE',P_CHECK_TRANSACTABLE);
5762: END IF;
5755: IF l_debug_on THEN
5756: WSH_DEBUG_SV.push(l_module_name);
5757: --
5758: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
5759: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
5760: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
5761: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_TRANSACTABLE',P_CHECK_TRANSACTABLE);
5762: END IF;
5763: --
5756: WSH_DEBUG_SV.push(l_module_name);
5757: --
5758: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
5759: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
5760: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
5761: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_TRANSACTABLE',P_CHECK_TRANSACTABLE);
5762: END IF;
5763: --
5764: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5757: --
5758: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
5759: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
5760: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
5761: WSH_DEBUG_SV.log(l_module_name,'P_CHECK_TRANSACTABLE',P_CHECK_TRANSACTABLE);
5762: END IF;
5763: --
5764: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5765:
5768: --
5769: -- Debug Statements
5770: --
5771: IF l_debug_on THEN
5772: WSH_DEBUG_SV.pop(l_module_name);
5773: END IF;
5774: --
5775: RETURN TRUE;
5776: END IF;
5779: --
5780: -- Debug Statements
5781: --
5782: IF l_debug_on THEN
5783: WSH_DEBUG_SV.logmsg(l_module_name, 'CHECKING FOR LINES NOT IMPORTED IN SHIP SET '||P_SHIP_SET_ID||' HEADER '||P_SOURCE_HEADER_ID );
5784: END IF;
5785: --
5786: /* Need to replace the following with OM API once it is available */
5787: OPEN c_pending_lines;
5794: --
5795: -- Debug Statements
5796: --
5797: IF l_debug_on THEN
5798: WSH_DEBUG_SV.logmsg(l_module_name, 'LINE '||L_LINE_ID||' IS NOT IMPORTED' );
5799: END IF;
5800: --
5801: END IF;
5802: CLOSE c_pending_lines;
5804: --
5805: -- Debug Statements
5806: --
5807: IF l_debug_on THEN
5808: WSH_DEBUG_SV.pop(l_module_name);
5809: END IF;
5810: --
5811: return l_lines_exist;
5812:
5817: --
5818: -- Debug Statements
5819: --
5820: IF l_debug_on THEN
5821: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5822: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5823: END IF;
5824: --
5825: END Check_SS_Imp_Pending;
5818: -- Debug Statements
5819: --
5820: IF l_debug_on THEN
5821: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5822: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5823: END IF;
5824: --
5825: END Check_SS_Imp_Pending;
5826:
5991: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5992: --
5993: IF l_debug_on IS NULL
5994: THEN
5995: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5996: END IF;
5997: --
5998: IF l_debug_on THEN
5999: WSH_DEBUG_SV.push(l_module_name);
5995: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5996: END IF;
5997: --
5998: IF l_debug_on THEN
5999: WSH_DEBUG_SV.push(l_module_name);
6000: --
6001: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
6002: END IF;
6003: --
5997: --
5998: IF l_debug_on THEN
5999: WSH_DEBUG_SV.push(l_module_name);
6000: --
6001: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
6002: END IF;
6003: --
6004: FOR dl in c_del_lines (p_delivery_id )
6005: LOOP
6020:
6021: -- Debug Statements
6022: --
6023: IF l_debug_on THEN
6024: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.GET_MIN_MAX_TOLERANCE_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
6025: END IF;
6026:
6027: WSH_DETAILS_VALIDATIONS.get_min_max_tolerance_quantity
6028: (p_in_attributes => l_minmaxinrectype,
6100:
6101:
6102: IF l_debug_on THEN
6103: -- muom
6104: WSH_DEBUG_SV.logmsg(l_module_name,'l_total_quantities.expected_quantity '||l_total_quantities.expected_quantity||' l_max_quantity '||l_max_quantity);
6105: WSH_DEBUG_SV.logmsg(l_module_name,'l_total_quantities.expected_quantity2 '||l_total_quantities.expected_quantity2||' l_max_quantity2 '||l_max_quantity2);
6106: END IF;
6107:
6108: -- muom
6101:
6102: IF l_debug_on THEN
6103: -- muom
6104: WSH_DEBUG_SV.logmsg(l_module_name,'l_total_quantities.expected_quantity '||l_total_quantities.expected_quantity||' l_max_quantity '||l_max_quantity);
6105: WSH_DEBUG_SV.logmsg(l_module_name,'l_total_quantities.expected_quantity2 '||l_total_quantities.expected_quantity2||' l_max_quantity2 '||l_max_quantity2);
6106: END IF;
6107:
6108: -- muom
6109: IF WSH_UTIL_CORE.Get_Line_Fulfillment_Base(dl.source_code, dl.source_line_id) = 'S' THEN
6127: INTO l_total_other_line_qty;
6128: CLOSE c_total_other_line_qty;
6129:
6130: IF l_debug_on THEN
6131: WSH_DEBUG_SV.log(l_module_name,'l_total_other_line_qty.expected_quantity',l_total_other_line_qty.expected_quantity);
6132: -- muom
6133: WSH_DEBUG_SV.log(l_module_name,'l_total_other_line_qty.expected_quantity2',l_total_other_line_qty.expected_quantity2);
6134: END IF;
6135:
6129:
6130: IF l_debug_on THEN
6131: WSH_DEBUG_SV.log(l_module_name,'l_total_other_line_qty.expected_quantity',l_total_other_line_qty.expected_quantity);
6132: -- muom
6133: WSH_DEBUG_SV.log(l_module_name,'l_total_other_line_qty.expected_quantity2',l_total_other_line_qty.expected_quantity2);
6134: END IF;
6135:
6136: x_max_quantity := l_max_quantity - nvl(l_total_other_line_qty.expected_quantity,0);
6137: x_max_quantity2 := nvl(l_max_quantity2,0) - nvl(l_total_other_line_qty.expected_quantity2,0);
6156: --
6157: -- Debug Statements
6158: --
6159: IF l_debug_on THEN
6160: WSH_DEBUG_SV.pop(l_module_name);
6161: END IF;
6162: --
6163: EXCEPTION
6164: WHEN tolerance_exceeded THEN
6208: --
6209: -- Debug Statements
6210: --
6211: IF l_debug_on THEN
6212: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6213: END IF;
6214: --
6215: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6216: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6245: --
6246: -- Debug Statements
6247: --
6248: IF l_debug_on THEN
6249: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6250: END IF;
6251: --
6252: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6253: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6270: --
6271: -- Debug Statements
6272: --
6273: IF l_debug_on THEN
6274: WSH_DEBUG_SV.logmsg(l_module_name,'TOLERANCE_EXCEEDED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6275: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TOLERANCE_EXCEEDED');
6276: END IF;
6277: --
6278: WHEN others THEN
6271: -- Debug Statements
6272: --
6273: IF l_debug_on THEN
6274: WSH_DEBUG_SV.logmsg(l_module_name,'TOLERANCE_EXCEEDED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6275: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TOLERANCE_EXCEEDED');
6276: END IF;
6277: --
6278: WHEN others THEN
6279: if c_total_line_quantities%ISOPEN THEN
6285: --
6286: -- Debug Statements
6287: --
6288: IF l_debug_on THEN
6289: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6290: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6291: END IF;
6292: --
6293: END Check_Delivery_for_tolerances ;
6286: -- Debug Statements
6287: --
6288: IF l_debug_on THEN
6289: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6290: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6291: END IF;
6292: --
6293: END Check_Delivery_for_tolerances ;
6294:
6321: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6322: --
6323: IF l_debug_on IS NULL
6324: THEN
6325: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6326: END IF;
6327: --
6328: IF l_debug_on THEN
6329: WSH_DEBUG_SV.push(l_module_name);
6325: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6326: END IF;
6327: --
6328: IF l_debug_on THEN
6329: WSH_DEBUG_SV.push(l_module_name);
6330: --
6331: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
6332: END IF;
6333: --
6327: --
6328: IF l_debug_on THEN
6329: WSH_DEBUG_SV.push(l_module_name);
6330: --
6331: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
6332: END IF;
6333: --
6334: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6335:
6352: --
6353: -- Debug Statements
6354: --
6355: IF l_debug_on THEN
6356: WSH_DEBUG_SV.pop(l_module_name);
6357: END IF;
6358: --
6359: RETURN l_assigned;
6360:
6368: --
6369: -- Debug Statements
6370: --
6371: IF l_debug_on THEN
6372: WSH_DEBUG_SV.pop(l_module_name);
6373: END IF;
6374: --
6375: return NULL;
6376:
6377: --
6378: -- Debug Statements
6379: --
6380: IF l_debug_on THEN
6381: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6382: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6383: END IF;
6384: --
6385: END Del_Assigned_To_Trip;
6378: -- Debug Statements
6379: --
6380: IF l_debug_on THEN
6381: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6382: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6383: END IF;
6384: --
6385: END Del_Assigned_To_Trip;
6386:
6534: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6535: --
6536: IF l_debug_on IS NULL
6537: THEN
6538: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6539: END IF;
6540: --
6541: IF l_debug_on THEN
6542: WSH_DEBUG_SV.push(l_module_name);
6538: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6539: END IF;
6540: --
6541: IF l_debug_on THEN
6542: WSH_DEBUG_SV.push(l_module_name);
6543: --
6544: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
6545: WSH_DEBUG_SV.log(l_module_name,'p_action',p_action);
6546: END IF;
6540: --
6541: IF l_debug_on THEN
6542: WSH_DEBUG_SV.push(l_module_name);
6543: --
6544: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
6545: WSH_DEBUG_SV.log(l_module_name,'p_action',p_action);
6546: END IF;
6547:
6548:
6541: IF l_debug_on THEN
6542: WSH_DEBUG_SV.push(l_module_name);
6543: --
6544: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
6545: WSH_DEBUG_SV.log(l_module_name,'p_action',p_action);
6546: END IF;
6547:
6548:
6549: --OTM R12
6559: x_delivery_actions_tab => l_dlvy_actions_tab,
6560: x_return_status => x_return_status);
6561:
6562: IF l_debug_on THEN
6563: WSH_DEBUG_SV.log(l_module_name,'Init_Detail_Actions_Tbl x_return_status',x_return_status);
6564: WSH_DEBUG_SV.log(l_module_name,' Count of p_dlvy_rec_tab is',p_dlvy_rec_tab.count);
6565: END IF;
6566:
6567: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
6560: x_return_status => x_return_status);
6561:
6562: IF l_debug_on THEN
6563: WSH_DEBUG_SV.log(l_module_name,'Init_Detail_Actions_Tbl x_return_status',x_return_status);
6564: WSH_DEBUG_SV.log(l_module_name,' Count of p_dlvy_rec_tab is',p_dlvy_rec_tab.count);
6565: END IF;
6566:
6567: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
6568: raise error_in_init_actions;
6602:
6603: l_org_type := NULL;
6604: --
6605: IF l_debug_on THEN
6606: wsh_debug_sv.log(l_module_name, 'Organization Id', p_dlvy_rec_tab(j).organization_id);
6607: wsh_debug_sv.log(l_module_name, 'Cached Organization Id', l_cache_org_id);
6608: END IF;
6609: --
6610: IF p_dlvy_rec_tab(j).organization_id = l_cache_org_id THEN
6603: l_org_type := NULL;
6604: --
6605: IF l_debug_on THEN
6606: wsh_debug_sv.log(l_module_name, 'Organization Id', p_dlvy_rec_tab(j).organization_id);
6607: wsh_debug_sv.log(l_module_name, 'Cached Organization Id', l_cache_org_id);
6608: END IF;
6609: --
6610: IF p_dlvy_rec_tab(j).organization_id = l_cache_org_id THEN
6611: l_org_type := l_cache_org_type;
6611: l_org_type := l_cache_org_type;
6612: ELSE
6613: --
6614: IF l_debug_on THEN
6615: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.GET_ORG_TYPE',WSH_DEBUG_SV.C_PROC_LEVEL);
6616: END IF;
6617: --
6618: l_org_type := wsh_util_validate.get_org_type(
6619: p_organization_id => p_dlvy_rec_tab(j).organization_id,
6621: p_msg_display => 'N',
6622: x_return_status => l_return_status );
6623: --
6624: IF l_debug_on THEN
6625: wsh_debug_sv.log(l_module_name, 'Return status after wsh_util_validate.get_org_type', l_return_status);
6626: wsh_debug_sv.log(l_module_name, 'l_org_type is: ', l_org_type);
6627: END IF;
6628: --
6629: IF l_return_status = wsh_util_core.g_ret_sts_unexp_error THEN
6622: x_return_status => l_return_status );
6623: --
6624: IF l_debug_on THEN
6625: wsh_debug_sv.log(l_module_name, 'Return status after wsh_util_validate.get_org_type', l_return_status);
6626: wsh_debug_sv.log(l_module_name, 'l_org_type is: ', l_org_type);
6627: END IF;
6628: --
6629: IF l_return_status = wsh_util_core.g_ret_sts_unexp_error THEN
6630: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6659: --
6660:
6661: --
6662: IF l_debug_on THEN
6663: wsh_debug_sv.log(l_module_name, 'l_org_type', l_org_type);
6664: wsh_debug_sv.log(l_module_name, 'l_dlvy_actions_tab.Count', l_dlvy_actions_tab.count);
6665: END IF;
6666: --
6667: --
6660:
6661: --
6662: IF l_debug_on THEN
6663: wsh_debug_sv.log(l_module_name, 'l_org_type', l_org_type);
6664: wsh_debug_sv.log(l_module_name, 'l_dlvy_actions_tab.Count', l_dlvy_actions_tab.count);
6665: END IF;
6666: --
6667: --
6668: -- J-IB-NPARIKH-{
6672: l_planned_flag := p_dlvy_rec_tab(j).planned_flag;
6673: --
6674: --
6675: IF l_debug_on THEN
6676: wsh_debug_sv.log(l_module_name, 'l_dlvy_status_code', l_dlvy_status_code);
6677: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
6678: wsh_debug_sv.log(l_module_name, 'l_planned_flag', l_planned_flag);
6679: END IF;
6680: --
6673: --
6674: --
6675: IF l_debug_on THEN
6676: wsh_debug_sv.log(l_module_name, 'l_dlvy_status_code', l_dlvy_status_code);
6677: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
6678: wsh_debug_sv.log(l_module_name, 'l_planned_flag', l_planned_flag);
6679: END IF;
6680: --
6681: --
6674: --
6675: IF l_debug_on THEN
6676: wsh_debug_sv.log(l_module_name, 'l_dlvy_status_code', l_dlvy_status_code);
6677: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
6678: wsh_debug_sv.log(l_module_name, 'l_planned_flag', l_planned_flag);
6679: END IF;
6680: --
6681: --
6682: -- Actions on inbound/drop-ship deliveries are allowed only if caller
6731: -- OR
6732: -- - routing request was not received for all delivery lines
6733: --
6734: IF l_debug_on THEN
6735: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit GET_SHIPPING_CONTROL',WSH_DEBUG_SV.C_PROC_LEVEL);
6736: END IF;
6737: --
6738: -- Check if transportation is managed by supplier
6739: --
6747: );
6748: --
6749: --
6750: IF l_debug_on THEN
6751: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
6752: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
6753: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
6754: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
6755: --
6748: --
6749: --
6750: IF l_debug_on THEN
6751: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
6752: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
6753: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
6754: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
6755: --
6756: END IF;
6749: --
6750: IF l_debug_on THEN
6751: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
6752: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
6753: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
6754: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
6755: --
6756: END IF;
6757: --
6750: IF l_debug_on THEN
6751: wsh_debug_sv.log(l_module_name, 'l_return_status', l_return_status);
6752: wsh_debug_sv.log(l_module_name, 'l_shipping_control', l_shipping_control);
6753: wsh_debug_sv.log(l_module_name, 'l_routing_response_id', l_routing_response_id);
6754: wsh_debug_sv.log(l_module_name, 'l_routing_request_flag', l_routing_request_flag);
6755: --
6756: END IF;
6757: --
6758: --
6781: --
6782:
6783:
6784: IF l_debug_on THEN
6785: wsh_debug_sv.log(l_module_name, 'l_dlvy_status_code-modified', l_dlvy_status_code);
6786: wsh_debug_sv.log(l_module_name, 'l_caller-modified', l_caller);
6787: wsh_debug_sv.log(l_module_name, 'l_planned_flag-modified', l_planned_flag);
6788: END IF;
6789: --
6782:
6783:
6784: IF l_debug_on THEN
6785: wsh_debug_sv.log(l_module_name, 'l_dlvy_status_code-modified', l_dlvy_status_code);
6786: wsh_debug_sv.log(l_module_name, 'l_caller-modified', l_caller);
6787: wsh_debug_sv.log(l_module_name, 'l_planned_flag-modified', l_planned_flag);
6788: END IF;
6789: --
6790: -- J-IB-NPARIKH-}
6783:
6784: IF l_debug_on THEN
6785: wsh_debug_sv.log(l_module_name, 'l_dlvy_status_code-modified', l_dlvy_status_code);
6786: wsh_debug_sv.log(l_module_name, 'l_caller-modified', l_caller);
6787: wsh_debug_sv.log(l_module_name, 'l_planned_flag-modified', l_planned_flag);
6788: END IF;
6789: --
6790: -- J-IB-NPARIKH-}
6791: --
6794: For k in l_dlvy_actions_tab.FIRST..l_dlvy_actions_tab.LAST LOOP
6795:
6796: --bug 3301211 : adding debug msgs
6797: IF l_debug_on THEN
6798: wsh_debug_sv.log(l_module_name, 'Results from init_delivery_actions_tbl for index ', k);
6799: wsh_debug_sv.log(l_module_name, '---status_code', l_dlvy_actions_tab(k).status_code);
6800: wsh_debug_sv.log(l_module_name, '---planned_flag', l_dlvy_actions_tab(k).planned_flag);
6801: wsh_debug_sv.log(l_module_name, '---caller', l_dlvy_actions_tab(k).caller);
6802: wsh_debug_sv.log(l_module_name, '---org_type', l_dlvy_actions_tab(k).org_type);
6795:
6796: --bug 3301211 : adding debug msgs
6797: IF l_debug_on THEN
6798: wsh_debug_sv.log(l_module_name, 'Results from init_delivery_actions_tbl for index ', k);
6799: wsh_debug_sv.log(l_module_name, '---status_code', l_dlvy_actions_tab(k).status_code);
6800: wsh_debug_sv.log(l_module_name, '---planned_flag', l_dlvy_actions_tab(k).planned_flag);
6801: wsh_debug_sv.log(l_module_name, '---caller', l_dlvy_actions_tab(k).caller);
6802: wsh_debug_sv.log(l_module_name, '---org_type', l_dlvy_actions_tab(k).org_type);
6803: wsh_debug_sv.log(l_module_name, '---action_not_allowed', l_dlvy_actions_tab(k).action_not_allowed);
6796: --bug 3301211 : adding debug msgs
6797: IF l_debug_on THEN
6798: wsh_debug_sv.log(l_module_name, 'Results from init_delivery_actions_tbl for index ', k);
6799: wsh_debug_sv.log(l_module_name, '---status_code', l_dlvy_actions_tab(k).status_code);
6800: wsh_debug_sv.log(l_module_name, '---planned_flag', l_dlvy_actions_tab(k).planned_flag);
6801: wsh_debug_sv.log(l_module_name, '---caller', l_dlvy_actions_tab(k).caller);
6802: wsh_debug_sv.log(l_module_name, '---org_type', l_dlvy_actions_tab(k).org_type);
6803: wsh_debug_sv.log(l_module_name, '---action_not_allowed', l_dlvy_actions_tab(k).action_not_allowed);
6804: wsh_debug_sv.log(l_module_name, '---shipment direction', l_dlvy_actions_tab(k).shipment_direction||' , '||p_dlvy_rec_tab(j).shipment_direction);
6797: IF l_debug_on THEN
6798: wsh_debug_sv.log(l_module_name, 'Results from init_delivery_actions_tbl for index ', k);
6799: wsh_debug_sv.log(l_module_name, '---status_code', l_dlvy_actions_tab(k).status_code);
6800: wsh_debug_sv.log(l_module_name, '---planned_flag', l_dlvy_actions_tab(k).planned_flag);
6801: wsh_debug_sv.log(l_module_name, '---caller', l_dlvy_actions_tab(k).caller);
6802: wsh_debug_sv.log(l_module_name, '---org_type', l_dlvy_actions_tab(k).org_type);
6803: wsh_debug_sv.log(l_module_name, '---action_not_allowed', l_dlvy_actions_tab(k).action_not_allowed);
6804: wsh_debug_sv.log(l_module_name, '---shipment direction', l_dlvy_actions_tab(k).shipment_direction||' , '||p_dlvy_rec_tab(j).shipment_direction);
6805: --OTM R12
6798: wsh_debug_sv.log(l_module_name, 'Results from init_delivery_actions_tbl for index ', k);
6799: wsh_debug_sv.log(l_module_name, '---status_code', l_dlvy_actions_tab(k).status_code);
6800: wsh_debug_sv.log(l_module_name, '---planned_flag', l_dlvy_actions_tab(k).planned_flag);
6801: wsh_debug_sv.log(l_module_name, '---caller', l_dlvy_actions_tab(k).caller);
6802: wsh_debug_sv.log(l_module_name, '---org_type', l_dlvy_actions_tab(k).org_type);
6803: wsh_debug_sv.log(l_module_name, '---action_not_allowed', l_dlvy_actions_tab(k).action_not_allowed);
6804: wsh_debug_sv.log(l_module_name, '---shipment direction', l_dlvy_actions_tab(k).shipment_direction||' , '||p_dlvy_rec_tab(j).shipment_direction);
6805: --OTM R12
6806: wsh_debug_sv.log(l_module_name, '---ignore_for_planning', l_dlvy_actions_tab(k).ignore_for_planning);
6799: wsh_debug_sv.log(l_module_name, '---status_code', l_dlvy_actions_tab(k).status_code);
6800: wsh_debug_sv.log(l_module_name, '---planned_flag', l_dlvy_actions_tab(k).planned_flag);
6801: wsh_debug_sv.log(l_module_name, '---caller', l_dlvy_actions_tab(k).caller);
6802: wsh_debug_sv.log(l_module_name, '---org_type', l_dlvy_actions_tab(k).org_type);
6803: wsh_debug_sv.log(l_module_name, '---action_not_allowed', l_dlvy_actions_tab(k).action_not_allowed);
6804: wsh_debug_sv.log(l_module_name, '---shipment direction', l_dlvy_actions_tab(k).shipment_direction||' , '||p_dlvy_rec_tab(j).shipment_direction);
6805: --OTM R12
6806: wsh_debug_sv.log(l_module_name, '---ignore_for_planning', l_dlvy_actions_tab(k).ignore_for_planning);
6807: wsh_debug_sv.log(l_module_name, '---tms_interface_flag', l_dlvy_actions_tab(k).tms_interface_flag);
6800: wsh_debug_sv.log(l_module_name, '---planned_flag', l_dlvy_actions_tab(k).planned_flag);
6801: wsh_debug_sv.log(l_module_name, '---caller', l_dlvy_actions_tab(k).caller);
6802: wsh_debug_sv.log(l_module_name, '---org_type', l_dlvy_actions_tab(k).org_type);
6803: wsh_debug_sv.log(l_module_name, '---action_not_allowed', l_dlvy_actions_tab(k).action_not_allowed);
6804: wsh_debug_sv.log(l_module_name, '---shipment direction', l_dlvy_actions_tab(k).shipment_direction||' , '||p_dlvy_rec_tab(j).shipment_direction);
6805: --OTM R12
6806: wsh_debug_sv.log(l_module_name, '---ignore_for_planning', l_dlvy_actions_tab(k).ignore_for_planning);
6807: wsh_debug_sv.log(l_module_name, '---tms_interface_flag', l_dlvy_actions_tab(k).tms_interface_flag);
6808: -- OTM R12 Org Specific changes - 5399341
6802: wsh_debug_sv.log(l_module_name, '---org_type', l_dlvy_actions_tab(k).org_type);
6803: wsh_debug_sv.log(l_module_name, '---action_not_allowed', l_dlvy_actions_tab(k).action_not_allowed);
6804: wsh_debug_sv.log(l_module_name, '---shipment direction', l_dlvy_actions_tab(k).shipment_direction||' , '||p_dlvy_rec_tab(j).shipment_direction);
6805: --OTM R12
6806: wsh_debug_sv.log(l_module_name, '---ignore_for_planning', l_dlvy_actions_tab(k).ignore_for_planning);
6807: wsh_debug_sv.log(l_module_name, '---tms_interface_flag', l_dlvy_actions_tab(k).tms_interface_flag);
6808: -- OTM R12 Org Specific changes - 5399341
6809: wsh_debug_sv.log(l_module_name, '---otm_enabled', l_dlvy_actions_tab(k).otm_enabled);
6810: --
6803: wsh_debug_sv.log(l_module_name, '---action_not_allowed', l_dlvy_actions_tab(k).action_not_allowed);
6804: wsh_debug_sv.log(l_module_name, '---shipment direction', l_dlvy_actions_tab(k).shipment_direction||' , '||p_dlvy_rec_tab(j).shipment_direction);
6805: --OTM R12
6806: wsh_debug_sv.log(l_module_name, '---ignore_for_planning', l_dlvy_actions_tab(k).ignore_for_planning);
6807: wsh_debug_sv.log(l_module_name, '---tms_interface_flag', l_dlvy_actions_tab(k).tms_interface_flag);
6808: -- OTM R12 Org Specific changes - 5399341
6809: wsh_debug_sv.log(l_module_name, '---otm_enabled', l_dlvy_actions_tab(k).otm_enabled);
6810: --
6811: END IF;
6805: --OTM R12
6806: wsh_debug_sv.log(l_module_name, '---ignore_for_planning', l_dlvy_actions_tab(k).ignore_for_planning);
6807: wsh_debug_sv.log(l_module_name, '---tms_interface_flag', l_dlvy_actions_tab(k).tms_interface_flag);
6808: -- OTM R12 Org Specific changes - 5399341
6809: wsh_debug_sv.log(l_module_name, '---otm_enabled', l_dlvy_actions_tab(k).otm_enabled);
6810: --
6811: END IF;
6812:
6813: IF(
6854: l_is_del_eligible := Is_del_eligible_pick(
6855: p_delivery_id => p_dlvy_rec_tab(j).delivery_id,
6856: x_return_status => l_return_status);
6857: IF l_debug_on THEN
6858: WSH_DEBUG_SV.log(l_module_name,'Is_del_eligible_pick l_return_status',l_return_status);
6859: END IF;
6860: ELSE
6861: l_is_del_eligible := TRUE;
6862: END IF;
6861: l_is_del_eligible := TRUE;
6862: END IF;
6863:
6864: IF l_debug_on THEN
6865: WSH_DEBUG_SV.log(l_module_name,'l_is_del_eligible ',l_is_del_eligible);
6866: END IF;
6867:
6868: IF l_is_del_eligible
6869: THEN
6874: p_delivery_id => p_dlvy_rec_tab(j).delivery_id,
6875: p_msg_display => 'N');
6876:
6877: IF l_debug_on THEN
6878: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type||l_return_status);
6879: END IF;
6880:
6881: IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) = 'TPW' ) THEN
6882: open del_to_det_cur(p_dlvy_rec_tab(j).delivery_id);
6905: p_delivery_id => p_dlvy_rec_tab(j).delivery_id,
6906: p_msg_display => 'N');
6907:
6908: IF l_debug_on THEN
6909: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type||l_return_status);
6910: END IF;
6911:
6912: IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) = 'TPW' ) THEN
6913: raise e_record_ineligible;
6933: p_delivery_id => p_dlvy_rec_tab(j).delivery_id,
6934: p_msg_display => 'N');
6935:
6936: IF l_debug_on THEN
6937: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type|| l_return_status);
6938: END IF;
6939:
6940: IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) = 'CMS' ) THEN
6941: raise e_record_ineligible;
6954: p_delivery_id => p_dlvy_rec_tab(j).delivery_id,
6955: p_msg_display => 'N');
6956:
6957: IF l_debug_on THEN
6958: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type||l_return_status);
6959: END IF;
6960:
6961: IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) = 'CMS' ) THEN
6962: raise e_record_ineligible;
6973: p_delivery_id => p_dlvy_rec_tab(j).delivery_id,
6974: p_msg_display => 'N');
6975:
6976: IF l_debug_on THEN
6977: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type||l_return_status);
6978: END IF;
6979:
6980: IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) IN ('TPW','CMS') ) THEN
6981: open del_to_det_cur(p_dlvy_rec_tab(j).delivery_id);
7021: x_return_status => l_return_status,
7022: p_delivery_id => p_dlvy_rec_tab(j).delivery_id);
7023:
7024: IF l_debug_on THEN
7025: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type||l_return_status);
7026: END IF;
7027:
7028: IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) = FND_API.G_MISS_CHAR ) THEN
7029: open det_stat_cur(p_dlvy_rec_tab(j).delivery_id);
7042: fetch del_to_det_sc_cur into l_x_sc_wdd;
7043: close del_to_det_sc_cur;
7044:
7045: IF l_debug_on THEN
7046: WSH_DEBUG_SV.logmsg(l_module_name,'l_status_code '||l_status_code ||' l_x_sc_wdd '||l_x_sc_wdd);
7047: END IF;
7048:
7049: IF l_x_sc_wdd IS NOT NULL THEN
7050: raise e_record_ineligible;
7097: p_delivery_id => p_dlvy_rec_tab(j).delivery_id,
7098: p_msg_display => 'N');
7099:
7100: IF l_debug_on THEN
7101: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type||l_return_status);
7102: END IF;
7103:
7104: IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) in ( 'CMS','TPW') )
7105:
7143: p_delivery_id => p_dlvy_rec_tab(j).delivery_id,
7144: p_msg_display => 'N');
7145:
7146: IF l_debug_on THEN
7147: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type||l_return_status);
7148: END IF;
7149:
7150: IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) IN ('TPW','CMS') ) THEN
7151: raise e_record_ineligible;
7232: --
7233: END IF;
7234:
7235: IF l_debug_on THEN
7236: WSH_DEBUG_SV.pop(l_module_name);
7237: END IF;
7238:
7239: EXCEPTION
7240: WHEN error_in_init_actions THEN
7238:
7239: EXCEPTION
7240: WHEN error_in_init_actions THEN
7241: IF l_debug_on THEN
7242: WSH_DEBUG_SV.logmsg(l_module_name,'error_in_init_actions exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7243: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:error_in_init_actions');
7244: END IF;
7245:
7246: WHEN OTHERS THEN
7239: EXCEPTION
7240: WHEN error_in_init_actions THEN
7241: IF l_debug_on THEN
7242: WSH_DEBUG_SV.logmsg(l_module_name,'error_in_init_actions exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7243: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:error_in_init_actions');
7244: END IF;
7245:
7246: WHEN OTHERS THEN
7247: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7245:
7246: WHEN OTHERS THEN
7247: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7248: IF l_debug_on THEN
7249: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
7250: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7251: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7252: END IF;
7253: END Is_Action_Enabled;
7246: WHEN OTHERS THEN
7247: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7248: IF l_debug_on THEN
7249: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
7250: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7251: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7252: END IF;
7253: END Is_Action_Enabled;
7254:
7247: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7248: IF l_debug_on THEN
7249: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
7250: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7251: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7252: END IF;
7253: END Is_Action_Enabled;
7254:
7255: /*
9744: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
9745: --
9746: IF l_debug_on IS NULL
9747: THEN
9748: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9749: END IF;
9750: --
9751: IF l_debug_on THEN
9752: WSH_DEBUG_SV.push(l_module_name);
9748: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9749: END IF;
9750: --
9751: IF l_debug_on THEN
9752: WSH_DEBUG_SV.push(l_module_name);
9753: WSH_DEBUG_SV.log(l_module_name,'DELIVERY_ID', p_delivery_rec.DELIVERY_ID);
9754: WSH_DEBUG_SV.log(l_module_name,'Action Code', p_in_rec.action_code);
9755: WSH_DEBUG_SV.log(l_module_name,'Caller', p_in_rec.caller);
9756: END IF;
9749: END IF;
9750: --
9751: IF l_debug_on THEN
9752: WSH_DEBUG_SV.push(l_module_name);
9753: WSH_DEBUG_SV.log(l_module_name,'DELIVERY_ID', p_delivery_rec.DELIVERY_ID);
9754: WSH_DEBUG_SV.log(l_module_name,'Action Code', p_in_rec.action_code);
9755: WSH_DEBUG_SV.log(l_module_name,'Caller', p_in_rec.caller);
9756: END IF;
9757: --
9750: --
9751: IF l_debug_on THEN
9752: WSH_DEBUG_SV.push(l_module_name);
9753: WSH_DEBUG_SV.log(l_module_name,'DELIVERY_ID', p_delivery_rec.DELIVERY_ID);
9754: WSH_DEBUG_SV.log(l_module_name,'Action Code', p_in_rec.action_code);
9755: WSH_DEBUG_SV.log(l_module_name,'Caller', p_in_rec.caller);
9756: END IF;
9757: --
9758: x_return_status := FND_API.G_RET_STS_SUCCESS;
9751: IF l_debug_on THEN
9752: WSH_DEBUG_SV.push(l_module_name);
9753: WSH_DEBUG_SV.log(l_module_name,'DELIVERY_ID', p_delivery_rec.DELIVERY_ID);
9754: WSH_DEBUG_SV.log(l_module_name,'Action Code', p_in_rec.action_code);
9755: WSH_DEBUG_SV.log(l_module_name,'Caller', p_in_rec.caller);
9756: END IF;
9757: --
9758: x_return_status := FND_API.G_RET_STS_SUCCESS;
9759: --
9759: --
9760: IF p_in_rec.action_code = 'CREATE' THEN
9761: --
9762: IF l_debug_on THEN
9763: WSH_DEBUG_SV.log(l_module_name,'calling eliminate_displayonly_fields');
9764: END IF;
9765: --
9766: -- nothing else need to be disabled
9767: --
9770: --
9771: --3509004: : public api changes
9772: /*
9773: IF l_debug_on THEN
9774: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
9775: WSH_DEBUG_SV.pop(l_module_name);
9776: END IF;
9777: --
9778: RETURN;
9771: --3509004: : public api changes
9772: /*
9773: IF l_debug_on THEN
9774: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
9775: WSH_DEBUG_SV.pop(l_module_name);
9776: END IF;
9777: --
9778: RETURN;
9779: --
9797: x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
9798: THEN
9799: --
9800: IF l_debug_on THEN
9801: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
9802: WSH_DEBUG_SV.pop(l_module_name);
9803: END IF;
9804: --
9805: RETURN;
9798: THEN
9799: --
9800: IF l_debug_on THEN
9801: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
9802: WSH_DEBUG_SV.pop(l_module_name);
9803: END IF;
9804: --
9805: RETURN;
9806: --
9849: --
9850: -- J-IB-NPARIKH-}
9851:
9852: IF l_debug_on THEN
9853: WSH_DEBUG_SV.log(l_module_name,'list.COUNT',l_disabled_list.COUNT);
9854: END IF;
9855: --
9856: IF l_disabled_list.COUNT = 0 THEN
9857: IF l_debug_on THEN
9854: END IF;
9855: --
9856: IF l_disabled_list.COUNT = 0 THEN
9857: IF l_debug_on THEN
9858: WSH_DEBUG_SV.log(l_module_name,'calling eliminate_displayonly_fields');
9859: END IF;
9860: --
9861: -- nothing else need to be disabled
9862: --
9868: --
9869: IF l_debug_on THEN
9870: FOR i in 1..l_disabled_list.COUNT
9871: LOOP
9872: WSH_DEBUG_SV.log(l_module_name,'list values',l_disabled_list(i));
9873: END LOOP;
9874: WSH_DEBUG_SV.log(l_module_name,'calling enable_from_list');
9875: END IF;
9876: --enable the columns matching the l_disabled_list
9870: FOR i in 1..l_disabled_list.COUNT
9871: LOOP
9872: WSH_DEBUG_SV.log(l_module_name,'list values',l_disabled_list(i));
9873: END LOOP;
9874: WSH_DEBUG_SV.log(l_module_name,'calling enable_from_list');
9875: END IF;
9876: --enable the columns matching the l_disabled_list
9877: enable_from_list(l_disabled_list,
9878: p_delivery_rec,
9889: --
9890: IF l_debug_on THEN
9891: FOR i in 1..l_disabled_list.COUNT
9892: LOOP
9893: WSH_DEBUG_SV.log(l_module_name,'list values',l_disabled_list(i));
9894: END LOOP;
9895: WSH_DEBUG_SV.log(l_module_name,'First element is not FULL');
9896: WSH_DEBUG_SV.log(l_module_name,'calling eliminate_displayonly_fields');
9897: END IF;
9891: FOR i in 1..l_disabled_list.COUNT
9892: LOOP
9893: WSH_DEBUG_SV.log(l_module_name,'list values',l_disabled_list(i));
9894: END LOOP;
9895: WSH_DEBUG_SV.log(l_module_name,'First element is not FULL');
9896: WSH_DEBUG_SV.log(l_module_name,'calling eliminate_displayonly_fields');
9897: END IF;
9898: --
9899: --tkt
9892: LOOP
9893: WSH_DEBUG_SV.log(l_module_name,'list values',l_disabled_list(i));
9894: END LOOP;
9895: WSH_DEBUG_SV.log(l_module_name,'First element is not FULL');
9896: WSH_DEBUG_SV.log(l_module_name,'calling eliminate_displayonly_fields');
9897: END IF;
9898: --
9899: --tkt
9900: eliminate_displayonly_fields (p_delivery_rec,p_in_rec,x_delivery_rec);
9899: --tkt
9900: eliminate_displayonly_fields (p_delivery_rec,p_in_rec,x_delivery_rec);
9901: --
9902: IF l_debug_on THEN
9903: WSH_DEBUG_SV.log(l_module_name,'calling disable_from_list');
9904: END IF;
9905: -- The fileds in the list are getting disabled
9906: disable_from_list(l_disabled_list,
9907: l_db_col_rec,
9935: --
9936: END IF;
9937: --
9938: IF l_debug_on THEN
9939: WSH_DEBUG_SV.pop(l_module_name);
9940: END IF;
9941:
9942: EXCEPTION
9943: WHEN e_all_disabled THEN
9950: FND_MESSAGE.Set_Token('ENTITY_ID',p_delivery_rec.delivery_id);
9951: wsh_util_core.add_message(x_return_status,l_module_name);
9952: IF l_debug_on THEN
9953: -- Nothing is updateable
9954: WSH_DEBUG_SV.pop(l_module_name,'e_all_disabled');
9955: END IF;
9956: WHEN e_dp_no_entity THEN
9957: IF (c_tbl_rec%ISOPEN) THEN
9958: CLOSE c_tbl_rec;
9960:
9961: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9962: -- the message for this is set in original get_disabled_list
9963: IF l_debug_on THEN
9964: WSH_DEBUG_SV.pop(l_module_name,'e_dp_no_entity');
9965: END IF;
9966: WHEN e_bad_field THEN
9967: IF (c_tbl_rec%ISOPEN) THEN
9968: CLOSE c_tbl_rec;
9972: FND_MESSAGE.SET_NAME('WSH','WSH_BAD_FIELD_NAME');
9973: FND_MESSAGE.Set_Token('FIELD_NAME',l_field_name);
9974: wsh_util_core.add_message(x_return_status,l_module_name);
9975: IF l_debug_on THEN
9976: WSH_DEBUG_SV.log(l_module_name,'Bad field name passed to the list:'
9977: ,l_field_name);
9978: WSH_DEBUG_SV.pop(l_module_name,'e_bad_field');
9979: END IF;
9980: --
9974: wsh_util_core.add_message(x_return_status,l_module_name);
9975: IF l_debug_on THEN
9976: WSH_DEBUG_SV.log(l_module_name,'Bad field name passed to the list:'
9977: ,l_field_name);
9978: WSH_DEBUG_SV.pop(l_module_name,'e_bad_field');
9979: END IF;
9980: --
9981: WHEN FND_API.G_EXC_ERROR THEN
9982: IF (c_tbl_rec%ISOPEN) THEN
9985:
9986: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9987: --
9988: IF l_debug_on THEN
9989: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9990: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9991: END IF;
9992: --
9993: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9986: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9987: --
9988: IF l_debug_on THEN
9989: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9990: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9991: END IF;
9992: --
9993: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9994: IF (c_tbl_rec%ISOPEN) THEN
9997:
9998: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
9999: --
10000: IF l_debug_on THEN
10001: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10002: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10003: END IF;
10004:
10005: WHEN OTHERS THEN
9998: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
9999: --
10000: IF l_debug_on THEN
10001: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10002: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10003: END IF;
10004:
10005: WHEN OTHERS THEN
10006: IF (c_tbl_rec%ISOPEN) THEN
10009:
10010: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10011: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.get_disabled_list', l_module_name);
10012: IF l_debug_on THEN
10013: WSH_DEBUG_SV.log(l_module_name,'Error:',SUBSTR(SQLERRM,1,200));
10014: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10015: END IF;
10016: END Get_Disabled_List;
10017:
10010: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10011: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.get_disabled_list', l_module_name);
10012: IF l_debug_on THEN
10013: WSH_DEBUG_SV.log(l_module_name,'Error:',SUBSTR(SQLERRM,1,200));
10014: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10015: END IF;
10016: END Get_Disabled_List;
10017:
10018:
10038: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10039: --
10040: IF l_debug_on IS NULL
10041: THEN
10042: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10043: END IF;
10044: --
10045: IF l_debug_on THEN
10046: WSH_DEBUG_SV.push(l_module_name);
10042: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10043: END IF;
10044: --
10045: IF l_debug_on THEN
10046: WSH_DEBUG_SV.push(l_module_name);
10047: --
10048: WSH_DEBUG_SV.log(l_module_name,'p_action', p_action);
10049: END IF;
10050: --
10044: --
10045: IF l_debug_on THEN
10046: WSH_DEBUG_SV.push(l_module_name);
10047: --
10048: WSH_DEBUG_SV.log(l_module_name,'p_action', p_action);
10049: END IF;
10050: --
10051: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
10052:
10433: --} IB-Phase-2
10434: END IF;
10435:
10436: IF l_debug_on THEN
10437: WSH_DEBUG_SV.pop(l_module_name);
10438: END IF;
10439: EXCEPTION
10440: WHEN OTHERS THEN
10441: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10440: WHEN OTHERS THEN
10441: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10442: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.get_disabled_list', l_module_name);
10443: IF l_debug_on THEN
10444: WSH_DEBUG_SV.log(l_module_name,'Error:',SUBSTR(SQLERRM,1,200));
10445: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10446: END IF;
10447:
10448: END Init_Delivery_Actions_Tbl;
10441: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10442: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.get_disabled_list', l_module_name);
10443: IF l_debug_on THEN
10444: WSH_DEBUG_SV.log(l_module_name,'Error:',SUBSTR(SQLERRM,1,200));
10445: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10446: END IF;
10447:
10448: END Init_Delivery_Actions_Tbl;
10449:
10505: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10506: --
10507: IF l_debug_on IS NULL
10508: THEN
10509: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10510: END IF;
10511: --
10512: IF l_debug_on THEN
10513: WSH_DEBUG_SV.push(l_module_name);
10509: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10510: END IF;
10511: --
10512: IF l_debug_on THEN
10513: WSH_DEBUG_SV.push(l_module_name);
10514: --
10515: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10516: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
10517: END IF;
10511: --
10512: IF l_debug_on THEN
10513: WSH_DEBUG_SV.push(l_module_name);
10514: --
10515: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10516: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
10517: END IF;
10518: --
10519: x_wt_nullify_flag := FALSE;
10512: IF l_debug_on THEN
10513: WSH_DEBUG_SV.push(l_module_name);
10514: --
10515: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10516: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
10517: END IF;
10518: --
10519: x_wt_nullify_flag := FALSE;
10520: x_vol_nullify_flag := FALSE;
10535: open l_get_classes_csr(p_organization_id);
10536: fetch l_get_classes_csr into l_wt_uom_class,l_parameter_wt_code,l_vol_uom_class,l_parameter_vol_code;
10537: close l_get_classes_csr;
10538: IF l_debug_on THEN
10539: WSH_DEBUG_SV.log(l_module_name,'l_wt_uom_class',l_wt_uom_class);
10540: WSH_DEBUG_SV.log(l_module_name,'l_vol_uom_class',l_vol_uom_class);
10541: WSH_DEBUG_SV.log(l_module_name,'l_parameter_wt_code',l_parameter_wt_code);
10542: WSH_DEBUG_SV.log(l_module_name,'l_parameter_vol_code',l_parameter_vol_code);
10543: END IF;
10536: fetch l_get_classes_csr into l_wt_uom_class,l_parameter_wt_code,l_vol_uom_class,l_parameter_vol_code;
10537: close l_get_classes_csr;
10538: IF l_debug_on THEN
10539: WSH_DEBUG_SV.log(l_module_name,'l_wt_uom_class',l_wt_uom_class);
10540: WSH_DEBUG_SV.log(l_module_name,'l_vol_uom_class',l_vol_uom_class);
10541: WSH_DEBUG_SV.log(l_module_name,'l_parameter_wt_code',l_parameter_wt_code);
10542: WSH_DEBUG_SV.log(l_module_name,'l_parameter_vol_code',l_parameter_vol_code);
10543: END IF;
10544: --
10537: close l_get_classes_csr;
10538: IF l_debug_on THEN
10539: WSH_DEBUG_SV.log(l_module_name,'l_wt_uom_class',l_wt_uom_class);
10540: WSH_DEBUG_SV.log(l_module_name,'l_vol_uom_class',l_vol_uom_class);
10541: WSH_DEBUG_SV.log(l_module_name,'l_parameter_wt_code',l_parameter_wt_code);
10542: WSH_DEBUG_SV.log(l_module_name,'l_parameter_vol_code',l_parameter_vol_code);
10543: END IF;
10544: --
10545: open l_check_uom_csr(l_wt_uom_class, l_wt_uom_code);
10538: IF l_debug_on THEN
10539: WSH_DEBUG_SV.log(l_module_name,'l_wt_uom_class',l_wt_uom_class);
10540: WSH_DEBUG_SV.log(l_module_name,'l_vol_uom_class',l_vol_uom_class);
10541: WSH_DEBUG_SV.log(l_module_name,'l_parameter_wt_code',l_parameter_wt_code);
10542: WSH_DEBUG_SV.log(l_module_name,'l_parameter_vol_code',l_parameter_vol_code);
10543: END IF;
10544: --
10545: open l_check_uom_csr(l_wt_uom_class, l_wt_uom_code);
10546: fetch l_check_uom_csr into l_wt_uom_code;
10586: --
10587: END IF;
10588: --
10589: IF l_debug_on THEN
10590: WSH_DEBUG_SV.log(l_module_name,'x_weight_uom_code',x_weight_uom_code);
10591: WSH_DEBUG_SV.log(l_module_name,'x_volume_uom_code',x_volume_uom_code);
10592: END IF;
10593: x_return_status := wsh_util_core.g_ret_sts_success;
10594: --
10587: END IF;
10588: --
10589: IF l_debug_on THEN
10590: WSH_DEBUG_SV.log(l_module_name,'x_weight_uom_code',x_weight_uom_code);
10591: WSH_DEBUG_SV.log(l_module_name,'x_volume_uom_code',x_volume_uom_code);
10592: END IF;
10593: x_return_status := wsh_util_core.g_ret_sts_success;
10594: --
10595: IF l_debug_on THEN
10592: END IF;
10593: x_return_status := wsh_util_core.g_ret_sts_success;
10594: --
10595: IF l_debug_on THEN
10596: WSH_DEBUG_SV.pop(l_module_name);
10597: END IF;
10598: --
10599: EXCEPTION
10600: WHEN FND_API.G_EXC_ERROR THEN
10600: WHEN FND_API.G_EXC_ERROR THEN
10601: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10602: --
10603: IF l_debug_on THEN
10604: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10605: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10606: END IF;
10607: --
10608: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10601: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10602: --
10603: IF l_debug_on THEN
10604: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10605: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10606: END IF;
10607: --
10608: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10609: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10608: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10609: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10610: --
10611: IF l_debug_on THEN
10612: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10613: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10614: END IF;
10615: --
10616: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10609: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10610: --
10611: IF l_debug_on THEN
10612: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10613: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10614: END IF;
10615: --
10616: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10617: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10616: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10617: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10618: --
10619: IF l_debug_on THEN
10620: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10621: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10622: END IF;
10623: --
10624: WHEN OTHERS THEN
10617: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10618: --
10619: IF l_debug_on THEN
10620: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10621: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10622: END IF;
10623: --
10624: WHEN OTHERS THEN
10625: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10625: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10626: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.DERIVE_DELIVERY_UOM');
10627: --
10628: IF l_debug_on THEN
10629: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10630: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10631: END IF;
10632: --
10633: END Derive_Delivery_Uom;
10626: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.DERIVE_DELIVERY_UOM');
10627: --
10628: IF l_debug_on THEN
10629: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10630: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10631: END IF;
10632: --
10633: END Derive_Delivery_Uom;
10634:
10651: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10652: --
10653: IF l_debug_on IS NULL
10654: THEN
10655: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10656: END IF;
10657: --
10658: IF l_debug_on THEN
10659: WSH_DEBUG_SV.push(l_module_name);
10655: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10656: END IF;
10657: --
10658: IF l_debug_on THEN
10659: WSH_DEBUG_SV.push(l_module_name);
10660: --
10661: WSH_DEBUG_SV.log(l_module_name,'x_rtd_expt_txn_code',x_rtd_expt_txn_code);
10662: WSH_DEBUG_SV.log(l_module_name,'p_rtd_expt_txn_meaning',p_rtd_expt_txn_meaning);
10663: END IF;
10657: --
10658: IF l_debug_on THEN
10659: WSH_DEBUG_SV.push(l_module_name);
10660: --
10661: WSH_DEBUG_SV.log(l_module_name,'x_rtd_expt_txn_code',x_rtd_expt_txn_code);
10662: WSH_DEBUG_SV.log(l_module_name,'p_rtd_expt_txn_meaning',p_rtd_expt_txn_meaning);
10663: END IF;
10664: --
10665: SAVEPOINT VALIDATE_ROUTED_EXPORT_TXN;
10658: IF l_debug_on THEN
10659: WSH_DEBUG_SV.push(l_module_name);
10660: --
10661: WSH_DEBUG_SV.log(l_module_name,'x_rtd_expt_txn_code',x_rtd_expt_txn_code);
10662: WSH_DEBUG_SV.log(l_module_name,'p_rtd_expt_txn_meaning',p_rtd_expt_txn_meaning);
10663: END IF;
10664: --
10665: SAVEPOINT VALIDATE_ROUTED_EXPORT_TXN;
10666: --
10676: p_meaning => p_rtd_expt_txn_meaning,
10677: x_return_status => x_return_status);
10678: --
10679: IF l_debug_on THEN
10680: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_lookup',x_return_status);
10681: END IF;
10682: --
10683: wsh_util_core.api_post_call(
10684: p_return_status => x_return_status,
10689: --
10690: x_return_status := wsh_util_core.g_ret_sts_success;
10691: --
10692: IF l_debug_on THEN
10693: WSH_DEBUG_SV.pop(l_module_name);
10694: END IF;
10695: --
10696: EXCEPTION
10697: WHEN FND_API.G_EXC_ERROR THEN
10698: ROLLBACK TO VALIDATE_ROUTED_EXPORT_TXN;
10699: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10700: --
10701: IF l_debug_on THEN
10702: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10703: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10704: END IF;
10705: --
10706: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10699: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10700: --
10701: IF l_debug_on THEN
10702: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10703: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10704: END IF;
10705: --
10706: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10707: ROLLBACK TO VALIDATE_ROUTED_EXPORT_TXN;
10707: ROLLBACK TO VALIDATE_ROUTED_EXPORT_TXN;
10708: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10709: --
10710: IF l_debug_on THEN
10711: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10712: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10713: END IF;
10714: --
10715: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10708: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10709: --
10710: IF l_debug_on THEN
10711: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10712: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10713: END IF;
10714: --
10715: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10716: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10715: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10716: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10717: --
10718: IF l_debug_on THEN
10719: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10720: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10721: END IF;
10722: --
10723: WHEN OTHERS THEN
10716: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10717: --
10718: IF l_debug_on THEN
10719: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10720: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10721: END IF;
10722: --
10723: WHEN OTHERS THEN
10724: ROLLBACK TO VALIDATE_ROUTED_EXPORT_TXN;
10725: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10726: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.VALIDATE_ROUTED_EXPORT_TXN');
10727: --
10728: IF l_debug_on THEN
10729: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10730: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10731: END IF;
10732: --
10733: END Validate_Routed_Export_Txn;
10726: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.VALIDATE_ROUTED_EXPORT_TXN');
10727: --
10728: IF l_debug_on THEN
10729: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10730: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10731: END IF;
10732: --
10733: END Validate_Routed_Export_Txn;
10734:
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: WSH_DEBUG_SV.log(l_module_name,'x_number_of_lpn',x_number_of_lpn);
10770: --
10771: 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: WSH_DEBUG_SV.log(l_module_name,'x_number_of_lpn',x_number_of_lpn);
10770: --
10771: END IF;
10772: --
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: WSH_DEBUG_SV.log(l_module_name,'x_number_of_lpn',x_number_of_lpn);
10770: --
10771: END IF;
10772: --
10773: SAVEPOINT DERIVE_NUMBER_OF_LPN;
10786:
10787: x_return_status := wsh_util_core.g_ret_sts_success;
10788: --
10789: IF l_debug_on THEN
10790: WSH_DEBUG_SV.pop(l_module_name);
10791: END IF;
10792: --
10793: EXCEPTION
10794: WHEN FND_API.G_EXC_ERROR THEN
10795: ROLLBACK TO DERIVE_NUMBER_OF_LPN;
10796: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10797: --
10798: IF l_debug_on THEN
10799: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10800: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10801: END IF;
10802: --
10803: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10796: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10797: --
10798: IF l_debug_on THEN
10799: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10800: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10801: END IF;
10802: --
10803: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10804: ROLLBACK TO DERIVE_NUMBER_OF_LPN;
10804: ROLLBACK TO DERIVE_NUMBER_OF_LPN;
10805: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10806: --
10807: IF l_debug_on THEN
10808: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10809: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10810: END IF;
10811: --
10812: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10805: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10806: --
10807: IF l_debug_on THEN
10808: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10809: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10810: END IF;
10811: --
10812: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10813: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10812: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10813: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10814: --
10815: IF l_debug_on THEN
10816: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10817: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10818: END IF;
10819: --
10820: WHEN OTHERS THEN
10813: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10814: --
10815: IF l_debug_on THEN
10816: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10817: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10818: END IF;
10819: --
10820: WHEN OTHERS THEN
10821: ROLLBACK TO DERIVE_NUMBER_OF_LPN;
10822: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10823: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.DERIVE_NUMBER_OF_LPN');
10824: --
10825: IF l_debug_on THEN
10826: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10827: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10828: END IF;
10829: --
10830: END Derive_Number_Of_LPN;
10823: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.DERIVE_NUMBER_OF_LPN');
10824: --
10825: IF l_debug_on THEN
10826: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10827: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10828: END IF;
10829: --
10830: END Derive_Number_Of_LPN;
10831: --Harmonization Project I
10890: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10891: --
10892: IF l_debug_on IS NULL
10893: THEN
10894: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10895: END IF;
10896: --
10897: IF l_debug_on THEN
10898: --
10895: END IF;
10896: --
10897: IF l_debug_on THEN
10898: --
10899: WSH_DEBUG_SV.push(l_module_name);
10900: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10901: WSH_DEBUG_SV.log(l_module_name,'p_pickup_location_id',p_pickup_location_id);
10902: WSH_DEBUG_SV.log(l_module_name,'p_dropoff_location_id',p_dropoff_location_id);
10903: --
10896: --
10897: IF l_debug_on THEN
10898: --
10899: WSH_DEBUG_SV.push(l_module_name);
10900: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10901: WSH_DEBUG_SV.log(l_module_name,'p_pickup_location_id',p_pickup_location_id);
10902: WSH_DEBUG_SV.log(l_module_name,'p_dropoff_location_id',p_dropoff_location_id);
10903: --
10904: END IF;
10897: IF l_debug_on THEN
10898: --
10899: WSH_DEBUG_SV.push(l_module_name);
10900: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10901: WSH_DEBUG_SV.log(l_module_name,'p_pickup_location_id',p_pickup_location_id);
10902: WSH_DEBUG_SV.log(l_module_name,'p_dropoff_location_id',p_dropoff_location_id);
10903: --
10904: END IF;
10905: IF nvl(p_delivery_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN
10898: --
10899: WSH_DEBUG_SV.push(l_module_name);
10900: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
10901: WSH_DEBUG_SV.log(l_module_name,'p_pickup_location_id',p_pickup_location_id);
10902: WSH_DEBUG_SV.log(l_module_name,'p_dropoff_location_id',p_dropoff_location_id);
10903: --
10904: END IF;
10905: IF nvl(p_delivery_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN
10906: --
10909: close l_pick_up_leg_csr;
10910: --
10911: IF l_trip_name IS NOT NULL THEN
10912: IF l_debug_on THEN
10913: WSH_DEBUG_SV.logmsg(l_module_name,'The Pickup Location is not a valid location for this Delivery');
10914: END IF;
10915: l_loc_description := wsh_util_core.get_location_description
10916: (p_location_id => p_pickup_location_id,
10917: p_format => 'NEW UI CODE');
10930: close l_drop_off_leg_csr;
10931: --
10932: IF l_trip_name IS NOT NULL THEN
10933: IF l_debug_on THEN
10934: WSH_DEBUG_SV.logmsg(l_module_name,'The Dropoff Location is not a valid location for this Delivery');
10935: END IF;
10936: l_loc_description := wsh_util_core.get_location_description
10937: (p_location_id => p_dropoff_location_id,
10938: p_format => 'NEW UI CODE');
10949:
10950: x_return_status := wsh_util_core.g_ret_sts_success;
10951: --
10952: IF l_debug_on THEN
10953: WSH_DEBUG_SV.logmsg(l_module_name,'These Pickup and Drop off Locations are valid for this Delivery');
10954: WSH_DEBUG_SV.pop(l_module_name);
10955: END IF;
10956: --
10957: EXCEPTION
10950: x_return_status := wsh_util_core.g_ret_sts_success;
10951: --
10952: IF l_debug_on THEN
10953: WSH_DEBUG_SV.logmsg(l_module_name,'These Pickup and Drop off Locations are valid for this Delivery');
10954: WSH_DEBUG_SV.pop(l_module_name);
10955: END IF;
10956: --
10957: EXCEPTION
10958: WHEN FND_API.G_EXC_ERROR THEN
10958: WHEN FND_API.G_EXC_ERROR THEN
10959: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10960: --
10961: IF l_debug_on THEN
10962: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10963: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10964: END IF;
10965: --
10966: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10959: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10960: --
10961: IF l_debug_on THEN
10962: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10963: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10964: END IF;
10965: --
10966: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10967: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10966: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10967: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10968: --
10969: IF l_debug_on THEN
10970: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10971: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10972: END IF;
10973: --
10974: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10967: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10968: --
10969: IF l_debug_on THEN
10970: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10971: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10972: END IF;
10973: --
10974: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10975: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10974: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10975: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10976: --
10977: IF l_debug_on THEN
10978: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10979: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10980: END IF;
10981: --
10982: WHEN OTHERS THEN
10975: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10976: --
10977: IF l_debug_on THEN
10978: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10979: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10980: END IF;
10981: --
10982: WHEN OTHERS THEN
10983: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10983: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10984: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.CHK_DUP_PICKUP_DROPOFF_LOCNS');
10985: --
10986: IF l_debug_on THEN
10987: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10988: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10989: END IF;
10990: --
10991: END Chk_Dup_Pickup_Dropoff_Locns;
10984: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.CHK_DUP_PICKUP_DROPOFF_LOCNS');
10985: --
10986: IF l_debug_on THEN
10987: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10988: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10989: END IF;
10990: --
10991: END Chk_Dup_Pickup_Dropoff_Locns;
10992:
11030: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
11031: --
11032: IF l_debug_on IS NULL
11033: THEN
11034: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
11035: END IF;
11036: --
11037: IF l_debug_on THEN
11038: --
11035: END IF;
11036: --
11037: IF l_debug_on THEN
11038: --
11039: WSH_DEBUG_SV.push(l_module_name);
11040: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
11041: --
11042: END IF;
11043:
11036: --
11037: IF l_debug_on THEN
11038: --
11039: WSH_DEBUG_SV.push(l_module_name);
11040: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
11041: --
11042: END IF;
11043:
11044:
11052: l_Item_Condn1Tab(1).g_number_val := p_delivery_id;
11053: l_Item_Condn1Tab(1).g_Bind_Literal := ':b_delivery_id';
11054:
11055: IF l_debug_on THEN
11056: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ITM_QUERY_CUSTOM.ADD_CONDITION',WSH_DEBUG_SV.C_PROC_LEVEL);
11057: END IF;
11058: WSH_ITM_QUERY_CUSTOM.ADD_CONDITION(l_del_Table, ' AND WND.delivery_id = :b_delivery_id', l_Item_Condn1Tab, 'NUMBER');
11059:
11060:
11061:
11062: --Call the customized API
11063:
11064: IF l_debug_on THEN
11065: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ITM_CUSTOMIZE.ALTER_DELIVERY_MARK',WSH_DEBUG_SV.C_PROC_LEVEL);
11066: END IF;
11067: WSH_ITM_CUSTOMIZE.ALTER_DELIVERY_MARK(l_del_Table, x_return_status);
11068:
11069: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11067: WSH_ITM_CUSTOMIZE.ALTER_DELIVERY_MARK(l_del_Table, x_return_status);
11068:
11069: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11070: IF l_debug_on THEN
11071: WSH_DEBUG_SV.pop(l_module_name);
11072: END IF;
11073: RETURN 'N';
11074: END IF;
11075:
11088: DBMS_SQL.PARSE(l_CursorID, l_strQuery, DBMS_SQL.v7);
11089: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, v_delivery_id);
11090:
11091: IF l_debug_on THEN
11092: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ITM_QUERY_CUSTOM.BIND_VALUES',WSH_DEBUG_SV.C_PROC_LEVEL);
11093: END IF;
11094: WSH_ITM_QUERY_CUSTOM.BIND_VALUES(l_del_Table, l_CursorID);
11095:
11096: l_ignore := DBMS_SQL.EXECUTE(l_CursorID);
11100:
11101: IF (l_rows_fetched = 0) THEN
11102:
11103: IF l_debug_on THEN
11104: WSH_DEBUG_SV.log(l_module_name,'Return','N');
11105: WSH_DEBUG_SV.pop(l_module_name);
11106: END IF;
11107:
11108: RETURN 'N';
11101: IF (l_rows_fetched = 0) THEN
11102:
11103: IF l_debug_on THEN
11104: WSH_DEBUG_SV.log(l_module_name,'Return','N');
11105: WSH_DEBUG_SV.pop(l_module_name);
11106: END IF;
11107:
11108: RETURN 'N';
11109:
11109:
11110: END IF;
11111:
11112: IF l_debug_on THEN
11113: WSH_DEBUG_SV.log(l_module_name,'Return','Y');
11114: WSH_DEBUG_SV.pop(l_module_name);
11115: END IF;
11116:
11117: RETURN 'Y';
11110: END IF;
11111:
11112: IF l_debug_on THEN
11113: WSH_DEBUG_SV.log(l_module_name,'Return','Y');
11114: WSH_DEBUG_SV.pop(l_module_name);
11115: END IF;
11116:
11117: RETURN 'Y';
11118:
11123: WSH_UTIL_CORE.add_message (x_return_status);
11124: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_VALIDATIONS.Check_ITM_REQD');
11125: --
11126: IF l_debug_on THEN
11127: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11128: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
11129: END IF;
11130: END Check_ITM_REQUIRED;
11131:
11124: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_VALIDATIONS.Check_ITM_REQD');
11125: --
11126: IF l_debug_on THEN
11127: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11128: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
11129: END IF;
11130: END Check_ITM_REQUIRED;
11131:
11132:
11166: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
11167: --
11168: IF l_debug_on IS NULL
11169: THEN
11170: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
11171: END IF;
11172: --
11173: IF l_debug_on THEN
11174: --
11171: END IF;
11172: --
11173: IF l_debug_on THEN
11174: --
11175: WSH_DEBUG_SV.push(l_module_name);
11176: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
11177: WSH_DEBUG_SV.log(l_module_name,'p_ship_from_location_id',p_ship_from_location_id);
11178: WSH_DEBUG_SV.log(l_module_name,'p_action_type',p_action_type);
11179: --
11172: --
11173: IF l_debug_on THEN
11174: --
11175: WSH_DEBUG_SV.push(l_module_name);
11176: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
11177: WSH_DEBUG_SV.log(l_module_name,'p_ship_from_location_id',p_ship_from_location_id);
11178: WSH_DEBUG_SV.log(l_module_name,'p_action_type',p_action_type);
11179: --
11180: END IF;
11173: IF l_debug_on THEN
11174: --
11175: WSH_DEBUG_SV.push(l_module_name);
11176: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
11177: WSH_DEBUG_SV.log(l_module_name,'p_ship_from_location_id',p_ship_from_location_id);
11178: WSH_DEBUG_SV.log(l_module_name,'p_action_type',p_action_type);
11179: --
11180: END IF;
11181:
11174: --
11175: WSH_DEBUG_SV.push(l_module_name);
11176: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
11177: WSH_DEBUG_SV.log(l_module_name,'p_ship_from_location_id',p_ship_from_location_id);
11178: WSH_DEBUG_SV.log(l_module_name,'p_action_type',p_action_type);
11179: --
11180: END IF;
11181:
11182: IF p_action_type = 'SHIP_CONFIRM' THEN
11187: l_msg := FND_MESSAGE.Get_String('WSH', 'WSH_PR_ITM_REQD');
11188: END IF;
11189:
11190: IF l_debug_on THEN
11191: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_xc_util.log_exception',WSH_DEBUG_SV.C_PROC_LEVEL);
11192: END IF;
11193: wsh_xc_util.log_exception(
11194: p_api_version => 1.0,
11195: x_return_status => x_return_status,
11205: p_delivery_id => p_delivery_id
11206: );
11207:
11208: IF l_debug_on THEN
11209: WSH_DEBUG_SV.pop(l_module_name);
11210: END IF;
11211:
11212: EXCEPTION
11213:
11216: WSH_UTIL_CORE.add_message (x_return_status);
11217: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_VALIDATIONS.Log_ITM_Exception');
11218: --
11219: IF l_debug_on THEN
11220: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11221: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
11222: END IF;
11223: END Log_ITM_Exception;
11224:
11217: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_VALIDATIONS.Log_ITM_Exception');
11218: --
11219: IF l_debug_on THEN
11220: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11221: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
11222: END IF;
11223: END Log_ITM_Exception;
11224:
11225:
11250: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
11251: --
11252: IF l_debug_on IS NULL
11253: THEN
11254: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
11255: END IF;
11256: --
11257: IF l_debug_on THEN
11258: --
11255: END IF;
11256: --
11257: IF l_debug_on THEN
11258: --
11259: WSH_DEBUG_SV.push(l_module_name);
11260: --
11261: END IF;
11262:
11263: x_exceptions_exist := 'N';
11280:
11281: END LOOP;
11282:
11283: IF l_debug_on THEN
11284: WSH_DEBUG_SV.pop(l_module_name);
11285: END IF;
11286:
11287: EXCEPTION
11288: WHEN others THEN
11291: END IF;
11292: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
11293: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_VALIDATIONS.check_exception','WSH_DELIVERY_VALIDATIONS');
11294: IF l_debug_on THEN
11295: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11296: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
11297: END IF;
11298: --
11299: END check_exception;
11292: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
11293: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_VALIDATIONS.check_exception','WSH_DELIVERY_VALIDATIONS');
11294: IF l_debug_on THEN
11295: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11296: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
11297: END IF;
11298: --
11299: END check_exception;
11300:
11340: --
11341: l_debug_on := wsh_debug_interface.g_debug;
11342: --
11343: IF l_debug_on IS NULL THEN
11344: l_debug_on := wsh_debug_sv.is_debug_enabled;
11345: END IF;
11346: --
11347: IF l_debug_on THEN
11348: wsh_debug_sv.push(l_module_name);
11344: l_debug_on := wsh_debug_sv.is_debug_enabled;
11345: END IF;
11346: --
11347: IF l_debug_on THEN
11348: wsh_debug_sv.push(l_module_name);
11349: --
11350: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
11351: END IF;
11352: --
11346: --
11347: IF l_debug_on THEN
11348: wsh_debug_sv.push(l_module_name);
11349: --
11350: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
11351: END IF;
11352: --
11353: --
11354: l_has_lines := 'N';
11358: CLOSE line_csr;
11359: --
11360: --
11361: IF l_debug_on THEN
11362: wsh_debug_sv.pop(l_module_name);
11363: END IF;
11364: --
11365: RETURN(l_has_lines);
11366: --}
11368: WHEN OTHERS THEN
11369: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.has_lines',l_module_name);
11370: --
11371: IF l_debug_on THEN
11372: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
11373: END IF;
11374: --
11375: RAISE;
11376: --
11427: --
11428: l_debug_on := wsh_debug_interface.g_debug;
11429: --
11430: IF l_debug_on IS NULL THEN
11431: l_debug_on := wsh_debug_sv.is_debug_enabled;
11432: END IF;
11433: --
11434: IF l_debug_on THEN
11435: wsh_debug_sv.push(l_module_name);
11431: l_debug_on := wsh_debug_sv.is_debug_enabled;
11432: END IF;
11433: --
11434: IF l_debug_on THEN
11435: wsh_debug_sv.push(l_module_name);
11436: --
11437: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
11438: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
11439: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
11433: --
11434: IF l_debug_on THEN
11435: wsh_debug_sv.push(l_module_name);
11436: --
11437: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
11438: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
11439: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
11440: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
11441: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
11434: IF l_debug_on THEN
11435: wsh_debug_sv.push(l_module_name);
11436: --
11437: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
11438: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
11439: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
11440: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
11441: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
11442: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
11435: wsh_debug_sv.push(l_module_name);
11436: --
11437: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
11438: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
11439: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
11440: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
11441: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
11442: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
11443: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
11436: --
11437: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
11438: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
11439: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
11440: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
11441: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
11442: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
11443: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
11444: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
11437: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.DELIVERY_ID ', p_in_rec.delivery_id );
11438: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
11439: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
11440: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
11441: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
11442: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
11443: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
11444: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
11445: END IF;
11438: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
11439: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
11440: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
11441: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
11442: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
11443: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
11444: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
11445: END IF;
11446: --
11439: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.status_code ', p_in_rec.status_code );
11440: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
11441: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
11442: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
11443: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
11444: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
11445: END IF;
11446: --
11447: --
11440: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages', p_in_rec.put_messages);
11441: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
11442: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
11443: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
11444: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
11445: END IF;
11446: --
11447: --
11448: l_num_warnings := 0;
11467: --
11468:
11469: -- Check for Exceptions against Delivery and its Contents
11470: IF l_debug_on THEN
11471: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.Check_Exceptions',WSH_DEBUG_SV.C_PROC_LEVEL); END IF;
11472: l_exceptions_tab.delete;
11473: l_exp_logged := FALSE;
11474: l_exp_warning := FALSE;
11475: WSH_XC_UTIL.Check_Exceptions (
11548: --
11549: -- Debug Statements
11550: --
11551: IF l_debug_on THEN
11552: WSH_DEBUG_SV.pop(l_module_name);
11553: END IF;
11554: --
11555: --
11556: EXCEPTION
11566: x_allowed := 'N';
11567: --
11568: --
11569: IF l_debug_on THEN
11570: WSH_DEBUG_SV.logmsg(l_module_name,'wsh_util_core.e_not_allowed exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11571: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:wsh_util_core.e_not_allowed');
11572: END IF;
11573: --
11574: WHEN wsh_util_core.e_not_allowed_warning THEN
11567: --
11568: --
11569: IF l_debug_on THEN
11570: WSH_DEBUG_SV.logmsg(l_module_name,'wsh_util_core.e_not_allowed exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11571: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:wsh_util_core.e_not_allowed');
11572: END IF;
11573: --
11574: WHEN wsh_util_core.e_not_allowed_warning THEN
11575: IF l_num_warnings > 0
11582: x_allowed := 'NW';
11583: --
11584: --
11585: IF l_debug_on THEN
11586: WSH_DEBUG_SV.logmsg(l_module_name,'wsh_util_core.e_not_allowed_warning exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11587: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:wsh_util_core.e_not_allowed_warning');
11588: END IF;
11589: --
11590: WHEN FND_API.G_EXC_ERROR THEN
11583: --
11584: --
11585: IF l_debug_on THEN
11586: WSH_DEBUG_SV.logmsg(l_module_name,'wsh_util_core.e_not_allowed_warning exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11587: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:wsh_util_core.e_not_allowed_warning');
11588: END IF;
11589: --
11590: WHEN FND_API.G_EXC_ERROR THEN
11591:
11591:
11592: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11593: --
11594: IF l_debug_on THEN
11595: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11596: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
11597: END IF;
11598: --
11599: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11592: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11593: --
11594: IF l_debug_on THEN
11595: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11596: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
11597: END IF;
11598: --
11599: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11600:
11600:
11601: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
11602: --
11603: IF l_debug_on THEN
11604: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11605: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
11606: END IF;
11607: --
11608: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
11601: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
11602: --
11603: IF l_debug_on THEN
11604: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11605: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
11606: END IF;
11607: --
11608: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
11609: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11608: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
11609: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11610: --
11611: IF l_debug_on THEN
11612: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11613: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
11614: END IF;
11615: --
11616: WHEN OTHERS THEN
11609: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11610: --
11611: IF l_debug_on THEN
11612: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11613: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
11614: END IF;
11615: --
11616: WHEN OTHERS THEN
11617:
11618: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
11619: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.check_inTransit',l_module_name);
11620: --
11621: IF l_debug_on THEN
11622: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
11623: END IF;
11624: --
11625: --}
11626: END check_inTransit;
11685: --
11686: l_debug_on := wsh_debug_interface.g_debug;
11687: --
11688: IF l_debug_on IS NULL THEN
11689: l_debug_on := wsh_debug_sv.is_debug_enabled;
11690: END IF;
11691: --
11692: IF l_debug_on THEN
11693: wsh_debug_sv.push(l_module_name);
11689: l_debug_on := wsh_debug_sv.is_debug_enabled;
11690: END IF;
11691: --
11692: IF l_debug_on THEN
11693: wsh_debug_sv.push(l_module_name);
11694: --
11695: wsh_debug_sv.LOG(l_module_name, 'p_DELIVERY_ID ', p_delivery_id );
11696: END IF;
11697: --
11691: --
11692: IF l_debug_on THEN
11693: wsh_debug_sv.push(l_module_name);
11694: --
11695: wsh_debug_sv.LOG(l_module_name, 'p_DELIVERY_ID ', p_delivery_id );
11696: END IF;
11697: --
11698: --
11699: l_num_warnings := 0;
11716: --
11717: CLOSE dlvy_csr;
11718: --
11719: IF l_debug_on THEN
11720: wsh_debug_sv.LOG(l_module_name, 'l_dlvy_rec.shipping_control ', l_dlvy_rec.shipping_control );
11721: wsh_debug_sv.LOG(l_module_name, 'l_dlvy_rec.routing_response_id ', l_dlvy_rec.routing_response_id );
11722: END IF;
11723: --
11724: --
11717: CLOSE dlvy_csr;
11718: --
11719: IF l_debug_on THEN
11720: wsh_debug_sv.LOG(l_module_name, 'l_dlvy_rec.shipping_control ', l_dlvy_rec.shipping_control );
11721: wsh_debug_sv.LOG(l_module_name, 'l_dlvy_rec.routing_response_id ', l_dlvy_rec.routing_response_id );
11722: END IF;
11723: --
11724: --
11725: x_shipping_control := l_dlvy_rec.shipping_control;
11741: THEN
11742: x_routing_request_flag := 'N';
11743: --
11744: IF l_debug_on THEN
11745: wsh_debug_sv.LOGMSG(l_module_name, 'No Lines with Routing request' );
11746: END IF;
11747: ELSE
11748: x_routing_request_flag := 'Y';
11749: --
11747: ELSE
11748: x_routing_request_flag := 'Y';
11749: --
11750: IF l_debug_on THEN
11751: wsh_debug_sv.LOGMSG(l_module_name, 'At least one Line with Routing request' );
11752: END IF;
11753: END IF;
11754: --
11755: CLOSE line_csr;
11760: --
11761: -- Debug Statements
11762: --
11763: IF l_debug_on THEN
11764: WSH_DEBUG_SV.pop(l_module_name);
11765: END IF;
11766: --
11767: --}
11768: EXCEPTION
11771:
11772: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11773: --
11774: IF l_debug_on THEN
11775: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11776: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
11777: END IF;
11778: --
11779: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11772: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11773: --
11774: IF l_debug_on THEN
11775: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11776: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
11777: END IF;
11778: --
11779: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11780:
11780:
11781: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
11782: --
11783: IF l_debug_on THEN
11784: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11785: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
11786: END IF;
11787: --
11788: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
11781: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
11782: --
11783: IF l_debug_on THEN
11784: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11785: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
11786: END IF;
11787: --
11788: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
11789: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11788: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
11789: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11790: --
11791: IF l_debug_on THEN
11792: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11793: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
11794: END IF;
11795: --
11796: WHEN OTHERS THEN
11789: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11790: --
11791: IF l_debug_on THEN
11792: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11793: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
11794: END IF;
11795: --
11796: WHEN OTHERS THEN
11797:
11798: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
11799: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.get_shipping_control',l_module_name);
11800: --
11801: IF l_debug_on THEN
11802: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
11803: END IF;
11804: --
11805: --}
11806: END get_shipping_control;
11827: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
11828: --
11829: IF l_debug_on IS NULL
11830: THEN
11831: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
11832: END IF;
11833: --
11834: IF l_debug_on THEN
11835: --
11832: END IF;
11833: --
11834: IF l_debug_on THEN
11835: --
11836: WSH_DEBUG_SV.push(l_module_name);
11837: WSH_DEBUG_SV.log(l_module_name,'p_in_rec.caller',p_in_rec.caller);
11838: --
11839: END IF;
11840: --
11833: --
11834: IF l_debug_on THEN
11835: --
11836: WSH_DEBUG_SV.push(l_module_name);
11837: WSH_DEBUG_SV.log(l_module_name,'p_in_rec.caller',p_in_rec.caller);
11838: --
11839: END IF;
11840: --
11841: x_return_status := FND_API.G_RET_STS_SUCCESS;
12799: l_attributes := l_attributes || 'PACKING_SLIP, ';
12800: END IF;
12801:
12802: IF l_debug_on THEN
12803: WSH_DEBUG_SV.log(l_module_name,'l_attributes',l_attributes);
12804: WSH_DEBUG_SV.log(l_module_name,'length(l_attributes)',length(l_attributes));
12805: END IF;
12806:
12807:
12800: END IF;
12801:
12802: IF l_debug_on THEN
12803: WSH_DEBUG_SV.log(l_module_name,'l_attributes',l_attributes);
12804: WSH_DEBUG_SV.log(l_module_name,'length(l_attributes)',length(l_attributes));
12805: END IF;
12806:
12807:
12808: IF l_attributes IS NULL THEN
12807:
12808: IF l_attributes IS NULL THEN
12809: --no message to be shown to the user
12810: IF l_debug_on THEN
12811: WSH_DEBUG_SV.pop(l_module_name);
12812: END IF;
12813: --
12814: RETURN;
12815: ELSE
12823: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
12824: THEN
12825: x_return_status := l_return_status;
12826: IF l_debug_on THEN
12827: wsh_debug_sv.logmsg(l_module_name,'Error returned by wsh_utilities.process_message',WSH_DEBUG_SV.C_PROC_LEVEL);
12828: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
12829: wsh_debug_sv.pop(l_module_name);
12830: END IF;
12831: return;
12824: THEN
12825: x_return_status := l_return_status;
12826: IF l_debug_on THEN
12827: wsh_debug_sv.logmsg(l_module_name,'Error returned by wsh_utilities.process_message',WSH_DEBUG_SV.C_PROC_LEVEL);
12828: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
12829: wsh_debug_sv.pop(l_module_name);
12830: END IF;
12831: return;
12832: ELSE
12825: x_return_status := l_return_status;
12826: IF l_debug_on THEN
12827: wsh_debug_sv.logmsg(l_module_name,'Error returned by wsh_utilities.process_message',WSH_DEBUG_SV.C_PROC_LEVEL);
12828: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
12829: wsh_debug_sv.pop(l_module_name);
12830: END IF;
12831: return;
12832: ELSE
12833: x_return_status := wsh_util_core.G_RET_STS_WARNING;
12836:
12837:
12838:
12839: IF l_debug_on THEN
12840: WSH_DEBUG_SV.pop(l_module_name);
12841: END IF;
12842: --
12843:
12844:
12846: WHEN OTHERS THEN
12847: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
12848: --
12849: IF l_debug_on THEN
12850: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
12851: END IF;
12852: --
12853: END user_non_updatable_columns;
12854:
12893: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
12894: --
12895: IF l_debug_on IS NULL
12896: THEN
12897: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
12898: END IF;
12899: --
12900: x_return_status := wsh_util_core.G_RET_STS_SUCCESS;
12901: l_is_del_eligible := FALSE;
12900: x_return_status := wsh_util_core.G_RET_STS_SUCCESS;
12901: l_is_del_eligible := FALSE;
12902:
12903: IF l_debug_on THEN
12904: WSH_DEBUG_SV.push(l_module_name);
12905: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id', p_delivery_id);
12906: END IF;
12907:
12908: OPEN c_detail(p_delivery_id);
12901: l_is_del_eligible := FALSE;
12902:
12903: IF l_debug_on THEN
12904: WSH_DEBUG_SV.push(l_module_name);
12905: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id', p_delivery_id);
12906: END IF;
12907:
12908: OPEN c_detail(p_delivery_id);
12909: FETCH c_detail into l_del_det_exists;
12919: WHEN OTHERS THEN
12920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
12921: WSH_UTIL_CORE.default_handler('WSH_DELIVERIES_GRP.is_del_eligible_pick');
12922: IF l_debug_on THEN
12923: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
12924: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
12925: END IF;
12926: RETURN FALSE;
12927:
12920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
12921: WSH_UTIL_CORE.default_handler('WSH_DELIVERIES_GRP.is_del_eligible_pick');
12922: IF l_debug_on THEN
12923: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
12924: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
12925: END IF;
12926: RETURN FALSE;
12927:
12928: END Is_del_eligible_pick;
12966:
12967: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
12968: --
12969: IF l_debug_on IS NULL THEN
12970: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
12971: END IF;
12972: --
12973: IF l_debug_on THEN
12974: WSH_DEBUG_SV.push(l_module_name);
12970: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
12971: END IF;
12972: --
12973: IF l_debug_on THEN
12974: WSH_DEBUG_SV.push(l_module_name);
12975: WSH_DEBUG_SV.log(l_module_name, 'delivery id', p_delivery_id);
12976: END IF;
12977:
12978: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
12971: END IF;
12972: --
12973: IF l_debug_on THEN
12974: WSH_DEBUG_SV.push(l_module_name);
12975: WSH_DEBUG_SV.log(l_module_name, 'delivery id', p_delivery_id);
12976: END IF;
12977:
12978: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
12979:
12989: END IF;
12990:
12991:
12992: IF l_debug_on THEN
12993: WSH_DEBUG_SV.log(l_module_name, 'trip id', x_trip_info_rec.trip_id);
12994: WSH_DEBUG_SV.log(l_module_name, 'trip name', x_trip_info_rec.name);
12995: WSH_DEBUG_SV.log(l_module_name, 'trip status code', x_trip_info_rec.status_code);
12996: WSH_DEBUG_SV.pop(l_module_name);
12997: END IF;
12990:
12991:
12992: IF l_debug_on THEN
12993: WSH_DEBUG_SV.log(l_module_name, 'trip id', x_trip_info_rec.trip_id);
12994: WSH_DEBUG_SV.log(l_module_name, 'trip name', x_trip_info_rec.name);
12995: WSH_DEBUG_SV.log(l_module_name, 'trip status code', x_trip_info_rec.status_code);
12996: WSH_DEBUG_SV.pop(l_module_name);
12997: END IF;
12998: EXCEPTION
12991:
12992: IF l_debug_on THEN
12993: WSH_DEBUG_SV.log(l_module_name, 'trip id', x_trip_info_rec.trip_id);
12994: WSH_DEBUG_SV.log(l_module_name, 'trip name', x_trip_info_rec.name);
12995: WSH_DEBUG_SV.log(l_module_name, 'trip status code', x_trip_info_rec.status_code);
12996: WSH_DEBUG_SV.pop(l_module_name);
12997: END IF;
12998: EXCEPTION
12999:
12992: IF l_debug_on THEN
12993: WSH_DEBUG_SV.log(l_module_name, 'trip id', x_trip_info_rec.trip_id);
12994: WSH_DEBUG_SV.log(l_module_name, 'trip name', x_trip_info_rec.name);
12995: WSH_DEBUG_SV.log(l_module_name, 'trip status code', x_trip_info_rec.status_code);
12996: WSH_DEBUG_SV.pop(l_module_name);
12997: END IF;
12998: EXCEPTION
12999:
13000: WHEN Others THEN
13004: WSH_UTIL_CORE.Default_Handler('WSH_DELIVERY_VALIDATIONS.GET_TRIP_INFORMATION', l_module_name);
13005: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
13006:
13007: IF l_debug_on THEN
13008: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13009: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
13010: END IF;
13011: END GET_TRIP_INFORMATION;
13012:
13005: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
13006:
13007: IF l_debug_on THEN
13008: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13009: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
13010: END IF;
13011: END GET_TRIP_INFORMATION;
13012:
13013: -------------------------------------------------------------------------------
13061: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
13062: --
13063: IF l_debug_on IS NULL
13064: THEN
13065: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
13066: END IF;
13067: --
13068: IF l_debug_on THEN
13069: WSH_DEBUG_SV.push(l_module_name);
13065: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
13066: END IF;
13067: --
13068: IF l_debug_on THEN
13069: WSH_DEBUG_SV.push(l_module_name);
13070: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id', p_delivery_id);
13071: END IF;
13072: --
13073:
13066: END IF;
13067: --
13068: IF l_debug_on THEN
13069: WSH_DEBUG_SV.push(l_module_name);
13070: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id', p_delivery_id);
13071: END IF;
13072: --
13073:
13074: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
13108: END IF;
13109: CLOSE c_get_delivery_info;
13110:
13111: IF l_debug_on THEN
13112: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
13113: WSH_DEBUG_SV.pop(l_module_name);
13114: END IF;
13115:
13116: EXCEPTION
13109: CLOSE c_get_delivery_info;
13110:
13111: IF l_debug_on THEN
13112: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
13113: WSH_DEBUG_SV.pop(l_module_name);
13114: END IF;
13115:
13116: EXCEPTION
13117: WHEN NO_DATA_FOUND THEN
13123: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13124: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
13125: --
13126: IF l_debug_on THEN
13127: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
13128: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
13129: END IF;
13130: --
13131: WHEN OTHERS THEN
13124: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
13125: --
13126: IF l_debug_on THEN
13127: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
13128: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
13129: END IF;
13130: --
13131: WHEN OTHERS THEN
13132: IF c_get_delivery_info%ISOPEN THEN
13137: --
13138: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATION.get_delivery_information',l_module_name);
13139: --
13140: IF l_debug_on THEN
13141: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13142: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
13143: END IF;
13144: --
13145: END GET_DELIVERY_INFORMATION;
13138: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATION.get_delivery_information',l_module_name);
13139: --
13140: IF l_debug_on THEN
13141: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13142: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
13143: END IF;
13144: --
13145: END GET_DELIVERY_INFORMATION;
13146: