58: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
59: --
60: IF l_debug_on IS NULL
61: THEN
62: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
63: END IF;
64: --
65: IF (p_doctype = 'SA') --{ K proj
66: OR
485: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
486: --
487: IF l_debug_on IS NULL
488: THEN
489: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
490: END IF;
491: --
492: wsh_debug_sv.start_debug;
493:
488: THEN
489: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
490: END IF;
491: --
492: wsh_debug_sv.start_debug;
493:
494: IF l_debug_on THEN
495: wsh_debug_sv.push (l_module_name);
496: wsh_debug_sv.log(l_module_name,'Parameters');
491: --
492: wsh_debug_sv.start_debug;
493:
494: IF l_debug_on THEN
495: wsh_debug_sv.push (l_module_name);
496: wsh_debug_sv.log(l_module_name,'Parameters');
497: wsh_debug_sv.log(l_module_name,'==========');
498: wsh_debug_sv.log (l_module_name,'p_organization_id',to_char(p_organization_id));
499: wsh_debug_sv.log (l_module_name,'p_carrier_id',to_char(p_carrier_id));
492: wsh_debug_sv.start_debug;
493:
494: IF l_debug_on THEN
495: wsh_debug_sv.push (l_module_name);
496: wsh_debug_sv.log(l_module_name,'Parameters');
497: wsh_debug_sv.log(l_module_name,'==========');
498: wsh_debug_sv.log (l_module_name,'p_organization_id',to_char(p_organization_id));
499: wsh_debug_sv.log (l_module_name,'p_carrier_id',to_char(p_carrier_id));
500: wsh_debug_sv.log (l_module_name,'p_customer_id',to_char(p_customer_id));
493:
494: IF l_debug_on THEN
495: wsh_debug_sv.push (l_module_name);
496: wsh_debug_sv.log(l_module_name,'Parameters');
497: wsh_debug_sv.log(l_module_name,'==========');
498: wsh_debug_sv.log (l_module_name,'p_organization_id',to_char(p_organization_id));
499: wsh_debug_sv.log (l_module_name,'p_carrier_id',to_char(p_carrier_id));
500: wsh_debug_sv.log (l_module_name,'p_customer_id',to_char(p_customer_id));
501: wsh_debug_sv.log (l_module_name,'p_customer_ship_to_id',to_char(p_customer_ship_to_id));
494: IF l_debug_on THEN
495: wsh_debug_sv.push (l_module_name);
496: wsh_debug_sv.log(l_module_name,'Parameters');
497: wsh_debug_sv.log(l_module_name,'==========');
498: wsh_debug_sv.log (l_module_name,'p_organization_id',to_char(p_organization_id));
499: wsh_debug_sv.log (l_module_name,'p_carrier_id',to_char(p_carrier_id));
500: wsh_debug_sv.log (l_module_name,'p_customer_id',to_char(p_customer_id));
501: wsh_debug_sv.log (l_module_name,'p_customer_ship_to_id',to_char(p_customer_ship_to_id));
502: wsh_debug_sv.log (l_module_name,'p_scheduled_from_date',p_scheduled_from_date);
495: wsh_debug_sv.push (l_module_name);
496: wsh_debug_sv.log(l_module_name,'Parameters');
497: wsh_debug_sv.log(l_module_name,'==========');
498: wsh_debug_sv.log (l_module_name,'p_organization_id',to_char(p_organization_id));
499: wsh_debug_sv.log (l_module_name,'p_carrier_id',to_char(p_carrier_id));
500: wsh_debug_sv.log (l_module_name,'p_customer_id',to_char(p_customer_id));
501: wsh_debug_sv.log (l_module_name,'p_customer_ship_to_id',to_char(p_customer_ship_to_id));
502: wsh_debug_sv.log (l_module_name,'p_scheduled_from_date',p_scheduled_from_date);
503: wsh_debug_sv.log (l_module_name,'p_scheduled_to_date',p_scheduled_to_date);
496: wsh_debug_sv.log(l_module_name,'Parameters');
497: wsh_debug_sv.log(l_module_name,'==========');
498: wsh_debug_sv.log (l_module_name,'p_organization_id',to_char(p_organization_id));
499: wsh_debug_sv.log (l_module_name,'p_carrier_id',to_char(p_carrier_id));
500: wsh_debug_sv.log (l_module_name,'p_customer_id',to_char(p_customer_id));
501: wsh_debug_sv.log (l_module_name,'p_customer_ship_to_id',to_char(p_customer_ship_to_id));
502: wsh_debug_sv.log (l_module_name,'p_scheduled_from_date',p_scheduled_from_date);
503: wsh_debug_sv.log (l_module_name,'p_scheduled_to_date',p_scheduled_to_date);
504: wsh_debug_sv.log (l_module_name,'p_autopack',p_autopack);
497: wsh_debug_sv.log(l_module_name,'==========');
498: wsh_debug_sv.log (l_module_name,'p_organization_id',to_char(p_organization_id));
499: wsh_debug_sv.log (l_module_name,'p_carrier_id',to_char(p_carrier_id));
500: wsh_debug_sv.log (l_module_name,'p_customer_id',to_char(p_customer_id));
501: wsh_debug_sv.log (l_module_name,'p_customer_ship_to_id',to_char(p_customer_ship_to_id));
502: wsh_debug_sv.log (l_module_name,'p_scheduled_from_date',p_scheduled_from_date);
503: wsh_debug_sv.log (l_module_name,'p_scheduled_to_date',p_scheduled_to_date);
504: wsh_debug_sv.log (l_module_name,'p_autopack',p_autopack);
505: wsh_debug_sv.log (l_module_name,'p_log_level',p_log_level);
498: wsh_debug_sv.log (l_module_name,'p_organization_id',to_char(p_organization_id));
499: wsh_debug_sv.log (l_module_name,'p_carrier_id',to_char(p_carrier_id));
500: wsh_debug_sv.log (l_module_name,'p_customer_id',to_char(p_customer_id));
501: wsh_debug_sv.log (l_module_name,'p_customer_ship_to_id',to_char(p_customer_ship_to_id));
502: wsh_debug_sv.log (l_module_name,'p_scheduled_from_date',p_scheduled_from_date);
503: wsh_debug_sv.log (l_module_name,'p_scheduled_to_date',p_scheduled_to_date);
504: wsh_debug_sv.log (l_module_name,'p_autopack',p_autopack);
505: wsh_debug_sv.log (l_module_name,'p_log_level',p_log_level);
506: wsh_debug_sv.log (l_module_name,'p_shipment_type',p_shipment_type);
499: wsh_debug_sv.log (l_module_name,'p_carrier_id',to_char(p_carrier_id));
500: wsh_debug_sv.log (l_module_name,'p_customer_id',to_char(p_customer_id));
501: wsh_debug_sv.log (l_module_name,'p_customer_ship_to_id',to_char(p_customer_ship_to_id));
502: wsh_debug_sv.log (l_module_name,'p_scheduled_from_date',p_scheduled_from_date);
503: wsh_debug_sv.log (l_module_name,'p_scheduled_to_date',p_scheduled_to_date);
504: wsh_debug_sv.log (l_module_name,'p_autopack',p_autopack);
505: wsh_debug_sv.log (l_module_name,'p_log_level',p_log_level);
506: wsh_debug_sv.log (l_module_name,'p_shipment_type',p_shipment_type);
507: wsh_debug_sv.log (l_module_name,'p_doctype',p_doctype);
500: wsh_debug_sv.log (l_module_name,'p_customer_id',to_char(p_customer_id));
501: wsh_debug_sv.log (l_module_name,'p_customer_ship_to_id',to_char(p_customer_ship_to_id));
502: wsh_debug_sv.log (l_module_name,'p_scheduled_from_date',p_scheduled_from_date);
503: wsh_debug_sv.log (l_module_name,'p_scheduled_to_date',p_scheduled_to_date);
504: wsh_debug_sv.log (l_module_name,'p_autopack',p_autopack);
505: wsh_debug_sv.log (l_module_name,'p_log_level',p_log_level);
506: wsh_debug_sv.log (l_module_name,'p_shipment_type',p_shipment_type);
507: wsh_debug_sv.log (l_module_name,'p_doctype',p_doctype);
508: wsh_debug_sv.log (l_module_name,'p_src_header_num_from'
501: wsh_debug_sv.log (l_module_name,'p_customer_ship_to_id',to_char(p_customer_ship_to_id));
502: wsh_debug_sv.log (l_module_name,'p_scheduled_from_date',p_scheduled_from_date);
503: wsh_debug_sv.log (l_module_name,'p_scheduled_to_date',p_scheduled_to_date);
504: wsh_debug_sv.log (l_module_name,'p_autopack',p_autopack);
505: wsh_debug_sv.log (l_module_name,'p_log_level',p_log_level);
506: wsh_debug_sv.log (l_module_name,'p_shipment_type',p_shipment_type);
507: wsh_debug_sv.log (l_module_name,'p_doctype',p_doctype);
508: wsh_debug_sv.log (l_module_name,'p_src_header_num_from'
509: ,p_src_header_num_from);
502: wsh_debug_sv.log (l_module_name,'p_scheduled_from_date',p_scheduled_from_date);
503: wsh_debug_sv.log (l_module_name,'p_scheduled_to_date',p_scheduled_to_date);
504: wsh_debug_sv.log (l_module_name,'p_autopack',p_autopack);
505: wsh_debug_sv.log (l_module_name,'p_log_level',p_log_level);
506: wsh_debug_sv.log (l_module_name,'p_shipment_type',p_shipment_type);
507: wsh_debug_sv.log (l_module_name,'p_doctype',p_doctype);
508: wsh_debug_sv.log (l_module_name,'p_src_header_num_from'
509: ,p_src_header_num_from);
510: wsh_debug_sv.log (l_module_name,'p_src_header_num_to'
503: wsh_debug_sv.log (l_module_name,'p_scheduled_to_date',p_scheduled_to_date);
504: wsh_debug_sv.log (l_module_name,'p_autopack',p_autopack);
505: wsh_debug_sv.log (l_module_name,'p_log_level',p_log_level);
506: wsh_debug_sv.log (l_module_name,'p_shipment_type',p_shipment_type);
507: wsh_debug_sv.log (l_module_name,'p_doctype',p_doctype);
508: wsh_debug_sv.log (l_module_name,'p_src_header_num_from'
509: ,p_src_header_num_from);
510: wsh_debug_sv.log (l_module_name,'p_src_header_num_to'
511: ,p_src_header_num_to);
504: wsh_debug_sv.log (l_module_name,'p_autopack',p_autopack);
505: wsh_debug_sv.log (l_module_name,'p_log_level',p_log_level);
506: wsh_debug_sv.log (l_module_name,'p_shipment_type',p_shipment_type);
507: wsh_debug_sv.log (l_module_name,'p_doctype',p_doctype);
508: wsh_debug_sv.log (l_module_name,'p_src_header_num_from'
509: ,p_src_header_num_from);
510: wsh_debug_sv.log (l_module_name,'p_src_header_num_to'
511: ,p_src_header_num_to);
512:
506: wsh_debug_sv.log (l_module_name,'p_shipment_type',p_shipment_type);
507: wsh_debug_sv.log (l_module_name,'p_doctype',p_doctype);
508: wsh_debug_sv.log (l_module_name,'p_src_header_num_from'
509: ,p_src_header_num_from);
510: wsh_debug_sv.log (l_module_name,'p_src_header_num_to'
511: ,p_src_header_num_to);
512:
513: wsh_debug_sv.log (l_module_name,'p_del_name_from'
514: ,p_del_name_from);
509: ,p_src_header_num_from);
510: wsh_debug_sv.log (l_module_name,'p_src_header_num_to'
511: ,p_src_header_num_to);
512:
513: wsh_debug_sv.log (l_module_name,'p_del_name_from'
514: ,p_del_name_from);
515: wsh_debug_sv.log (l_module_name,'p_del_name_to'
516: ,p_del_name_to);
517: wsh_debug_sv.log (l_module_name,'p_client_id',p_client_id); -- Modified R12.1.1 LSP PROJECT
511: ,p_src_header_num_to);
512:
513: wsh_debug_sv.log (l_module_name,'p_del_name_from'
514: ,p_del_name_from);
515: wsh_debug_sv.log (l_module_name,'p_del_name_to'
516: ,p_del_name_to);
517: wsh_debug_sv.log (l_module_name,'p_client_id',p_client_id); -- Modified R12.1.1 LSP PROJECT
518: END IF;
519:
513: wsh_debug_sv.log (l_module_name,'p_del_name_from'
514: ,p_del_name_from);
515: wsh_debug_sv.log (l_module_name,'p_del_name_to'
516: ,p_del_name_to);
517: wsh_debug_sv.log (l_module_name,'p_client_id',p_client_id); -- Modified R12.1.1 LSP PROJECT
518: END IF;
519:
520:
521:
521:
522: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
523:
524: IF l_debug_on THEN
525: wsh_debug_sv.log (l_module_name, 'Begining of FOR LOOP');
526: END IF;
527: --Open the cursor based on p_shipment_type and p_doctype
528: IF p_doctype = 'SA' THEN
529:
574: END IF;
575: --
576: END IF;
577: IF l_debug_on THEN
578: wsh_debug_sv.log (l_module_name,' ');
579: wsh_debug_sv.log (l_module_name,'Delivery_id',l_cur_rec.delivery_id);
580: wsh_debug_sv.log (l_module_name,'organization_id',l_cur_rec.organization_id);
581: wsh_debug_sv.log (l_module_name,'Carrier_Id',l_cur_rec.carrier_id);
582: wsh_debug_sv.log (l_module_name,'Customer_Id',l_cur_rec.customer_id);
575: --
576: END IF;
577: IF l_debug_on THEN
578: wsh_debug_sv.log (l_module_name,' ');
579: wsh_debug_sv.log (l_module_name,'Delivery_id',l_cur_rec.delivery_id);
580: wsh_debug_sv.log (l_module_name,'organization_id',l_cur_rec.organization_id);
581: wsh_debug_sv.log (l_module_name,'Carrier_Id',l_cur_rec.carrier_id);
582: wsh_debug_sv.log (l_module_name,'Customer_Id',l_cur_rec.customer_id);
583: wsh_debug_sv.log (l_module_name,'Ship_To',l_cur_rec.ultimate_dropoff_location_id);
576: END IF;
577: IF l_debug_on THEN
578: wsh_debug_sv.log (l_module_name,' ');
579: wsh_debug_sv.log (l_module_name,'Delivery_id',l_cur_rec.delivery_id);
580: wsh_debug_sv.log (l_module_name,'organization_id',l_cur_rec.organization_id);
581: wsh_debug_sv.log (l_module_name,'Carrier_Id',l_cur_rec.carrier_id);
582: wsh_debug_sv.log (l_module_name,'Customer_Id',l_cur_rec.customer_id);
583: wsh_debug_sv.log (l_module_name,'Ship_To',l_cur_rec.ultimate_dropoff_location_id);
584: END IF;
577: IF l_debug_on THEN
578: wsh_debug_sv.log (l_module_name,' ');
579: wsh_debug_sv.log (l_module_name,'Delivery_id',l_cur_rec.delivery_id);
580: wsh_debug_sv.log (l_module_name,'organization_id',l_cur_rec.organization_id);
581: wsh_debug_sv.log (l_module_name,'Carrier_Id',l_cur_rec.carrier_id);
582: wsh_debug_sv.log (l_module_name,'Customer_Id',l_cur_rec.customer_id);
583: wsh_debug_sv.log (l_module_name,'Ship_To',l_cur_rec.ultimate_dropoff_location_id);
584: END IF;
585:
578: wsh_debug_sv.log (l_module_name,' ');
579: wsh_debug_sv.log (l_module_name,'Delivery_id',l_cur_rec.delivery_id);
580: wsh_debug_sv.log (l_module_name,'organization_id',l_cur_rec.organization_id);
581: wsh_debug_sv.log (l_module_name,'Carrier_Id',l_cur_rec.carrier_id);
582: wsh_debug_sv.log (l_module_name,'Customer_Id',l_cur_rec.customer_id);
583: wsh_debug_sv.log (l_module_name,'Ship_To',l_cur_rec.ultimate_dropoff_location_id);
584: END IF;
585:
586: SAVEPOINT start_process_delivery;
579: wsh_debug_sv.log (l_module_name,'Delivery_id',l_cur_rec.delivery_id);
580: wsh_debug_sv.log (l_module_name,'organization_id',l_cur_rec.organization_id);
581: wsh_debug_sv.log (l_module_name,'Carrier_Id',l_cur_rec.carrier_id);
582: wsh_debug_sv.log (l_module_name,'Customer_Id',l_cur_rec.customer_id);
583: wsh_debug_sv.log (l_module_name,'Ship_To',l_cur_rec.ultimate_dropoff_location_id);
584: END IF;
585:
586: SAVEPOINT start_process_delivery;
587:
607: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
608: END ;
609:
610: IF l_debug_on THEN
611: wsh_debug_sv.log (l_module_name,'wsh_new_deliveries_pvt.Lock_Dlvy_No_Compare return status: ',l_return_status);
612: END IF;
613:
614: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN --1.IF {
615:
621: p_delivery_id => l_entity_ids(1),
622: x_return_status => l_return_status);
623:
624: IF l_debug_on THEN
625: wsh_debug_sv.log (l_module_name,'WSH_DELIVERY_VALIDATIONS.Check_Pack Return Status',l_return_status);
626: END IF;
627:
628: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN --3.IF {
629:
636: x_cont_instance_tab => l_con_ids,
637: x_return_status => l_return_status);
638:
639: IF l_debug_on THEN
640: wsh_debug_sv.log (l_module_name,'WSH_CONTAINER_ACTIONS.Auto_Pack_Delivery Return Status',
641: l_return_status);
642: END IF;
643:
644: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) )THEN --5.IF
671: p_organization_id => l_cur_rec.organization_id,
672: x_return_status => l_return_status);
673:
674: IF l_debug_on THEN
675: wsh_debug_sv.log (l_module_name,'WSH_TRANSACTIONS_UTIL.Send_Document Return Status',l_return_status);
676: END IF;
677:
678: IF ( l_return_status not in (WSH_UTIL_CORE.G_RET_STS_SUCCESS,WSH_UTIL_CORE.G_RET_STS_WARNING )) THEN --{
679: l_delivery_status := 'ERROR';
694: l_msg_details := NULL;
695: END IF;
696:
697: IF l_debug_on THEN
698: wsh_debug_sv.log (l_module_name,'l_msg_summary: ',l_msg_summary);
699: wsh_debug_sv.log (l_module_name,'l_msg_details: ',l_msg_details);
700: wsh_debug_sv.log (l_module_name,'l_msg_count: ',l_msg_count);
701: END IF;
702: FND_MSG_PUB.initialize;
695: END IF;
696:
697: IF l_debug_on THEN
698: wsh_debug_sv.log (l_module_name,'l_msg_summary: ',l_msg_summary);
699: wsh_debug_sv.log (l_module_name,'l_msg_details: ',l_msg_details);
700: wsh_debug_sv.log (l_module_name,'l_msg_count: ',l_msg_count);
701: END IF;
702: FND_MSG_PUB.initialize;
703:
696:
697: IF l_debug_on THEN
698: wsh_debug_sv.log (l_module_name,'l_msg_summary: ',l_msg_summary);
699: wsh_debug_sv.log (l_module_name,'l_msg_details: ',l_msg_details);
700: wsh_debug_sv.log (l_module_name,'l_msg_count: ',l_msg_count);
701: END IF;
702: FND_MSG_PUB.initialize;
703:
704: IF (l_delivery_status = 'SUCCESS' ) THEN --{
703:
704: IF (l_delivery_status = 'SUCCESS' ) THEN --{
705:
706: IF l_debug_on THEN
707: wsh_debug_sv.log (l_module_name,'Success l_warning_index: ',l_warning_index);
708: END IF;
709:
710: --Start of bug 4070732
711: l_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
712:
713: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN --{
714:
715: IF l_debug_on THEN
716: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
717: END IF;
718:
719: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => FALSE,
720: x_return_status => l_return_status);
719: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => FALSE,
720: x_return_status => l_return_status);
721:
722: IF l_debug_on THEN
723: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
724: END IF;
725: wsh_util_core.api_post_call
726: (
727: p_return_status => l_return_status,
734: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS,
735: WSH_UTIL_CORE.G_RET_STS_WARNING) THEN --{
736: IF ( l_warning_index > 0 ) THEN --{
737: IF l_debug_on THEN
738: wsh_debug_sv.log(l_module_name,'Delivery Status: SUCCESS with WARNING');
739: END IF;
740: l_warning_count := l_warning_count+1;
741: l_warning_delivery(l_warning_count).delivery_name := wsh_new_deliveries_pvt.get_name(l_entity_ids(1));
742: l_warning_delivery(l_warning_count).msg_summary := l_msg_summary;
742: l_warning_delivery(l_warning_count).msg_summary := l_msg_summary;
743: l_warning_delivery(l_warning_count).msg_details := l_msg_details;
744: ELSE --}{
745: IF l_debug_on THEN
746: wsh_debug_sv.log(l_module_name,'Delivery Status: SUCCESS');
747: END IF;
748: l_success_count := l_success_count+1;
749: l_success_delivery(l_success_count).delivery_name := wsh_new_deliveries_pvt.get_name(l_entity_ids(1));
750: l_success_delivery(l_success_count).msg_summary := l_msg_summary;
756: WSH_UTIL_CORE.G_RET_STS_WARNING) THEN --{
757: COMMIT;
758: ELSE --}{
759: IF l_debug_on THEN
760: wsh_debug_sv.log(l_module_name,'Delivery Status: ERROR');
761: END IF;
762: l_error_count := l_error_count+1;
763: l_error_delivery(l_error_count).delivery_name := wsh_new_deliveries_pvt.get_name(l_entity_ids(1));
764: l_error_delivery(l_error_count).msg_summary := l_msg_summary;
766: ROLLBACK TO SAVEPOINT start_process_delivery;
767: END IF; --}
768: ELSE --}{
769: IF l_debug_on THEN
770: wsh_debug_sv.log(l_module_name,'Delivery Status: ERROR');
771: END IF;
772: l_error_count := l_error_count+1;
773: l_error_delivery(l_error_count).delivery_name := wsh_new_deliveries_pvt.get_name(l_entity_ids(1));
774: l_error_delivery(l_error_count).msg_summary := l_msg_summary;
782: IF l_error_count > 0 THEN
783: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
784: IF l_delivery_count = l_error_count THEN
785: IF l_debug_on THEN
786: wsh_debug_sv.log(l_module_name,'All Deliveries selected are having error');
787: END IF;
788: END IF;
789: END IF;
790:
831:
832: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
833: --{
834: IF l_debug_on THEN
835: WSH_DEBUG_SV.logmsg(l_module_name, 'Error occured in WMS_DEPLOY.GET_CLIENT_DETAILS');
836: END IF;
837:
838: END IF;
839:
901: FND_FILE.put_line(FND_FILE.output,' ');
902: FND_MESSAGE.SET_NAME('WSH', 'WSH_NO_DEL_FOR_PARAMETERS');
903: FND_FILE.put_line(FND_FILE.output,FND_MESSAGE.GET);
904: IF l_debug_on THEN
905: wsh_debug_sv.log(l_module_name,l_msg_summary);
906: END IF;
907:
908: ELSE
909: FND_FILE.put_line(FND_FILE.output,' ');
911: FND_FILE.put_line(FND_FILE.output,FND_MESSAGE.GET);
912:
913: FND_FILE.put_line(FND_FILE.output,'==============');
914: IF l_debug_on THEN
915: wsh_debug_sv.log (l_module_name,'All Deliveries: ',l_delivery_count);
916: END IF;
917: FND_MESSAGE.SET_NAME('WSH', 'WSH_MANIFEST_ALL_DLVY');
918: FND_MESSAGE.SET_TOKEN('ALL_DLVY', to_char(l_delivery_count));
919: FND_FILE.put_line(FND_FILE.output,FND_MESSAGE.GET);
918: FND_MESSAGE.SET_TOKEN('ALL_DLVY', to_char(l_delivery_count));
919: FND_FILE.put_line(FND_FILE.output,FND_MESSAGE.GET);
920:
921: IF l_debug_on THEN
922: wsh_debug_sv.log (l_module_name,'Success Deliveries: ',l_success_count);
923: END IF;
924: FND_MESSAGE.SET_NAME('WSH', 'WSH_MANIFEST_SUC_DLVY');
925: FND_MESSAGE.SET_TOKEN('SUC_DLVY', to_char(l_success_count));
926: FND_FILE.put_line(FND_FILE.output,FND_MESSAGE.GET);
925: FND_MESSAGE.SET_TOKEN('SUC_DLVY', to_char(l_success_count));
926: FND_FILE.put_line(FND_FILE.output,FND_MESSAGE.GET);
927:
928: IF l_debug_on THEN
929: wsh_debug_sv.log (l_module_name,'Warning Deliveries: ',l_warning_count);
930: END IF;
931: FND_MESSAGE.SET_NAME('WSH', 'WSH_MANIFEST_WAR_DLVY');
932: FND_MESSAGE.SET_TOKEN('WAR_DLVY', to_char(l_warning_count));
933: FND_FILE.put_line(FND_FILE.output,FND_MESSAGE.GET);
932: FND_MESSAGE.SET_TOKEN('WAR_DLVY', to_char(l_warning_count));
933: FND_FILE.put_line(FND_FILE.output,FND_MESSAGE.GET);
934:
935: IF l_debug_on THEN
936: wsh_debug_sv.log (l_module_name,'Error Deliveries: ',l_error_count);
937: END IF;
938: FND_MESSAGE.SET_NAME('WSH', 'WSH_MANIFEST_ERR_DLVY');
939: FND_MESSAGE.SET_TOKEN('ERR_DLVY', to_char(l_error_count));
940: FND_FILE.put_line(FND_FILE.output,FND_MESSAGE.GET);
943: FND_MESSAGE.SET_NAME('WSH', 'WSH_MANIFEST_HS_DLVY');
944: FND_FILE.put_line(FND_FILE.output,FND_MESSAGE.GET);
945:
946: IF l_debug_on THEN
947: wsh_debug_sv.log(l_module_name,'Success Deliveries');
948: END IF;
949: FOR s_count IN 1..l_success_count LOOP
950: IF (s_count <> 1) THEN
951: FND_FILE.put(FND_FILE.output,',');
949: FOR s_count IN 1..l_success_count LOOP
950: IF (s_count <> 1) THEN
951: FND_FILE.put(FND_FILE.output,',');
952: IF l_debug_on THEN
953: wsh_debug_sv.log(l_module_name,',');
954: END IF;
955: END IF;
956: FND_FILE.put(FND_FILE.output,l_success_delivery(s_count).delivery_name);
957: IF l_debug_on THEN
954: END IF;
955: END IF;
956: FND_FILE.put(FND_FILE.output,l_success_delivery(s_count).delivery_name);
957: IF l_debug_on THEN
958: wsh_debug_sv.log (l_module_name,' ',l_success_delivery(s_count).delivery_name);
959: END IF;
960: END LOOP;
961:
962: IF l_debug_on THEN
959: END IF;
960: END LOOP;
961:
962: IF l_debug_on THEN
963: wsh_debug_sv.log(l_module_name,'Warning Deliveries');
964: END IF;
965: FND_FILE.put_line(FND_FILE.output,' ');
966: FND_FILE.put_line(FND_FILE.output,' ');
967: FND_MESSAGE.SET_NAME('WSH', 'WSH_MANIFEST_HW_DLVY');
968: FND_FILE.put_line(FND_FILE.output,FND_MESSAGE.GET);
969:
970: FOR w_count IN 1..l_warning_count LOOP
971: IF l_debug_on THEN
972: wsh_debug_sv.log(l_module_name,l_warning_delivery(w_count).delivery_name||': '||
973: l_warning_delivery(w_count).msg_summary);
974: END IF;
975: FND_FILE.put_line(FND_FILE.output,l_warning_delivery(w_count).delivery_name||': '
976: ||l_warning_delivery(w_count).msg_summary);
976: ||l_warning_delivery(w_count).msg_summary);
977:
978: IF (l_warning_delivery(w_count).msg_details IS NOT NULL ) THEN
979: IF l_debug_on THEN
980: wsh_debug_sv.log(l_module_name,l_warning_delivery(w_count).msg_details);
981: END IF;
982: FND_FILE.put_line(FND_FILE.output,' '||l_warning_delivery(w_count).msg_details);
983: END IF;
984: END LOOP;
983: END IF;
984: END LOOP;
985:
986: IF l_debug_on THEN
987: wsh_debug_sv.log(l_module_name,'Error Deliveries');
988: END IF;
989: FND_FILE.put_line(FND_FILE.output,' ');
990: FND_FILE.put_line(FND_FILE.output,' ');
991: FND_MESSAGE.SET_NAME('WSH', 'WSH_MANIFEST_HE_DLVY');
992: FND_FILE.put_line(FND_FILE.output,FND_MESSAGE.GET);
993:
994: FOR e_count IN 1..l_error_count LOOP
995: IF l_debug_on THEN
996: wsh_debug_sv.log(l_module_name,l_error_delivery(e_count).delivery_name||': '||
997: l_error_delivery(e_count).msg_summary);
998: END IF;
999: FND_FILE.put_line(FND_FILE.output,l_error_delivery(e_count).delivery_name||': '
1000: ||l_error_delivery(e_count).msg_summary);
1000: ||l_error_delivery(e_count).msg_summary);
1001:
1002: IF (l_error_delivery(e_count).msg_details IS NOT NULL) THEN
1003: IF l_debug_on THEN
1004: wsh_debug_sv.log(l_module_name,l_error_delivery(e_count).msg_details);
1005: END IF;
1006: FND_FILE.put_line(FND_FILE.output,' '||l_error_delivery(e_count).msg_details);
1007: END IF;
1008: END LOOP;
1014: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
1015: THEN --{
1016: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1017: IF l_debug_on THEN
1018: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1019: END IF;
1020: WSH_UTIL_CORE.Process_stops_for_load_tender(
1021: p_reset_flags => TRUE,
1022: x_return_status => l_return_status);
1020: WSH_UTIL_CORE.Process_stops_for_load_tender(
1021: p_reset_flags => TRUE,
1022: x_return_status => l_return_status);
1023: IF l_debug_on THEN
1024: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1025: END IF;
1026:
1027:
1028: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1043:
1044: --}
1045: --End of bug 4070732
1046: IF l_debug_on THEN
1047: wsh_debug_sv.pop(l_module_name);
1048: END IF;
1049: wsh_debug_sv.stop_debug;
1050:
1051: EXCEPTION
1045: --End of bug 4070732
1046: IF l_debug_on THEN
1047: wsh_debug_sv.pop(l_module_name);
1048: END IF;
1049: wsh_debug_sv.stop_debug;
1050:
1051: EXCEPTION
1052:
1053: WHEN others THEN
1059:
1060: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
1061: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1062: IF l_debug_on THEN
1063: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1064: END IF;
1065:
1066: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1067: x_return_status => l_return_status);
1065:
1066: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1067: x_return_status => l_return_status);
1068: IF l_debug_on THEN
1069: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1070: END IF;
1071:
1072: END IF;
1073: END IF;
1073: END IF;
1074: --End of bug 4070732
1075:
1076: IF l_debug_on THEN
1077: wsh_debug_sv.log(l_module_name,l_msg_summary);
1078: wsh_debug_sv.log(l_module_name,'Calling API :'||l_calling_api);
1079: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1080: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1081: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1074: --End of bug 4070732
1075:
1076: IF l_debug_on THEN
1077: wsh_debug_sv.log(l_module_name,l_msg_summary);
1078: wsh_debug_sv.log(l_module_name,'Calling API :'||l_calling_api);
1079: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1080: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1081: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1082: END IF;
1075:
1076: IF l_debug_on THEN
1077: wsh_debug_sv.log(l_module_name,l_msg_summary);
1078: wsh_debug_sv.log(l_module_name,'Calling API :'||l_calling_api);
1079: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1080: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1081: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1082: END IF;
1083:
1076: IF l_debug_on THEN
1077: wsh_debug_sv.log(l_module_name,l_msg_summary);
1078: wsh_debug_sv.log(l_module_name,'Calling API :'||l_calling_api);
1079: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1080: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1081: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1082: END IF;
1083:
1084: END Process_Auto_Manifest;
1077: wsh_debug_sv.log(l_module_name,l_msg_summary);
1078: wsh_debug_sv.log(l_module_name,'Calling API :'||l_calling_api);
1079: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1080: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1081: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1082: END IF;
1083:
1084: END Process_Auto_Manifest;
1085:
1120: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1121: --
1122: IF l_debug_on IS NULL
1123: THEN
1124: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1125: END IF;
1126: --
1127: IF l_debug_on THEN
1128: wsh_debug_sv.push (l_module_name);
1124: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1125: END IF;
1126: --
1127: IF l_debug_on THEN
1128: wsh_debug_sv.push (l_module_name);
1129: wsh_debug_sv.log (l_module_name,'DELIVERY_ID',p_delivery_id);
1130: END IF;
1131:
1132: OPEN c_lock_delivery;
1125: END IF;
1126: --
1127: IF l_debug_on THEN
1128: wsh_debug_sv.push (l_module_name);
1129: wsh_debug_sv.log (l_module_name,'DELIVERY_ID',p_delivery_id);
1130: END IF;
1131:
1132: OPEN c_lock_delivery;
1133: FETCH c_lock_delivery INTO l_delivery_id,l_status_code;
1134: CLOSE c_lock_delivery;
1135:
1136: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1137: IF l_debug_on THEN
1138: wsh_debug_sv.pop(l_module_name);
1139: END IF;
1140: EXCEPTION
1141: WHEN RECORD_LOCKED THEN
1142: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1142: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1143: FND_MESSAGE.Set_Name('WSH', 'WSH_NO_LOCK');
1144: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
1145: IF l_debug_on THEN
1146: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1147: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
1148: END IF;
1149:
1150: WHEN others THEN
1143: FND_MESSAGE.Set_Name('WSH', 'WSH_NO_LOCK');
1144: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
1145: IF l_debug_on THEN
1146: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1147: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
1148: END IF;
1149:
1150: WHEN others THEN
1151: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1151: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1152: wsh_util_core.default_handler('WSH_AUTO_MANIFEST.Lock_Manifest_Delivery',l_module_name);
1153:
1154: IF l_debug_on THEN
1155: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
1156: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1157: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1158: END IF;
1159:
1152: wsh_util_core.default_handler('WSH_AUTO_MANIFEST.Lock_Manifest_Delivery',l_module_name);
1153:
1154: IF l_debug_on THEN
1155: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
1156: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1157: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1158: END IF;
1159:
1160: END Lock_Manifest_Delivery;
1153:
1154: IF l_debug_on THEN
1155: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
1156: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1157: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1158: END IF;
1159:
1160: END Lock_Manifest_Delivery;
1161:
1216: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1217: --
1218: IF l_debug_on IS NULL
1219: THEN
1220: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1221: END IF;
1222: --
1223: IF l_debug_on THEN
1224: wsh_debug_sv.push (l_module_name);
1220: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1221: END IF;
1222: --
1223: IF l_debug_on THEN
1224: wsh_debug_sv.push (l_module_name);
1225: wsh_debug_sv.log (l_module_name,'DELIVERY_ID',p_delivery_id);
1226: wsh_debug_sv.log (l_module_name,'P_SCHEDULED_FROM_DATE',p_scheduled_from_date);
1227: wsh_debug_sv.log (l_module_name,'P_SCHEDULED_TO_DATE',p_scheduled_to_date);
1228: END IF;
1221: END IF;
1222: --
1223: IF l_debug_on THEN
1224: wsh_debug_sv.push (l_module_name);
1225: wsh_debug_sv.log (l_module_name,'DELIVERY_ID',p_delivery_id);
1226: wsh_debug_sv.log (l_module_name,'P_SCHEDULED_FROM_DATE',p_scheduled_from_date);
1227: wsh_debug_sv.log (l_module_name,'P_SCHEDULED_TO_DATE',p_scheduled_to_date);
1228: END IF;
1229:
1222: --
1223: IF l_debug_on THEN
1224: wsh_debug_sv.push (l_module_name);
1225: wsh_debug_sv.log (l_module_name,'DELIVERY_ID',p_delivery_id);
1226: wsh_debug_sv.log (l_module_name,'P_SCHEDULED_FROM_DATE',p_scheduled_from_date);
1227: wsh_debug_sv.log (l_module_name,'P_SCHEDULED_TO_DATE',p_scheduled_to_date);
1228: END IF;
1229:
1230: x_validate := 'Y';
1223: IF l_debug_on THEN
1224: wsh_debug_sv.push (l_module_name);
1225: wsh_debug_sv.log (l_module_name,'DELIVERY_ID',p_delivery_id);
1226: wsh_debug_sv.log (l_module_name,'P_SCHEDULED_FROM_DATE',p_scheduled_from_date);
1227: wsh_debug_sv.log (l_module_name,'P_SCHEDULED_TO_DATE',p_scheduled_to_date);
1228: END IF;
1229:
1230: x_validate := 'Y';
1231: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1231: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1232:
1233: IF (p_scheduled_from_date IS NULL AND p_scheduled_to_date IS NULL ) THEN
1234: IF l_debug_on THEN
1235: wsh_debug_sv.pop(l_module_name,'RETURN');
1236: END IF;
1237: RETURN;
1238: END IF;
1239:
1258: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
1259: END IF;
1260:
1261: IF l_debug_on THEN
1262: wsh_debug_sv.pop(l_module_name);
1263: END IF;
1264: EXCEPTION
1265: WHEN others THEN
1266: x_validate := 'N';
1267: wsh_util_core.default_handler('WSH_AUTO_MANIFEST.Validate_Scheduled_Ship_Date',l_module_name);
1268: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1269:
1270: IF l_debug_on THEN
1271: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
1272: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1273: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1274: END IF;
1275:
1268: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1269:
1270: IF l_debug_on THEN
1271: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
1272: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1273: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1274: END IF;
1275:
1276: END Validate_Scheduled_Ship_Date;
1269:
1270: IF l_debug_on THEN
1271: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
1272: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1273: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1274: END IF;
1275:
1276: END Validate_Scheduled_Ship_Date;
1277:
1289: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1290: --
1291: IF l_debug_on IS NULL
1292: THEN
1293: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1294: END IF;
1295: --
1296: IF l_debug_on THEN
1297: wsh_debug_sv.push (l_module_name);
1293: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1294: END IF;
1295: --
1296: IF l_debug_on THEN
1297: wsh_debug_sv.push (l_module_name);
1298: WSH_DEBUG_SV.log(l_module_name,'p_doc_type', p_doc_type);
1299: WSH_DEBUG_SV.log(l_module_name,'p_shipment_type', p_shipment_type);
1300: END IF;
1301:
1294: END IF;
1295: --
1296: IF l_debug_on THEN
1297: wsh_debug_sv.push (l_module_name);
1298: WSH_DEBUG_SV.log(l_module_name,'p_doc_type', p_doc_type);
1299: WSH_DEBUG_SV.log(l_module_name,'p_shipment_type', p_shipment_type);
1300: END IF;
1301:
1302: IF p_doc_type = 'SR' AND p_shipment_type = 'CMS' THEN
1295: --
1296: IF l_debug_on THEN
1297: wsh_debug_sv.push (l_module_name);
1298: WSH_DEBUG_SV.log(l_module_name,'p_doc_type', p_doc_type);
1299: WSH_DEBUG_SV.log(l_module_name,'p_shipment_type', p_shipment_type);
1300: END IF;
1301:
1302: IF p_doc_type = 'SR' AND p_shipment_type = 'CMS' THEN
1303: IF l_debug_on THEN
1300: END IF;
1301:
1302: IF p_doc_type = 'SR' AND p_shipment_type = 'CMS' THEN
1303: IF l_debug_on THEN
1304: WSH_DEBUG_SV.logmsg(l_module_name,'return 1');
1305: wsh_debug_sv.pop(l_module_name);
1306: END IF;
1307: RETURN 1;
1308: END IF;
1301:
1302: IF p_doc_type = 'SR' AND p_shipment_type = 'CMS' THEN
1303: IF l_debug_on THEN
1304: WSH_DEBUG_SV.logmsg(l_module_name,'return 1');
1305: wsh_debug_sv.pop(l_module_name);
1306: END IF;
1307: RETURN 1;
1308: END IF;
1309:
1307: RETURN 1;
1308: END IF;
1309:
1310: IF l_debug_on THEN
1311: wsh_debug_sv.pop(l_module_name);
1312: END IF;
1313:
1314: RETURN NULL;
1315: