[Home] [Help]
56: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
57: --
58: IF l_debug_on IS NULL
59: THEN
60: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
61: END IF;
62: --
63: IF l_debug_on THEN
64: WSH_DEBUG_SV.push(l_module_name);
60: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
61: END IF;
62: --
63: IF l_debug_on THEN
64: WSH_DEBUG_SV.push(l_module_name);
65: END IF;
66:
67: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
68: x_selected_del_tab.delete;
454: END IF;
455: END LOOP;
456:
457: IF l_debug_on THEN
458: WSH_DEBUG_SV.log(l_module_name, to_char(x_selected_del_tab.count)||' deliveries fetched to be processed');
459: WSH_DEBUG_SV.pop(l_module_name);
460: END IF;
461:
462: EXCEPTION
455: END LOOP;
456:
457: IF l_debug_on THEN
458: WSH_DEBUG_SV.log(l_module_name, to_char(x_selected_del_tab.count)||' deliveries fetched to be processed');
459: WSH_DEBUG_SV.pop(l_module_name);
460: END IF;
461:
462: EXCEPTION
463:
465:
466: wsh_util_core.default_handler('WSH_BATCH_PROCESS.Select_Deliveries');
467: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
468: IF l_debug_on THEN
469: WSH_DEBUG_SV.pop(l_module_name);
470: END IF;
471:
472: END Select_Deliveries;
473:
559: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
560: --
561: IF l_debug_on IS NULL
562: THEN
563: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
564: END IF;
565: --
566: IF l_debug_on THEN
567: WSH_DEBUG_SV.push(l_module_name);
563: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
564: END IF;
565: --
566: IF l_debug_on THEN
567: WSH_DEBUG_SV.push(l_module_name);
568: END IF;
569:
570: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
571:
572: l_tmp_del_tab.delete;
573: l_tmp_del_tab(1) := p_delivery_id;
574:
575: IF l_debug_on THEN
576: WSH_DEBUG_SV.log(l_module_name, 'Locking delivery '|| p_delivery_id);
577: END IF;
578:
579: OPEN get_delivery(p_delivery_id);
580: FETCH get_delivery INTO l_delivery_rec;
579: OPEN get_delivery(p_delivery_id);
580: FETCH get_delivery INTO l_delivery_rec;
581: IF get_delivery%FOUND THEN
582: IF l_debug_on THEN
583: WSH_DEBUG_SV.log(l_module_name, 'Check if ship confirm is allowed for delivery ID: ' || to_char(l_tmp_del_tab(1)));
584: END IF;
585:
586: UPDATE WSH_NEW_DELIVERIES SET BATCH_ID = p_sc_batch_id
587: WHERE delivery_id = p_delivery_id;
619: IF p_ship_confirm_rule_rec.ship_method_default_flag = 'R' THEN
620: l_action_prms.ship_method_code := p_ship_confirm_rule_rec.ship_method_code;
621: ELSE
622: IF l_debug_on THEN
623: WSH_DEBUG_SV.logmsg(l_module_name,'deriving trip/delivery SM');
624: END IF;
625: OPEN c_first_trip_ship_method(
626: l_delivery_rec.delivery_id,
627: l_delivery_rec.initial_pickup_location_id);
635: l_action_prms.actual_dep_date := l_actual_dep_date;
636: l_action_prms.send_945_flag := p_ship_confirm_rule_rec.send_945_flag;
637:
638: IF l_debug_on THEN
639: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.action_code: ',l_action_prms.action_code);
640: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.caller:',l_action_prms.caller);
641: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.phase: ',l_action_prms.phase);
642: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.action_flag: ',l_action_prms.action_flag);
643: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.intransit_flag: ',l_action_prms.intransit_flag);
636: l_action_prms.send_945_flag := p_ship_confirm_rule_rec.send_945_flag;
637:
638: IF l_debug_on THEN
639: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.action_code: ',l_action_prms.action_code);
640: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.caller:',l_action_prms.caller);
641: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.phase: ',l_action_prms.phase);
642: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.action_flag: ',l_action_prms.action_flag);
643: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.intransit_flag: ',l_action_prms.intransit_flag);
644: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.close_trip_flag: ',l_action_prms.close_trip_flag);
637:
638: IF l_debug_on THEN
639: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.action_code: ',l_action_prms.action_code);
640: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.caller:',l_action_prms.caller);
641: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.phase: ',l_action_prms.phase);
642: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.action_flag: ',l_action_prms.action_flag);
643: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.intransit_flag: ',l_action_prms.intransit_flag);
644: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.close_trip_flag: ',l_action_prms.close_trip_flag);
645: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.stage_del_flag: ',l_action_prms.stage_del_flag);
638: IF l_debug_on THEN
639: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.action_code: ',l_action_prms.action_code);
640: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.caller:',l_action_prms.caller);
641: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.phase: ',l_action_prms.phase);
642: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.action_flag: ',l_action_prms.action_flag);
643: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.intransit_flag: ',l_action_prms.intransit_flag);
644: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.close_trip_flag: ',l_action_prms.close_trip_flag);
645: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.stage_del_flag: ',l_action_prms.stage_del_flag);
646: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.report_set_id: ',l_action_prms.report_set_id);
639: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.action_code: ',l_action_prms.action_code);
640: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.caller:',l_action_prms.caller);
641: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.phase: ',l_action_prms.phase);
642: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.action_flag: ',l_action_prms.action_flag);
643: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.intransit_flag: ',l_action_prms.intransit_flag);
644: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.close_trip_flag: ',l_action_prms.close_trip_flag);
645: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.stage_del_flag: ',l_action_prms.stage_del_flag);
646: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.report_set_id: ',l_action_prms.report_set_id);
647: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.bill_of_lading_flag: ',l_action_prms.bill_of_lading_flag);
640: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.caller:',l_action_prms.caller);
641: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.phase: ',l_action_prms.phase);
642: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.action_flag: ',l_action_prms.action_flag);
643: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.intransit_flag: ',l_action_prms.intransit_flag);
644: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.close_trip_flag: ',l_action_prms.close_trip_flag);
645: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.stage_del_flag: ',l_action_prms.stage_del_flag);
646: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.report_set_id: ',l_action_prms.report_set_id);
647: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.bill_of_lading_flag: ',l_action_prms.bill_of_lading_flag);
648: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.mc_bill_of_lading_flag: ',l_action_prms.mc_bill_of_lading_flag);
641: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.phase: ',l_action_prms.phase);
642: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.action_flag: ',l_action_prms.action_flag);
643: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.intransit_flag: ',l_action_prms.intransit_flag);
644: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.close_trip_flag: ',l_action_prms.close_trip_flag);
645: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.stage_del_flag: ',l_action_prms.stage_del_flag);
646: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.report_set_id: ',l_action_prms.report_set_id);
647: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.bill_of_lading_flag: ',l_action_prms.bill_of_lading_flag);
648: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.mc_bill_of_lading_flag: ',l_action_prms.mc_bill_of_lading_flag);
649: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.defer_interface_flag: ',l_action_prms.defer_interface_flag);
642: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.action_flag: ',l_action_prms.action_flag);
643: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.intransit_flag: ',l_action_prms.intransit_flag);
644: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.close_trip_flag: ',l_action_prms.close_trip_flag);
645: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.stage_del_flag: ',l_action_prms.stage_del_flag);
646: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.report_set_id: ',l_action_prms.report_set_id);
647: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.bill_of_lading_flag: ',l_action_prms.bill_of_lading_flag);
648: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.mc_bill_of_lading_flag: ',l_action_prms.mc_bill_of_lading_flag);
649: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.defer_interface_flag: ',l_action_prms.defer_interface_flag);
650: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.ship_method_code: ',l_action_prms.ship_method_code);
643: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.intransit_flag: ',l_action_prms.intransit_flag);
644: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.close_trip_flag: ',l_action_prms.close_trip_flag);
645: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.stage_del_flag: ',l_action_prms.stage_del_flag);
646: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.report_set_id: ',l_action_prms.report_set_id);
647: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.bill_of_lading_flag: ',l_action_prms.bill_of_lading_flag);
648: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.mc_bill_of_lading_flag: ',l_action_prms.mc_bill_of_lading_flag);
649: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.defer_interface_flag: ',l_action_prms.defer_interface_flag);
650: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.ship_method_code: ',l_action_prms.ship_method_code);
651: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.actual_dep_date: ',l_action_prms.actual_dep_date);
644: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.close_trip_flag: ',l_action_prms.close_trip_flag);
645: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.stage_del_flag: ',l_action_prms.stage_del_flag);
646: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.report_set_id: ',l_action_prms.report_set_id);
647: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.bill_of_lading_flag: ',l_action_prms.bill_of_lading_flag);
648: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.mc_bill_of_lading_flag: ',l_action_prms.mc_bill_of_lading_flag);
649: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.defer_interface_flag: ',l_action_prms.defer_interface_flag);
650: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.ship_method_code: ',l_action_prms.ship_method_code);
651: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.actual_dep_date: ',l_action_prms.actual_dep_date);
652: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.send_945_flag: ',l_action_prms.send_945_flag);
645: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.stage_del_flag: ',l_action_prms.stage_del_flag);
646: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.report_set_id: ',l_action_prms.report_set_id);
647: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.bill_of_lading_flag: ',l_action_prms.bill_of_lading_flag);
648: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.mc_bill_of_lading_flag: ',l_action_prms.mc_bill_of_lading_flag);
649: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.defer_interface_flag: ',l_action_prms.defer_interface_flag);
650: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.ship_method_code: ',l_action_prms.ship_method_code);
651: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.actual_dep_date: ',l_action_prms.actual_dep_date);
652: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.send_945_flag: ',l_action_prms.send_945_flag);
653: END IF;
646: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.report_set_id: ',l_action_prms.report_set_id);
647: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.bill_of_lading_flag: ',l_action_prms.bill_of_lading_flag);
648: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.mc_bill_of_lading_flag: ',l_action_prms.mc_bill_of_lading_flag);
649: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.defer_interface_flag: ',l_action_prms.defer_interface_flag);
650: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.ship_method_code: ',l_action_prms.ship_method_code);
651: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.actual_dep_date: ',l_action_prms.actual_dep_date);
652: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.send_945_flag: ',l_action_prms.send_945_flag);
653: END IF;
654:
647: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.bill_of_lading_flag: ',l_action_prms.bill_of_lading_flag);
648: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.mc_bill_of_lading_flag: ',l_action_prms.mc_bill_of_lading_flag);
649: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.defer_interface_flag: ',l_action_prms.defer_interface_flag);
650: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.ship_method_code: ',l_action_prms.ship_method_code);
651: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.actual_dep_date: ',l_action_prms.actual_dep_date);
652: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.send_945_flag: ',l_action_prms.send_945_flag);
653: END IF;
654:
655: WSH_DELIVERIES_GRP.Delivery_Action
648: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.mc_bill_of_lading_flag: ',l_action_prms.mc_bill_of_lading_flag);
649: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.defer_interface_flag: ',l_action_prms.defer_interface_flag);
650: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.ship_method_code: ',l_action_prms.ship_method_code);
651: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.actual_dep_date: ',l_action_prms.actual_dep_date);
652: WSH_DEBUG_SV.log(l_module_name,'l_action_prms.send_945_flag: ',l_action_prms.send_945_flag);
653: END IF;
654:
655: WSH_DELIVERIES_GRP.Delivery_Action
656: ( p_api_version_number => 1.0,
683: END IF; -- if delivery exist
684:
685: CLOSE get_delivery; /* unlock the delivery */
686: IF l_debug_on THEN
687: WSH_DEBUG_SV.POP(l_module_name);
688: END IF;
689:
690: EXCEPTION
691:
699: CLOSE c_first_trip_ship_method;
700: END IF;
701: WSH_UTIL_CORE.PrintMsg('ERROR: Failed to lock delivery ID '||to_char(p_delivery_id));
702: IF l_debug_on THEN
703: WSH_DEBUG_SV.log(l_module_name, 'ERROR: Failed to lock delivery ID '||to_char(p_delivery_id));
704: WSH_DEBUG_SV.POP(l_module_name);
705: END IF;
706:
707: WHEN others THEN
700: END IF;
701: WSH_UTIL_CORE.PrintMsg('ERROR: Failed to lock delivery ID '||to_char(p_delivery_id));
702: IF l_debug_on THEN
703: WSH_DEBUG_SV.log(l_module_name, 'ERROR: Failed to lock delivery ID '||to_char(p_delivery_id));
704: WSH_DEBUG_SV.POP(l_module_name);
705: END IF;
706:
707: WHEN others THEN
708: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
714: END IF;
715: WSH_UTIL_CORE.PrintMsg('ERROR: unhandled exception');
716: wsh_util_core.default_handler('WSH_BATCH_PROCESS.Ship_Confirm_A_Delivery');
717: IF l_debug_on THEN
718: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: unhandled exception');
719: WSH_DEBUG_SV.POP(l_module_name);
720: END IF;
721:
722: END Ship_Confirm_A_Delivery;
715: WSH_UTIL_CORE.PrintMsg('ERROR: unhandled exception');
716: wsh_util_core.default_handler('WSH_BATCH_PROCESS.Ship_Confirm_A_Delivery');
717: IF l_debug_on THEN
718: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: unhandled exception');
719: WSH_DEBUG_SV.POP(l_module_name);
720: END IF;
721:
722: END Ship_Confirm_A_Delivery;
723:
781: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
782: --
783: IF l_debug_on IS NULL
784: THEN
785: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
786: END IF;
787: --
788: IF l_debug_on THEN
789: WSH_DEBUG_SV.push(l_module_name);
785: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
786: END IF;
787: --
788: IF l_debug_on THEN
789: WSH_DEBUG_SV.push(l_module_name);
790: WSH_DEBUG_SV.log(l_module_name, 'Locking stop '|| to_char(p_stop_id));
791: END IF;
792:
793: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
786: END IF;
787: --
788: IF l_debug_on THEN
789: WSH_DEBUG_SV.push(l_module_name);
790: WSH_DEBUG_SV.log(l_module_name, 'Locking stop '|| to_char(p_stop_id));
791: END IF;
792:
793: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
794: OPEN lock_stop_trip(p_stop_id);
797:
798: SAVEPOINT beginning_of_the_procedure;
799:
800: IF l_debug_on THEN
801: WSH_DEBUG_SV.log(l_module_name, 'Stop locked, calling WSH_TRIP_STOPS_GRP.Stop_Action for stop '|| to_char(p_stop_id));
802: END IF;
803:
804: l_action_prms.action_code := 'UPDATE-STATUS';
805: l_action_prms.stop_action := 'CLOSE';
837: END IF;
838:
839:
840: IF l_debug_on THEN
841: WSH_DEBUG_SV.pop(l_module_name);
842: END IF;
843:
844: EXCEPTION
845: WHEN stop_trip_locked THEN
849: FND_MESSAGE.SET_NAME('WSH', 'WSH_STOP_LOCK_FAILED');
850: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',to_char(p_stop_id));
851: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error,l_module_name);
852: IF l_debug_on THEN
853: WSH_DEBUG_SV.log(l_module_name, 'ERROR: Failed to lock stop and trip, stop ID '||to_char(p_stop_id));
854: WSH_DEBUG_SV.POP(l_module_name);
855: END IF;
856:
857: WHEN others THEN
850: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',to_char(p_stop_id));
851: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error,l_module_name);
852: IF l_debug_on THEN
853: WSH_DEBUG_SV.log(l_module_name, 'ERROR: Failed to lock stop and trip, stop ID '||to_char(p_stop_id));
854: WSH_DEBUG_SV.POP(l_module_name);
855: END IF;
856:
857: WHEN others THEN
858: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
861: FND_MESSAGE.SET_NAME('WSH', 'WSH_STOP_LOCK_FAILED');
862: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',to_char(p_stop_id));
863: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
864: IF l_debug_on THEN
865: WSH_DEBUG_SV.log(l_module_name, 'ERROR: Failed to lock stop and trip, stop ID '||to_char(p_stop_id));
866: WSH_DEBUG_SV.POP(l_module_name);
867: END IF;
868: END Close_A_Stop;
869:
862: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',to_char(p_stop_id));
863: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
864: IF l_debug_on THEN
865: WSH_DEBUG_SV.log(l_module_name, 'ERROR: Failed to lock stop and trip, stop ID '||to_char(p_stop_id));
866: WSH_DEBUG_SV.POP(l_module_name);
867: END IF;
868: END Close_A_Stop;
869:
870: -- -----------------------------------------------------------------------
1017: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1018: --
1019: IF l_debug_on IS NULL
1020: THEN
1021: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1022: END IF;
1023: --
1024: x_results_summary.success := 0;
1025: x_results_summary.warning := 0;
1027: x_results_summary.report_req_id := 0;
1028: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1029:
1030: IF l_debug_on THEN
1031: WSH_DEBUG_SV.push(l_module_name);
1032: END IF;
1033:
1034: l_sc_confirmed_dels.delete;
1035: l_stops_to_close.delete;
1042: FETCH get_sc_batch INTO l_ship_confirm_rule_id, l_batch_creation_date,
1043: l_actual_departure_date;
1044:
1045: IF l_debug_on THEN
1046: WSH_DEBUG_SV.log(l_module_name, 'Batch Creation Date',
1047: to_char(l_batch_creation_date, 'MM-DD-YYYY HH24:MI:SS'));
1048: WSH_DEBUG_SV.log(l_module_name, 'Actual Departure Date',
1049: to_char(l_actual_departure_date, 'MM/DD/YYYY HH24:MI:SS'));
1050: END IF;
1044:
1045: IF l_debug_on THEN
1046: WSH_DEBUG_SV.log(l_module_name, 'Batch Creation Date',
1047: to_char(l_batch_creation_date, 'MM-DD-YYYY HH24:MI:SS'));
1048: WSH_DEBUG_SV.log(l_module_name, 'Actual Departure Date',
1049: to_char(l_actual_departure_date, 'MM/DD/YYYY HH24:MI:SS'));
1050: END IF;
1051:
1052: IF get_sc_batch%NOTFOUND THEN
1087: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',to_char(p_del_tab(i).delivery_id));
1088: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
1089: log_batch_messages(p_sc_batch_id, NULL ,NULL, p_del_tab(i).initial_pickup_location_id, NULL);
1090: IF l_debug_on THEN
1091: WSH_DEBUG_SV.logmsg('wsh.plsql.' || G_PKG_NAME || '.' || 'Ship_Confirm_A_Delivery', 'ERROR: Failed to lock delivery ID '||to_char(p_del_tab(i).delivery_id));
1092: WSH_DEBUG_SV.POP('wsh.plsql.' || G_PKG_NAME || '.' || 'Ship_Confirm_A_Delivery');
1093: END IF;
1094:
1095: WHEN OTHERS THEN
1088: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
1089: log_batch_messages(p_sc_batch_id, NULL ,NULL, p_del_tab(i).initial_pickup_location_id, NULL);
1090: IF l_debug_on THEN
1091: WSH_DEBUG_SV.logmsg('wsh.plsql.' || G_PKG_NAME || '.' || 'Ship_Confirm_A_Delivery', 'ERROR: Failed to lock delivery ID '||to_char(p_del_tab(i).delivery_id));
1092: WSH_DEBUG_SV.POP('wsh.plsql.' || G_PKG_NAME || '.' || 'Ship_Confirm_A_Delivery');
1093: END IF;
1094:
1095: WHEN OTHERS THEN
1096: /* this will catch the exception when failing to obtain the lock on the delivery */
1099: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_LOCK_FAILED');
1100: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',to_char(p_del_tab(i).delivery_id));
1101: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
1102: IF l_debug_on THEN
1103: WSH_DEBUG_SV.logmsg('wsh.plsql.' || G_PKG_NAME || '.' || 'Ship_Confirm_A_Delivery', 'ERROR: Failed to lock delivery ID '||to_char(p_del_tab(i).delivery_id));
1104: WSH_DEBUG_SV.POP('wsh.plsql.' || G_PKG_NAME || '.' || 'Ship_Confirm_A_Delivery');
1105: END IF;
1106: END;
1107:
1100: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',to_char(p_del_tab(i).delivery_id));
1101: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
1102: IF l_debug_on THEN
1103: WSH_DEBUG_SV.logmsg('wsh.plsql.' || G_PKG_NAME || '.' || 'Ship_Confirm_A_Delivery', 'ERROR: Failed to lock delivery ID '||to_char(p_del_tab(i).delivery_id));
1104: WSH_DEBUG_SV.POP('wsh.plsql.' || G_PKG_NAME || '.' || 'Ship_Confirm_A_Delivery');
1105: END IF;
1106: END;
1107:
1108: --
1115:
1116: l_reset_flags := FALSE;
1117:
1118: IF l_debug_on THEN
1119: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1120: END IF;
1121:
1122: BEGIN
1123:
1123:
1124: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
1125: x_return_status => l_return_status1);
1126: IF l_debug_on THEN
1127: WSH_DEBUG_SV.log(l_module_name,'l_return_status1',l_return_status1);
1128: END IF;
1129:
1130: IF l_return_status1 IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
1131: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR,
1147: x_results_summary.success := x_results_summary.success + 1;
1148: l_sc_confirmed_dels(l_sc_confirmed_dels.count+1):= p_del_tab(i).delivery_id;
1149: IF l_debug_on THEN
1150: select status_code into l_status_code from wsh_new_deliveries where delivery_id = p_del_tab(i).delivery_id;
1151: WSH_DEBUG_SV.logmsg(l_module_name,'Delivery ID ' || to_char(p_del_tab(i).delivery_id)||' is ship confirmed successfully with status '|| l_status_code);
1152: END IF;
1153:
1154:
1155: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1156: x_results_summary.warning := x_results_summary.warning + 1;
1157: l_sc_confirmed_dels(l_sc_confirmed_dels.count+1):= p_del_tab(i).delivery_id;
1158: log_batch_messages(p_sc_batch_id, p_del_tab(i).delivery_id, NULL, p_del_tab(i).initial_pickup_location_id, NULL);
1159: IF l_debug_on THEN
1160: WSH_DEBUG_SV.logmsg(l_module_name,'Delivery ID '|| to_char(p_del_tab(i).delivery_id)||' is ship confirmed with warnings');
1161: END IF;
1162:
1163: ELSE
1164: x_results_summary.failure := x_results_summary.failure + 1;
1165:
1166: log_batch_messages(p_sc_batch_id, p_del_tab(i).delivery_id,NULL, p_del_tab(i).initial_pickup_location_id, NULL);
1167:
1168: IF l_debug_on THEN
1169: WSH_DEBUG_SV.logmsg(l_module_name,'Delivery ID '|| to_char(p_del_tab(i).delivery_id)||' cannot be ship confirmed');
1170: END IF;
1171:
1172:
1173: END IF;
1214: END IF;
1215:
1216: IF l_stops_to_close.count > 0 THEN
1217: IF l_debug_on THEN
1218: WSH_DEBUG_SV.logmsg(l_module_name, 'Closing manually created stops');
1219: END IF;
1220: FOR i in 1..l_stops_to_close.count LOOP
1221: BEGIN
1222: l_lock_error := 'N';
1234: l_lock_error := 'Y';
1235:
1236: WSH_UTIL_CORE.PrintMsg('ERROR: Failed to lock stop and trip, stop ID '||to_char(l_stops_to_close(i)));
1237: IF l_debug_on THEN
1238: WSH_DEBUG_SV.logmsg('wsh.plsql.' || G_PKG_NAME || '.' || 'Close_A_Stop', 'ERROR: Failed to lock stop and trip, stop ID '||to_char(l_stops_to_close(i)));
1239: WSH_DEBUG_SV.POP('wsh.plsql.' || G_PKG_NAME || '.' || 'Close_A_Stop');
1240: END IF;
1241: END;
1242:
1235:
1236: WSH_UTIL_CORE.PrintMsg('ERROR: Failed to lock stop and trip, stop ID '||to_char(l_stops_to_close(i)));
1237: IF l_debug_on THEN
1238: WSH_DEBUG_SV.logmsg('wsh.plsql.' || G_PKG_NAME || '.' || 'Close_A_Stop', 'ERROR: Failed to lock stop and trip, stop ID '||to_char(l_stops_to_close(i)));
1239: WSH_DEBUG_SV.POP('wsh.plsql.' || G_PKG_NAME || '.' || 'Close_A_Stop');
1240: END IF;
1241: END;
1242:
1243: --
1250:
1251: l_reset_flags := FALSE;
1252:
1253: IF l_debug_on THEN
1254: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1255: END IF;
1256:
1257: BEGIN
1258:
1258:
1259: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
1260: x_return_status => l_return_status1);
1261: IF l_debug_on THEN
1262: WSH_DEBUG_SV.log(l_module_name,'l_return_status1',l_return_status1);
1263: END IF;
1264:
1265: IF l_return_status1 IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
1266: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR,
1280:
1281: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1282:
1283: IF l_debug_on THEN
1284: WSH_DEBUG_SV.logmsg(l_module_name,'Successfully closed stop '|| l_stops_to_close(i));
1285: END IF;
1286: l_closing_stop_success := l_closing_stop_success + 1;
1287: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
1288: IF l_debug_on THEN
1285: END IF;
1286: l_closing_stop_success := l_closing_stop_success + 1;
1287: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
1288: IF l_debug_on THEN
1289: WSH_DEBUG_SV.logmsg(l_module_name,'Trip stop '|| l_stops_to_close(i) ||' is closed with warnings');
1290: END IF;
1291: l_closing_stop_warning := l_closing_stop_warning + 1;
1292: log_batch_messages(p_sc_batch_id, NULL , l_stops_to_close(i) , l_stop_location_ids(i), NULL);
1293: ELSE
1291: l_closing_stop_warning := l_closing_stop_warning + 1;
1292: log_batch_messages(p_sc_batch_id, NULL , l_stops_to_close(i) , l_stop_location_ids(i), NULL);
1293: ELSE
1294: IF l_debug_on THEN
1295: WSH_DEBUG_SV.logmsg(l_module_name,'Failed to close stop '|| l_stops_to_close(i));
1296: END IF;
1297:
1298: IF l_lock_error = 'Y' THEN
1299: FND_MESSAGE.SET_NAME('WSH', 'WSH_STOP_LOCK_FAILED');
1312:
1313: END LOOP;
1314:
1315: IF l_debug_on THEN
1316: WSH_DEBUG_SV.logmsg(l_module_name,'Successfully closed '|| l_closing_stop_success ||' stops' );
1317: WSH_DEBUG_SV.logmsg(l_module_name,'Closed '|| l_closing_stop_warning ||' stops with warnings' );
1318: WSH_DEBUG_SV.logmsg(l_module_name,'Failed to close '|| l_closing_stop_failure ||' stops' );
1319: END IF;
1320:
1313: END LOOP;
1314:
1315: IF l_debug_on THEN
1316: WSH_DEBUG_SV.logmsg(l_module_name,'Successfully closed '|| l_closing_stop_success ||' stops' );
1317: WSH_DEBUG_SV.logmsg(l_module_name,'Closed '|| l_closing_stop_warning ||' stops with warnings' );
1318: WSH_DEBUG_SV.logmsg(l_module_name,'Failed to close '|| l_closing_stop_failure ||' stops' );
1319: END IF;
1320:
1321: ELSE
1314:
1315: IF l_debug_on THEN
1316: WSH_DEBUG_SV.logmsg(l_module_name,'Successfully closed '|| l_closing_stop_success ||' stops' );
1317: WSH_DEBUG_SV.logmsg(l_module_name,'Closed '|| l_closing_stop_warning ||' stops with warnings' );
1318: WSH_DEBUG_SV.logmsg(l_module_name,'Failed to close '|| l_closing_stop_failure ||' stops' );
1319: END IF;
1320:
1321: ELSE
1322: IF l_debug_on THEN
1319: END IF;
1320:
1321: ELSE
1322: IF l_debug_on THEN
1323: WSH_DEBUG_SV.logmsg(l_module_name, 'No manually created stops to close');
1324: END IF;
1325: END IF;
1326:
1327: IF l_ship_confirm_rule_rec.ac_defer_interface_flag = 'N' THEN
1369: raise WSH_SUBMIT_SC_REPORT_ERR;
1370: END IF;
1371:
1372: IF l_debug_on THEN
1373: WSH_DEBUG_SV.pop(l_module_name);
1374: END IF;
1375:
1376: EXCEPTION
1377:
1379: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1380: WSH_UTIL_CORE.PrintMsg('ERROR: Failed to find the ship confirm batch ');
1381:
1382: IF l_debug_on THEN
1383: WSH_DEBUG_SV.pop(l_module_name);
1384: END IF;
1385:
1386: WHEN wsh_missing_sc_rule THEN
1387: IF get_sc_batch%ISOPEN THEN
1389: END IF;
1390: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1391: WSH_UTIL_CORE.PrintMsg('ERROR: Ship Confirm Rule is not found or has expired');
1392: IF l_debug_on THEN
1393: WSH_DEBUG_SV.pop(l_module_name);
1394: END IF;
1395:
1396: WHEN inv_inter_req_submission THEN
1397: IF get_sc_batch%ISOPEN THEN
1402: END IF;
1403: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1404: WSH_UTIL_CORE.PrintMsg('ERROR: Failed to submit Interface concurrent request ');
1405: IF l_debug_on THEN
1406: WSH_DEBUG_SV.pop(l_module_name);
1407: END IF;
1408:
1409: WHEN WSH_SUBMIT_SC_REPORT_ERR THEN
1410: IF get_sc_batch%ISOPEN THEN
1415: END IF;
1416: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1417: WSH_UTIL_CORE.PrintMsg('ERROR: Failed to submit Auto Ship Confirm Report ');
1418: IF l_debug_on THEN
1419: WSH_DEBUG_SV.pop(l_module_name);
1420: END IF;
1421:
1422: WHEN delivery_locked THEN
1423: IF get_sc_batch%ISOPEN THEN
1428: END IF;
1429: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1430: WSH_UTIL_CORE.PrintMsg('ERROR: Failed to lock delivery ID ');
1431: IF l_debug_on THEN
1432: WSH_DEBUG_SV.pop(l_module_name);
1433: END IF;
1434:
1435: WHEN others THEN
1436: IF get_sc_batch%ISOPEN THEN
1441: END IF;
1442: wsh_util_core.default_handler('WSH_BATCH_PROCESS.Ship_Confirm_Batch');
1443: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1444: IF l_debug_on THEN
1445: WSH_DEBUG_SV.pop(l_module_name);
1446: END IF;
1447:
1448: END Ship_Confirm_Batch;
1449:
1518: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1519: --
1520: IF l_debug_on IS NULL
1521: THEN
1522: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1523: END IF;
1524: --
1525: IF l_debug_on THEN
1526: WSH_DEBUG_SV.push(l_module_name);
1522: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1523: END IF;
1524: --
1525: IF l_debug_on THEN
1526: WSH_DEBUG_SV.push(l_module_name);
1527: END IF;
1528:
1529: l_tmp_del_tab.delete;
1530: l_tmp_del_tab(1) := p_delivery_id;
1541: RAISE WSH_INVALID_AUTO_PACK_LEVEL;
1542: END IF;
1543:
1544: IF l_debug_on THEN
1545: WSH_DEBUG_SV.logmsg(l_module_name, 'Locking delivery '|| p_delivery_id);
1546: END IF;
1547:
1548:
1549: OPEN get_delivery(p_delivery_id);
1597: END IF; -- if delivery exist
1598:
1599: CLOSE get_delivery;
1600: IF l_debug_on THEN
1601: WSH_DEBUG_SV.pop(l_module_name);
1602: END IF;
1603:
1604: EXCEPTION
1605:
1606: WHEN WSH_INVALID_AUTO_PACK_LEVEL THEN
1607: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1608: WSH_UTIL_CORE.PrintMsg('ERROR: invalid auto pack level');
1609: IF l_debug_on THEN
1610: WSH_DEBUG_SV.logmsg(l_module_name, 'Invalid Auot Pack Level');
1611: WSH_DEBUG_SV.pop(l_module_name);
1612: END IF;
1613:
1614: WHEN delivery_locked THEN
1607: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1608: WSH_UTIL_CORE.PrintMsg('ERROR: invalid auto pack level');
1609: IF l_debug_on THEN
1610: WSH_DEBUG_SV.logmsg(l_module_name, 'Invalid Auot Pack Level');
1611: WSH_DEBUG_SV.pop(l_module_name);
1612: END IF;
1613:
1614: WHEN delivery_locked THEN
1615: CLOSE get_delivery;
1615: CLOSE get_delivery;
1616: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1617: WSH_UTIL_CORE.PrintMsg('ERROR: Failed to lock delivery '|| to_char(p_delivery_id));
1618: IF l_debug_on THEN
1619: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: Failed to lock delivery '|| to_char(p_delivery_id));
1620: WSH_DEBUG_SV.pop(l_module_name);
1621: END IF;
1622:
1623:
1616: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1617: WSH_UTIL_CORE.PrintMsg('ERROR: Failed to lock delivery '|| to_char(p_delivery_id));
1618: IF l_debug_on THEN
1619: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: Failed to lock delivery '|| to_char(p_delivery_id));
1620: WSH_DEBUG_SV.pop(l_module_name);
1621: END IF;
1622:
1623:
1624:
1627: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1628: wsh_util_core.default_handler('WSH_BATCH_PROCESS.Auto_Pack_A_Delivery');
1629: WSH_UTIL_CORE.PrintMsg('ERROR: Failed to lock delivery '|| to_char(p_delivery_id));
1630: IF l_debug_on THEN
1631: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: Failed to lock delivery '|| to_char(p_delivery_id));
1632: WSH_DEBUG_SV.pop(l_module_name);
1633: END IF;
1634:
1635: END Auto_Pack_A_Delivery;
1628: wsh_util_core.default_handler('WSH_BATCH_PROCESS.Auto_Pack_A_Delivery');
1629: WSH_UTIL_CORE.PrintMsg('ERROR: Failed to lock delivery '|| to_char(p_delivery_id));
1630: IF l_debug_on THEN
1631: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: Failed to lock delivery '|| to_char(p_delivery_id));
1632: WSH_DEBUG_SV.pop(l_module_name);
1633: END IF;
1634:
1635: END Auto_Pack_A_Delivery;
1636:
1689: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1690: --
1691: IF l_debug_on IS NULL
1692: THEN
1693: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1694: END IF;
1695: --
1696: x_results_summary.success := 0;
1697: x_results_summary.warning := 0;
1701:
1702: x_packed_del_tab.delete;
1703:
1704: IF l_debug_on THEN
1705: WSH_DEBUG_SV.push(l_module_name);
1706: WSH_DEBUG_SV.logmsg(l_module_name,'AP level'||p_auto_pack_level);
1707: END IF;
1708:
1709: WSH_UTIL_CORE.PrintDateTime;
1702: x_packed_del_tab.delete;
1703:
1704: IF l_debug_on THEN
1705: WSH_DEBUG_SV.push(l_module_name);
1706: WSH_DEBUG_SV.logmsg(l_module_name,'AP level'||p_auto_pack_level);
1707: END IF;
1708:
1709: WSH_UTIL_CORE.PrintDateTime;
1710:
1714:
1715: FOR i in 1 .. p_del_tab.count LOOP
1716:
1717: IF l_debug_on THEN
1718: WSH_DEBUG_SV.logmsg(l_module_name,'Auto pack delivery ID: ' || to_char(p_del_tab(i).delivery_id));
1719: END IF;
1720:
1721: BEGIN
1722: Auto_Pack_A_Delivery(
1737: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error,l_module_name);
1738: log_batch_messages(p_ap_batch_id, NULL ,NULL, p_del_tab(i).initial_pickup_location_id, 'E');
1739:
1740: IF l_debug_on THEN
1741: WSH_DEBUG_SV.logmsg(l_module_name, 'Failed to lock delivery '|| to_char(p_del_tab(i).delivery_id));
1742: WSH_DEBUG_SV.pop('wsh.plsql.' || G_PKG_NAME || '.' || 'Auto_Pack_A_Delivery');
1743: END IF;
1744:
1745: WHEN OTHERS THEN
1738: log_batch_messages(p_ap_batch_id, NULL ,NULL, p_del_tab(i).initial_pickup_location_id, 'E');
1739:
1740: IF l_debug_on THEN
1741: WSH_DEBUG_SV.logmsg(l_module_name, 'Failed to lock delivery '|| to_char(p_del_tab(i).delivery_id));
1742: WSH_DEBUG_SV.pop('wsh.plsql.' || G_PKG_NAME || '.' || 'Auto_Pack_A_Delivery');
1743: END IF;
1744:
1745: WHEN OTHERS THEN
1746: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1749: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',to_char(p_del_tab(i).delivery_id));
1750: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error,l_module_name);
1751:
1752: IF l_debug_on THEN
1753: WSH_DEBUG_SV.logmsg(l_module_name, 'Failed to lock delivery '|| to_char(p_del_tab(i).delivery_id));
1754: WSH_DEBUG_SV.pop('wsh.plsql.' || G_PKG_NAME || '.' || 'Auto_Pack_A_Delivery');
1755: END IF;
1756:
1757:
1750: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error,l_module_name);
1751:
1752: IF l_debug_on THEN
1753: WSH_DEBUG_SV.logmsg(l_module_name, 'Failed to lock delivery '|| to_char(p_del_tab(i).delivery_id));
1754: WSH_DEBUG_SV.pop('wsh.plsql.' || G_PKG_NAME || '.' || 'Auto_Pack_A_Delivery');
1755: END IF;
1756:
1757:
1758: END;
1767:
1768: l_reset_flags := FALSE;
1769:
1770: IF l_debug_on THEN
1771: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1772: END IF;
1773:
1774: BEGIN
1775:
1775:
1776: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
1777: x_return_status => l_return_status1);
1778: IF l_debug_on THEN
1779: WSH_DEBUG_SV.log(l_module_name,'l_return_status1',l_return_status1);
1780: END IF;
1781:
1782: IF l_return_status1 IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
1783: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR,
1800: x_packed_del_tab(x_packed_del_tab.count).organization_id := p_del_tab(i).organization_id;
1801: x_packed_del_tab(x_packed_del_tab.count).initial_pickup_location_id := p_del_tab(i).initial_pickup_location_id;
1802:
1803: IF l_debug_on THEN
1804: WSH_DEBUG_SV.logmsg(l_module_name,'Auto Pack succeed for delivery ID: ' || to_char(p_del_tab(i).delivery_id));
1805: END IF;
1806:
1807: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1808: x_results_summary.warning := x_results_summary.warning + 1;
1811: x_packed_del_tab(x_packed_del_tab.count).initial_pickup_location_id := p_del_tab(i).initial_pickup_location_id;
1812:
1813: log_batch_messages(p_ap_batch_id, p_del_tab(i).delivery_id, NULL, p_del_tab(i).initial_pickup_location_id, 'W');
1814: IF l_debug_on THEN
1815: WSH_DEBUG_SV.logmsg(l_module_name,'Auto Pack completed with warnings for delivery ID: ' || to_char(p_del_tab(i).delivery_id));
1816: END IF;
1817:
1818: ELSE -- error or unexpected error
1819:
1820: x_results_summary.failure := x_results_summary.failure + 1;
1821:
1822:
1823: IF l_debug_on THEN
1824: WSH_DEBUG_SV.logmsg(l_module_name,'Auto Pack failed for delivery ID: ' || to_char(p_del_tab(i).delivery_id));
1825: END IF;
1826:
1827: log_batch_messages(p_ap_batch_id, p_del_tab(i).delivery_id,NULL, p_del_tab(i).initial_pickup_location_id, 'E');
1828:
1836:
1837: END LOOP;
1838:
1839: IF l_debug_on THEN
1840: WSH_DEBUG_SV.logmsg(l_module_name,'All the deliveries have been packed');
1841: END IF;
1842:
1843: -- submit Auto Pack Deliveries Reprot here
1844: x_results_summary.report_req_id := fnd_request.submit_request(
1859: END IF;
1860:
1861: --
1862: IF l_debug_on THEN
1863: WSH_DEBUG_SV.pop(l_module_name);
1864: END IF;
1865:
1866: EXCEPTION
1867:
1869: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1870: FND_MESSAGE.SET_NAME('WSH' , 'WSH_INVALID_AUTO_PACK_LEVEL');
1871: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
1872: IF l_debug_on THEN
1873: WSH_DEBUG_SV.pop(l_module_name);
1874: END IF;
1875:
1876: WHEN WSH_SUBMIT_AP_REPORT_ERR THEN
1877: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1877: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1878: FND_MESSAGE.SET_NAME('WSH' , 'WSH_SUBMIT_AP_REPORT_ERR');
1879: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
1880: IF l_debug_on THEN
1881: WSH_DEBUG_SV.pop(l_module_name);
1882: END IF;
1883:
1884: WHEN others THEN
1885: wsh_util_core.default_handler('WSH_BATCH_PROCESS.Auto_Pack_Deliveries_Batch');
1884: WHEN others THEN
1885: wsh_util_core.default_handler('WSH_BATCH_PROCESS.Auto_Pack_Deliveries_Batch');
1886: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1887: IF l_debug_on THEN
1888: WSH_DEBUG_SV.pop(l_module_name);
1889: END IF;
1890:
1891: END Auto_Pack_Deliveries_Batch;
1892:
2013: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2014: --
2015: IF l_debug_on IS NULL
2016: THEN
2017: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2018: END IF;
2019: --
2020: IF l_debug_on THEN
2021: WSH_DEBUG_SV.push(l_module_name);
2017: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2018: END IF;
2019: --
2020: IF l_debug_on THEN
2021: WSH_DEBUG_SV.push(l_module_name);
2022: END IF;
2023:
2024: l_completion_status := 'NORMAL';
2025:
2096: -- call adjust_planned_flag to plan the deliveries
2097: -- because during ship confirm, no other delivery
2098: -- detail lines should be appended to the deliveries
2099: IF l_debug_on THEN
2100: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling Adjust_Planned_Flag');
2101: END IF;
2102:
2103: WSH_NEW_DELIVERY_ACTIONS.Adjust_Planned_Flag(
2104: p_delivery_ids => l_delivery_ids,
2106: p_force_appending_limit => 'Y',
2107: p_call_lcss => 'N',
2108: x_return_status => l_return_status);
2109: IF l_debug_on THEN
2110: WSH_DEBUG_SV.logmsg(l_module_name, 'Return status from Calling Adjust_Planned_Flag:'||l_return_status);
2111: END IF;
2112:
2113: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2114: l_warning_num := l_warning_num + 1;
2126: l_batch_rec.actual_departure_date :=
2127: FND_DATE.canonical_to_date(p_actual_departure_date);
2128: --
2129: IF l_debug_on THEN
2130: WSH_DEBUG_SV.log(l_module_name, 'Non Picking Flag',
2131: l_batch_rec.non_picking_flag);
2132: WSH_DEBUG_SV.log(l_module_name, 'Ship Confirm Rule ID',
2133: l_batch_rec.ship_confirm_rule_id);
2134: WSH_DEBUG_SV.log(l_module_name, 'Actual Departure Date',
2128: --
2129: IF l_debug_on THEN
2130: WSH_DEBUG_SV.log(l_module_name, 'Non Picking Flag',
2131: l_batch_rec.non_picking_flag);
2132: WSH_DEBUG_SV.log(l_module_name, 'Ship Confirm Rule ID',
2133: l_batch_rec.ship_confirm_rule_id);
2134: WSH_DEBUG_SV.log(l_module_name, 'Actual Departure Date',
2135: l_batch_rec.actual_departure_date);
2136: --
2130: WSH_DEBUG_SV.log(l_module_name, 'Non Picking Flag',
2131: l_batch_rec.non_picking_flag);
2132: WSH_DEBUG_SV.log(l_module_name, 'Ship Confirm Rule ID',
2133: l_batch_rec.ship_confirm_rule_id);
2134: WSH_DEBUG_SV.log(l_module_name, 'Actual Departure Date',
2135: l_batch_rec.actual_departure_date);
2136: --
2137: IF l_batch_rec.actual_departure_date IS NULL THEN
2138: wsh_debug_sv.logmsg(l_module_name,
2134: WSH_DEBUG_SV.log(l_module_name, 'Actual Departure Date',
2135: l_batch_rec.actual_departure_date);
2136: --
2137: IF l_batch_rec.actual_departure_date IS NULL THEN
2138: wsh_debug_sv.logmsg(l_module_name,
2139: 'NULL input parameter p_actual_departure_date');
2140: ELSE
2141: wsh_debug_sv.logmsg(l_module_name,
2142: 'NOT NULL input parameter p_actual_departure_date');
2137: IF l_batch_rec.actual_departure_date IS NULL THEN
2138: wsh_debug_sv.logmsg(l_module_name,
2139: 'NULL input parameter p_actual_departure_date');
2140: ELSE
2141: wsh_debug_sv.logmsg(l_module_name,
2142: 'NOT NULL input parameter p_actual_departure_date');
2143: END IF;
2144: --
2145: END IF;
2145: END IF;
2146:
2147: -- bug 5117876, direct insert into wsh_picking_batches table is replaced
2148: IF l_debug_on THEN
2149: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PICKING_BATCHES_PKG.INSERT_ROW',WSH_DEBUG_SV.C_PROC_LEVEL);
2150: END IF;
2151:
2152: WSH_PICKING_BATCHES_PKG.Insert_Row(
2153: X_Rowid => l_rowid,
2244:
2245: WSH_UTIL_CORE.PrintMsg('Ship Confirm Batch Name: ' || l_batch_rec.name);
2246:
2247: IF l_debug_on THEN
2248: WSH_DEBUG_SV.logmsg(l_module_name, 'Deliveries selected to be ship confirmed are: ');
2249: FOR k in 1 .. l_selected_del_tab.count LOOP
2250: WSH_DEBUG_SV.logmsg(l_module_name, ' delivery: ' || l_selected_del_tab(k).delivery_id);
2251: END LOOP;
2252: END IF;
2246:
2247: IF l_debug_on THEN
2248: WSH_DEBUG_SV.logmsg(l_module_name, 'Deliveries selected to be ship confirmed are: ');
2249: FOR k in 1 .. l_selected_del_tab.count LOOP
2250: WSH_DEBUG_SV.logmsg(l_module_name, ' delivery: ' || l_selected_del_tab(k).delivery_id);
2251: END LOOP;
2252: END IF;
2253:
2254: Ship_Confirm_Batch(
2287:
2288: errbuf := 'Automated Ship Confirm is completed successfully';
2289: retcode := '0';
2290: IF l_debug_on THEN
2291: WSH_DEBUG_SV.pop(l_module_name);
2292: END IF;
2293:
2294:
2295: EXCEPTION
2308: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_completion_status,'');
2309: errbuf := 'Automated Ship Confirm is completed with warning';
2310: retcode := '1';
2311: IF l_debug_on THEN
2312: WSH_DEBUG_SV.pop(l_module_name);
2313: END IF;
2314:
2315: WHEN WSH_MISSING_SC_RULE THEN
2316: l_completion_status := 'WARNING';
2318: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_completion_status,'');
2319: errbuf := 'Automated Ship Confirm is completed with warning';
2320: retcode := '1';
2321: IF l_debug_on THEN
2322: WSH_DEBUG_SV.pop(l_module_name);
2323: END IF;
2324:
2325: WHEN WSH_MISSING_SC_BATCH_PREFIX THEN
2326: l_completion_status := 'WARNING';
2328: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_completion_status,'');
2329: errbuf := 'Automated Ship Confirm is completed with warning';
2330: retcode := '1';
2331: IF l_debug_on THEN
2332: WSH_DEBUG_SV.pop(l_module_name);
2333: END IF;
2334:
2335: WHEN WSH_NO_FUTURE_SHIPDATE THEN
2336: l_completion_status := 'WARNING';
2338: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_completion_status,'');
2339: errbuf := 'Automated Ship Confirm is completed with warning';
2340: retcode := '1';
2341: IF l_debug_on THEN
2342: WSH_DEBUG_SV.pop(l_module_name);
2343: END IF;
2344:
2345: WHEN WSH_SELECT_ERR THEN
2346: l_completion_status := 'WARNING';
2348: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_completion_status,'');
2349: errbuf := 'Automated Ship Confirm is completed with warning';
2350: retcode := '1';
2351: IF l_debug_on THEN
2352: WSH_DEBUG_SV.pop(l_module_name);
2353: END IF;
2354:
2355: WHEN WSH_SC_BATCH_ERR THEN
2356: l_completion_status := 'WARNING';
2358: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_completion_status,'');
2359: errbuf := 'Automated Ship Confirm is completed with warning';
2360: retcode := '1';
2361: IF l_debug_on THEN
2362: WSH_DEBUG_SV.pop(l_module_name);
2363: END IF;
2364:
2365: WHEN OTHERS THEN
2366: l_completion_status := 'ERROR';
2371: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_completion_status,'');
2372: errbuf := 'Automated Ship Confirm failed with unexpected error';
2373: retcode := '2';
2374: IF l_debug_on THEN
2375: WSH_DEBUG_SV.pop(l_module_name);
2376: END IF;
2377:
2378: END CONFIRM_DELIVERY_SRS;
2379:
2473: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2474: --
2475: IF l_debug_on IS NULL
2476: THEN
2477: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2478: END IF;
2479: --
2480: IF l_debug_on THEN
2481: WSH_DEBUG_SV.push(l_module_name);
2477: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2478: END IF;
2479: --
2480: IF l_debug_on THEN
2481: WSH_DEBUG_SV.push(l_module_name);
2482: END IF;
2483:
2484: l_completion_status := 'NORMAL';
2485:
2549: l_batch_rec.autopack_flag := 'Y';
2550: l_batch_rec.autopack_level := l_auto_pack_level;
2551: --
2552: IF l_debug_on THEN
2553: WSH_DEBUG_SV.log(l_module_name, 'Non Picking Flag', l_batch_rec.non_picking_flag);
2554: WSH_DEBUG_SV.log(l_module_name, 'Batch Name', l_batch_rec.name);
2555: WSH_DEBUG_SV.log(l_module_name, 'Auto Pack Flag', l_batch_rec.autopack_flag);
2556: WSH_DEBUG_SV.log(l_module_name, 'Auto Pack Level', l_batch_rec.autopack_level);
2557: END IF;
2550: l_batch_rec.autopack_level := l_auto_pack_level;
2551: --
2552: IF l_debug_on THEN
2553: WSH_DEBUG_SV.log(l_module_name, 'Non Picking Flag', l_batch_rec.non_picking_flag);
2554: WSH_DEBUG_SV.log(l_module_name, 'Batch Name', l_batch_rec.name);
2555: WSH_DEBUG_SV.log(l_module_name, 'Auto Pack Flag', l_batch_rec.autopack_flag);
2556: WSH_DEBUG_SV.log(l_module_name, 'Auto Pack Level', l_batch_rec.autopack_level);
2557: END IF;
2558:
2551: --
2552: IF l_debug_on THEN
2553: WSH_DEBUG_SV.log(l_module_name, 'Non Picking Flag', l_batch_rec.non_picking_flag);
2554: WSH_DEBUG_SV.log(l_module_name, 'Batch Name', l_batch_rec.name);
2555: WSH_DEBUG_SV.log(l_module_name, 'Auto Pack Flag', l_batch_rec.autopack_flag);
2556: WSH_DEBUG_SV.log(l_module_name, 'Auto Pack Level', l_batch_rec.autopack_level);
2557: END IF;
2558:
2559: -- bug 5117876, direct insert into wsh_picking_batches table is replaced
2552: IF l_debug_on THEN
2553: WSH_DEBUG_SV.log(l_module_name, 'Non Picking Flag', l_batch_rec.non_picking_flag);
2554: WSH_DEBUG_SV.log(l_module_name, 'Batch Name', l_batch_rec.name);
2555: WSH_DEBUG_SV.log(l_module_name, 'Auto Pack Flag', l_batch_rec.autopack_flag);
2556: WSH_DEBUG_SV.log(l_module_name, 'Auto Pack Level', l_batch_rec.autopack_level);
2557: END IF;
2558:
2559: -- bug 5117876, direct insert into wsh_picking_batches table is replaced
2560: IF l_debug_on THEN
2557: END IF;
2558:
2559: -- bug 5117876, direct insert into wsh_picking_batches table is replaced
2560: IF l_debug_on THEN
2561: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PICKING_BATCHES_PKG.INSERT_ROW',WSH_DEBUG_SV.C_PROC_LEVEL);
2562: END IF;
2563:
2564: WSH_PICKING_BATCHES_PKG.Insert_Row(
2565: X_Rowid => l_rowid,
2654:
2655: WSH_UTIL_CORE.PrintMsg('Auto Pack Batch Name: ' || l_batch_rec.name);
2656:
2657: IF l_debug_on THEN
2658: WSH_DEBUG_SV.logmsg(l_module_name, 'Deliveries selected to be auto packed are: ');
2659: FOR k in 1 .. l_selected_del_tab.count LOOP
2660: WSH_DEBUG_SV.logmsg(l_module_name, ' delivery: ' || l_selected_del_tab(k).delivery_id);
2661: END LOOP;
2662: END IF;
2656:
2657: IF l_debug_on THEN
2658: WSH_DEBUG_SV.logmsg(l_module_name, 'Deliveries selected to be auto packed are: ');
2659: FOR k in 1 .. l_selected_del_tab.count LOOP
2660: WSH_DEBUG_SV.logmsg(l_module_name, ' delivery: ' || l_selected_del_tab(k).delivery_id);
2661: END LOOP;
2662: END IF;
2663:
2664: Auto_Pack_Deliveries_Batch(
2671: x_return_status => l_return_status,
2672: p_commit => FND_API.G_TRUE); -- BugFix #4001135
2673:
2674: IF l_debug_on THEN
2675: WSH_DEBUG_SV.logmsg(l_module_name, 'Deliveries successfully packed are: ');
2676: FOR k in 1 .. l_packed_del_tab.count LOOP
2677: WSH_DEBUG_SV.logmsg(l_module_name, ' delivery: ' || l_packed_del_tab(k).delivery_id);
2678: END LOOP;
2679: END IF;
2673:
2674: IF l_debug_on THEN
2675: WSH_DEBUG_SV.logmsg(l_module_name, 'Deliveries successfully packed are: ');
2676: FOR k in 1 .. l_packed_del_tab.count LOOP
2677: WSH_DEBUG_SV.logmsg(l_module_name, ' delivery: ' || l_packed_del_tab(k).delivery_id);
2678: END LOOP;
2679: END IF;
2680:
2681: WSH_UTIL_CORE.PrintDateTime;
2704: errbuf := 'Auto Pack Deliveries is completed successfully';
2705: retcode := '0';
2706:
2707: IF l_debug_on THEN
2708: WSH_DEBUG_SV.pop(l_module_name);
2709: END IF;
2710:
2711:
2712: EXCEPTION
2717: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_completion_status,'');
2718: errbuf := 'Auto Pack Deliveries is completed with warning';
2719: retcode := '1';
2720: IF l_debug_on THEN
2721: WSH_DEBUG_SV.pop(l_module_name);
2722: END IF;
2723:
2724: WHEN WSH_PK_BATCH_ERR THEN
2725: l_completion_status := 'WARNING';
2727: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_completion_status,'');
2728: errbuf := 'Auto Pack Deliveries is completed with warning';
2729: retcode := '1';
2730: IF l_debug_on THEN
2731: WSH_DEBUG_SV.pop(l_module_name);
2732: END IF;
2733:
2734: WHEN WSH_SELECT_ERR THEN
2735: l_completion_status := 'WARNING';
2737: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_completion_status,'');
2738: errbuf := 'Auto Pack Deliveries is completed with warning';
2739: retcode := '1';
2740: IF l_debug_on THEN
2741: WSH_DEBUG_SV.pop(l_module_name);
2742: END IF;
2743:
2744: WHEN OTHERS THEN
2745: l_completion_status := 'ERROR';
2750: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_completion_status,'');
2751: errbuf := 'Auto Pack Deliveries failed with unexpected error';
2752: retcode := '2';
2753: IF l_debug_on THEN
2754: WSH_DEBUG_SV.pop(l_module_name);
2755: END IF;
2756: END Auto_Pack_Deliveries_SRS;
2757:
2758:
2785: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2786: --
2787: IF l_debug_on IS NULL
2788: THEN
2789: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2790: END IF;
2791: --
2792: IF l_debug_on THEN
2793: WSH_DEBUG_SV.push(l_module_name);
2789: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2790: END IF;
2791: --
2792: IF l_debug_on THEN
2793: WSH_DEBUG_SV.push(l_module_name);
2794: --
2795: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
2796: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2797: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
2791: --
2792: IF l_debug_on THEN
2793: WSH_DEBUG_SV.push(l_module_name);
2794: --
2795: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
2796: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2797: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
2798: WSH_DEBUG_SV.log(l_module_name,'P_EXCEPTION_LOCATION_ID',P_EXCEPTION_LOCATION_ID);
2799: WSH_DEBUG_SV.log(l_module_name,'P_ERROR_STATUS',P_ERROR_STATUS);
2792: IF l_debug_on THEN
2793: WSH_DEBUG_SV.push(l_module_name);
2794: --
2795: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
2796: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2797: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
2798: WSH_DEBUG_SV.log(l_module_name,'P_EXCEPTION_LOCATION_ID',P_EXCEPTION_LOCATION_ID);
2799: WSH_DEBUG_SV.log(l_module_name,'P_ERROR_STATUS',P_ERROR_STATUS);
2800: END IF;
2793: WSH_DEBUG_SV.push(l_module_name);
2794: --
2795: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
2796: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2797: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
2798: WSH_DEBUG_SV.log(l_module_name,'P_EXCEPTION_LOCATION_ID',P_EXCEPTION_LOCATION_ID);
2799: WSH_DEBUG_SV.log(l_module_name,'P_ERROR_STATUS',P_ERROR_STATUS);
2800: END IF;
2801:
2794: --
2795: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
2796: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2797: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
2798: WSH_DEBUG_SV.log(l_module_name,'P_EXCEPTION_LOCATION_ID',P_EXCEPTION_LOCATION_ID);
2799: WSH_DEBUG_SV.log(l_module_name,'P_ERROR_STATUS',P_ERROR_STATUS);
2800: END IF;
2801:
2802: IF p_batch_id IS NULL THEN
2795: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
2796: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2797: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
2798: WSH_DEBUG_SV.log(l_module_name,'P_EXCEPTION_LOCATION_ID',P_EXCEPTION_LOCATION_ID);
2799: WSH_DEBUG_SV.log(l_module_name,'P_ERROR_STATUS',P_ERROR_STATUS);
2800: END IF;
2801:
2802: IF p_batch_id IS NULL THEN
2803: RETURN;
2820: l_error_message := p_error_status;
2821:
2822: c := FND_MSG_PUB.count_msg;
2823: IF l_debug_on THEN
2824: WSH_DEBUG_SV.logmsg(l_module_name,'COUNT--',c);
2825: END IF;
2826: FOR i in 1..c LOOP
2827: FND_MSG_PUB.get(p_encoded => FND_API.G_FALSE,
2828: p_msg_index => i,
2851: END IF;
2852: END LOOP;
2853: --
2854: IF l_debug_on THEN
2855: WSH_DEBUG_SV.pop(l_module_name);
2856: END IF;
2857: --
2858:
2859:
2861: WHEN OTHERS THEN
2862: WSH_UTIL_CORE.Default_Handler('WSH_BATCH_PROCESS.log_batch_messages');
2863: --
2864: IF l_debug_on THEN
2865: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION: OTHERS');
2866: END IF;
2867: --
2868:
2869: END log_batch_messages;
2942: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2943: --
2944: IF l_debug_on IS NULL
2945: THEN
2946: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2947: END IF;
2948: --
2949: IF l_debug_on THEN
2950: WSH_DEBUG_SV.push(l_module_name);
2946: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2947: END IF;
2948: --
2949: IF l_debug_on THEN
2950: WSH_DEBUG_SV.push(l_module_name);
2951: END IF;
2952: -- set default return status to SUCCESS
2953: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2954: -- clear up x_selected_det_tbl table
2971:
2972: ELSE
2973: -- invalud value in p_autocreate_deliveries
2974: IF l_debug_on THEN
2975: WSH_DEBUG_SV.logmsg(l_module_name, ' No delivery lines fetched because p_autocreate_deliveries is: '||p_autocreate_deliveries);
2976: WSH_DEBUG_SV.pop(l_module_name);
2977: END IF;
2978: return;
2979: END IF;
2972: ELSE
2973: -- invalud value in p_autocreate_deliveries
2974: IF l_debug_on THEN
2975: WSH_DEBUG_SV.logmsg(l_module_name, ' No delivery lines fetched because p_autocreate_deliveries is: '||p_autocreate_deliveries);
2976: WSH_DEBUG_SV.pop(l_module_name);
2977: END IF;
2978: return;
2979: END IF;
2980:
3162: x_client_code => l_client_code,
3163: x_return_status => x_return_status);
3164: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3165: IF l_debug_on THEN
3166: WSH_DEBUG_SV.logmsg(l_module_name, 'Error occured in WMS_DEPLOY.GET_CLIENT_DETAILS');
3167: RETURN;
3168: END IF;
3169: END IF;
3170: FND_MESSAGE.SET_NAME('WSH', 'WSH_CLIENT');
3195: END LOOP;
3196: END IF;
3197:
3198: IF l_debug_on THEN
3199: WSH_DEBUG_SV.logmsg(l_module_name,'Bind variables: ');
3200: WSH_DEBUG_SV.logmsg(l_module_name,'========================');
3201: WSH_DEBUG_SV.log(l_module_name,' x_organization_id', to_char(p_select_criteria.organization_id));
3202: WSH_DEBUG_SV.log(l_module_name,' x_scheduled_ship_date_lo', to_char(l_scheduled_ship_date_lo, 'DD-MON-YYYY HH24:MI:SS'));
3203: WSH_DEBUG_SV.log(l_module_name,' x_scheduled_ship_date_hi', to_char(l_scheduled_ship_date_hi, 'DD-MON-YYYY HH24:MI:SS'));
3196: END IF;
3197:
3198: IF l_debug_on THEN
3199: WSH_DEBUG_SV.logmsg(l_module_name,'Bind variables: ');
3200: WSH_DEBUG_SV.logmsg(l_module_name,'========================');
3201: WSH_DEBUG_SV.log(l_module_name,' x_organization_id', to_char(p_select_criteria.organization_id));
3202: WSH_DEBUG_SV.log(l_module_name,' x_scheduled_ship_date_lo', to_char(l_scheduled_ship_date_lo, 'DD-MON-YYYY HH24:MI:SS'));
3203: WSH_DEBUG_SV.log(l_module_name,' x_scheduled_ship_date_hi', to_char(l_scheduled_ship_date_hi, 'DD-MON-YYYY HH24:MI:SS'));
3204: WSH_DEBUG_SV.log(l_module_name,' x_source_code', p_select_criteria.source_code);
3197:
3198: IF l_debug_on THEN
3199: WSH_DEBUG_SV.logmsg(l_module_name,'Bind variables: ');
3200: WSH_DEBUG_SV.logmsg(l_module_name,'========================');
3201: WSH_DEBUG_SV.log(l_module_name,' x_organization_id', to_char(p_select_criteria.organization_id));
3202: WSH_DEBUG_SV.log(l_module_name,' x_scheduled_ship_date_lo', to_char(l_scheduled_ship_date_lo, 'DD-MON-YYYY HH24:MI:SS'));
3203: WSH_DEBUG_SV.log(l_module_name,' x_scheduled_ship_date_hi', to_char(l_scheduled_ship_date_hi, 'DD-MON-YYYY HH24:MI:SS'));
3204: WSH_DEBUG_SV.log(l_module_name,' x_source_code', p_select_criteria.source_code);
3205: WSH_DEBUG_SV.log(l_module_name,' x_ship_to_loc_id', to_char(p_select_criteria.ship_to_loc_id));
3198: IF l_debug_on THEN
3199: WSH_DEBUG_SV.logmsg(l_module_name,'Bind variables: ');
3200: WSH_DEBUG_SV.logmsg(l_module_name,'========================');
3201: WSH_DEBUG_SV.log(l_module_name,' x_organization_id', to_char(p_select_criteria.organization_id));
3202: WSH_DEBUG_SV.log(l_module_name,' x_scheduled_ship_date_lo', to_char(l_scheduled_ship_date_lo, 'DD-MON-YYYY HH24:MI:SS'));
3203: WSH_DEBUG_SV.log(l_module_name,' x_scheduled_ship_date_hi', to_char(l_scheduled_ship_date_hi, 'DD-MON-YYYY HH24:MI:SS'));
3204: WSH_DEBUG_SV.log(l_module_name,' x_source_code', p_select_criteria.source_code);
3205: WSH_DEBUG_SV.log(l_module_name,' x_ship_to_loc_id', to_char(p_select_criteria.ship_to_loc_id));
3206: WSH_DEBUG_SV.log(l_module_name,' x_customer_id', substr(p_select_criteria.customer_id,3)); --RTV changes
3199: WSH_DEBUG_SV.logmsg(l_module_name,'Bind variables: ');
3200: WSH_DEBUG_SV.logmsg(l_module_name,'========================');
3201: WSH_DEBUG_SV.log(l_module_name,' x_organization_id', to_char(p_select_criteria.organization_id));
3202: WSH_DEBUG_SV.log(l_module_name,' x_scheduled_ship_date_lo', to_char(l_scheduled_ship_date_lo, 'DD-MON-YYYY HH24:MI:SS'));
3203: WSH_DEBUG_SV.log(l_module_name,' x_scheduled_ship_date_hi', to_char(l_scheduled_ship_date_hi, 'DD-MON-YYYY HH24:MI:SS'));
3204: WSH_DEBUG_SV.log(l_module_name,' x_source_code', p_select_criteria.source_code);
3205: WSH_DEBUG_SV.log(l_module_name,' x_ship_to_loc_id', to_char(p_select_criteria.ship_to_loc_id));
3206: WSH_DEBUG_SV.log(l_module_name,' x_customer_id', substr(p_select_criteria.customer_id,3)); --RTV changes
3207: WSH_DEBUG_SV.log(l_module_name,' x_ship_method_code', p_select_criteria.ship_method_code);
3200: WSH_DEBUG_SV.logmsg(l_module_name,'========================');
3201: WSH_DEBUG_SV.log(l_module_name,' x_organization_id', to_char(p_select_criteria.organization_id));
3202: WSH_DEBUG_SV.log(l_module_name,' x_scheduled_ship_date_lo', to_char(l_scheduled_ship_date_lo, 'DD-MON-YYYY HH24:MI:SS'));
3203: WSH_DEBUG_SV.log(l_module_name,' x_scheduled_ship_date_hi', to_char(l_scheduled_ship_date_hi, 'DD-MON-YYYY HH24:MI:SS'));
3204: WSH_DEBUG_SV.log(l_module_name,' x_source_code', p_select_criteria.source_code);
3205: WSH_DEBUG_SV.log(l_module_name,' x_ship_to_loc_id', to_char(p_select_criteria.ship_to_loc_id));
3206: WSH_DEBUG_SV.log(l_module_name,' x_customer_id', substr(p_select_criteria.customer_id,3)); --RTV changes
3207: WSH_DEBUG_SV.log(l_module_name,' x_ship_method_code', p_select_criteria.ship_method_code);
3208: WSH_DEBUG_SV.log(l_module_name,' x_released_status', p_select_criteria.delivery_lines_status);
3201: WSH_DEBUG_SV.log(l_module_name,' x_organization_id', to_char(p_select_criteria.organization_id));
3202: WSH_DEBUG_SV.log(l_module_name,' x_scheduled_ship_date_lo', to_char(l_scheduled_ship_date_lo, 'DD-MON-YYYY HH24:MI:SS'));
3203: WSH_DEBUG_SV.log(l_module_name,' x_scheduled_ship_date_hi', to_char(l_scheduled_ship_date_hi, 'DD-MON-YYYY HH24:MI:SS'));
3204: WSH_DEBUG_SV.log(l_module_name,' x_source_code', p_select_criteria.source_code);
3205: WSH_DEBUG_SV.log(l_module_name,' x_ship_to_loc_id', to_char(p_select_criteria.ship_to_loc_id));
3206: WSH_DEBUG_SV.log(l_module_name,' x_customer_id', substr(p_select_criteria.customer_id,3)); --RTV changes
3207: WSH_DEBUG_SV.log(l_module_name,' x_ship_method_code', p_select_criteria.ship_method_code);
3208: WSH_DEBUG_SV.log(l_module_name,' x_released_status', p_select_criteria.delivery_lines_status);
3209: WSH_DEBUG_SV.log(l_module_name,' x_client_id', p_select_criteria.client_id); -- LSP PROJECT
3202: WSH_DEBUG_SV.log(l_module_name,' x_scheduled_ship_date_lo', to_char(l_scheduled_ship_date_lo, 'DD-MON-YYYY HH24:MI:SS'));
3203: WSH_DEBUG_SV.log(l_module_name,' x_scheduled_ship_date_hi', to_char(l_scheduled_ship_date_hi, 'DD-MON-YYYY HH24:MI:SS'));
3204: WSH_DEBUG_SV.log(l_module_name,' x_source_code', p_select_criteria.source_code);
3205: WSH_DEBUG_SV.log(l_module_name,' x_ship_to_loc_id', to_char(p_select_criteria.ship_to_loc_id));
3206: WSH_DEBUG_SV.log(l_module_name,' x_customer_id', substr(p_select_criteria.customer_id,3)); --RTV changes
3207: WSH_DEBUG_SV.log(l_module_name,' x_ship_method_code', p_select_criteria.ship_method_code);
3208: WSH_DEBUG_SV.log(l_module_name,' x_released_status', p_select_criteria.delivery_lines_status);
3209: WSH_DEBUG_SV.log(l_module_name,' x_client_id', p_select_criteria.client_id); -- LSP PROJECT
3210: WSH_DEBUG_SV.logmsg(l_module_name,'========================');
3203: WSH_DEBUG_SV.log(l_module_name,' x_scheduled_ship_date_hi', to_char(l_scheduled_ship_date_hi, 'DD-MON-YYYY HH24:MI:SS'));
3204: WSH_DEBUG_SV.log(l_module_name,' x_source_code', p_select_criteria.source_code);
3205: WSH_DEBUG_SV.log(l_module_name,' x_ship_to_loc_id', to_char(p_select_criteria.ship_to_loc_id));
3206: WSH_DEBUG_SV.log(l_module_name,' x_customer_id', substr(p_select_criteria.customer_id,3)); --RTV changes
3207: WSH_DEBUG_SV.log(l_module_name,' x_ship_method_code', p_select_criteria.ship_method_code);
3208: WSH_DEBUG_SV.log(l_module_name,' x_released_status', p_select_criteria.delivery_lines_status);
3209: WSH_DEBUG_SV.log(l_module_name,' x_client_id', p_select_criteria.client_id); -- LSP PROJECT
3210: WSH_DEBUG_SV.logmsg(l_module_name,'========================');
3211: END IF;
3204: WSH_DEBUG_SV.log(l_module_name,' x_source_code', p_select_criteria.source_code);
3205: WSH_DEBUG_SV.log(l_module_name,' x_ship_to_loc_id', to_char(p_select_criteria.ship_to_loc_id));
3206: WSH_DEBUG_SV.log(l_module_name,' x_customer_id', substr(p_select_criteria.customer_id,3)); --RTV changes
3207: WSH_DEBUG_SV.log(l_module_name,' x_ship_method_code', p_select_criteria.ship_method_code);
3208: WSH_DEBUG_SV.log(l_module_name,' x_released_status', p_select_criteria.delivery_lines_status);
3209: WSH_DEBUG_SV.log(l_module_name,' x_client_id', p_select_criteria.client_id); -- LSP PROJECT
3210: WSH_DEBUG_SV.logmsg(l_module_name,'========================');
3211: END IF;
3212:
3205: WSH_DEBUG_SV.log(l_module_name,' x_ship_to_loc_id', to_char(p_select_criteria.ship_to_loc_id));
3206: WSH_DEBUG_SV.log(l_module_name,' x_customer_id', substr(p_select_criteria.customer_id,3)); --RTV changes
3207: WSH_DEBUG_SV.log(l_module_name,' x_ship_method_code', p_select_criteria.ship_method_code);
3208: WSH_DEBUG_SV.log(l_module_name,' x_released_status', p_select_criteria.delivery_lines_status);
3209: WSH_DEBUG_SV.log(l_module_name,' x_client_id', p_select_criteria.client_id); -- LSP PROJECT
3210: WSH_DEBUG_SV.logmsg(l_module_name,'========================');
3211: END IF;
3212:
3213: -- open cursor
3206: WSH_DEBUG_SV.log(l_module_name,' x_customer_id', substr(p_select_criteria.customer_id,3)); --RTV changes
3207: WSH_DEBUG_SV.log(l_module_name,' x_ship_method_code', p_select_criteria.ship_method_code);
3208: WSH_DEBUG_SV.log(l_module_name,' x_released_status', p_select_criteria.delivery_lines_status);
3209: WSH_DEBUG_SV.log(l_module_name,' x_client_id', p_select_criteria.client_id); -- LSP PROJECT
3210: WSH_DEBUG_SV.logmsg(l_module_name,'========================');
3211: END IF;
3212:
3213: -- open cursor
3214: v_CursorID := DBMS_SQL.Open_Cursor;
3229: l_line_status := p_select_criteria.delivery_lines_status;
3230: END IF;
3231: --
3232: IF l_debug_on THEN
3233: WSH_DEBUG_SV.log(l_module_name, ' l_line_status', l_line_status);
3234: WSH_DEBUG_SV.log(l_module_name, 'p_select_criteria.delivery_lines_status',
3235: p_select_criteria.delivery_lines_status);
3236: END IF;
3237: --
3230: END IF;
3231: --
3232: IF l_debug_on THEN
3233: WSH_DEBUG_SV.log(l_module_name, ' l_line_status', l_line_status);
3234: WSH_DEBUG_SV.log(l_module_name, 'p_select_criteria.delivery_lines_status',
3235: p_select_criteria.delivery_lines_status);
3236: END IF;
3237: --
3238: IF p_select_criteria.delivery_lines_status IS NOT NULL AND
3284: Loop
3285: l_records_fetched := dbms_sql.fetch_rows(v_CursorID) ;
3286: dbms_sql.column_value(v_CursorID,1,v_delivery_detail_id_tbl);
3287: IF l_debug_on THEN
3288: WSH_DEBUG_SV.logmsg(l_module_name,' Records Fetched in this pass '|| l_records_fetched);
3289: WSH_DEBUG_SV.logmsg(l_module_name,' l_fetch_count '|| l_fetch_count);
3290: WSH_DEBUG_SV.logmsg(l_module_name,' Record count in v_delivery_detail_id_tbl '||
3291: v_delivery_detail_id_tbl.count);
3292: END IF;
3285: l_records_fetched := dbms_sql.fetch_rows(v_CursorID) ;
3286: dbms_sql.column_value(v_CursorID,1,v_delivery_detail_id_tbl);
3287: IF l_debug_on THEN
3288: WSH_DEBUG_SV.logmsg(l_module_name,' Records Fetched in this pass '|| l_records_fetched);
3289: WSH_DEBUG_SV.logmsg(l_module_name,' l_fetch_count '|| l_fetch_count);
3290: WSH_DEBUG_SV.logmsg(l_module_name,' Record count in v_delivery_detail_id_tbl '||
3291: v_delivery_detail_id_tbl.count);
3292: END IF;
3293: Exit when l_records_fetched <> l_fetch_count ;
3286: dbms_sql.column_value(v_CursorID,1,v_delivery_detail_id_tbl);
3287: IF l_debug_on THEN
3288: WSH_DEBUG_SV.logmsg(l_module_name,' Records Fetched in this pass '|| l_records_fetched);
3289: WSH_DEBUG_SV.logmsg(l_module_name,' l_fetch_count '|| l_fetch_count);
3290: WSH_DEBUG_SV.logmsg(l_module_name,' Record count in v_delivery_detail_id_tbl '||
3291: v_delivery_detail_id_tbl.count);
3292: END IF;
3293: Exit when l_records_fetched <> l_fetch_count ;
3294: End Loop;
3297: For i in 1..v_delivery_detail_id_tbl.count
3298: loop
3299: x_selected_det_tbl(i) := v_delivery_detail_id_tbl(i);
3300: If l_debug_on THEN
3301: WSH_DEBUG_SV.logmsg(l_module_name,' Fetched delivery line '|| to_char(x_selected_det_tbl(i)));
3302: End If;
3303: End Loop;
3304: End If;
3305:
3304: End If;
3305:
3306: IF v_cursorID <> 0 THEN
3307: If l_debug_on THEN
3308: WSH_DEBUG_SV.logmsg(l_module_name,' Before closing cursor = '||v_cursorID );
3309: End If;
3310:
3311: DBMS_SQL.Close_Cursor(v_cursorID);
3312:
3310:
3311: DBMS_SQL.Close_Cursor(v_cursorID);
3312:
3313: If l_debug_on THEN
3314: WSH_DEBUG_SV.logmsg(l_module_name,' After closing cursor = '||v_cursorID );
3315: End If;
3316: END IF;
3317: -- done fetching
3318: -- print debug messages
3317: -- done fetching
3318: -- print debug messages
3319:
3320: IF l_debug_on THEN
3321: WSH_DEBUG_SV.logmsg(l_module_name, to_char(x_selected_det_tbl.count)||' delivery lines fetched to be processed');
3322: WSH_DEBUG_SV.pop(l_module_name);
3323: END IF;
3324:
3325: EXCEPTION
3318: -- print debug messages
3319:
3320: IF l_debug_on THEN
3321: WSH_DEBUG_SV.logmsg(l_module_name, to_char(x_selected_det_tbl.count)||' delivery lines fetched to be processed');
3322: WSH_DEBUG_SV.pop(l_module_name);
3323: END IF;
3324:
3325: EXCEPTION
3326:
3331: END IF;
3332: wsh_util_core.default_handler('WSH_BATCH_PROCESS.Select_Deliveries');
3333: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3334: IF l_debug_on THEN
3335: WSH_DEBUG_SV.pop(l_module_name);
3336: END IF;
3337:
3338: END Select_Delivery_Lines;
3339:
3400: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3401: --
3402: IF l_debug_on IS NULL
3403: THEN
3404: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3405: END IF;
3406: --
3407: IF l_debug_on THEN
3408: WSH_DEBUG_SV.push(l_module_name);
3404: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3405: END IF;
3406: --
3407: IF l_debug_on THEN
3408: WSH_DEBUG_SV.push(l_module_name);
3409: END IF;
3410:
3411: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3412: x_appended_det_num := 0;
3416: l_unappended_det_tbl.delete;
3417:
3418: -- print input parameter if debug is turned on
3419: IF l_debug_on THEN
3420: WSH_DEBUG_SV.logmsg(l_module_name,'Input Parameters:',WSH_DEBUG_SV.C_PROC_LEVEL);
3421: WSH_DEBUG_SV.logmsg(l_module_name,' p_append_flag: '|| p_append_flag,WSH_DEBUG_SV.C_PROC_LEVEL);
3422: WSH_DEBUG_SV.logmsg(l_module_name,' p_ac_del_criteria: '|| p_ac_del_criteria,WSH_DEBUG_SV.C_PROC_LEVEL);
3423: END IF;
3424:
3417:
3418: -- print input parameter if debug is turned on
3419: IF l_debug_on THEN
3420: WSH_DEBUG_SV.logmsg(l_module_name,'Input Parameters:',WSH_DEBUG_SV.C_PROC_LEVEL);
3421: WSH_DEBUG_SV.logmsg(l_module_name,' p_append_flag: '|| p_append_flag,WSH_DEBUG_SV.C_PROC_LEVEL);
3422: WSH_DEBUG_SV.logmsg(l_module_name,' p_ac_del_criteria: '|| p_ac_del_criteria,WSH_DEBUG_SV.C_PROC_LEVEL);
3423: END IF;
3424:
3425: -- set append flag
3418: -- print input parameter if debug is turned on
3419: IF l_debug_on THEN
3420: WSH_DEBUG_SV.logmsg(l_module_name,'Input Parameters:',WSH_DEBUG_SV.C_PROC_LEVEL);
3421: WSH_DEBUG_SV.logmsg(l_module_name,' p_append_flag: '|| p_append_flag,WSH_DEBUG_SV.C_PROC_LEVEL);
3422: WSH_DEBUG_SV.logmsg(l_module_name,' p_ac_del_criteria: '|| p_ac_del_criteria,WSH_DEBUG_SV.C_PROC_LEVEL);
3423: END IF;
3424:
3425: -- set append flag
3426: IF p_append_flag = 'SP' THEN
3458: x_msg_count := l_msg_count;
3459: x_msg_data := l_msg_data;
3460:
3461: IF l_debug_on THEN
3462: WSH_DEBUG_SV.logmsg(l_module_name,'Return status from DELIVERY_DETAILS_UTILITIES.Append_to_Deliveries: '|| l_return_status,WSH_DEBUG_SV.C_PROC_LEVEL);
3463: END IF;
3464:
3465: -- handle return status from WSH_DELIVERY_DETAILS_UTILITIES.Append_to_Deliveries
3466: IF l_return_status in (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3472: END IF;
3473:
3474: IF l_unappended_det_tbl.count > 0 THEN
3475: IF l_debug_on THEN
3476: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTERFACE_GRP.DELIVERY_DETAIL_ACTION',WSH_DEBUG_SV.C_PROC_LEVEL);
3477: END IF;
3478:
3479: -- calling wsh_interface_grp.delivery_detail_action with action code 'AUTOCREATE-DEL'
3480: l_action_prms.caller := 'WSH_DEPS';
3492: p_action_prms => l_action_prms ,
3493: x_action_out_rec => l_action_out_rec);
3494:
3495: IF l_debug_on THEN
3496: WSH_DEBUG_SV.logmsg(l_module_name,'Return status from WSH_INTERFACE_GRP.DELIVERY_DETAIL_ACTION:'|| l_return_status,WSH_DEBUG_SV.C_PROC_LEVEL);
3497: END IF;
3498:
3499: x_autocreate_del_det_num := l_unappended_det_tbl.count;
3500: x_appended_del_num := l_appended_del_tbl.count;
3519: COMMIT;
3520:
3521:
3522: IF l_debug_on THEN
3523: WSH_DEBUG_SV.pop(l_module_name);
3524: END IF;
3525:
3526: EXCEPTION
3527:
3528: WHEN append_to_deliveries_failed THEN
3529: ROLLBACK TO BEFORE_PROCESS_DELIVERIES;
3530: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3531: IF l_debug_on THEN
3532: WSH_DEBUG_SV.logmsg(l_module_name,'APPEND_TO_DELIVERIES_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3533: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APPEND_TO_DELIVERIES_FAILED');
3534: END IF;
3535:
3536: WHEN autocreate_delivery_failed THEN
3529: ROLLBACK TO BEFORE_PROCESS_DELIVERIES;
3530: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3531: IF l_debug_on THEN
3532: WSH_DEBUG_SV.logmsg(l_module_name,'APPEND_TO_DELIVERIES_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3533: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APPEND_TO_DELIVERIES_FAILED');
3534: END IF;
3535:
3536: WHEN autocreate_delivery_failed THEN
3537: ROLLBACK TO BEFORE_PROCESS_DELIVERIES;
3536: WHEN autocreate_delivery_failed THEN
3537: ROLLBACK TO BEFORE_PROCESS_DELIVERIES;
3538: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3539: IF l_debug_on THEN
3540: WSH_DEBUG_SV.logmsg(l_module_name,'AUTOCREATE_DELIVERY_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3541: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:AUTOCREATE_DELIVERY_FAILED');
3542: END IF;
3543:
3544: WHEN OTHERS THEN
3537: ROLLBACK TO BEFORE_PROCESS_DELIVERIES;
3538: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3539: IF l_debug_on THEN
3540: WSH_DEBUG_SV.logmsg(l_module_name,'AUTOCREATE_DELIVERY_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3541: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:AUTOCREATE_DELIVERY_FAILED');
3542: END IF;
3543:
3544: WHEN OTHERS THEN
3545: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3553: p_encoded => FND_API.G_FALSE
3554: );
3555:
3556: IF l_debug_on THEN
3557: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3558: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3559: END IF;
3560:
3561: END Process_Delivery_Lines_Batch;
3554: );
3555:
3556: IF l_debug_on THEN
3557: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3558: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3559: END IF;
3560:
3561: END Process_Delivery_Lines_Batch;
3562:
3707: --
3708: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3709: --
3710: IF l_debug_on IS NULL THEN
3711: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3712: END IF;
3713: --
3714: IF l_debug_on THEN
3715: wsh_debug_sv.push(l_module_name);
3711: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3712: END IF;
3713: --
3714: IF l_debug_on THEN
3715: wsh_debug_sv.push(l_module_name);
3716: wsh_debug_sv.logmsg(l_module_name,'Input Parameters: ');
3717: wsh_debug_sv.logmsg(l_module_name,'=================================');
3718: wsh_debug_sv.log(l_module_name,'p_entity_type', p_entity_type);
3719: wsh_debug_sv.log(l_module_name,'p_append_deliveries',p_append_deliveries);
3712: END IF;
3713: --
3714: IF l_debug_on THEN
3715: wsh_debug_sv.push(l_module_name);
3716: wsh_debug_sv.logmsg(l_module_name,'Input Parameters: ');
3717: wsh_debug_sv.logmsg(l_module_name,'=================================');
3718: wsh_debug_sv.log(l_module_name,'p_entity_type', p_entity_type);
3719: wsh_debug_sv.log(l_module_name,'p_append_deliveries',p_append_deliveries);
3720: wsh_debug_sv.log(l_module_name,'p_deliveries_status',p_deliveries_status);
3713: --
3714: IF l_debug_on THEN
3715: wsh_debug_sv.push(l_module_name);
3716: wsh_debug_sv.logmsg(l_module_name,'Input Parameters: ');
3717: wsh_debug_sv.logmsg(l_module_name,'=================================');
3718: wsh_debug_sv.log(l_module_name,'p_entity_type', p_entity_type);
3719: wsh_debug_sv.log(l_module_name,'p_append_deliveries',p_append_deliveries);
3720: wsh_debug_sv.log(l_module_name,'p_deliveries_status',p_deliveries_status);
3721: wsh_debug_sv.log(l_module_name,'p_scheduled_ship_date_lo',p_scheduled_ship_date_lo);
3714: IF l_debug_on THEN
3715: wsh_debug_sv.push(l_module_name);
3716: wsh_debug_sv.logmsg(l_module_name,'Input Parameters: ');
3717: wsh_debug_sv.logmsg(l_module_name,'=================================');
3718: wsh_debug_sv.log(l_module_name,'p_entity_type', p_entity_type);
3719: wsh_debug_sv.log(l_module_name,'p_append_deliveries',p_append_deliveries);
3720: wsh_debug_sv.log(l_module_name,'p_deliveries_status',p_deliveries_status);
3721: wsh_debug_sv.log(l_module_name,'p_scheduled_ship_date_lo',p_scheduled_ship_date_lo);
3722: wsh_debug_sv.log(l_module_name,'p_scheduled_ship_date_hi',p_scheduled_ship_date_hi);
3715: wsh_debug_sv.push(l_module_name);
3716: wsh_debug_sv.logmsg(l_module_name,'Input Parameters: ');
3717: wsh_debug_sv.logmsg(l_module_name,'=================================');
3718: wsh_debug_sv.log(l_module_name,'p_entity_type', p_entity_type);
3719: wsh_debug_sv.log(l_module_name,'p_append_deliveries',p_append_deliveries);
3720: wsh_debug_sv.log(l_module_name,'p_deliveries_status',p_deliveries_status);
3721: wsh_debug_sv.log(l_module_name,'p_scheduled_ship_date_lo',p_scheduled_ship_date_lo);
3722: wsh_debug_sv.log(l_module_name,'p_scheduled_ship_date_hi',p_scheduled_ship_date_hi);
3723: wsh_debug_sv.log(l_module_name,'p_source_system',p_source_system);
3716: wsh_debug_sv.logmsg(l_module_name,'Input Parameters: ');
3717: wsh_debug_sv.logmsg(l_module_name,'=================================');
3718: wsh_debug_sv.log(l_module_name,'p_entity_type', p_entity_type);
3719: wsh_debug_sv.log(l_module_name,'p_append_deliveries',p_append_deliveries);
3720: wsh_debug_sv.log(l_module_name,'p_deliveries_status',p_deliveries_status);
3721: wsh_debug_sv.log(l_module_name,'p_scheduled_ship_date_lo',p_scheduled_ship_date_lo);
3722: wsh_debug_sv.log(l_module_name,'p_scheduled_ship_date_hi',p_scheduled_ship_date_hi);
3723: wsh_debug_sv.log(l_module_name,'p_source_system',p_source_system);
3724: wsh_debug_sv.log(l_module_name,'p_pickup_date_lo',p_pickup_date_lo);
3717: wsh_debug_sv.logmsg(l_module_name,'=================================');
3718: wsh_debug_sv.log(l_module_name,'p_entity_type', p_entity_type);
3719: wsh_debug_sv.log(l_module_name,'p_append_deliveries',p_append_deliveries);
3720: wsh_debug_sv.log(l_module_name,'p_deliveries_status',p_deliveries_status);
3721: wsh_debug_sv.log(l_module_name,'p_scheduled_ship_date_lo',p_scheduled_ship_date_lo);
3722: wsh_debug_sv.log(l_module_name,'p_scheduled_ship_date_hi',p_scheduled_ship_date_hi);
3723: wsh_debug_sv.log(l_module_name,'p_source_system',p_source_system);
3724: wsh_debug_sv.log(l_module_name,'p_pickup_date_lo',p_pickup_date_lo);
3725: wsh_debug_sv.log(l_module_name,'p_pickup_date_hi',p_pickup_date_hi);
3718: wsh_debug_sv.log(l_module_name,'p_entity_type', p_entity_type);
3719: wsh_debug_sv.log(l_module_name,'p_append_deliveries',p_append_deliveries);
3720: wsh_debug_sv.log(l_module_name,'p_deliveries_status',p_deliveries_status);
3721: wsh_debug_sv.log(l_module_name,'p_scheduled_ship_date_lo',p_scheduled_ship_date_lo);
3722: wsh_debug_sv.log(l_module_name,'p_scheduled_ship_date_hi',p_scheduled_ship_date_hi);
3723: wsh_debug_sv.log(l_module_name,'p_source_system',p_source_system);
3724: wsh_debug_sv.log(l_module_name,'p_pickup_date_lo',p_pickup_date_lo);
3725: wsh_debug_sv.log(l_module_name,'p_pickup_date_hi',p_pickup_date_hi);
3726: wsh_debug_sv.log(l_module_name,'p_dropoff_date_lo',p_dropoff_date_lo);
3719: wsh_debug_sv.log(l_module_name,'p_append_deliveries',p_append_deliveries);
3720: wsh_debug_sv.log(l_module_name,'p_deliveries_status',p_deliveries_status);
3721: wsh_debug_sv.log(l_module_name,'p_scheduled_ship_date_lo',p_scheduled_ship_date_lo);
3722: wsh_debug_sv.log(l_module_name,'p_scheduled_ship_date_hi',p_scheduled_ship_date_hi);
3723: wsh_debug_sv.log(l_module_name,'p_source_system',p_source_system);
3724: wsh_debug_sv.log(l_module_name,'p_pickup_date_lo',p_pickup_date_lo);
3725: wsh_debug_sv.log(l_module_name,'p_pickup_date_hi',p_pickup_date_hi);
3726: wsh_debug_sv.log(l_module_name,'p_dropoff_date_lo',p_dropoff_date_lo);
3727: wsh_debug_sv.log(l_module_name,'p_dropoff_date_hi',p_dropoff_date_hi);
3720: wsh_debug_sv.log(l_module_name,'p_deliveries_status',p_deliveries_status);
3721: wsh_debug_sv.log(l_module_name,'p_scheduled_ship_date_lo',p_scheduled_ship_date_lo);
3722: wsh_debug_sv.log(l_module_name,'p_scheduled_ship_date_hi',p_scheduled_ship_date_hi);
3723: wsh_debug_sv.log(l_module_name,'p_source_system',p_source_system);
3724: wsh_debug_sv.log(l_module_name,'p_pickup_date_lo',p_pickup_date_lo);
3725: wsh_debug_sv.log(l_module_name,'p_pickup_date_hi',p_pickup_date_hi);
3726: wsh_debug_sv.log(l_module_name,'p_dropoff_date_lo',p_dropoff_date_lo);
3727: wsh_debug_sv.log(l_module_name,'p_dropoff_date_hi',p_dropoff_date_hi);
3728: wsh_debug_sv.log(l_module_name,'p_deploy_mode',p_deploy_mode);
3721: wsh_debug_sv.log(l_module_name,'p_scheduled_ship_date_lo',p_scheduled_ship_date_lo);
3722: wsh_debug_sv.log(l_module_name,'p_scheduled_ship_date_hi',p_scheduled_ship_date_hi);
3723: wsh_debug_sv.log(l_module_name,'p_source_system',p_source_system);
3724: wsh_debug_sv.log(l_module_name,'p_pickup_date_lo',p_pickup_date_lo);
3725: wsh_debug_sv.log(l_module_name,'p_pickup_date_hi',p_pickup_date_hi);
3726: wsh_debug_sv.log(l_module_name,'p_dropoff_date_lo',p_dropoff_date_lo);
3727: wsh_debug_sv.log(l_module_name,'p_dropoff_date_hi',p_dropoff_date_hi);
3728: wsh_debug_sv.log(l_module_name,'p_deploy_mode',p_deploy_mode);
3729: wsh_debug_sv.log(l_module_name,'p_client_id',p_client_id);
3722: wsh_debug_sv.log(l_module_name,'p_scheduled_ship_date_hi',p_scheduled_ship_date_hi);
3723: wsh_debug_sv.log(l_module_name,'p_source_system',p_source_system);
3724: wsh_debug_sv.log(l_module_name,'p_pickup_date_lo',p_pickup_date_lo);
3725: wsh_debug_sv.log(l_module_name,'p_pickup_date_hi',p_pickup_date_hi);
3726: wsh_debug_sv.log(l_module_name,'p_dropoff_date_lo',p_dropoff_date_lo);
3727: wsh_debug_sv.log(l_module_name,'p_dropoff_date_hi',p_dropoff_date_hi);
3728: wsh_debug_sv.log(l_module_name,'p_deploy_mode',p_deploy_mode);
3729: wsh_debug_sv.log(l_module_name,'p_client_id',p_client_id);
3730: wsh_debug_sv.log(l_module_name,'p_organization_id',p_organization_id);
3723: wsh_debug_sv.log(l_module_name,'p_source_system',p_source_system);
3724: wsh_debug_sv.log(l_module_name,'p_pickup_date_lo',p_pickup_date_lo);
3725: wsh_debug_sv.log(l_module_name,'p_pickup_date_hi',p_pickup_date_hi);
3726: wsh_debug_sv.log(l_module_name,'p_dropoff_date_lo',p_dropoff_date_lo);
3727: wsh_debug_sv.log(l_module_name,'p_dropoff_date_hi',p_dropoff_date_hi);
3728: wsh_debug_sv.log(l_module_name,'p_deploy_mode',p_deploy_mode);
3729: wsh_debug_sv.log(l_module_name,'p_client_id',p_client_id);
3730: wsh_debug_sv.log(l_module_name,'p_organization_id',p_organization_id);
3731: wsh_debug_sv.log(l_module_name,'p_customer_id',p_customer_id);
3724: wsh_debug_sv.log(l_module_name,'p_pickup_date_lo',p_pickup_date_lo);
3725: wsh_debug_sv.log(l_module_name,'p_pickup_date_hi',p_pickup_date_hi);
3726: wsh_debug_sv.log(l_module_name,'p_dropoff_date_lo',p_dropoff_date_lo);
3727: wsh_debug_sv.log(l_module_name,'p_dropoff_date_hi',p_dropoff_date_hi);
3728: wsh_debug_sv.log(l_module_name,'p_deploy_mode',p_deploy_mode);
3729: wsh_debug_sv.log(l_module_name,'p_client_id',p_client_id);
3730: wsh_debug_sv.log(l_module_name,'p_organization_id',p_organization_id);
3731: wsh_debug_sv.log(l_module_name,'p_customer_id',p_customer_id);
3732: wsh_debug_sv.log(l_module_name,'p_ship_to_loc_id',p_ship_to_loc_id);
3725: wsh_debug_sv.log(l_module_name,'p_pickup_date_hi',p_pickup_date_hi);
3726: wsh_debug_sv.log(l_module_name,'p_dropoff_date_lo',p_dropoff_date_lo);
3727: wsh_debug_sv.log(l_module_name,'p_dropoff_date_hi',p_dropoff_date_hi);
3728: wsh_debug_sv.log(l_module_name,'p_deploy_mode',p_deploy_mode);
3729: wsh_debug_sv.log(l_module_name,'p_client_id',p_client_id);
3730: wsh_debug_sv.log(l_module_name,'p_organization_id',p_organization_id);
3731: wsh_debug_sv.log(l_module_name,'p_customer_id',p_customer_id);
3732: wsh_debug_sv.log(l_module_name,'p_ship_to_loc_id',p_ship_to_loc_id);
3733: wsh_debug_sv.log(l_module_name,'p_ship_method_code',p_ship_method_code);
3726: wsh_debug_sv.log(l_module_name,'p_dropoff_date_lo',p_dropoff_date_lo);
3727: wsh_debug_sv.log(l_module_name,'p_dropoff_date_hi',p_dropoff_date_hi);
3728: wsh_debug_sv.log(l_module_name,'p_deploy_mode',p_deploy_mode);
3729: wsh_debug_sv.log(l_module_name,'p_client_id',p_client_id);
3730: wsh_debug_sv.log(l_module_name,'p_organization_id',p_organization_id);
3731: wsh_debug_sv.log(l_module_name,'p_customer_id',p_customer_id);
3732: wsh_debug_sv.log(l_module_name,'p_ship_to_loc_id',p_ship_to_loc_id);
3733: wsh_debug_sv.log(l_module_name,'p_ship_method_code',p_ship_method_code);
3734: wsh_debug_sv.log(l_module_name,'p_autocreate_deliveries',p_autocreate_deliveries);
3727: wsh_debug_sv.log(l_module_name,'p_dropoff_date_hi',p_dropoff_date_hi);
3728: wsh_debug_sv.log(l_module_name,'p_deploy_mode',p_deploy_mode);
3729: wsh_debug_sv.log(l_module_name,'p_client_id',p_client_id);
3730: wsh_debug_sv.log(l_module_name,'p_organization_id',p_organization_id);
3731: wsh_debug_sv.log(l_module_name,'p_customer_id',p_customer_id);
3732: wsh_debug_sv.log(l_module_name,'p_ship_to_loc_id',p_ship_to_loc_id);
3733: wsh_debug_sv.log(l_module_name,'p_ship_method_code',p_ship_method_code);
3734: wsh_debug_sv.log(l_module_name,'p_autocreate_deliveries',p_autocreate_deliveries);
3735: wsh_debug_sv.log(l_module_name,'p_ac_del_criteria',p_ac_del_criteria);
3728: wsh_debug_sv.log(l_module_name,'p_deploy_mode',p_deploy_mode);
3729: wsh_debug_sv.log(l_module_name,'p_client_id',p_client_id);
3730: wsh_debug_sv.log(l_module_name,'p_organization_id',p_organization_id);
3731: wsh_debug_sv.log(l_module_name,'p_customer_id',p_customer_id);
3732: wsh_debug_sv.log(l_module_name,'p_ship_to_loc_id',p_ship_to_loc_id);
3733: wsh_debug_sv.log(l_module_name,'p_ship_method_code',p_ship_method_code);
3734: wsh_debug_sv.log(l_module_name,'p_autocreate_deliveries',p_autocreate_deliveries);
3735: wsh_debug_sv.log(l_module_name,'p_ac_del_criteria',p_ac_del_criteria);
3736: wsh_debug_sv.log(l_module_name,'p_append_deliveries',p_append_deliveries);
3729: wsh_debug_sv.log(l_module_name,'p_client_id',p_client_id);
3730: wsh_debug_sv.log(l_module_name,'p_organization_id',p_organization_id);
3731: wsh_debug_sv.log(l_module_name,'p_customer_id',p_customer_id);
3732: wsh_debug_sv.log(l_module_name,'p_ship_to_loc_id',p_ship_to_loc_id);
3733: wsh_debug_sv.log(l_module_name,'p_ship_method_code',p_ship_method_code);
3734: wsh_debug_sv.log(l_module_name,'p_autocreate_deliveries',p_autocreate_deliveries);
3735: wsh_debug_sv.log(l_module_name,'p_ac_del_criteria',p_ac_del_criteria);
3736: wsh_debug_sv.log(l_module_name,'p_append_deliveries',p_append_deliveries);
3737: wsh_debug_sv.log(l_module_name,'p_grp_ship_method',p_grp_ship_method);
3730: wsh_debug_sv.log(l_module_name,'p_organization_id',p_organization_id);
3731: wsh_debug_sv.log(l_module_name,'p_customer_id',p_customer_id);
3732: wsh_debug_sv.log(l_module_name,'p_ship_to_loc_id',p_ship_to_loc_id);
3733: wsh_debug_sv.log(l_module_name,'p_ship_method_code',p_ship_method_code);
3734: wsh_debug_sv.log(l_module_name,'p_autocreate_deliveries',p_autocreate_deliveries);
3735: wsh_debug_sv.log(l_module_name,'p_ac_del_criteria',p_ac_del_criteria);
3736: wsh_debug_sv.log(l_module_name,'p_append_deliveries',p_append_deliveries);
3737: wsh_debug_sv.log(l_module_name,'p_grp_ship_method',p_grp_ship_method);
3738: wsh_debug_sv.log(l_module_name,'p_grp_ship_from',p_grp_ship_from);
3731: wsh_debug_sv.log(l_module_name,'p_customer_id',p_customer_id);
3732: wsh_debug_sv.log(l_module_name,'p_ship_to_loc_id',p_ship_to_loc_id);
3733: wsh_debug_sv.log(l_module_name,'p_ship_method_code',p_ship_method_code);
3734: wsh_debug_sv.log(l_module_name,'p_autocreate_deliveries',p_autocreate_deliveries);
3735: wsh_debug_sv.log(l_module_name,'p_ac_del_criteria',p_ac_del_criteria);
3736: wsh_debug_sv.log(l_module_name,'p_append_deliveries',p_append_deliveries);
3737: wsh_debug_sv.log(l_module_name,'p_grp_ship_method',p_grp_ship_method);
3738: wsh_debug_sv.log(l_module_name,'p_grp_ship_from',p_grp_ship_from);
3739: wsh_debug_sv.log(l_module_name,'p_max_del_number',p_max_del_number);
3732: wsh_debug_sv.log(l_module_name,'p_ship_to_loc_id',p_ship_to_loc_id);
3733: wsh_debug_sv.log(l_module_name,'p_ship_method_code',p_ship_method_code);
3734: wsh_debug_sv.log(l_module_name,'p_autocreate_deliveries',p_autocreate_deliveries);
3735: wsh_debug_sv.log(l_module_name,'p_ac_del_criteria',p_ac_del_criteria);
3736: wsh_debug_sv.log(l_module_name,'p_append_deliveries',p_append_deliveries);
3737: wsh_debug_sv.log(l_module_name,'p_grp_ship_method',p_grp_ship_method);
3738: wsh_debug_sv.log(l_module_name,'p_grp_ship_from',p_grp_ship_from);
3739: wsh_debug_sv.log(l_module_name,'p_max_del_number',p_max_del_number);
3740: wsh_debug_sv.log(l_module_name,'p_log_level',p_log_level);
3733: wsh_debug_sv.log(l_module_name,'p_ship_method_code',p_ship_method_code);
3734: wsh_debug_sv.log(l_module_name,'p_autocreate_deliveries',p_autocreate_deliveries);
3735: wsh_debug_sv.log(l_module_name,'p_ac_del_criteria',p_ac_del_criteria);
3736: wsh_debug_sv.log(l_module_name,'p_append_deliveries',p_append_deliveries);
3737: wsh_debug_sv.log(l_module_name,'p_grp_ship_method',p_grp_ship_method);
3738: wsh_debug_sv.log(l_module_name,'p_grp_ship_from',p_grp_ship_from);
3739: wsh_debug_sv.log(l_module_name,'p_max_del_number',p_max_del_number);
3740: wsh_debug_sv.log(l_module_name,'p_log_level',p_log_level);
3741: END IF;
3734: wsh_debug_sv.log(l_module_name,'p_autocreate_deliveries',p_autocreate_deliveries);
3735: wsh_debug_sv.log(l_module_name,'p_ac_del_criteria',p_ac_del_criteria);
3736: wsh_debug_sv.log(l_module_name,'p_append_deliveries',p_append_deliveries);
3737: wsh_debug_sv.log(l_module_name,'p_grp_ship_method',p_grp_ship_method);
3738: wsh_debug_sv.log(l_module_name,'p_grp_ship_from',p_grp_ship_from);
3739: wsh_debug_sv.log(l_module_name,'p_max_del_number',p_max_del_number);
3740: wsh_debug_sv.log(l_module_name,'p_log_level',p_log_level);
3741: END IF;
3742:
3735: wsh_debug_sv.log(l_module_name,'p_ac_del_criteria',p_ac_del_criteria);
3736: wsh_debug_sv.log(l_module_name,'p_append_deliveries',p_append_deliveries);
3737: wsh_debug_sv.log(l_module_name,'p_grp_ship_method',p_grp_ship_method);
3738: wsh_debug_sv.log(l_module_name,'p_grp_ship_from',p_grp_ship_from);
3739: wsh_debug_sv.log(l_module_name,'p_max_del_number',p_max_del_number);
3740: wsh_debug_sv.log(l_module_name,'p_log_level',p_log_level);
3741: END IF;
3742:
3743:
3736: wsh_debug_sv.log(l_module_name,'p_append_deliveries',p_append_deliveries);
3737: wsh_debug_sv.log(l_module_name,'p_grp_ship_method',p_grp_ship_method);
3738: wsh_debug_sv.log(l_module_name,'p_grp_ship_from',p_grp_ship_from);
3739: wsh_debug_sv.log(l_module_name,'p_max_del_number',p_max_del_number);
3740: wsh_debug_sv.log(l_module_name,'p_log_level',p_log_level);
3741: END IF;
3742:
3743:
3744:
3911:
3912: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3913: --{
3914: IF l_debug_on THEN
3915: WSH_DEBUG_SV.logmsg(l_module_name, 'Error occured in WMS_DEPLOY.GET_CLIENT_DETAILS');
3916: END IF;
3917: END IF;
3918:
3919: FND_MESSAGE.SET_NAME('WSH', 'WSH_CLIENT');
4003: WSH_UTIL_CORE.PrintMsg(' Log Level: '|| l_log_level );
4004: END IF;
4005:
4006: IF l_debug_on THEN
4007: WSH_DEBUG_SV.logmsg(l_module_name,'Calling WSH_TRIP_CONSOLIDATION.Create_Consolidated_Trips',WSH_DEBUG_SV.C_PROC_LEVEL);
4008: END IF;
4009:
4010: -- calling WSH_TRIP_CONSOLIDATION.Create_Consolidated_Trips to create trips
4011: WSH_TRIP_CONSOLIDATION.Create_Consolidated_Trips(
4053: WSH_UTIL_CORE.PrintMsg(to_char(l_trip_num)||' trips have been successfully created');
4054:
4055: -- print return status of autocreate trips
4056: IF l_debug_on THEN
4057: WSH_DEBUG_SV.logmsg(l_module_name,'Return status from WSH_TRIP_CONSOLIDATION.Create_Consolidated_Trips is '|| l_return_status ,WSH_DEBUG_SV.C_PROC_LEVEL);
4058: END IF;
4059:
4060: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4061: IF l_return_status in (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
4095: END IF; -- TP is not installed
4096: ELSE
4097:
4098: IF l_debug_on THEN
4099: WSH_DEBUG_SV.logmsg(l_module_name,'Calling Select_Deliveries_Lines ',WSH_DEBUG_SV.C_PROC_LEVEL);
4100: END IF;
4101:
4102: -- bug 3319789
4103: IF p_pickup_date_lo is not NULL OR
4259: x_selected_det_tbl => l_selected_det_tbl,
4260: x_return_status => l_return_status);
4261:
4262: IF l_debug_on THEN
4263: WSH_DEBUG_SV.logmsg(l_module_name,'Return status from Select_Deliveries_Lines is '|| l_return_status,WSH_DEBUG_SV.C_PROC_LEVEL);
4264: END IF;
4265:
4266: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4267: -- select_delivery_lines failed, exit
4269: END IF;
4270: --Bug 10320421
4271: IF (l_ac_del_criteria IN ('Y','N') AND l_append_deliveries = 'N') THEN
4272: IF l_debug_on THEN
4273: WSH_DEBUG_SV.logmsg(l_module_name, 'Generating new WSH_PICK_LIST.G_BATCH_ID');
4274: END IF;
4275: select mtl_txn_request_headers_s.nextval into WSH_PICK_LIST.G_BATCH_ID from dual;
4276: END IF;
4277: IF l_debug_on THEN
4274: END IF;
4275: select mtl_txn_request_headers_s.nextval into WSH_PICK_LIST.G_BATCH_ID from dual;
4276: END IF;
4277: IF l_debug_on THEN
4278: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH_PICK_LIST.G_BATCH_ID : '||WSH_PICK_LIST.G_BATCH_ID);
4279: END IF;
4280: --Bug 10320421
4281:
4282: IF l_selected_det_tbl.count > 0 THEN
4296: End Loop;
4297:
4298: -- have selected some lines for auto create
4299: IF l_debug_on THEN
4300: WSH_DEBUG_SV.logmsg(l_module_name, 'Delivery lines selected to be processed are: ');
4301: FOR k in 1 .. l_selected_det_tbl_tmp.count LOOP
4302: WSH_DEBUG_SV.logmsg(l_module_name, ' delivery lines: ' || l_selected_det_tbl_tmp(k));
4303: END LOOP;
4304:
4298: -- have selected some lines for auto create
4299: IF l_debug_on THEN
4300: WSH_DEBUG_SV.logmsg(l_module_name, 'Delivery lines selected to be processed are: ');
4301: FOR k in 1 .. l_selected_det_tbl_tmp.count LOOP
4302: WSH_DEBUG_SV.logmsg(l_module_name, ' delivery lines: ' || l_selected_det_tbl_tmp(k));
4303: END LOOP;
4304:
4305: WSH_DEBUG_SV.logmsg(l_module_name,'Calling Process_Delivery_Lines_Batch',WSH_DEBUG_SV.C_PROC_LEVEL);
4306: END IF;
4301: FOR k in 1 .. l_selected_det_tbl_tmp.count LOOP
4302: WSH_DEBUG_SV.logmsg(l_module_name, ' delivery lines: ' || l_selected_det_tbl_tmp(k));
4303: END LOOP;
4304:
4305: WSH_DEBUG_SV.logmsg(l_module_name,'Calling Process_Delivery_Lines_Batch',WSH_DEBUG_SV.C_PROC_LEVEL);
4306: END IF;
4307:
4308: -- call Process_delivery_lines_batch to append deliveries and autocreate deliveries
4309: Process_Delivery_Lines_Batch(
4358: g_appended_del_num := g_appended_del_num + l_appended_del_num;
4359: g_new_del_num := g_new_del_num + l_new_del_num ;
4360:
4361: IF l_debug_on THEN
4362: WSH_DEBUG_SV.logmsg(l_module_name,'Return status from Process_Delivery_Lines_Batch is '|| l_return_status ,WSH_DEBUG_SV.C_PROC_LEVEL);
4363:
4364: WSH_DEBUG_SV.logmsg(l_module_name,'l_selected_det_tbl_tmp.count = '|| l_selected_det_tbl_tmp.count ,WSH_DEBUG_SV.C_PROC_LEVEL);
4365: WSH_DEBUG_SV.logmsg(l_module_name,'g_selected_det_count = '|| g_selected_det_count ,WSH_DEBUG_SV.C_PROC_LEVEL);
4366:
4360:
4361: IF l_debug_on THEN
4362: WSH_DEBUG_SV.logmsg(l_module_name,'Return status from Process_Delivery_Lines_Batch is '|| l_return_status ,WSH_DEBUG_SV.C_PROC_LEVEL);
4363:
4364: WSH_DEBUG_SV.logmsg(l_module_name,'l_selected_det_tbl_tmp.count = '|| l_selected_det_tbl_tmp.count ,WSH_DEBUG_SV.C_PROC_LEVEL);
4365: WSH_DEBUG_SV.logmsg(l_module_name,'g_selected_det_count = '|| g_selected_det_count ,WSH_DEBUG_SV.C_PROC_LEVEL);
4366:
4367: WSH_DEBUG_SV.logmsg(l_module_name,'l_appended_det_num = '|| l_appended_det_num,WSH_DEBUG_SV.C_PROC_LEVEL);
4368: WSH_DEBUG_SV.logmsg(l_module_name,'g_appended_det_num = '|| g_appended_det_num,WSH_DEBUG_SV.C_PROC_LEVEL);
4361: IF l_debug_on THEN
4362: WSH_DEBUG_SV.logmsg(l_module_name,'Return status from Process_Delivery_Lines_Batch is '|| l_return_status ,WSH_DEBUG_SV.C_PROC_LEVEL);
4363:
4364: WSH_DEBUG_SV.logmsg(l_module_name,'l_selected_det_tbl_tmp.count = '|| l_selected_det_tbl_tmp.count ,WSH_DEBUG_SV.C_PROC_LEVEL);
4365: WSH_DEBUG_SV.logmsg(l_module_name,'g_selected_det_count = '|| g_selected_det_count ,WSH_DEBUG_SV.C_PROC_LEVEL);
4366:
4367: WSH_DEBUG_SV.logmsg(l_module_name,'l_appended_det_num = '|| l_appended_det_num,WSH_DEBUG_SV.C_PROC_LEVEL);
4368: WSH_DEBUG_SV.logmsg(l_module_name,'g_appended_det_num = '|| g_appended_det_num,WSH_DEBUG_SV.C_PROC_LEVEL);
4369:
4363:
4364: WSH_DEBUG_SV.logmsg(l_module_name,'l_selected_det_tbl_tmp.count = '|| l_selected_det_tbl_tmp.count ,WSH_DEBUG_SV.C_PROC_LEVEL);
4365: WSH_DEBUG_SV.logmsg(l_module_name,'g_selected_det_count = '|| g_selected_det_count ,WSH_DEBUG_SV.C_PROC_LEVEL);
4366:
4367: WSH_DEBUG_SV.logmsg(l_module_name,'l_appended_det_num = '|| l_appended_det_num,WSH_DEBUG_SV.C_PROC_LEVEL);
4368: WSH_DEBUG_SV.logmsg(l_module_name,'g_appended_det_num = '|| g_appended_det_num,WSH_DEBUG_SV.C_PROC_LEVEL);
4369:
4370: WSH_DEBUG_SV.logmsg(l_module_name,'l_autocreate_del_det_num = '|| l_autocreate_del_det_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4371: WSH_DEBUG_SV.logmsg(l_module_name,'g_autocreate_del_det_num = '|| g_autocreate_del_det_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4364: WSH_DEBUG_SV.logmsg(l_module_name,'l_selected_det_tbl_tmp.count = '|| l_selected_det_tbl_tmp.count ,WSH_DEBUG_SV.C_PROC_LEVEL);
4365: WSH_DEBUG_SV.logmsg(l_module_name,'g_selected_det_count = '|| g_selected_det_count ,WSH_DEBUG_SV.C_PROC_LEVEL);
4366:
4367: WSH_DEBUG_SV.logmsg(l_module_name,'l_appended_det_num = '|| l_appended_det_num,WSH_DEBUG_SV.C_PROC_LEVEL);
4368: WSH_DEBUG_SV.logmsg(l_module_name,'g_appended_det_num = '|| g_appended_det_num,WSH_DEBUG_SV.C_PROC_LEVEL);
4369:
4370: WSH_DEBUG_SV.logmsg(l_module_name,'l_autocreate_del_det_num = '|| l_autocreate_del_det_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4371: WSH_DEBUG_SV.logmsg(l_module_name,'g_autocreate_del_det_num = '|| g_autocreate_del_det_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4372:
4366:
4367: WSH_DEBUG_SV.logmsg(l_module_name,'l_appended_det_num = '|| l_appended_det_num,WSH_DEBUG_SV.C_PROC_LEVEL);
4368: WSH_DEBUG_SV.logmsg(l_module_name,'g_appended_det_num = '|| g_appended_det_num,WSH_DEBUG_SV.C_PROC_LEVEL);
4369:
4370: WSH_DEBUG_SV.logmsg(l_module_name,'l_autocreate_del_det_num = '|| l_autocreate_del_det_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4371: WSH_DEBUG_SV.logmsg(l_module_name,'g_autocreate_del_det_num = '|| g_autocreate_del_det_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4372:
4373: WSH_DEBUG_SV.logmsg(l_module_name,'l_appended_del_num = '|| l_appended_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4374: WSH_DEBUG_SV.logmsg(l_module_name,'g_appended_del_num = '|| g_appended_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4367: WSH_DEBUG_SV.logmsg(l_module_name,'l_appended_det_num = '|| l_appended_det_num,WSH_DEBUG_SV.C_PROC_LEVEL);
4368: WSH_DEBUG_SV.logmsg(l_module_name,'g_appended_det_num = '|| g_appended_det_num,WSH_DEBUG_SV.C_PROC_LEVEL);
4369:
4370: WSH_DEBUG_SV.logmsg(l_module_name,'l_autocreate_del_det_num = '|| l_autocreate_del_det_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4371: WSH_DEBUG_SV.logmsg(l_module_name,'g_autocreate_del_det_num = '|| g_autocreate_del_det_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4372:
4373: WSH_DEBUG_SV.logmsg(l_module_name,'l_appended_del_num = '|| l_appended_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4374: WSH_DEBUG_SV.logmsg(l_module_name,'g_appended_del_num = '|| g_appended_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4375:
4369:
4370: WSH_DEBUG_SV.logmsg(l_module_name,'l_autocreate_del_det_num = '|| l_autocreate_del_det_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4371: WSH_DEBUG_SV.logmsg(l_module_name,'g_autocreate_del_det_num = '|| g_autocreate_del_det_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4372:
4373: WSH_DEBUG_SV.logmsg(l_module_name,'l_appended_del_num = '|| l_appended_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4374: WSH_DEBUG_SV.logmsg(l_module_name,'g_appended_del_num = '|| g_appended_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4375:
4376: WSH_DEBUG_SV.logmsg(l_module_name,'l_new_del_num = '|| l_new_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4377: WSH_DEBUG_SV.logmsg(l_module_name,'g_new_del_num = '|| g_new_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4370: WSH_DEBUG_SV.logmsg(l_module_name,'l_autocreate_del_det_num = '|| l_autocreate_del_det_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4371: WSH_DEBUG_SV.logmsg(l_module_name,'g_autocreate_del_det_num = '|| g_autocreate_del_det_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4372:
4373: WSH_DEBUG_SV.logmsg(l_module_name,'l_appended_del_num = '|| l_appended_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4374: WSH_DEBUG_SV.logmsg(l_module_name,'g_appended_del_num = '|| g_appended_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4375:
4376: WSH_DEBUG_SV.logmsg(l_module_name,'l_new_del_num = '|| l_new_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4377: WSH_DEBUG_SV.logmsg(l_module_name,'g_new_del_num = '|| g_new_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4378: END IF;
4372:
4373: WSH_DEBUG_SV.logmsg(l_module_name,'l_appended_del_num = '|| l_appended_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4374: WSH_DEBUG_SV.logmsg(l_module_name,'g_appended_del_num = '|| g_appended_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4375:
4376: WSH_DEBUG_SV.logmsg(l_module_name,'l_new_del_num = '|| l_new_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4377: WSH_DEBUG_SV.logmsg(l_module_name,'g_new_del_num = '|| g_new_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4378: END IF;
4379:
4380: exit when l_processed = l_selected_det_tbl.count;
4373: WSH_DEBUG_SV.logmsg(l_module_name,'l_appended_del_num = '|| l_appended_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4374: WSH_DEBUG_SV.logmsg(l_module_name,'g_appended_del_num = '|| g_appended_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4375:
4376: WSH_DEBUG_SV.logmsg(l_module_name,'l_new_del_num = '|| l_new_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4377: WSH_DEBUG_SV.logmsg(l_module_name,'g_new_del_num = '|| g_new_del_num, WSH_DEBUG_SV.C_PROC_LEVEL);
4378: END IF;
4379:
4380: exit when l_processed = l_selected_det_tbl.count;
4381: l_selected_det_tbl_tmp.delete;
4442: retcode := '0';
4443: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_completion_status,'');
4444:
4445: IF l_debug_on THEN
4446: WSH_DEBUG_SV.pop(l_module_name);
4447: END IF;
4448:
4449:
4450: EXCEPTION
4454: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_completion_status,'');
4455: errbuf := 'Process Deliveries completed with warnings';
4456: retcode := '1';
4457: IF l_debug_on THEN
4458: WSH_DEBUG_SV.pop(l_module_name);
4459: END IF;
4460:
4461: WHEN Process_Delivery_Lines_ERR THEN
4462: l_completion_status := 'WARNING';
4463: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_completion_status,'');
4464: errbuf := 'Process Deliveries completed with warnings';
4465: retcode := '1';
4466: IF l_debug_on THEN
4467: WSH_DEBUG_SV.pop(l_module_name);
4468: END IF;
4469:
4470: WHEN WSH_SELECT_ERR THEN
4471: WSH_UTIL_CORE.PrintMsg('Error Messages: ' || l_msg_data);
4474: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_completion_status,'');
4475: errbuf := 'Process Deliveries is completed with warning';
4476: retcode := '1';
4477: IF l_debug_on THEN
4478: WSH_DEBUG_SV.pop(l_module_name);
4479: END IF;
4480:
4481: WHEN Parameters_ERR THEN
4482: l_completion_status := 'WARNING';
4483: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_completion_status,'');
4484: errbuf := 'Process Deliveries is completed with warning';
4485: retcode := '1';
4486: IF l_debug_on THEN
4487: WSH_DEBUG_SV.pop(l_module_name);
4488: END IF;
4489:
4490:
4491: WHEN OTHERS THEN
4497: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_completion_status,'');
4498: errbuf := 'Process Deliveries failed with unexpected error';
4499: retcode := '2';
4500: IF l_debug_on THEN
4501: WSH_DEBUG_SV.pop(l_module_name);
4502: END IF;
4503:
4504: END Process_Deliveries_SRS;
4505: