[Home] [Help]
70: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
71: --
72: IF l_debug_on IS NULL
73: THEN
74: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
75: END IF;
76: --
77: IF l_debug_on THEN
78: WSH_DEBUG_SV.push(l_module_name);
74: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
75: END IF;
76: --
77: IF l_debug_on THEN
78: WSH_DEBUG_SV.push(l_module_name);
79: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info.delivery_id',
80: p_delivery_info.delivery_id);
81: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info.name',
82: p_delivery_info.name);
75: END IF;
76: --
77: IF l_debug_on THEN
78: WSH_DEBUG_SV.push(l_module_name);
79: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info.delivery_id',
80: p_delivery_info.delivery_id);
81: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info.name',
82: p_delivery_info.name);
83: END IF;
77: IF l_debug_on THEN
78: WSH_DEBUG_SV.push(l_module_name);
79: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info.delivery_id',
80: p_delivery_info.delivery_id);
81: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info.name',
82: p_delivery_info.name);
83: END IF;
84: --
85: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
93: FETCH get_next_delivery INTO x_delivery_id;
94: CLOSE get_next_delivery;
95:
96: IF l_debug_on THEN
97: WSH_DEBUG_SV.log(l_module_name,'x_delivery_id',x_delivery_id);
98: END IF;
99: END IF;
100: -- try to generate a new default delivery name
101: IF x_name IS NULL THEN
102: l_delivery_name := wsh_custom_pub.delivery_name(x_delivery_id,p_delivery_info);
103:
104: -- shipping default make sure the delivery name is not duplicate
105: IF l_debug_on THEN
106: WSH_DEBUG_SV.log(l_module_name,'l_delivery_name',l_delivery_name);
107: WSH_DEBUG_SV.log(l_module_name,'x_delivery_id',x_delivery_id);
108: END IF;
109: IF ( l_delivery_name = to_char(x_delivery_id) ) THEN
110: l_temp_id := x_delivery_id;
103:
104: -- shipping default make sure the delivery name is not duplicate
105: IF l_debug_on THEN
106: WSH_DEBUG_SV.log(l_module_name,'l_delivery_name',l_delivery_name);
107: WSH_DEBUG_SV.log(l_module_name,'x_delivery_id',x_delivery_id);
108: END IF;
109: IF ( l_delivery_name = to_char(x_delivery_id) ) THEN
110: l_temp_id := x_delivery_id;
111:
115:
116: OPEN count_delivery_rows( l_delivery_name);
117: FETCH count_delivery_rows INTO l_row_check;
118: IF l_debug_on THEN
119: WSH_DEBUG_SV.log(l_module_name,'l_row_check',l_row_check);
120: END IF;
121: IF (count_delivery_rows%NOTFOUND) THEN
122: CLOSE count_delivery_rows;
123: EXIT;
128: OPEN get_next_delivery;
129: FETCH get_next_delivery INTO l_temp_id;
130: CLOSE get_next_delivery;
131: IF l_debug_on THEN
132: WSH_DEBUG_SV.log(l_module_name,'l_temp_id',l_temp_id);
133: END IF;
134: END LOOP;
135:
136: x_delivery_id := l_temp_id;
143:
144: OPEN count_delivery_rows(x_name);
145: FETCH count_delivery_rows INTO l_row_check;
146: IF l_debug_on THEN
147: WSH_DEBUG_SV.log(l_module_name,'l_row_check',l_row_check);
148: END IF;
149: IF (count_delivery_rows%FOUND) THEN
150: CLOSE count_delivery_rows;
151: RAISE wsh_duplicate_name;
468:
469:
470: --/== Workflow Changes
471: IF l_debug_on THEN
472: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.RAISE_EVENT',WSH_DEBUG_SV.C_PROC_LEVEL);
473: END IF;
474:
475: WSH_WF_STD.RAISE_EVENT(p_entity_type => 'DELIVERY',
476: p_entity_id => x_delivery_id,
478: p_organization_id => p_delivery_info.organization_id,
479: x_return_status => l_wf_rs);
480:
481: IF l_debug_on THEN
482: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_WF_STD.RAISE_EVENT => ',l_wf_rs);
483: END IF;
484: -- Workflow Changes ==/
485:
486: --
484: -- Workflow Changes ==/
485:
486: --
487: IF l_debug_on THEN
488: WSH_DEBUG_SV.log(l_module_name,'x_rowid',x_rowid);
489: WSH_DEBUG_SV.log(l_module_name,'x_delivery_id',x_delivery_id);
490: WSH_DEBUG_SV.log(l_module_name,'x_name',x_name);
491: WSH_DEBUG_SV.pop(l_module_name);
492: END IF;
485:
486: --
487: IF l_debug_on THEN
488: WSH_DEBUG_SV.log(l_module_name,'x_rowid',x_rowid);
489: WSH_DEBUG_SV.log(l_module_name,'x_delivery_id',x_delivery_id);
490: WSH_DEBUG_SV.log(l_module_name,'x_name',x_name);
491: WSH_DEBUG_SV.pop(l_module_name);
492: END IF;
493: --
486: --
487: IF l_debug_on THEN
488: WSH_DEBUG_SV.log(l_module_name,'x_rowid',x_rowid);
489: WSH_DEBUG_SV.log(l_module_name,'x_delivery_id',x_delivery_id);
490: WSH_DEBUG_SV.log(l_module_name,'x_name',x_name);
491: WSH_DEBUG_SV.pop(l_module_name);
492: END IF;
493: --
494: EXCEPTION
487: IF l_debug_on THEN
488: WSH_DEBUG_SV.log(l_module_name,'x_rowid',x_rowid);
489: WSH_DEBUG_SV.log(l_module_name,'x_delivery_id',x_delivery_id);
490: WSH_DEBUG_SV.log(l_module_name,'x_name',x_name);
491: WSH_DEBUG_SV.pop(l_module_name);
492: END IF;
493: --
494: EXCEPTION
495: WHEN wsh_duplicate_name THEN
497: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
498: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
499: --
500: IF l_debug_on THEN
501: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DUPLICATE_NAME exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
502: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DUPLICATE_NAME');
503: END IF;
504: --
505: WHEN others THEN
498: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
499: --
500: IF l_debug_on THEN
501: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DUPLICATE_NAME exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
502: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DUPLICATE_NAME');
503: END IF;
504: --
505: WHEN others THEN
506: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY',l_module_name);
506: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY',l_module_name);
507: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
508: --
509: IF l_debug_on THEN
510: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
511: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
512: END IF;
513: --
514: END Create_Delivery;
507: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
508: --
509: IF l_debug_on THEN
510: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
511: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
512: END IF;
513: --
514: END Create_Delivery;
515:
605: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
606: --
607: IF l_debug_on IS NULL
608: THEN
609: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
610: END IF;
611: --
612: IF l_debug_on THEN
613: WSH_DEBUG_SV.push(l_module_name);
609: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
610: END IF;
611: --
612: IF l_debug_on THEN
613: WSH_DEBUG_SV.push(l_module_name);
614: --
615: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
616: END IF;
617: --
611: --
612: IF l_debug_on THEN
613: WSH_DEBUG_SV.push(l_module_name);
614: --
615: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
616: END IF;
617: --
618: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
619:
732: l_tms_version_number := 1;
733:
734: --get trip information for delivery, no update when trip not OPEN
735: IF l_debug_on THEN
736: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_VALIDATIONS.GET_TRIP_INFORMATION',WSH_DEBUG_SV.C_PROC_LEVEL);
737: END IF;
738:
739: WSH_DELIVERY_VALIDATIONS.get_trip_information
740: (p_delivery_id => p_delivery_info.delivery_id,
741: x_trip_info_rec => l_trip_info_rec,
742: x_return_status => l_return_status);
743:
744: IF l_debug_on THEN
745: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_DELIVERY_VALIDATIONS.GET_TRIP_INFORMATION',l_return_status);
746: END IF;
747:
748: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
749: IF l_debug_on THEN
746: END IF;
747:
748: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
749: IF l_debug_on THEN
750: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_DELIVERY_VALIDATIONS.get_trip_information');
751: END IF;
752: RAISE api_return_fail;
753: END IF;
754:
759: -- only do changes when there's no trip or trip status is OPEN
760: IF (l_trip_info_rec.status_code = 'OP' OR l_trip_not_found = 'Y') THEN
761:
762: IF l_debug_on THEN
763: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_VALIDATIONS.get_delivery_information',WSH_DEBUG_SV.C_PROC_LEVEL);
764: END IF;
765:
766: WSH_DELIVERY_VALIDATIONS.get_delivery_information(
767: p_delivery_id => p_delivery_info.delivery_id,
768: x_delivery_rec => l_delivery_info,
769: x_return_status => l_return_status);
770:
771: IF l_debug_on THEN
772: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_DELIVERY_VALIDATIONS.get_delivery_information',l_return_status);
773: END IF;
774:
775: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
776: IF l_debug_on THEN
773: END IF;
774:
775: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
776: IF l_debug_on THEN
777: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_DELIVERY_VALIDATIONS.get_delivery_information');
778: END IF;
779: RAISE api_return_fail;
780: END IF;
781:
804: OR (NVL(l_delivery_info.latest_dropoff_date, l_sysdate) <>
805: NVL(p_delivery_info.latest_dropoff_date, l_sysdate))) THEN
806:
807: IF l_debug_on THEN
808: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info name', p_delivery_info.name);
809: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info name', l_delivery_info.name);
810: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info initial_pickup_location_id', p_delivery_info.initial_pickup_location_id);
811: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info initial_pickup_location_id', l_delivery_info.initial_pickup_location_id);
812: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ultimate_dropoff_location_id', p_delivery_info.ultimate_dropoff_location_id);
805: NVL(p_delivery_info.latest_dropoff_date, l_sysdate))) THEN
806:
807: IF l_debug_on THEN
808: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info name', p_delivery_info.name);
809: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info name', l_delivery_info.name);
810: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info initial_pickup_location_id', p_delivery_info.initial_pickup_location_id);
811: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info initial_pickup_location_id', l_delivery_info.initial_pickup_location_id);
812: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ultimate_dropoff_location_id', p_delivery_info.ultimate_dropoff_location_id);
813: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ultimate_dropoff_location_id', l_delivery_info.ultimate_dropoff_location_id);
806:
807: IF l_debug_on THEN
808: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info name', p_delivery_info.name);
809: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info name', l_delivery_info.name);
810: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info initial_pickup_location_id', p_delivery_info.initial_pickup_location_id);
811: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info initial_pickup_location_id', l_delivery_info.initial_pickup_location_id);
812: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ultimate_dropoff_location_id', p_delivery_info.ultimate_dropoff_location_id);
813: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ultimate_dropoff_location_id', l_delivery_info.ultimate_dropoff_location_id);
814: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info freight_terms_code', p_delivery_info.freight_terms_code);
807: IF l_debug_on THEN
808: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info name', p_delivery_info.name);
809: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info name', l_delivery_info.name);
810: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info initial_pickup_location_id', p_delivery_info.initial_pickup_location_id);
811: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info initial_pickup_location_id', l_delivery_info.initial_pickup_location_id);
812: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ultimate_dropoff_location_id', p_delivery_info.ultimate_dropoff_location_id);
813: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ultimate_dropoff_location_id', l_delivery_info.ultimate_dropoff_location_id);
814: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info freight_terms_code', p_delivery_info.freight_terms_code);
815: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info freight_terms_code', l_delivery_info.freight_terms_code);
808: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info name', p_delivery_info.name);
809: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info name', l_delivery_info.name);
810: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info initial_pickup_location_id', p_delivery_info.initial_pickup_location_id);
811: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info initial_pickup_location_id', l_delivery_info.initial_pickup_location_id);
812: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ultimate_dropoff_location_id', p_delivery_info.ultimate_dropoff_location_id);
813: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ultimate_dropoff_location_id', l_delivery_info.ultimate_dropoff_location_id);
814: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info freight_terms_code', p_delivery_info.freight_terms_code);
815: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info freight_terms_code', l_delivery_info.freight_terms_code);
816: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info fob_code', p_delivery_info.fob_code);
809: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info name', l_delivery_info.name);
810: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info initial_pickup_location_id', p_delivery_info.initial_pickup_location_id);
811: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info initial_pickup_location_id', l_delivery_info.initial_pickup_location_id);
812: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ultimate_dropoff_location_id', p_delivery_info.ultimate_dropoff_location_id);
813: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ultimate_dropoff_location_id', l_delivery_info.ultimate_dropoff_location_id);
814: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info freight_terms_code', p_delivery_info.freight_terms_code);
815: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info freight_terms_code', l_delivery_info.freight_terms_code);
816: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info fob_code', p_delivery_info.fob_code);
817: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info fob_code', l_delivery_info.fob_code);
810: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info initial_pickup_location_id', p_delivery_info.initial_pickup_location_id);
811: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info initial_pickup_location_id', l_delivery_info.initial_pickup_location_id);
812: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ultimate_dropoff_location_id', p_delivery_info.ultimate_dropoff_location_id);
813: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ultimate_dropoff_location_id', l_delivery_info.ultimate_dropoff_location_id);
814: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info freight_terms_code', p_delivery_info.freight_terms_code);
815: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info freight_terms_code', l_delivery_info.freight_terms_code);
816: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info fob_code', p_delivery_info.fob_code);
817: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info fob_code', l_delivery_info.fob_code);
818: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ship_method_code', p_delivery_info.ship_method_code);
811: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info initial_pickup_location_id', l_delivery_info.initial_pickup_location_id);
812: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ultimate_dropoff_location_id', p_delivery_info.ultimate_dropoff_location_id);
813: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ultimate_dropoff_location_id', l_delivery_info.ultimate_dropoff_location_id);
814: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info freight_terms_code', p_delivery_info.freight_terms_code);
815: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info freight_terms_code', l_delivery_info.freight_terms_code);
816: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info fob_code', p_delivery_info.fob_code);
817: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info fob_code', l_delivery_info.fob_code);
818: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ship_method_code', p_delivery_info.ship_method_code);
819: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ship_method_code', l_delivery_info.ship_method_code);
812: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ultimate_dropoff_location_id', p_delivery_info.ultimate_dropoff_location_id);
813: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ultimate_dropoff_location_id', l_delivery_info.ultimate_dropoff_location_id);
814: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info freight_terms_code', p_delivery_info.freight_terms_code);
815: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info freight_terms_code', l_delivery_info.freight_terms_code);
816: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info fob_code', p_delivery_info.fob_code);
817: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info fob_code', l_delivery_info.fob_code);
818: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ship_method_code', p_delivery_info.ship_method_code);
819: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ship_method_code', l_delivery_info.ship_method_code);
820: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info carrier_id', p_delivery_info.carrier_id);
813: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ultimate_dropoff_location_id', l_delivery_info.ultimate_dropoff_location_id);
814: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info freight_terms_code', p_delivery_info.freight_terms_code);
815: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info freight_terms_code', l_delivery_info.freight_terms_code);
816: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info fob_code', p_delivery_info.fob_code);
817: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info fob_code', l_delivery_info.fob_code);
818: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ship_method_code', p_delivery_info.ship_method_code);
819: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ship_method_code', l_delivery_info.ship_method_code);
820: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info carrier_id', p_delivery_info.carrier_id);
821: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info carrier_id', l_delivery_info.carrier_id);
814: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info freight_terms_code', p_delivery_info.freight_terms_code);
815: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info freight_terms_code', l_delivery_info.freight_terms_code);
816: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info fob_code', p_delivery_info.fob_code);
817: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info fob_code', l_delivery_info.fob_code);
818: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ship_method_code', p_delivery_info.ship_method_code);
819: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ship_method_code', l_delivery_info.ship_method_code);
820: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info carrier_id', p_delivery_info.carrier_id);
821: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info carrier_id', l_delivery_info.carrier_id);
822: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info service_level', p_delivery_info.service_level);
815: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info freight_terms_code', l_delivery_info.freight_terms_code);
816: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info fob_code', p_delivery_info.fob_code);
817: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info fob_code', l_delivery_info.fob_code);
818: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ship_method_code', p_delivery_info.ship_method_code);
819: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ship_method_code', l_delivery_info.ship_method_code);
820: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info carrier_id', p_delivery_info.carrier_id);
821: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info carrier_id', l_delivery_info.carrier_id);
822: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info service_level', p_delivery_info.service_level);
823: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info service_level', l_delivery_info.service_level);
816: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info fob_code', p_delivery_info.fob_code);
817: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info fob_code', l_delivery_info.fob_code);
818: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ship_method_code', p_delivery_info.ship_method_code);
819: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ship_method_code', l_delivery_info.ship_method_code);
820: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info carrier_id', p_delivery_info.carrier_id);
821: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info carrier_id', l_delivery_info.carrier_id);
822: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info service_level', p_delivery_info.service_level);
823: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info service_level', l_delivery_info.service_level);
824: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info mode_of_transport', p_delivery_info.mode_of_transport);
817: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info fob_code', l_delivery_info.fob_code);
818: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ship_method_code', p_delivery_info.ship_method_code);
819: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ship_method_code', l_delivery_info.ship_method_code);
820: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info carrier_id', p_delivery_info.carrier_id);
821: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info carrier_id', l_delivery_info.carrier_id);
822: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info service_level', p_delivery_info.service_level);
823: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info service_level', l_delivery_info.service_level);
824: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info mode_of_transport', p_delivery_info.mode_of_transport);
825: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info mode_of_transport', l_delivery_info.mode_of_transport);
818: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ship_method_code', p_delivery_info.ship_method_code);
819: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ship_method_code', l_delivery_info.ship_method_code);
820: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info carrier_id', p_delivery_info.carrier_id);
821: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info carrier_id', l_delivery_info.carrier_id);
822: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info service_level', p_delivery_info.service_level);
823: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info service_level', l_delivery_info.service_level);
824: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info mode_of_transport', p_delivery_info.mode_of_transport);
825: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info mode_of_transport', l_delivery_info.mode_of_transport);
826: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_pickup_date', p_delivery_info.earliest_pickup_date);
819: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ship_method_code', l_delivery_info.ship_method_code);
820: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info carrier_id', p_delivery_info.carrier_id);
821: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info carrier_id', l_delivery_info.carrier_id);
822: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info service_level', p_delivery_info.service_level);
823: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info service_level', l_delivery_info.service_level);
824: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info mode_of_transport', p_delivery_info.mode_of_transport);
825: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info mode_of_transport', l_delivery_info.mode_of_transport);
826: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_pickup_date', p_delivery_info.earliest_pickup_date);
827: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_pickup_date', l_delivery_info.earliest_pickup_date);
820: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info carrier_id', p_delivery_info.carrier_id);
821: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info carrier_id', l_delivery_info.carrier_id);
822: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info service_level', p_delivery_info.service_level);
823: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info service_level', l_delivery_info.service_level);
824: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info mode_of_transport', p_delivery_info.mode_of_transport);
825: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info mode_of_transport', l_delivery_info.mode_of_transport);
826: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_pickup_date', p_delivery_info.earliest_pickup_date);
827: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_pickup_date', l_delivery_info.earliest_pickup_date);
828: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_pickup_date', p_delivery_info.latest_pickup_date);
821: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info carrier_id', l_delivery_info.carrier_id);
822: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info service_level', p_delivery_info.service_level);
823: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info service_level', l_delivery_info.service_level);
824: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info mode_of_transport', p_delivery_info.mode_of_transport);
825: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info mode_of_transport', l_delivery_info.mode_of_transport);
826: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_pickup_date', p_delivery_info.earliest_pickup_date);
827: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_pickup_date', l_delivery_info.earliest_pickup_date);
828: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_pickup_date', p_delivery_info.latest_pickup_date);
829: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_pickup_date', l_delivery_info.latest_pickup_date);
822: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info service_level', p_delivery_info.service_level);
823: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info service_level', l_delivery_info.service_level);
824: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info mode_of_transport', p_delivery_info.mode_of_transport);
825: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info mode_of_transport', l_delivery_info.mode_of_transport);
826: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_pickup_date', p_delivery_info.earliest_pickup_date);
827: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_pickup_date', l_delivery_info.earliest_pickup_date);
828: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_pickup_date', p_delivery_info.latest_pickup_date);
829: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_pickup_date', l_delivery_info.latest_pickup_date);
830: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_dropoff_date', p_delivery_info.earliest_dropoff_date);
823: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info service_level', l_delivery_info.service_level);
824: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info mode_of_transport', p_delivery_info.mode_of_transport);
825: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info mode_of_transport', l_delivery_info.mode_of_transport);
826: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_pickup_date', p_delivery_info.earliest_pickup_date);
827: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_pickup_date', l_delivery_info.earliest_pickup_date);
828: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_pickup_date', p_delivery_info.latest_pickup_date);
829: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_pickup_date', l_delivery_info.latest_pickup_date);
830: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_dropoff_date', p_delivery_info.earliest_dropoff_date);
831: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_dropoff_date', l_delivery_info.earliest_dropoff_date);
824: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info mode_of_transport', p_delivery_info.mode_of_transport);
825: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info mode_of_transport', l_delivery_info.mode_of_transport);
826: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_pickup_date', p_delivery_info.earliest_pickup_date);
827: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_pickup_date', l_delivery_info.earliest_pickup_date);
828: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_pickup_date', p_delivery_info.latest_pickup_date);
829: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_pickup_date', l_delivery_info.latest_pickup_date);
830: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_dropoff_date', p_delivery_info.earliest_dropoff_date);
831: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_dropoff_date', l_delivery_info.earliest_dropoff_date);
832: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_dropoff_date', p_delivery_info.latest_dropoff_date);
825: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info mode_of_transport', l_delivery_info.mode_of_transport);
826: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_pickup_date', p_delivery_info.earliest_pickup_date);
827: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_pickup_date', l_delivery_info.earliest_pickup_date);
828: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_pickup_date', p_delivery_info.latest_pickup_date);
829: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_pickup_date', l_delivery_info.latest_pickup_date);
830: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_dropoff_date', p_delivery_info.earliest_dropoff_date);
831: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_dropoff_date', l_delivery_info.earliest_dropoff_date);
832: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_dropoff_date', p_delivery_info.latest_dropoff_date);
833: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_dropoff_date', l_delivery_info.latest_dropoff_date);
826: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_pickup_date', p_delivery_info.earliest_pickup_date);
827: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_pickup_date', l_delivery_info.earliest_pickup_date);
828: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_pickup_date', p_delivery_info.latest_pickup_date);
829: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_pickup_date', l_delivery_info.latest_pickup_date);
830: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_dropoff_date', p_delivery_info.earliest_dropoff_date);
831: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_dropoff_date', l_delivery_info.earliest_dropoff_date);
832: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_dropoff_date', p_delivery_info.latest_dropoff_date);
833: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_dropoff_date', l_delivery_info.latest_dropoff_date);
834: END IF;
827: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_pickup_date', l_delivery_info.earliest_pickup_date);
828: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_pickup_date', p_delivery_info.latest_pickup_date);
829: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_pickup_date', l_delivery_info.latest_pickup_date);
830: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_dropoff_date', p_delivery_info.earliest_dropoff_date);
831: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_dropoff_date', l_delivery_info.earliest_dropoff_date);
832: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_dropoff_date', p_delivery_info.latest_dropoff_date);
833: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_dropoff_date', l_delivery_info.latest_dropoff_date);
834: END IF;
835:
828: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_pickup_date', p_delivery_info.latest_pickup_date);
829: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_pickup_date', l_delivery_info.latest_pickup_date);
830: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_dropoff_date', p_delivery_info.earliest_dropoff_date);
831: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_dropoff_date', l_delivery_info.earliest_dropoff_date);
832: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_dropoff_date', p_delivery_info.latest_dropoff_date);
833: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_dropoff_date', l_delivery_info.latest_dropoff_date);
834: END IF;
835:
836: IF (NVL(l_delivery_info.tms_interface_flag,
829: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_pickup_date', l_delivery_info.latest_pickup_date);
830: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_dropoff_date', p_delivery_info.earliest_dropoff_date);
831: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_dropoff_date', l_delivery_info.earliest_dropoff_date);
832: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_dropoff_date', p_delivery_info.latest_dropoff_date);
833: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_dropoff_date', l_delivery_info.latest_dropoff_date);
834: END IF;
835:
836: IF (NVL(l_delivery_info.tms_interface_flag,
837: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN
1012: END IF;
1013:
1014: --
1015: IF l_debug_on THEN
1016: WSH_DEBUG_SV.log(l_module_name,'Rows updated',SQL%ROWCOUNT);
1017: WSH_DEBUG_SV.logmsg(l_module_name,'Org Gross '||l_gross_wt||' New Gross '||p_delivery_info.gross_weight||' Org Net '||l_net_wt||' New Net '||p_delivery_info.net_weight||' Org Vol '||l_volume||' New Vol '||p_delivery_info.volume);
1018:
1019: END IF;
1020:
1013:
1014: --
1015: IF l_debug_on THEN
1016: WSH_DEBUG_SV.log(l_module_name,'Rows updated',SQL%ROWCOUNT);
1017: WSH_DEBUG_SV.logmsg(l_module_name,'Org Gross '||l_gross_wt||' New Gross '||p_delivery_info.gross_weight||' Org Net '||l_net_wt||' New Net '||p_delivery_info.net_weight||' Org Vol '||l_volume||' New Vol '||p_delivery_info.volume);
1018:
1019: END IF;
1020:
1021: --OTM R12
1021: --OTM R12
1022: IF (l_gc3_is_installed = 'Y' AND l_tms_update = 'Y') THEN
1023:
1024: IF l_debug_on THEN
1025: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.LOG_OTM_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
1026: END IF;
1027:
1028: WSH_XC_UTIL.log_otm_exception(
1029: p_delivery_info_tab => l_delivery_info_tab,
1030: p_new_interface_flag_tab => l_new_interface_flag_tab,
1031: x_return_status => l_return_status);
1032:
1033: IF l_debug_on THEN
1034: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_XC_UTIL.LOG_OTM_EXCEPTION',l_return_status);
1035: END IF;
1036:
1037: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
1038: IF l_debug_on THEN
1035: END IF;
1036:
1037: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
1038: IF l_debug_on THEN
1039: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_XC_UTIL.log_otm_exception');
1040: END IF;
1041: RAISE api_return_fail;
1042: END IF;
1043: END IF;
1058: -- If UOM changes then compute the delta (difference between new W/V and old W/V)
1059: IF ( NVL(l_weight_uom_code,'-99') <> NVL(p_delivery_info.weight_uom_code,'-99') AND
1060: l_gross_weight is not null ) THEN -- BugFix #4587421
1061: IF l_debug_on THEN
1062: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.convert_uom',WSH_DEBUG_SV.C_PROC_LEVEL);
1063: END IF;
1064: l_diff_gross_wt := WSH_WV_UTILS.convert_uom(
1065: from_uom => p_delivery_info.weight_uom_code,
1066: to_uom => l_weight_uom_code,
1066: to_uom => l_weight_uom_code,
1067: quantity => l_gross_weight) - NVL(l_gross_wt,0); -- BugFix #4587421
1068:
1069: IF l_debug_on THEN
1070: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.convert_uom',WSH_DEBUG_SV.C_PROC_LEVEL);
1071: END IF;
1072: l_diff_net_wt := WSH_WV_UTILS.convert_uom(
1073: from_uom => p_delivery_info.weight_uom_code,
1074: to_uom => l_weight_uom_code,
1080:
1081: IF (NVL(l_volume_uom_code,'-99') <> NVL(p_delivery_info.volume_uom_code,'-99') AND
1082: p_delivery_info.volume is not null) THEN
1083: IF l_debug_on THEN
1084: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.convert_uom',WSH_DEBUG_SV.C_PROC_LEVEL);
1085: END IF;
1086: l_diff_vol := WSH_WV_UTILS.convert_uom(
1087: from_uom => p_delivery_info.volume_uom_code,
1088: to_uom => l_volume_uom_code,
1123: -- Bug No:4085560 - 11.5.10.1CU:INCORRECT WT SHOWN FOR THE STOP(end)
1124: --
1125:
1126: IF l_debug_on THEN
1127: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DEL_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
1128: END IF;
1129:
1130: WSH_WV_UTILS.DEL_WV_Post_Process(
1131: p_delivery_id => p_delivery_info.delivery_id,
1147: IF NVL(p_delivery_info.delivery_type, 'STANDARD')='STANDARD' AND NVL(p_delivery_info.PRORATE_WT_FLAG,'N')='Y'
1148: AND (nvl(l_diff_gross_wt,0) <> 0 OR nvl(l_diff_net_wt,0) <> 0) THEN --{
1149: --
1150: IF l_debug_on THEN
1151: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.prorate_weight',WSH_DEBUG_SV.C_PROC_LEVEL);
1152: END IF;
1153: --
1154: WSH_WV_UTILS.prorate_weight(
1155: p_entity_type => 'DELIVERY',
1163: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1164: x_return_status := l_return_status;
1165: --
1166: IF l_debug_on THEN
1167: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WV_UTILS.prorate_weight',l_return_status);
1168: END IF;
1169: --
1170: wsh_util_core.api_post_call(
1171: p_return_status => l_return_status,
1175: END IF;
1176: END IF; --}
1177:
1178: IF l_debug_on THEN
1179: WSH_DEBUG_SV.pop(l_module_name);
1180: END IF;
1181: --
1182:
1183: EXCEPTION
1184: --OTM R12
1185: WHEN api_return_fail THEN
1186: x_return_status := l_return_status;
1187: IF l_debug_on THEN
1188: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
1189: WSH_DEBUG_SV.pop(l_module_name);
1190: END IF;
1191: --END OTM R12
1192: -- J: W/V Changes
1185: WHEN api_return_fail THEN
1186: x_return_status := l_return_status;
1187: IF l_debug_on THEN
1188: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
1189: WSH_DEBUG_SV.pop(l_module_name);
1190: END IF;
1191: --END OTM R12
1192: -- J: W/V Changes
1193: WHEN e_wt_vol_fail THEN
1195: FND_MESSAGE.Set_Token('DEL_NAME', p_delivery_info.name);
1196: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1197: WSH_UTIL_CORE.add_message (x_return_status);
1198: IF l_debug_on THEN
1199: WSH_DEBUG_SV.logmsg(l_module_name,'E_WT_VOL_FAIL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1200: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:E_WT_VOL_FAIL');
1201: END IF;
1202:
1203: WHEN NO_DATA_FOUND THEN
1196: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1197: WSH_UTIL_CORE.add_message (x_return_status);
1198: IF l_debug_on THEN
1199: WSH_DEBUG_SV.logmsg(l_module_name,'E_WT_VOL_FAIL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1200: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:E_WT_VOL_FAIL');
1201: END IF;
1202:
1203: WHEN NO_DATA_FOUND THEN
1204: FND_MESSAGE.Set_Name('WSH','WSH_DEL_NOT_FOUND');
1205: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1206: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
1207: --
1208: IF l_debug_on THEN
1209: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1210: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
1211: END IF;
1212: --
1213:
1206: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
1207: --
1208: IF l_debug_on THEN
1209: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1210: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
1211: END IF;
1212: --
1213:
1214: --Bug # 3268641
1217: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1218: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
1219:
1220: IF l_debug_on THEN
1221: WSH_DEBUG_SV.logmsg(l_module_name,'DUP_VAL_ON_INDEX exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1222: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DUP_VAL_ON_INDEX');
1223: END IF;
1224: --
1225:
1218: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
1219:
1220: IF l_debug_on THEN
1221: WSH_DEBUG_SV.logmsg(l_module_name,'DUP_VAL_ON_INDEX exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1222: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DUP_VAL_ON_INDEX');
1223: END IF;
1224: --
1225:
1226: WHEN others THEN
1226: WHEN others THEN
1227: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.UPDATE_DELIVERY',l_module_name);
1228: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1229: IF l_debug_on THEN
1230: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1231: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1232: END IF;
1233: --
1234: END Update_Delivery;
1227: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.UPDATE_DELIVERY',l_module_name);
1228: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1229: IF l_debug_on THEN
1230: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1231: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1232: END IF;
1233: --
1234: END Update_Delivery;
1235:
1295: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1296: --
1297: IF l_debug_on IS NULL
1298: THEN
1299: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1300: END IF;
1301: --
1302: IF l_debug_on THEN
1303: WSH_DEBUG_SV.push(l_module_name);
1299: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1300: END IF;
1301: --
1302: IF l_debug_on THEN
1303: WSH_DEBUG_SV.push(l_module_name);
1304: --
1305: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
1306: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1307: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
1301: --
1302: IF l_debug_on THEN
1303: WSH_DEBUG_SV.push(l_module_name);
1304: --
1305: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
1306: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1307: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
1308: END IF;
1309: --
1302: IF l_debug_on THEN
1303: WSH_DEBUG_SV.push(l_module_name);
1304: --
1305: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
1306: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1307: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
1308: END IF;
1309: --
1310: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1303: WSH_DEBUG_SV.push(l_module_name);
1304: --
1305: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
1306: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1307: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
1308: END IF;
1309: --
1310: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1311: g_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1323: l_delivery_id := p_delivery_id;
1324: END IF;
1325:
1326: IF l_debug_on THEN
1327: WSH_DEBUG_SV.log(l_module_name,'l_delivery_id',l_delivery_id);
1328: END IF;
1329:
1330: IF (p_validate_flag = 'Y') THEN
1331: wsh_delivery_validations.check_delete_delivery(
1364: FND_MESSAGE.SET_TOKEN('DET_NAME',dt.delivery_detail_id);
1365: wsh_util_core.add_message(x_return_status,l_module_name);
1366: --
1367: IF l_debug_on THEN
1368: WSH_DEBUG_SV.log(l_module_name,'x_return_status',
1369: x_return_status);
1370: WSH_DEBUG_SV.pop(l_module_name);
1371: END IF;
1372: --
1366: --
1367: IF l_debug_on THEN
1368: WSH_DEBUG_SV.log(l_module_name,'x_return_status',
1369: x_return_status);
1370: WSH_DEBUG_SV.pop(l_module_name);
1371: END IF;
1372: --
1373: RETURN;
1374: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1416: -- delete freight costs associated with delivery (bug 4376236)
1417: DELETE FROM wsh_freight_costs
1418: WHERE delivery_id = l_delivery_id;
1419: IF l_debug_on THEN
1420: WSH_DEBUG_SV.log(l_module_name,
1421: 'Freight cost rows deleted', SQL%ROWCOUNT);
1422: END IF;
1423:
1424: -- delete the delivery
1426: WHERE delivery_id = l_delivery_id;
1427: --
1428:
1429: IF l_debug_on THEN
1430: WSH_DEBUG_SV.log(l_module_name,'Rows deleted',SQL%ROWCOUNT);
1431: END IF;
1432:
1433: ELSE
1434: IF l_debug_on THEN
1431: END IF;
1432:
1433: ELSE
1434: IF l_debug_on THEN
1435: WSH_DEBUG_SV.log(l_module_name,'Raise Others');
1436: END IF;
1437: RAISE others;
1438: END IF; --} l_delivery_id IS NOT NULL
1439: /* Bug 2310456 warning */
1441: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1442: END IF;
1443: --
1444: IF l_debug_on THEN
1445: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
1446: WSH_DEBUG_SV.pop(l_module_name);
1447: END IF;
1448: --
1449: EXCEPTION
1442: END IF;
1443: --
1444: IF l_debug_on THEN
1445: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
1446: WSH_DEBUG_SV.pop(l_module_name);
1447: END IF;
1448: --
1449: EXCEPTION
1450: WHEN cannot_delete_delivery THEN
1466: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1467: wsh_util_core.add_message(x_return_status,l_module_name);
1468: --
1469: IF l_debug_on THEN
1470: WSH_DEBUG_SV.logmsg(l_module_name,'CANNOT_DELETE_DELIVERY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1471: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CANNOT_DELETE_DELIVERY');
1472: END IF;
1473: --
1474:
1467: wsh_util_core.add_message(x_return_status,l_module_name);
1468: --
1469: IF l_debug_on THEN
1470: WSH_DEBUG_SV.logmsg(l_module_name,'CANNOT_DELETE_DELIVERY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1471: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CANNOT_DELETE_DELIVERY');
1472: END IF;
1473: --
1474:
1475: WHEN others THEN
1490: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.DELETE_DELIVERY',l_module_name);
1491: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1492: --
1493: IF l_debug_on THEN
1494: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1495: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1496: END IF;
1497: --
1498: END Delete_Delivery;
1491: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1492: --
1493: IF l_debug_on THEN
1494: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1495: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1496: END IF;
1497: --
1498: END Delete_Delivery;
1499:
1532: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1533: --
1534: IF l_debug_on IS NULL
1535: THEN
1536: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1537: END IF;
1538: --
1539: IF l_debug_on THEN
1540: WSH_DEBUG_SV.push(l_module_name);
1536: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1537: END IF;
1538: --
1539: IF l_debug_on THEN
1540: WSH_DEBUG_SV.push(l_module_name);
1541: --
1542: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
1543: END IF;
1544: --
1538: --
1539: IF l_debug_on THEN
1540: WSH_DEBUG_SV.push(l_module_name);
1541: --
1542: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
1543: END IF;
1544: --
1545: OPEN lock_row;
1546: FETCH lock_row INTO Recinfo;
1548: IF (lock_row%NOTFOUND) THEN
1549: CLOSE lock_row;
1550: FND_MESSAGE.Set_Name('FND','FORM_RECORD_DELETED');
1551: IF l_debug_on THEN
1552: WSH_DEBUG_SV.log(l_module_name,'FORM_RECORD_DELETED');
1553: END IF;
1554: app_exception.raise_exception;
1555: END IF;
1556:
1964: --
1965: ) THEN
1966: --
1967: IF l_debug_on THEN
1968: WSH_DEBUG_SV.log(l_module_name,'Nothing has changed');
1969: WSH_DEBUG_SV.pop(l_module_name);
1970: END IF;
1971: --
1972: RETURN;
1965: ) THEN
1966: --
1967: IF l_debug_on THEN
1968: WSH_DEBUG_SV.log(l_module_name,'Nothing has changed');
1969: WSH_DEBUG_SV.pop(l_module_name);
1970: END IF;
1971: --
1972: RETURN;
1973: ELSE
1972: RETURN;
1973: ELSE
1974: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
1975: IF l_debug_on THEN
1976: WSH_DEBUG_SV.log(l_module_name,'FORM_RECORD_CHANGED');
1977: END IF;
1978: app_exception.raise_exception;
1979: END IF;
1980: --
1978: app_exception.raise_exception;
1979: END IF;
1980: --
1981: IF l_debug_on THEN
1982: WSH_DEBUG_SV.pop(l_module_name);
1983: END IF;
1984: --
1985: EXCEPTION
1986: WHEN app_exception.application_exception or app_exception.record_lock_exception THEN
1988: close lock_row;
1989: end if;
1990: --
1991: IF l_debug_on THEN
1992: WSH_DEBUG_SV.logmsg(l_module_name,'APP_EXCEPTION.APPLICATION_EXCEPTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1993: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APP_EXCEPTION.APPLICATION_EXCEPTION');
1994: END IF;
1995: --
1996: RAISE;
1989: end if;
1990: --
1991: IF l_debug_on THEN
1992: WSH_DEBUG_SV.logmsg(l_module_name,'APP_EXCEPTION.APPLICATION_EXCEPTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1993: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APP_EXCEPTION.APPLICATION_EXCEPTION');
1994: END IF;
1995: --
1996: RAISE;
1997: --
2000: close lock_row;
2001: end if;
2002: --
2003: IF l_debug_on THEN
2004: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2005: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2006: END IF;
2007: raise;
2008: --
2001: end if;
2002: --
2003: IF l_debug_on THEN
2004: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2005: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2006: END IF;
2007: raise;
2008: --
2009: END Lock_Delivery;
2212: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2213: --
2214: IF l_debug_on IS NULL
2215: THEN
2216: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2217: END IF;
2218: --
2219: IF l_debug_on THEN
2220: WSH_DEBUG_SV.push(l_module_name);
2216: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2217: END IF;
2218: --
2219: IF l_debug_on THEN
2220: WSH_DEBUG_SV.push(l_module_name);
2221: --
2222: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2223: END IF;
2224: --
2218: --
2219: IF l_debug_on THEN
2220: WSH_DEBUG_SV.push(l_module_name);
2221: --
2222: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2223: END IF;
2224: --
2225: IF (p_delivery_id IS NULL) THEN
2226: raise others;
2233: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
2234: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2235: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
2236: IF l_debug_on THEN
2237: WSH_DEBUG_SV.log(l_module_name,'WSH_DEL_NOT_FOUND');
2238: END IF;
2239: ELSE
2240: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2241: END IF;
2242:
2243: CLOSE delivery_record;
2244: --
2245: IF l_debug_on THEN
2246: WSH_DEBUG_SV.pop(l_module_name);
2247: END IF;
2248: --
2249: EXCEPTION
2250: WHEN others THEN
2255: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.POPULATE_RECORD',l_module_name);
2256: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2257: --
2258: IF l_debug_on THEN
2259: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2260: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2261: END IF;
2262: --
2263: END Populate_Record;
2256: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2257: --
2258: IF l_debug_on THEN
2259: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2260: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2261: END IF;
2262: --
2263: END Populate_Record;
2264:
2294: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2295: --
2296: IF l_debug_on IS NULL
2297: THEN
2298: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2299: END IF;
2300: --
2301: IF l_debug_on THEN
2302: WSH_DEBUG_SV.push(l_module_name);
2298: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2299: END IF;
2300: --
2301: IF l_debug_on THEN
2302: WSH_DEBUG_SV.push(l_module_name);
2303: --
2304: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2305: END IF;
2306: --
2300: --
2301: IF l_debug_on THEN
2302: WSH_DEBUG_SV.push(l_module_name);
2303: --
2304: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2305: END IF;
2306: --
2307: IF (p_delivery_id IS NULL) THEN
2308: raise others;
2316: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
2317: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
2318: --
2319: IF l_debug_on THEN
2320: WSH_DEBUG_SV.log(l_module_name,'WSH_DEL_NOT_FOUND');
2321: WSH_DEBUG_SV.pop(l_module_name);
2322: END IF;
2323: --
2324: RETURN null;
2317: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
2318: --
2319: IF l_debug_on THEN
2320: WSH_DEBUG_SV.log(l_module_name,'WSH_DEL_NOT_FOUND');
2321: WSH_DEBUG_SV.pop(l_module_name);
2322: END IF;
2323: --
2324: RETURN null;
2325: END IF;
2325: END IF;
2326:
2327: --
2328: IF l_debug_on THEN
2329: WSH_DEBUG_SV.log(l_module_name,'returns ',x_name);
2330: WSH_DEBUG_SV.pop(l_module_name);
2331: END IF;
2332: --
2333: RETURN x_name;
2326:
2327: --
2328: IF l_debug_on THEN
2329: WSH_DEBUG_SV.log(l_module_name,'returns ',x_name);
2330: WSH_DEBUG_SV.pop(l_module_name);
2331: END IF;
2332: --
2333: RETURN x_name;
2334:
2337: WHEN others THEN
2338: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.GET_NAME',l_module_name);
2339: --
2340: IF l_debug_on THEN
2341: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2342: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2343: END IF;
2344: --
2345: RETURN null;
2338: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.GET_NAME',l_module_name);
2339: --
2340: IF l_debug_on THEN
2341: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2342: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2343: END IF;
2344: --
2345: RETURN null;
2346: END Get_Name;
2371: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2372: --
2373: IF l_debug_on IS NULL
2374: THEN
2375: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2376: END IF;
2377: --
2378: IF l_debug_on THEN
2379: WSH_DEBUG_SV.push(l_module_name);
2375: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2376: END IF;
2377: --
2378: IF l_debug_on THEN
2379: WSH_DEBUG_SV.push(l_module_name);
2380: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
2381: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
2382: WSH_DEBUG_SV.log(l_module_name,'Total Number of Delivery Records being locked',p_valid_index_tab.COUNT);
2383: END IF;
2376: END IF;
2377: --
2378: IF l_debug_on THEN
2379: WSH_DEBUG_SV.push(l_module_name);
2380: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
2381: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
2382: WSH_DEBUG_SV.log(l_module_name,'Total Number of Delivery Records being locked',p_valid_index_tab.COUNT);
2383: END IF;
2384: --
2377: --
2378: IF l_debug_on THEN
2379: WSH_DEBUG_SV.push(l_module_name);
2380: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
2381: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
2382: WSH_DEBUG_SV.log(l_module_name,'Total Number of Delivery Records being locked',p_valid_index_tab.COUNT);
2383: END IF;
2384: --
2385: --
2378: IF l_debug_on THEN
2379: WSH_DEBUG_SV.push(l_module_name);
2380: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
2381: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
2382: WSH_DEBUG_SV.log(l_module_name,'Total Number of Delivery Records being locked',p_valid_index_tab.COUNT);
2383: END IF;
2384: --
2385: --
2386: l_index := p_valid_index_tab.FIRST;
2402: -- Need to lock the related entities - lines, containers and delivery legs
2403: -- For actions ship confirm and autopacking
2404: if p_action IN ('CONFIRM', 'AUTO-PACK', 'AUTO-PACK-MASTER') then
2405: IF l_debug_on THEN
2406: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.LOCK_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
2407: END IF;
2408:
2409: wsh_delivery_details_pkg.lock_detail_no_compare(
2410: p_delivery_id => p_rec_attr_tab(l_index).delivery_id);
2410: p_delivery_id => p_rec_attr_tab(l_index).delivery_id);
2411:
2412: if p_action = 'CONFIRM' then
2413: IF l_debug_on THEN
2414: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_PVT.LOCK_DLVY_LEG',WSH_DEBUG_SV.C_PROC_LEVEL);
2415: END IF;
2416: wsh_delivery_legs_pvt.lock_dlvy_leg_no_compare(
2417: p_delivery_id => p_rec_attr_tab(l_index).delivery_id);
2418: end if;
2439: END IF;
2440: l_num_errors := l_num_errors + 1;
2441: --
2442: IF l_debug_on THEN
2443: WSH_DEBUG_SV.log(l_module_name,'Unable to obtain lock on the Delivery Id',p_rec_attr_tab(l_index).delivery_id);
2444: END IF;
2445: --
2446: WHEN others THEN
2447: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2458: FND_MESSAGE.SET_NAME('WSH', 'WSH_UI_NOT_PERFORMED');
2459: x_return_status := wsh_util_core.g_ret_sts_error;
2460: wsh_util_core.add_message(x_return_status,l_module_name);
2461: IF l_debug_on THEN
2462: wsh_debug_sv.logmsg(l_module_name, 'WSH_UI_NOT_PERFORMED');
2463: END IF;
2464: RAISE FND_API.G_EXC_ERROR;
2465: ELSIF l_num_errors > 0 THEN
2466: FND_MESSAGE.SET_NAME('WSH', 'WSH_UI_NOT_PROCESSED');
2466: FND_MESSAGE.SET_NAME('WSH', 'WSH_UI_NOT_PROCESSED');
2467: x_return_status := wsh_util_core.g_ret_sts_warning;
2468: wsh_util_core.add_message(x_return_status,l_module_name);
2469: IF l_debug_on THEN
2470: wsh_debug_sv.logmsg(l_module_name, 'WSH_UI_NOT_PROCESSED');
2471: END IF;
2472: raise wsh_util_core.g_exc_warning;
2473: ELSE
2474: x_return_status := wsh_util_core.g_ret_sts_success;
2476: --
2477: --
2478: --
2479: IF l_debug_on THEN
2480: WSH_DEBUG_SV.pop(l_module_name);
2481: END IF;
2482: --
2483: EXCEPTION
2484: --
2487: --
2488: x_return_status := wsh_util_core.g_ret_sts_error;
2489: --
2490: IF l_debug_on THEN
2491: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2492: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2493: END IF;
2494: --
2495: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2488: x_return_status := wsh_util_core.g_ret_sts_error;
2489: --
2490: IF l_debug_on THEN
2491: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2492: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2493: END IF;
2494: --
2495: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2496: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
2495: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2496: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
2497: --
2498: IF l_debug_on THEN
2499: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2500: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2501: END IF;
2502: --
2503: --
2496: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
2497: --
2498: IF l_debug_on THEN
2499: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2500: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2501: END IF;
2502: --
2503: --
2504: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2504: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2505: x_return_status := wsh_util_core.g_ret_sts_warning;
2506: --
2507: IF l_debug_on THEN
2508: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2509: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2510: END IF;
2511: --
2512: --
2505: x_return_status := wsh_util_core.g_ret_sts_warning;
2506: --
2507: IF l_debug_on THEN
2508: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2509: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2510: END IF;
2511: --
2512: --
2513: WHEN OTHERS THEN
2516: --
2517: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.LOCK_DELIVERY_WRAPPER',l_module_name);
2518: --
2519: IF l_debug_on THEN
2520: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2521: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2522: END IF;
2523: --
2524: --
2517: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.LOCK_DELIVERY_WRAPPER',l_module_name);
2518: --
2519: IF l_debug_on THEN
2520: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2521: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2522: END IF;
2523: --
2524: --
2525: END Lock_Delivery;
2559: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2560: --
2561: IF l_debug_on IS NULL
2562: THEN
2563: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2564: END IF;
2565: --
2566: IF l_debug_on THEN
2567: WSH_DEBUG_SV.push(l_module_name);
2563: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2564: END IF;
2565: --
2566: IF l_debug_on THEN
2567: WSH_DEBUG_SV.push(l_module_name);
2568: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_id', p_delivery_id);
2569: END IF;
2570: --
2571:
2564: END IF;
2565: --
2566: IF l_debug_on THEN
2567: WSH_DEBUG_SV.push(l_module_name);
2568: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_id', p_delivery_id);
2569: END IF;
2570: --
2571:
2572: IF p_delivery_id IS NOT NULL THEN
2575: CLOSE c_lock_dlvy;
2576: END IF;
2577:
2578: IF l_debug_on THEN
2579: WSH_DEBUG_SV.pop(l_module_name);
2580: END IF;
2581:
2582: EXCEPTION
2583: WHEN app_exception.application_exception or app_exception.record_lock_exception THEN
2581:
2582: EXCEPTION
2583: WHEN app_exception.application_exception or app_exception.record_lock_exception THEN
2584: IF l_debug_on THEN
2585: wsh_debug_sv.log(l_module_name, 'Could not lock delivery', p_delivery_id);
2586: END IF;
2587: IF l_debug_on THEN
2588: WSH_DEBUG_SV.logmsg(l_module_name,'APP_EXCEPTION.APPLICATION_EXCEPTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2589: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APP_EXCEPTION.APPLICATION_EXCEPTION');
2584: IF l_debug_on THEN
2585: wsh_debug_sv.log(l_module_name, 'Could not lock delivery', p_delivery_id);
2586: END IF;
2587: IF l_debug_on THEN
2588: WSH_DEBUG_SV.logmsg(l_module_name,'APP_EXCEPTION.APPLICATION_EXCEPTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2589: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APP_EXCEPTION.APPLICATION_EXCEPTION');
2590: END IF;
2591: --
2592: RAISE;
2585: wsh_debug_sv.log(l_module_name, 'Could not lock delivery', p_delivery_id);
2586: END IF;
2587: IF l_debug_on THEN
2588: WSH_DEBUG_SV.logmsg(l_module_name,'APP_EXCEPTION.APPLICATION_EXCEPTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2589: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APP_EXCEPTION.APPLICATION_EXCEPTION');
2590: END IF;
2591: --
2592: RAISE;
2593:
2676: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2677: --
2678: IF l_debug_on IS NULL
2679: THEN
2680: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2681: END IF;
2682: --
2683: IF l_debug_on THEN
2684: WSH_DEBUG_SV.push(l_module_name);
2680: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2681: END IF;
2682: --
2683: IF l_debug_on THEN
2684: WSH_DEBUG_SV.push(l_module_name);
2685: --
2686: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
2687: WSH_DEBUG_SV.log(l_module_name,'p_copy_legs',p_copy_legs);
2688: END IF;
2682: --
2683: IF l_debug_on THEN
2684: WSH_DEBUG_SV.push(l_module_name);
2685: --
2686: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
2687: WSH_DEBUG_SV.log(l_module_name,'p_copy_legs',p_copy_legs);
2688: END IF;
2689: --
2690: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2683: IF l_debug_on THEN
2684: WSH_DEBUG_SV.push(l_module_name);
2685: --
2686: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
2687: WSH_DEBUG_SV.log(l_module_name,'p_copy_legs',p_copy_legs);
2688: END IF;
2689: --
2690: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2691: --
2705: l_delivery_name := wsh_custom_pub.delivery_name(l_delivery_id,p_delivery_rec);
2706:
2707: -- shipping default make sure the delivery name is not duplicate
2708: IF l_debug_on THEN
2709: WSH_DEBUG_SV.log(l_module_name,'l_delivery_name',l_delivery_name);
2710: WSH_DEBUG_SV.log(l_module_name,'l_delivery_id',l_delivery_id);
2711: END IF;
2712: IF ( l_delivery_name = to_char(l_delivery_id) ) THEN
2713: l_temp_id := l_delivery_id;
2706:
2707: -- shipping default make sure the delivery name is not duplicate
2708: IF l_debug_on THEN
2709: WSH_DEBUG_SV.log(l_module_name,'l_delivery_name',l_delivery_name);
2710: WSH_DEBUG_SV.log(l_module_name,'l_delivery_id',l_delivery_id);
2711: END IF;
2712: IF ( l_delivery_name = to_char(l_delivery_id) ) THEN
2713: l_temp_id := l_delivery_id;
2714:
2718:
2719: OPEN count_delivery_rows( l_delivery_name);
2720: FETCH count_delivery_rows INTO l_row_check;
2721: IF l_debug_on THEN
2722: WSH_DEBUG_SV.log(l_module_name,'l_row_check',l_row_check);
2723: END IF;
2724: IF (count_delivery_rows%NOTFOUND) THEN
2725: CLOSE count_delivery_rows;
2726: EXIT;
2731: OPEN get_next_delivery;
2732: FETCH get_next_delivery INTO l_temp_id;
2733: CLOSE get_next_delivery;
2734: IF l_debug_on THEN
2735: WSH_DEBUG_SV.log(l_module_name,'l_temp_id',l_temp_id);
2736: END IF;
2737: END LOOP;
2738:
2739: l_delivery_id := l_temp_id;
3061: END IF;
3062: --
3063: --
3064: IF l_debug_on THEN
3065: WSH_DEBUG_SV.log(l_module_name, 'l_delivery_id', l_delivery_id );
3066: END IF;
3067: --
3068: --
3069: OPEN dlvy_csr(l_delivery_id);
3215: FROM WSH_DELIVERY_LEGS
3216: WHERE DELIVERY_ID = p_delivery_id;
3217: --
3218: IF l_debug_on THEN
3219: WSH_DEBUG_SV.logmsg(l_module_name, 'Inserted ' || SQL%ROWCOUNT || ' Legs' );
3220: END IF;
3221: --
3222: OPEN leg_csr(l_delivery_id);
3223: FETCH leg_csr BULK COLLECT INTO x_leg_id_tab;
3229: --
3230: x_delivery_id := l_delivery_id;
3231: --
3232: IF l_debug_on THEN
3233: WSH_DEBUG_SV.pop(l_module_name);
3234: END IF;
3235: --
3236: --}
3237: EXCEPTION
3239:
3240: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3241: --
3242: IF l_debug_on THEN
3243: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3244: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3245: END IF;
3246: WHEN others THEN
3247: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3240: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3241: --
3242: IF l_debug_on THEN
3243: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3244: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3245: END IF;
3246: WHEN others THEN
3247: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3248: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.CLONE',l_module_name);
3247: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3248: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.CLONE',l_module_name);
3249: --
3250: IF l_debug_on THEN
3251: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3252: END IF;
3253: --
3254: END CLONE;
3255: -- J-IB-NPARIKH-}
3448: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3449: --
3450: IF l_debug_on IS NULL
3451: THEN
3452: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3453: END IF;
3454: --
3455: IF l_debug_on THEN
3456: WSH_DEBUG_SV.push(l_module_name);
3452: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3453: END IF;
3454: --
3455: IF l_debug_on THEN
3456: WSH_DEBUG_SV.push(l_module_name);
3457: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id', p_delivery_id);
3458: END IF;
3459: --
3460:
3453: END IF;
3454: --
3455: IF l_debug_on THEN
3456: WSH_DEBUG_SV.push(l_module_name);
3457: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id', p_delivery_id);
3458: END IF;
3459: --
3460:
3461: OPEN c_tbl_rec (p_delivery_id);
3467: --
3468: END IF;
3469: CLOSE c_tbl_rec;
3470: IF l_debug_on THEN
3471: WSH_DEBUG_SV.pop(l_module_name);
3472: END IF;
3473: x_return_status := wsh_util_core.g_ret_sts_success;
3474:
3475: EXCEPTION
3483: --
3484: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.Table_to_Record',l_module_name);
3485: --
3486: IF l_debug_on THEN
3487: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3488: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3489: END IF;
3490: --
3491:
3484: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.Table_to_Record',l_module_name);
3485: --
3486: IF l_debug_on THEN
3487: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3488: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3489: END IF;
3490: --
3491:
3492: END Table_to_Record;
3536: --
3537: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3538: --
3539: IF l_debug_on IS NULL THEN
3540: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3541: END IF;
3542: --
3543: IF l_debug_on THEN
3544: WSH_DEBUG_SV.push(l_module_name);
3540: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3541: END IF;
3542: --
3543: IF l_debug_on THEN
3544: WSH_DEBUG_SV.push(l_module_name);
3545: WSH_DEBUG_SV.log(l_module_name,'Delivery ID count', p_delivery_id_tab.COUNT);
3546: WSH_DEBUG_SV.log(l_module_name,'Interface Flag count', p_tms_interface_flag_tab.COUNT);
3547: END IF;
3548: --
3541: END IF;
3542: --
3543: IF l_debug_on THEN
3544: WSH_DEBUG_SV.push(l_module_name);
3545: WSH_DEBUG_SV.log(l_module_name,'Delivery ID count', p_delivery_id_tab.COUNT);
3546: WSH_DEBUG_SV.log(l_module_name,'Interface Flag count', p_tms_interface_flag_tab.COUNT);
3547: END IF;
3548: --
3549: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3542: --
3543: IF l_debug_on THEN
3544: WSH_DEBUG_SV.push(l_module_name);
3545: WSH_DEBUG_SV.log(l_module_name,'Delivery ID count', p_delivery_id_tab.COUNT);
3546: WSH_DEBUG_SV.log(l_module_name,'Interface Flag count', p_tms_interface_flag_tab.COUNT);
3547: END IF;
3548: --
3549: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3550:
3562: SAVEPOINT tms_update;
3563:
3564: IF (p_delivery_id_tab.COUNT <> p_tms_interface_flag_tab.COUNT) THEN
3565: IF l_debug_on THEN
3566: WSH_DEBUG_SV.logmsg(l_module_name,'Delivery ID and TMS_interface_flag_tab count does not match');
3567: END IF;
3568: RAISE FND_API.G_EXC_ERROR;
3569: END IF;
3570:
3578: l_trip_not_found := 'N';
3579:
3580: --get trip information for delivery, no update when trip not OPEN
3581: IF l_debug_on THEN
3582: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_VALIDATIONS.GET_TRIP_INFORMATION',WSH_DEBUG_SV.C_PROC_LEVEL);
3583: END IF;
3584: WSH_DELIVERY_VALIDATIONS.get_trip_information
3585: (p_delivery_id => p_delivery_id_tab(i),
3586: x_trip_info_rec => l_trip_info_rec,
3586: x_trip_info_rec => l_trip_info_rec,
3587: x_return_status => l_return_status);
3588:
3589: IF l_debug_on THEN
3590: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_DELIVERY_VALIDATIONS.GET_TRIP_INFORMATION',l_return_status);
3591: END IF;
3592:
3593: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3594: IF l_debug_on THEN
3591: END IF;
3592:
3593: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3594: IF l_debug_on THEN
3595: WSH_DEBUG_SV.logmsg(l_module_name,'Delivery ' || p_delivery_id_tab(i) || ' failed during get_trip_information');
3596: END IF;
3597: l_num_error := l_num_error + 1;
3598: EXIT;
3599: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
3609: --Bug 7408338 Trip in status 'In-Transit' should also get processed.
3610: IF (l_trip_info_rec.status_code IN ('OP','IT','CL') OR l_trip_not_found = 'Y') THEN
3611:
3612: IF l_debug_on THEN
3613: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_VALIDATIONS.get_delivery_information',WSH_DEBUG_SV.C_PROC_LEVEL);
3614: END IF;
3615:
3616: WSH_DELIVERY_VALIDATIONS.get_delivery_information(
3617: p_delivery_id => p_delivery_id_tab(i),
3618: x_delivery_rec => l_delivery_info,
3619: x_return_status => l_return_status);
3620:
3621: IF l_debug_on THEN
3622: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_DELIVERY_VALIDATIONS.get_delivery_information',l_return_status);
3623: END IF;
3624:
3625: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3626: IF l_debug_on THEN
3623: END IF;
3624:
3625: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3626: IF l_debug_on THEN
3627: WSH_DEBUG_SV.logmsg(l_module_name,'Delivery ' || p_delivery_id_tab(i) || ' failed during table_to_record');
3628: END IF;
3629: l_num_error := l_num_error + 1;
3630: EXIT;
3631: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
3681: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1)+1;
3682: END IF;
3683:
3684: IF l_debug_on THEN
3685: WSH_DEBUG_SV.log(l_module_name, 'p interface flag for '|| i, p_tms_interface_flag_tab(i));
3686: WSH_DEBUG_SV.log(l_module_name, 'new interface flag for '|| i, l_new_tms_interface_flag_tab(l_count));
3687: WSH_DEBUG_SV.log(l_module_name, 'new version number for '|| i, l_new_tms_version_number_tab(l_count));
3688: END IF;
3689:
3682: END IF;
3683:
3684: IF l_debug_on THEN
3685: WSH_DEBUG_SV.log(l_module_name, 'p interface flag for '|| i, p_tms_interface_flag_tab(i));
3686: WSH_DEBUG_SV.log(l_module_name, 'new interface flag for '|| i, l_new_tms_interface_flag_tab(l_count));
3687: WSH_DEBUG_SV.log(l_module_name, 'new version number for '|| i, l_new_tms_version_number_tab(l_count));
3688: END IF;
3689:
3690: END IF;
3683:
3684: IF l_debug_on THEN
3685: WSH_DEBUG_SV.log(l_module_name, 'p interface flag for '|| i, p_tms_interface_flag_tab(i));
3686: WSH_DEBUG_SV.log(l_module_name, 'new interface flag for '|| i, l_new_tms_interface_flag_tab(l_count));
3687: WSH_DEBUG_SV.log(l_module_name, 'new version number for '|| i, l_new_tms_version_number_tab(l_count));
3688: END IF;
3689:
3690: END IF;
3691:
3701: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3702: END IF;
3703:
3704: IF l_debug_on THEN
3705: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
3706: END IF;
3707:
3708: --proceed with update if not error status
3709: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS, WSH_UTIL_CORE.G_RET_STS_WARNING)
3719: ,last_update_login = FND_GLOBAL.LOGIN_ID
3720: WHERE DELIVERY_ID = l_delivery_id_tab(j);
3721:
3722: IF l_debug_on THEN
3723: WSH_DEBUG_SV.log(l_module_name,'Rows updated',SQL%ROWCOUNT);
3724: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.LOG_OTM_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
3725: END IF;
3726:
3727: WSH_XC_UTIL.log_otm_exception(
3720: WHERE DELIVERY_ID = l_delivery_id_tab(j);
3721:
3722: IF l_debug_on THEN
3723: WSH_DEBUG_SV.log(l_module_name,'Rows updated',SQL%ROWCOUNT);
3724: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.LOG_OTM_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
3725: END IF;
3726:
3727: WSH_XC_UTIL.log_otm_exception(
3728: p_delivery_info_tab => l_delivery_info_tab,
3729: p_new_interface_flag_tab => l_new_tms_interface_flag_tab,
3730: x_return_status => l_return_status);
3731:
3732: IF l_debug_on THEN
3733: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_XC_UTIL.LOG_OTM_EXCEPTION',l_return_status);
3734: END IF;
3735:
3736: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
3737: IF l_debug_on THEN
3734: END IF;
3735:
3736: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
3737: IF l_debug_on THEN
3738: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR: WSH_XC_UTIL.log_otm_exception failed');
3739: END IF;
3740: RAISE FND_API.G_EXC_ERROR;
3741: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3742: IF l_debug_on THEN
3739: END IF;
3740: RAISE FND_API.G_EXC_ERROR;
3741: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3742: IF l_debug_on THEN
3743: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR: WSH_XC_UTIL.log_otm_exception failed unexpectedly');
3744: END IF;
3745: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3746: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
3747: --set return status to warning if l_return_status is warning
3753: END IF;
3754: -- Debug Statements
3755: --
3756: IF l_debug_on THEN
3757: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
3758: WSH_DEBUG_SV.pop(l_module_name);
3759: END IF;
3760: --
3761:
3754: -- Debug Statements
3755: --
3756: IF l_debug_on THEN
3757: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
3758: WSH_DEBUG_SV.pop(l_module_name);
3759: END IF;
3760: --
3761:
3762: EXCEPTION
3764: ROLLBACK TO tms_update;
3765: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3766:
3767: IF l_debug_on THEN
3768: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3769: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3770: END IF;
3771:
3772: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3765: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3766:
3767: IF l_debug_on THEN
3768: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3769: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3770: END IF;
3771:
3772: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3773: ROLLBACK TO tms_update;
3773: ROLLBACK TO tms_update;
3774: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3775:
3776: IF l_debug_on THEN
3777: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3778: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3779: END IF;
3780:
3781: WHEN RECORD_LOCKED THEN
3774: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3775:
3776: IF l_debug_on THEN
3777: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3778: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3779: END IF;
3780:
3781: WHEN RECORD_LOCKED THEN
3782: ROLLBACK TO tms_update;
3781: WHEN RECORD_LOCKED THEN
3782: ROLLBACK TO tms_update;
3783: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3784: IF l_debug_on THEN
3785: WSH_DEBUG_SV.logmsg(l_module_name,'Record_locked exception has occured. Cannot update delivery tms_interface_flag', WSH_DEBUG_SV.C_EXCEP_LEVEL);
3786: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
3787: END IF;
3788:
3789: WHEN others THEN
3782: ROLLBACK TO tms_update;
3783: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3784: IF l_debug_on THEN
3785: WSH_DEBUG_SV.logmsg(l_module_name,'Record_locked exception has occured. Cannot update delivery tms_interface_flag', WSH_DEBUG_SV.C_EXCEP_LEVEL);
3786: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
3787: END IF;
3788:
3789: WHEN others THEN
3790: ROLLBACK TO tms_update;
3790: ROLLBACK TO tms_update;
3791: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG',l_module_name);
3792: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3793: IF l_debug_on THEN
3794: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3795: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3796: END IF;
3797:
3798: END UPDATE_TMS_INTERFACE_FLAG;
3791: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG',l_module_name);
3792: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3793: IF l_debug_on THEN
3794: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3795: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3796: END IF;
3797:
3798: END UPDATE_TMS_INTERFACE_FLAG;
3799: --END OTM R12