[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;
470:
471:
472: --/== Workflow Changes
473: IF l_debug_on THEN
474: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.RAISE_EVENT',WSH_DEBUG_SV.C_PROC_LEVEL);
475: END IF;
476:
477: WSH_WF_STD.RAISE_EVENT(p_entity_type => 'DELIVERY',
478: p_entity_id => x_delivery_id,
480: p_organization_id => p_delivery_info.organization_id,
481: x_return_status => l_wf_rs);
482:
483: IF l_debug_on THEN
484: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_WF_STD.RAISE_EVENT => ',l_wf_rs);
485: END IF;
486: -- Workflow Changes ==/
487:
488: --
486: -- Workflow Changes ==/
487:
488: --
489: IF l_debug_on THEN
490: WSH_DEBUG_SV.log(l_module_name,'x_rowid',x_rowid);
491: WSH_DEBUG_SV.log(l_module_name,'x_delivery_id',x_delivery_id);
492: WSH_DEBUG_SV.log(l_module_name,'x_name',x_name);
493: WSH_DEBUG_SV.pop(l_module_name);
494: END IF;
487:
488: --
489: IF l_debug_on THEN
490: WSH_DEBUG_SV.log(l_module_name,'x_rowid',x_rowid);
491: WSH_DEBUG_SV.log(l_module_name,'x_delivery_id',x_delivery_id);
492: WSH_DEBUG_SV.log(l_module_name,'x_name',x_name);
493: WSH_DEBUG_SV.pop(l_module_name);
494: END IF;
495: --
488: --
489: IF l_debug_on THEN
490: WSH_DEBUG_SV.log(l_module_name,'x_rowid',x_rowid);
491: WSH_DEBUG_SV.log(l_module_name,'x_delivery_id',x_delivery_id);
492: WSH_DEBUG_SV.log(l_module_name,'x_name',x_name);
493: WSH_DEBUG_SV.pop(l_module_name);
494: END IF;
495: --
496: EXCEPTION
489: IF l_debug_on THEN
490: WSH_DEBUG_SV.log(l_module_name,'x_rowid',x_rowid);
491: WSH_DEBUG_SV.log(l_module_name,'x_delivery_id',x_delivery_id);
492: WSH_DEBUG_SV.log(l_module_name,'x_name',x_name);
493: WSH_DEBUG_SV.pop(l_module_name);
494: END IF;
495: --
496: EXCEPTION
497: WHEN wsh_duplicate_name THEN
499: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
500: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
501: --
502: IF l_debug_on THEN
503: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DUPLICATE_NAME exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
504: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DUPLICATE_NAME');
505: END IF;
506: --
507: WHEN others THEN
500: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
501: --
502: IF l_debug_on THEN
503: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DUPLICATE_NAME exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
504: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DUPLICATE_NAME');
505: END IF;
506: --
507: WHEN others THEN
508: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY',l_module_name);
508: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.CREATE_DELIVERY',l_module_name);
509: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
510: --
511: IF l_debug_on THEN
512: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
513: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
514: END IF;
515: --
516: END Create_Delivery;
509: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
510: --
511: IF l_debug_on THEN
512: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
513: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
514: END IF;
515: --
516: END Create_Delivery;
517:
607: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
608: --
609: IF l_debug_on IS NULL
610: THEN
611: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
612: END IF;
613: --
614: IF l_debug_on THEN
615: WSH_DEBUG_SV.push(l_module_name);
611: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
612: END IF;
613: --
614: IF l_debug_on THEN
615: WSH_DEBUG_SV.push(l_module_name);
616: --
617: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
618: END IF;
619: --
613: --
614: IF l_debug_on THEN
615: WSH_DEBUG_SV.push(l_module_name);
616: --
617: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
618: END IF;
619: --
620: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
621:
734: l_tms_version_number := 1;
735:
736: --get trip information for delivery, no update when trip not OPEN
737: IF l_debug_on THEN
738: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_VALIDATIONS.GET_TRIP_INFORMATION',WSH_DEBUG_SV.C_PROC_LEVEL);
739: END IF;
740:
741: WSH_DELIVERY_VALIDATIONS.get_trip_information
742: (p_delivery_id => p_delivery_info.delivery_id,
743: x_trip_info_rec => l_trip_info_rec,
744: x_return_status => l_return_status);
745:
746: IF l_debug_on THEN
747: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_DELIVERY_VALIDATIONS.GET_TRIP_INFORMATION',l_return_status);
748: END IF;
749:
750: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
751: IF l_debug_on THEN
748: END IF;
749:
750: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
751: IF l_debug_on THEN
752: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_DELIVERY_VALIDATIONS.get_trip_information');
753: END IF;
754: RAISE api_return_fail;
755: END IF;
756:
761: -- only do changes when there's no trip or trip status is OPEN
762: IF (l_trip_info_rec.status_code = 'OP' OR l_trip_not_found = 'Y') THEN
763:
764: IF l_debug_on THEN
765: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_VALIDATIONS.get_delivery_information',WSH_DEBUG_SV.C_PROC_LEVEL);
766: END IF;
767:
768: WSH_DELIVERY_VALIDATIONS.get_delivery_information(
769: p_delivery_id => p_delivery_info.delivery_id,
770: x_delivery_rec => l_delivery_info,
771: x_return_status => l_return_status);
772:
773: IF l_debug_on THEN
774: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_DELIVERY_VALIDATIONS.get_delivery_information',l_return_status);
775: END IF;
776:
777: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
778: IF l_debug_on THEN
775: END IF;
776:
777: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
778: IF l_debug_on THEN
779: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_DELIVERY_VALIDATIONS.get_delivery_information');
780: END IF;
781: RAISE api_return_fail;
782: END IF;
783:
806: OR (NVL(l_delivery_info.latest_dropoff_date, l_sysdate) <>
807: NVL(p_delivery_info.latest_dropoff_date, l_sysdate))) THEN
808:
809: IF l_debug_on THEN
810: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info name', p_delivery_info.name);
811: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info name', l_delivery_info.name);
812: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info initial_pickup_location_id', p_delivery_info.initial_pickup_location_id);
813: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info initial_pickup_location_id', l_delivery_info.initial_pickup_location_id);
814: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ultimate_dropoff_location_id', p_delivery_info.ultimate_dropoff_location_id);
807: NVL(p_delivery_info.latest_dropoff_date, l_sysdate))) THEN
808:
809: IF l_debug_on THEN
810: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info name', p_delivery_info.name);
811: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info name', l_delivery_info.name);
812: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info initial_pickup_location_id', p_delivery_info.initial_pickup_location_id);
813: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info initial_pickup_location_id', l_delivery_info.initial_pickup_location_id);
814: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ultimate_dropoff_location_id', p_delivery_info.ultimate_dropoff_location_id);
815: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ultimate_dropoff_location_id', l_delivery_info.ultimate_dropoff_location_id);
808:
809: IF l_debug_on THEN
810: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info name', p_delivery_info.name);
811: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info name', l_delivery_info.name);
812: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info initial_pickup_location_id', p_delivery_info.initial_pickup_location_id);
813: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info initial_pickup_location_id', l_delivery_info.initial_pickup_location_id);
814: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ultimate_dropoff_location_id', p_delivery_info.ultimate_dropoff_location_id);
815: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ultimate_dropoff_location_id', l_delivery_info.ultimate_dropoff_location_id);
816: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info freight_terms_code', p_delivery_info.freight_terms_code);
809: IF l_debug_on THEN
810: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info name', p_delivery_info.name);
811: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info name', l_delivery_info.name);
812: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info initial_pickup_location_id', p_delivery_info.initial_pickup_location_id);
813: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info initial_pickup_location_id', l_delivery_info.initial_pickup_location_id);
814: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ultimate_dropoff_location_id', p_delivery_info.ultimate_dropoff_location_id);
815: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ultimate_dropoff_location_id', l_delivery_info.ultimate_dropoff_location_id);
816: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info freight_terms_code', p_delivery_info.freight_terms_code);
817: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info freight_terms_code', l_delivery_info.freight_terms_code);
810: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info name', p_delivery_info.name);
811: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info name', l_delivery_info.name);
812: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info initial_pickup_location_id', p_delivery_info.initial_pickup_location_id);
813: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info initial_pickup_location_id', l_delivery_info.initial_pickup_location_id);
814: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ultimate_dropoff_location_id', p_delivery_info.ultimate_dropoff_location_id);
815: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ultimate_dropoff_location_id', l_delivery_info.ultimate_dropoff_location_id);
816: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info freight_terms_code', p_delivery_info.freight_terms_code);
817: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info freight_terms_code', l_delivery_info.freight_terms_code);
818: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info fob_code', p_delivery_info.fob_code);
811: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info name', l_delivery_info.name);
812: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info initial_pickup_location_id', p_delivery_info.initial_pickup_location_id);
813: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info initial_pickup_location_id', l_delivery_info.initial_pickup_location_id);
814: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ultimate_dropoff_location_id', p_delivery_info.ultimate_dropoff_location_id);
815: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ultimate_dropoff_location_id', l_delivery_info.ultimate_dropoff_location_id);
816: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info freight_terms_code', p_delivery_info.freight_terms_code);
817: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info freight_terms_code', l_delivery_info.freight_terms_code);
818: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info fob_code', p_delivery_info.fob_code);
819: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info fob_code', l_delivery_info.fob_code);
812: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info initial_pickup_location_id', p_delivery_info.initial_pickup_location_id);
813: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info initial_pickup_location_id', l_delivery_info.initial_pickup_location_id);
814: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ultimate_dropoff_location_id', p_delivery_info.ultimate_dropoff_location_id);
815: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ultimate_dropoff_location_id', l_delivery_info.ultimate_dropoff_location_id);
816: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info freight_terms_code', p_delivery_info.freight_terms_code);
817: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info freight_terms_code', l_delivery_info.freight_terms_code);
818: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info fob_code', p_delivery_info.fob_code);
819: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info fob_code', l_delivery_info.fob_code);
820: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ship_method_code', p_delivery_info.ship_method_code);
813: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info initial_pickup_location_id', l_delivery_info.initial_pickup_location_id);
814: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ultimate_dropoff_location_id', p_delivery_info.ultimate_dropoff_location_id);
815: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ultimate_dropoff_location_id', l_delivery_info.ultimate_dropoff_location_id);
816: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info freight_terms_code', p_delivery_info.freight_terms_code);
817: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info freight_terms_code', l_delivery_info.freight_terms_code);
818: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info fob_code', p_delivery_info.fob_code);
819: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info fob_code', l_delivery_info.fob_code);
820: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ship_method_code', p_delivery_info.ship_method_code);
821: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ship_method_code', l_delivery_info.ship_method_code);
814: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ultimate_dropoff_location_id', p_delivery_info.ultimate_dropoff_location_id);
815: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ultimate_dropoff_location_id', l_delivery_info.ultimate_dropoff_location_id);
816: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info freight_terms_code', p_delivery_info.freight_terms_code);
817: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info freight_terms_code', l_delivery_info.freight_terms_code);
818: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info fob_code', p_delivery_info.fob_code);
819: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info fob_code', l_delivery_info.fob_code);
820: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ship_method_code', p_delivery_info.ship_method_code);
821: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ship_method_code', l_delivery_info.ship_method_code);
822: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info carrier_id', p_delivery_info.carrier_id);
815: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ultimate_dropoff_location_id', l_delivery_info.ultimate_dropoff_location_id);
816: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info freight_terms_code', p_delivery_info.freight_terms_code);
817: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info freight_terms_code', l_delivery_info.freight_terms_code);
818: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info fob_code', p_delivery_info.fob_code);
819: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info fob_code', l_delivery_info.fob_code);
820: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ship_method_code', p_delivery_info.ship_method_code);
821: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ship_method_code', l_delivery_info.ship_method_code);
822: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info carrier_id', p_delivery_info.carrier_id);
823: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info carrier_id', l_delivery_info.carrier_id);
816: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info freight_terms_code', p_delivery_info.freight_terms_code);
817: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info freight_terms_code', l_delivery_info.freight_terms_code);
818: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info fob_code', p_delivery_info.fob_code);
819: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info fob_code', l_delivery_info.fob_code);
820: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ship_method_code', p_delivery_info.ship_method_code);
821: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ship_method_code', l_delivery_info.ship_method_code);
822: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info carrier_id', p_delivery_info.carrier_id);
823: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info carrier_id', l_delivery_info.carrier_id);
824: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info service_level', p_delivery_info.service_level);
817: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info freight_terms_code', l_delivery_info.freight_terms_code);
818: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info fob_code', p_delivery_info.fob_code);
819: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info fob_code', l_delivery_info.fob_code);
820: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ship_method_code', p_delivery_info.ship_method_code);
821: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ship_method_code', l_delivery_info.ship_method_code);
822: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info carrier_id', p_delivery_info.carrier_id);
823: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info carrier_id', l_delivery_info.carrier_id);
824: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info service_level', p_delivery_info.service_level);
825: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info service_level', l_delivery_info.service_level);
818: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info fob_code', p_delivery_info.fob_code);
819: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info fob_code', l_delivery_info.fob_code);
820: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ship_method_code', p_delivery_info.ship_method_code);
821: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ship_method_code', l_delivery_info.ship_method_code);
822: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info carrier_id', p_delivery_info.carrier_id);
823: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info carrier_id', l_delivery_info.carrier_id);
824: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info service_level', p_delivery_info.service_level);
825: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info service_level', l_delivery_info.service_level);
826: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info mode_of_transport', p_delivery_info.mode_of_transport);
819: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info fob_code', l_delivery_info.fob_code);
820: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ship_method_code', p_delivery_info.ship_method_code);
821: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ship_method_code', l_delivery_info.ship_method_code);
822: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info carrier_id', p_delivery_info.carrier_id);
823: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info carrier_id', l_delivery_info.carrier_id);
824: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info service_level', p_delivery_info.service_level);
825: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info service_level', l_delivery_info.service_level);
826: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info mode_of_transport', p_delivery_info.mode_of_transport);
827: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info mode_of_transport', l_delivery_info.mode_of_transport);
820: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info ship_method_code', p_delivery_info.ship_method_code);
821: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ship_method_code', l_delivery_info.ship_method_code);
822: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info carrier_id', p_delivery_info.carrier_id);
823: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info carrier_id', l_delivery_info.carrier_id);
824: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info service_level', p_delivery_info.service_level);
825: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info service_level', l_delivery_info.service_level);
826: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info mode_of_transport', p_delivery_info.mode_of_transport);
827: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info mode_of_transport', l_delivery_info.mode_of_transport);
828: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_pickup_date', p_delivery_info.earliest_pickup_date);
821: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info ship_method_code', l_delivery_info.ship_method_code);
822: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info carrier_id', p_delivery_info.carrier_id);
823: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info carrier_id', l_delivery_info.carrier_id);
824: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info service_level', p_delivery_info.service_level);
825: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info service_level', l_delivery_info.service_level);
826: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info mode_of_transport', p_delivery_info.mode_of_transport);
827: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info mode_of_transport', l_delivery_info.mode_of_transport);
828: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_pickup_date', p_delivery_info.earliest_pickup_date);
829: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_pickup_date', l_delivery_info.earliest_pickup_date);
822: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info carrier_id', p_delivery_info.carrier_id);
823: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info carrier_id', l_delivery_info.carrier_id);
824: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info service_level', p_delivery_info.service_level);
825: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info service_level', l_delivery_info.service_level);
826: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info mode_of_transport', p_delivery_info.mode_of_transport);
827: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info mode_of_transport', l_delivery_info.mode_of_transport);
828: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_pickup_date', p_delivery_info.earliest_pickup_date);
829: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_pickup_date', l_delivery_info.earliest_pickup_date);
830: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_pickup_date', p_delivery_info.latest_pickup_date);
823: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info carrier_id', l_delivery_info.carrier_id);
824: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info service_level', p_delivery_info.service_level);
825: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info service_level', l_delivery_info.service_level);
826: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info mode_of_transport', p_delivery_info.mode_of_transport);
827: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info mode_of_transport', l_delivery_info.mode_of_transport);
828: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_pickup_date', p_delivery_info.earliest_pickup_date);
829: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_pickup_date', l_delivery_info.earliest_pickup_date);
830: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_pickup_date', p_delivery_info.latest_pickup_date);
831: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_pickup_date', l_delivery_info.latest_pickup_date);
824: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info service_level', p_delivery_info.service_level);
825: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info service_level', l_delivery_info.service_level);
826: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info mode_of_transport', p_delivery_info.mode_of_transport);
827: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info mode_of_transport', l_delivery_info.mode_of_transport);
828: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_pickup_date', p_delivery_info.earliest_pickup_date);
829: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_pickup_date', l_delivery_info.earliest_pickup_date);
830: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_pickup_date', p_delivery_info.latest_pickup_date);
831: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_pickup_date', l_delivery_info.latest_pickup_date);
832: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_dropoff_date', p_delivery_info.earliest_dropoff_date);
825: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info service_level', l_delivery_info.service_level);
826: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info mode_of_transport', p_delivery_info.mode_of_transport);
827: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info mode_of_transport', l_delivery_info.mode_of_transport);
828: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_pickup_date', p_delivery_info.earliest_pickup_date);
829: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_pickup_date', l_delivery_info.earliest_pickup_date);
830: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_pickup_date', p_delivery_info.latest_pickup_date);
831: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_pickup_date', l_delivery_info.latest_pickup_date);
832: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_dropoff_date', p_delivery_info.earliest_dropoff_date);
833: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_dropoff_date', l_delivery_info.earliest_dropoff_date);
826: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info mode_of_transport', p_delivery_info.mode_of_transport);
827: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info mode_of_transport', l_delivery_info.mode_of_transport);
828: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_pickup_date', p_delivery_info.earliest_pickup_date);
829: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_pickup_date', l_delivery_info.earliest_pickup_date);
830: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_pickup_date', p_delivery_info.latest_pickup_date);
831: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_pickup_date', l_delivery_info.latest_pickup_date);
832: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_dropoff_date', p_delivery_info.earliest_dropoff_date);
833: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_dropoff_date', l_delivery_info.earliest_dropoff_date);
834: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_dropoff_date', p_delivery_info.latest_dropoff_date);
827: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info mode_of_transport', l_delivery_info.mode_of_transport);
828: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_pickup_date', p_delivery_info.earliest_pickup_date);
829: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_pickup_date', l_delivery_info.earliest_pickup_date);
830: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_pickup_date', p_delivery_info.latest_pickup_date);
831: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_pickup_date', l_delivery_info.latest_pickup_date);
832: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_dropoff_date', p_delivery_info.earliest_dropoff_date);
833: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_dropoff_date', l_delivery_info.earliest_dropoff_date);
834: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_dropoff_date', p_delivery_info.latest_dropoff_date);
835: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_dropoff_date', l_delivery_info.latest_dropoff_date);
828: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_pickup_date', p_delivery_info.earliest_pickup_date);
829: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_pickup_date', l_delivery_info.earliest_pickup_date);
830: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_pickup_date', p_delivery_info.latest_pickup_date);
831: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_pickup_date', l_delivery_info.latest_pickup_date);
832: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_dropoff_date', p_delivery_info.earliest_dropoff_date);
833: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_dropoff_date', l_delivery_info.earliest_dropoff_date);
834: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_dropoff_date', p_delivery_info.latest_dropoff_date);
835: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_dropoff_date', l_delivery_info.latest_dropoff_date);
836: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info client_id', p_delivery_info.client_id); -- Modified R12.1.1 LSP PROJECT
829: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_pickup_date', l_delivery_info.earliest_pickup_date);
830: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_pickup_date', p_delivery_info.latest_pickup_date);
831: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_pickup_date', l_delivery_info.latest_pickup_date);
832: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_dropoff_date', p_delivery_info.earliest_dropoff_date);
833: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_dropoff_date', l_delivery_info.earliest_dropoff_date);
834: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_dropoff_date', p_delivery_info.latest_dropoff_date);
835: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_dropoff_date', l_delivery_info.latest_dropoff_date);
836: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info client_id', p_delivery_info.client_id); -- Modified R12.1.1 LSP PROJECT
837: END IF;
830: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_pickup_date', p_delivery_info.latest_pickup_date);
831: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_pickup_date', l_delivery_info.latest_pickup_date);
832: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_dropoff_date', p_delivery_info.earliest_dropoff_date);
833: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_dropoff_date', l_delivery_info.earliest_dropoff_date);
834: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_dropoff_date', p_delivery_info.latest_dropoff_date);
835: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_dropoff_date', l_delivery_info.latest_dropoff_date);
836: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info client_id', p_delivery_info.client_id); -- Modified R12.1.1 LSP PROJECT
837: END IF;
838:
831: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_pickup_date', l_delivery_info.latest_pickup_date);
832: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_dropoff_date', p_delivery_info.earliest_dropoff_date);
833: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_dropoff_date', l_delivery_info.earliest_dropoff_date);
834: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_dropoff_date', p_delivery_info.latest_dropoff_date);
835: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_dropoff_date', l_delivery_info.latest_dropoff_date);
836: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info client_id', p_delivery_info.client_id); -- Modified R12.1.1 LSP PROJECT
837: END IF;
838:
839: IF (NVL(l_delivery_info.tms_interface_flag,
832: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info earliest_dropoff_date', p_delivery_info.earliest_dropoff_date);
833: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info earliest_dropoff_date', l_delivery_info.earliest_dropoff_date);
834: WSH_DEBUG_SV.log(l_module_name,'p_delivery_info latest_dropoff_date', p_delivery_info.latest_dropoff_date);
835: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info latest_dropoff_date', l_delivery_info.latest_dropoff_date);
836: WSH_DEBUG_SV.log(l_module_name,'l_delivery_info client_id', p_delivery_info.client_id); -- Modified R12.1.1 LSP PROJECT
837: END IF;
838:
839: IF (NVL(l_delivery_info.tms_interface_flag,
840: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN
1017: END IF;
1018:
1019: --
1020: IF l_debug_on THEN
1021: WSH_DEBUG_SV.log(l_module_name,'Rows updated',SQL%ROWCOUNT);
1022: 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);
1023:
1024: END IF;
1025:
1018:
1019: --
1020: IF l_debug_on THEN
1021: WSH_DEBUG_SV.log(l_module_name,'Rows updated',SQL%ROWCOUNT);
1022: 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);
1023:
1024: END IF;
1025:
1026: --OTM R12
1026: --OTM R12
1027: IF (l_gc3_is_installed = 'Y' AND l_tms_update = 'Y') THEN
1028:
1029: IF l_debug_on THEN
1030: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.LOG_OTM_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
1031: END IF;
1032:
1033: WSH_XC_UTIL.log_otm_exception(
1034: p_delivery_info_tab => l_delivery_info_tab,
1035: p_new_interface_flag_tab => l_new_interface_flag_tab,
1036: x_return_status => l_return_status);
1037:
1038: IF l_debug_on THEN
1039: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_XC_UTIL.LOG_OTM_EXCEPTION',l_return_status);
1040: END IF;
1041:
1042: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
1043: IF l_debug_on THEN
1040: END IF;
1041:
1042: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
1043: IF l_debug_on THEN
1044: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_XC_UTIL.log_otm_exception');
1045: END IF;
1046: RAISE api_return_fail;
1047: END IF;
1048: END IF;
1063: -- If UOM changes then compute the delta (difference between new W/V and old W/V)
1064: IF ( NVL(l_weight_uom_code,'-99') <> NVL(p_delivery_info.weight_uom_code,'-99') AND
1065: l_gross_weight is not null ) THEN -- BugFix #4587421
1066: IF l_debug_on THEN
1067: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.convert_uom',WSH_DEBUG_SV.C_PROC_LEVEL);
1068: END IF;
1069: l_diff_gross_wt := WSH_WV_UTILS.convert_uom(
1070: from_uom => p_delivery_info.weight_uom_code,
1071: to_uom => l_weight_uom_code,
1071: to_uom => l_weight_uom_code,
1072: quantity => l_gross_weight) - NVL(l_gross_wt,0); -- BugFix #4587421
1073:
1074: IF l_debug_on THEN
1075: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.convert_uom',WSH_DEBUG_SV.C_PROC_LEVEL);
1076: END IF;
1077: l_diff_net_wt := WSH_WV_UTILS.convert_uom(
1078: from_uom => p_delivery_info.weight_uom_code,
1079: to_uom => l_weight_uom_code,
1085:
1086: IF (NVL(l_volume_uom_code,'-99') <> NVL(p_delivery_info.volume_uom_code,'-99') AND
1087: p_delivery_info.volume is not null) THEN
1088: IF l_debug_on THEN
1089: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.convert_uom',WSH_DEBUG_SV.C_PROC_LEVEL);
1090: END IF;
1091: l_diff_vol := WSH_WV_UTILS.convert_uom(
1092: from_uom => p_delivery_info.volume_uom_code,
1093: to_uom => l_volume_uom_code,
1128: -- Bug No:4085560 - 11.5.10.1CU:INCORRECT WT SHOWN FOR THE STOP(end)
1129: --
1130:
1131: IF l_debug_on THEN
1132: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DEL_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
1133: END IF;
1134:
1135: WSH_WV_UTILS.DEL_WV_Post_Process(
1136: p_delivery_id => p_delivery_info.delivery_id,
1152: IF NVL(p_delivery_info.delivery_type, 'STANDARD')='STANDARD' AND NVL(p_delivery_info.PRORATE_WT_FLAG,'N')='Y'
1153: AND (nvl(l_diff_gross_wt,0) <> 0 OR nvl(l_diff_net_wt,0) <> 0) THEN --{
1154: --
1155: IF l_debug_on THEN
1156: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.prorate_weight',WSH_DEBUG_SV.C_PROC_LEVEL);
1157: END IF;
1158: --
1159: WSH_WV_UTILS.prorate_weight(
1160: p_entity_type => 'DELIVERY',
1168: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1169: x_return_status := l_return_status;
1170: --
1171: IF l_debug_on THEN
1172: wsh_debug_sv.log(l_module_name,'Return Status After Calling WSH_WV_UTILS.prorate_weight',l_return_status);
1173: END IF;
1174: --
1175: wsh_util_core.api_post_call(
1176: p_return_status => l_return_status,
1180: END IF;
1181: END IF; --}
1182:
1183: IF l_debug_on THEN
1184: WSH_DEBUG_SV.pop(l_module_name);
1185: END IF;
1186: --
1187:
1188: EXCEPTION
1189: --OTM R12
1190: WHEN api_return_fail THEN
1191: x_return_status := l_return_status;
1192: IF l_debug_on THEN
1193: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
1194: WSH_DEBUG_SV.pop(l_module_name);
1195: END IF;
1196: --END OTM R12
1197: -- J: W/V Changes
1190: WHEN api_return_fail THEN
1191: x_return_status := l_return_status;
1192: IF l_debug_on THEN
1193: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
1194: WSH_DEBUG_SV.pop(l_module_name);
1195: END IF;
1196: --END OTM R12
1197: -- J: W/V Changes
1198: WHEN e_wt_vol_fail THEN
1200: FND_MESSAGE.Set_Token('DEL_NAME', p_delivery_info.name);
1201: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1202: WSH_UTIL_CORE.add_message (x_return_status);
1203: IF l_debug_on THEN
1204: WSH_DEBUG_SV.logmsg(l_module_name,'E_WT_VOL_FAIL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1205: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:E_WT_VOL_FAIL');
1206: END IF;
1207:
1208: WHEN NO_DATA_FOUND THEN
1201: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1202: WSH_UTIL_CORE.add_message (x_return_status);
1203: IF l_debug_on THEN
1204: WSH_DEBUG_SV.logmsg(l_module_name,'E_WT_VOL_FAIL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1205: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:E_WT_VOL_FAIL');
1206: END IF;
1207:
1208: WHEN NO_DATA_FOUND THEN
1209: FND_MESSAGE.Set_Name('WSH','WSH_DEL_NOT_FOUND');
1210: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1211: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
1212: --
1213: IF l_debug_on THEN
1214: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1215: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
1216: END IF;
1217: --
1218:
1211: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
1212: --
1213: IF l_debug_on THEN
1214: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1215: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
1216: END IF;
1217: --
1218:
1219: --Bug # 3268641
1222: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1223: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
1224:
1225: IF l_debug_on THEN
1226: WSH_DEBUG_SV.logmsg(l_module_name,'DUP_VAL_ON_INDEX exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1227: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DUP_VAL_ON_INDEX');
1228: END IF;
1229: --
1230:
1223: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
1224:
1225: IF l_debug_on THEN
1226: WSH_DEBUG_SV.logmsg(l_module_name,'DUP_VAL_ON_INDEX exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1227: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DUP_VAL_ON_INDEX');
1228: END IF;
1229: --
1230:
1231: WHEN others THEN
1231: WHEN others THEN
1232: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.UPDATE_DELIVERY',l_module_name);
1233: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1234: IF l_debug_on THEN
1235: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1236: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1237: END IF;
1238: --
1239: END Update_Delivery;
1232: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.UPDATE_DELIVERY',l_module_name);
1233: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1234: IF l_debug_on THEN
1235: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1236: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1237: END IF;
1238: --
1239: END Update_Delivery;
1240:
1300: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1301: --
1302: IF l_debug_on IS NULL
1303: THEN
1304: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1305: END IF;
1306: --
1307: IF l_debug_on THEN
1308: WSH_DEBUG_SV.push(l_module_name);
1304: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1305: END IF;
1306: --
1307: IF l_debug_on THEN
1308: WSH_DEBUG_SV.push(l_module_name);
1309: --
1310: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
1311: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1312: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
1306: --
1307: IF l_debug_on THEN
1308: WSH_DEBUG_SV.push(l_module_name);
1309: --
1310: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
1311: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1312: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
1313: END IF;
1314: --
1307: IF l_debug_on THEN
1308: WSH_DEBUG_SV.push(l_module_name);
1309: --
1310: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
1311: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1312: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
1313: END IF;
1314: --
1315: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1308: WSH_DEBUG_SV.push(l_module_name);
1309: --
1310: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
1311: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1312: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
1313: END IF;
1314: --
1315: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1316: g_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1328: l_delivery_id := p_delivery_id;
1329: END IF;
1330:
1331: IF l_debug_on THEN
1332: WSH_DEBUG_SV.log(l_module_name,'l_delivery_id',l_delivery_id);
1333: END IF;
1334:
1335: IF (p_validate_flag = 'Y') THEN
1336: wsh_delivery_validations.check_delete_delivery(
1369: FND_MESSAGE.SET_TOKEN('DET_NAME',dt.delivery_detail_id);
1370: wsh_util_core.add_message(x_return_status,l_module_name);
1371: --
1372: IF l_debug_on THEN
1373: WSH_DEBUG_SV.log(l_module_name,'x_return_status',
1374: x_return_status);
1375: WSH_DEBUG_SV.pop(l_module_name);
1376: END IF;
1377: --
1371: --
1372: IF l_debug_on THEN
1373: WSH_DEBUG_SV.log(l_module_name,'x_return_status',
1374: x_return_status);
1375: WSH_DEBUG_SV.pop(l_module_name);
1376: END IF;
1377: --
1378: RETURN;
1379: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1421: -- delete freight costs associated with delivery (bug 4376236)
1422: DELETE FROM wsh_freight_costs
1423: WHERE delivery_id = l_delivery_id;
1424: IF l_debug_on THEN
1425: WSH_DEBUG_SV.log(l_module_name,
1426: 'Freight cost rows deleted', SQL%ROWCOUNT);
1427: END IF;
1428:
1429: -- delete the delivery
1431: WHERE delivery_id = l_delivery_id;
1432: --
1433:
1434: IF l_debug_on THEN
1435: WSH_DEBUG_SV.log(l_module_name,'Rows deleted',SQL%ROWCOUNT);
1436: END IF;
1437:
1438: ELSE
1439: IF l_debug_on THEN
1436: END IF;
1437:
1438: ELSE
1439: IF l_debug_on THEN
1440: WSH_DEBUG_SV.log(l_module_name,'Raise Others');
1441: END IF;
1442: RAISE others;
1443: END IF; --} l_delivery_id IS NOT NULL
1444: /* Bug 2310456 warning */
1446: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1447: END IF;
1448: --
1449: IF l_debug_on THEN
1450: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
1451: WSH_DEBUG_SV.pop(l_module_name);
1452: END IF;
1453: --
1454: EXCEPTION
1447: END IF;
1448: --
1449: IF l_debug_on THEN
1450: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
1451: WSH_DEBUG_SV.pop(l_module_name);
1452: END IF;
1453: --
1454: EXCEPTION
1455: WHEN cannot_delete_delivery THEN
1471: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1472: wsh_util_core.add_message(x_return_status,l_module_name);
1473: --
1474: IF l_debug_on THEN
1475: WSH_DEBUG_SV.logmsg(l_module_name,'CANNOT_DELETE_DELIVERY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1476: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CANNOT_DELETE_DELIVERY');
1477: END IF;
1478: --
1479:
1472: wsh_util_core.add_message(x_return_status,l_module_name);
1473: --
1474: IF l_debug_on THEN
1475: WSH_DEBUG_SV.logmsg(l_module_name,'CANNOT_DELETE_DELIVERY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1476: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CANNOT_DELETE_DELIVERY');
1477: END IF;
1478: --
1479:
1480: WHEN others THEN
1495: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.DELETE_DELIVERY',l_module_name);
1496: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1497: --
1498: IF l_debug_on THEN
1499: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1500: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1501: END IF;
1502: --
1503: END Delete_Delivery;
1496: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1497: --
1498: IF l_debug_on THEN
1499: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1500: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1501: END IF;
1502: --
1503: END Delete_Delivery;
1504:
1537: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1538: --
1539: IF l_debug_on IS NULL
1540: THEN
1541: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1542: END IF;
1543: --
1544: IF l_debug_on THEN
1545: WSH_DEBUG_SV.push(l_module_name);
1541: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1542: END IF;
1543: --
1544: IF l_debug_on THEN
1545: WSH_DEBUG_SV.push(l_module_name);
1546: --
1547: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
1548: END IF;
1549: --
1543: --
1544: IF l_debug_on THEN
1545: WSH_DEBUG_SV.push(l_module_name);
1546: --
1547: WSH_DEBUG_SV.log(l_module_name,'P_ROWID',P_ROWID);
1548: END IF;
1549: --
1550: OPEN lock_row;
1551: FETCH lock_row INTO Recinfo;
1553: IF (lock_row%NOTFOUND) THEN
1554: CLOSE lock_row;
1555: FND_MESSAGE.Set_Name('FND','FORM_RECORD_DELETED');
1556: IF l_debug_on THEN
1557: WSH_DEBUG_SV.log(l_module_name,'FORM_RECORD_DELETED');
1558: END IF;
1559: app_exception.raise_exception;
1560: END IF;
1561:
1979: --
1980: ) THEN
1981: --
1982: IF l_debug_on THEN
1983: WSH_DEBUG_SV.log(l_module_name,'Nothing has changed');
1984: WSH_DEBUG_SV.pop(l_module_name);
1985: END IF;
1986: --
1987: RETURN;
1980: ) THEN
1981: --
1982: IF l_debug_on THEN
1983: WSH_DEBUG_SV.log(l_module_name,'Nothing has changed');
1984: WSH_DEBUG_SV.pop(l_module_name);
1985: END IF;
1986: --
1987: RETURN;
1988: ELSE
1987: RETURN;
1988: ELSE
1989: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
1990: IF l_debug_on THEN
1991: WSH_DEBUG_SV.log(l_module_name,'FORM_RECORD_CHANGED');
1992: END IF;
1993: app_exception.raise_exception;
1994: END IF;
1995: --
1993: app_exception.raise_exception;
1994: END IF;
1995: --
1996: IF l_debug_on THEN
1997: WSH_DEBUG_SV.pop(l_module_name);
1998: END IF;
1999: --
2000: EXCEPTION
2001: WHEN app_exception.application_exception or app_exception.record_lock_exception THEN
2003: close lock_row;
2004: end if;
2005: --
2006: IF l_debug_on THEN
2007: WSH_DEBUG_SV.logmsg(l_module_name,'APP_EXCEPTION.APPLICATION_EXCEPTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2008: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APP_EXCEPTION.APPLICATION_EXCEPTION');
2009: END IF;
2010: --
2011: RAISE;
2004: end if;
2005: --
2006: IF l_debug_on THEN
2007: WSH_DEBUG_SV.logmsg(l_module_name,'APP_EXCEPTION.APPLICATION_EXCEPTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2008: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APP_EXCEPTION.APPLICATION_EXCEPTION');
2009: END IF;
2010: --
2011: RAISE;
2012: --
2015: close lock_row;
2016: end if;
2017: --
2018: IF l_debug_on THEN
2019: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2020: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2021: END IF;
2022: raise;
2023: --
2016: end if;
2017: --
2018: IF l_debug_on THEN
2019: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2020: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2021: END IF;
2022: raise;
2023: --
2024: END Lock_Delivery;
2232: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2233: --
2234: IF l_debug_on IS NULL
2235: THEN
2236: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2237: END IF;
2238: --
2239: IF l_debug_on THEN
2240: WSH_DEBUG_SV.push(l_module_name);
2236: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2237: END IF;
2238: --
2239: IF l_debug_on THEN
2240: WSH_DEBUG_SV.push(l_module_name);
2241: --
2242: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2243: END IF;
2244: --
2238: --
2239: IF l_debug_on THEN
2240: WSH_DEBUG_SV.push(l_module_name);
2241: --
2242: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2243: END IF;
2244: --
2245: IF (p_delivery_id IS NULL) THEN
2246: raise others;
2253: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
2254: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2255: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
2256: IF l_debug_on THEN
2257: WSH_DEBUG_SV.log(l_module_name,'WSH_DEL_NOT_FOUND');
2258: END IF;
2259: ELSE
2260: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2261: END IF;
2262:
2263: CLOSE delivery_record;
2264: --
2265: IF l_debug_on THEN
2266: WSH_DEBUG_SV.pop(l_module_name);
2267: END IF;
2268: --
2269: EXCEPTION
2270: WHEN others THEN
2275: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.POPULATE_RECORD',l_module_name);
2276: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2277: --
2278: IF l_debug_on THEN
2279: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2280: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2281: END IF;
2282: --
2283: END Populate_Record;
2276: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2277: --
2278: IF l_debug_on THEN
2279: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2280: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2281: END IF;
2282: --
2283: END Populate_Record;
2284:
2314: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2315: --
2316: IF l_debug_on IS NULL
2317: THEN
2318: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2319: END IF;
2320: --
2321: IF l_debug_on THEN
2322: WSH_DEBUG_SV.push(l_module_name);
2318: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2319: END IF;
2320: --
2321: IF l_debug_on THEN
2322: WSH_DEBUG_SV.push(l_module_name);
2323: --
2324: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2325: END IF;
2326: --
2320: --
2321: IF l_debug_on THEN
2322: WSH_DEBUG_SV.push(l_module_name);
2323: --
2324: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2325: END IF;
2326: --
2327: IF (p_delivery_id IS NULL) THEN
2328: raise others;
2336: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
2337: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
2338: --
2339: IF l_debug_on THEN
2340: WSH_DEBUG_SV.log(l_module_name,'WSH_DEL_NOT_FOUND');
2341: WSH_DEBUG_SV.pop(l_module_name);
2342: END IF;
2343: --
2344: RETURN null;
2337: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
2338: --
2339: IF l_debug_on THEN
2340: WSH_DEBUG_SV.log(l_module_name,'WSH_DEL_NOT_FOUND');
2341: WSH_DEBUG_SV.pop(l_module_name);
2342: END IF;
2343: --
2344: RETURN null;
2345: END IF;
2345: END IF;
2346:
2347: --
2348: IF l_debug_on THEN
2349: WSH_DEBUG_SV.log(l_module_name,'returns ',x_name);
2350: WSH_DEBUG_SV.pop(l_module_name);
2351: END IF;
2352: --
2353: RETURN x_name;
2346:
2347: --
2348: IF l_debug_on THEN
2349: WSH_DEBUG_SV.log(l_module_name,'returns ',x_name);
2350: WSH_DEBUG_SV.pop(l_module_name);
2351: END IF;
2352: --
2353: RETURN x_name;
2354:
2357: WHEN others THEN
2358: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.GET_NAME',l_module_name);
2359: --
2360: IF l_debug_on THEN
2361: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2362: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2363: END IF;
2364: --
2365: RETURN null;
2358: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.GET_NAME',l_module_name);
2359: --
2360: IF l_debug_on THEN
2361: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2362: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2363: END IF;
2364: --
2365: RETURN null;
2366: END Get_Name;
2391: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2392: --
2393: IF l_debug_on IS NULL
2394: THEN
2395: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2396: END IF;
2397: --
2398: IF l_debug_on THEN
2399: WSH_DEBUG_SV.push(l_module_name);
2395: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2396: END IF;
2397: --
2398: IF l_debug_on THEN
2399: WSH_DEBUG_SV.push(l_module_name);
2400: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
2401: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
2402: WSH_DEBUG_SV.log(l_module_name,'Total Number of Delivery Records being locked',p_valid_index_tab.COUNT);
2403: END IF;
2396: END IF;
2397: --
2398: IF l_debug_on THEN
2399: WSH_DEBUG_SV.push(l_module_name);
2400: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
2401: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
2402: WSH_DEBUG_SV.log(l_module_name,'Total Number of Delivery Records being locked',p_valid_index_tab.COUNT);
2403: END IF;
2404: --
2397: --
2398: IF l_debug_on THEN
2399: WSH_DEBUG_SV.push(l_module_name);
2400: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
2401: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
2402: WSH_DEBUG_SV.log(l_module_name,'Total Number of Delivery Records being locked',p_valid_index_tab.COUNT);
2403: END IF;
2404: --
2405: --
2398: IF l_debug_on THEN
2399: WSH_DEBUG_SV.push(l_module_name);
2400: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
2401: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
2402: WSH_DEBUG_SV.log(l_module_name,'Total Number of Delivery Records being locked',p_valid_index_tab.COUNT);
2403: END IF;
2404: --
2405: --
2406: l_index := p_valid_index_tab.FIRST;
2422: -- Need to lock the related entities - lines, containers and delivery legs
2423: -- For actions ship confirm and autopacking
2424: if p_action IN ('CONFIRM', 'AUTO-PACK', 'AUTO-PACK-MASTER') then
2425: IF l_debug_on THEN
2426: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.LOCK_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
2427: END IF;
2428:
2429: wsh_delivery_details_pkg.lock_detail_no_compare(
2430: p_delivery_id => p_rec_attr_tab(l_index).delivery_id);
2430: p_delivery_id => p_rec_attr_tab(l_index).delivery_id);
2431:
2432: if p_action = 'CONFIRM' then
2433: IF l_debug_on THEN
2434: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_PVT.LOCK_DLVY_LEG',WSH_DEBUG_SV.C_PROC_LEVEL);
2435: END IF;
2436: wsh_delivery_legs_pvt.lock_dlvy_leg_no_compare(
2437: p_delivery_id => p_rec_attr_tab(l_index).delivery_id);
2438: end if;
2459: END IF;
2460: l_num_errors := l_num_errors + 1;
2461: --
2462: IF l_debug_on THEN
2463: WSH_DEBUG_SV.log(l_module_name,'Unable to obtain lock on the Delivery Id',p_rec_attr_tab(l_index).delivery_id);
2464: END IF;
2465: --
2466: WHEN others THEN
2467: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2478: FND_MESSAGE.SET_NAME('WSH', 'WSH_UI_NOT_PERFORMED');
2479: x_return_status := wsh_util_core.g_ret_sts_error;
2480: wsh_util_core.add_message(x_return_status,l_module_name);
2481: IF l_debug_on THEN
2482: wsh_debug_sv.logmsg(l_module_name, 'WSH_UI_NOT_PERFORMED');
2483: END IF;
2484: RAISE FND_API.G_EXC_ERROR;
2485: ELSIF l_num_errors > 0 THEN
2486: FND_MESSAGE.SET_NAME('WSH', 'WSH_UI_NOT_PROCESSED');
2486: FND_MESSAGE.SET_NAME('WSH', 'WSH_UI_NOT_PROCESSED');
2487: x_return_status := wsh_util_core.g_ret_sts_warning;
2488: wsh_util_core.add_message(x_return_status,l_module_name);
2489: IF l_debug_on THEN
2490: wsh_debug_sv.logmsg(l_module_name, 'WSH_UI_NOT_PROCESSED');
2491: END IF;
2492: raise wsh_util_core.g_exc_warning;
2493: ELSE
2494: x_return_status := wsh_util_core.g_ret_sts_success;
2496: --
2497: --
2498: --
2499: IF l_debug_on THEN
2500: WSH_DEBUG_SV.pop(l_module_name);
2501: END IF;
2502: --
2503: EXCEPTION
2504: --
2507: --
2508: x_return_status := wsh_util_core.g_ret_sts_error;
2509: --
2510: IF l_debug_on THEN
2511: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2512: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2513: END IF;
2514: --
2515: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2508: x_return_status := wsh_util_core.g_ret_sts_error;
2509: --
2510: IF l_debug_on THEN
2511: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2512: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2513: END IF;
2514: --
2515: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2516: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
2515: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2516: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
2517: --
2518: IF l_debug_on THEN
2519: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2520: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2521: END IF;
2522: --
2523: --
2516: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
2517: --
2518: IF l_debug_on THEN
2519: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2520: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2521: END IF;
2522: --
2523: --
2524: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2524: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2525: x_return_status := wsh_util_core.g_ret_sts_warning;
2526: --
2527: IF l_debug_on THEN
2528: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2529: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2530: END IF;
2531: --
2532: --
2525: x_return_status := wsh_util_core.g_ret_sts_warning;
2526: --
2527: IF l_debug_on THEN
2528: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2529: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2530: END IF;
2531: --
2532: --
2533: WHEN OTHERS THEN
2536: --
2537: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.LOCK_DELIVERY_WRAPPER',l_module_name);
2538: --
2539: IF l_debug_on THEN
2540: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2541: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2542: END IF;
2543: --
2544: --
2537: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.LOCK_DELIVERY_WRAPPER',l_module_name);
2538: --
2539: IF l_debug_on THEN
2540: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2541: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2542: END IF;
2543: --
2544: --
2545: END Lock_Delivery;
2579: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2580: --
2581: IF l_debug_on IS NULL
2582: THEN
2583: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2584: END IF;
2585: --
2586: IF l_debug_on THEN
2587: WSH_DEBUG_SV.push(l_module_name);
2583: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2584: END IF;
2585: --
2586: IF l_debug_on THEN
2587: WSH_DEBUG_SV.push(l_module_name);
2588: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_id', p_delivery_id);
2589: END IF;
2590: --
2591:
2584: END IF;
2585: --
2586: IF l_debug_on THEN
2587: WSH_DEBUG_SV.push(l_module_name);
2588: WSH_DEBUG_SV.log(l_module_name, 'p_delivery_id', p_delivery_id);
2589: END IF;
2590: --
2591:
2592: IF p_delivery_id IS NOT NULL THEN
2595: CLOSE c_lock_dlvy;
2596: END IF;
2597:
2598: IF l_debug_on THEN
2599: WSH_DEBUG_SV.pop(l_module_name);
2600: END IF;
2601:
2602: EXCEPTION
2603: WHEN app_exception.application_exception or app_exception.record_lock_exception THEN
2601:
2602: EXCEPTION
2603: WHEN app_exception.application_exception or app_exception.record_lock_exception THEN
2604: IF l_debug_on THEN
2605: wsh_debug_sv.log(l_module_name, 'Could not lock delivery', p_delivery_id);
2606: END IF;
2607: IF l_debug_on THEN
2608: WSH_DEBUG_SV.logmsg(l_module_name,'APP_EXCEPTION.APPLICATION_EXCEPTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2609: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APP_EXCEPTION.APPLICATION_EXCEPTION');
2604: IF l_debug_on THEN
2605: wsh_debug_sv.log(l_module_name, 'Could not lock delivery', p_delivery_id);
2606: END IF;
2607: IF l_debug_on THEN
2608: WSH_DEBUG_SV.logmsg(l_module_name,'APP_EXCEPTION.APPLICATION_EXCEPTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2609: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APP_EXCEPTION.APPLICATION_EXCEPTION');
2610: END IF;
2611: --
2612: RAISE;
2605: wsh_debug_sv.log(l_module_name, 'Could not lock delivery', p_delivery_id);
2606: END IF;
2607: IF l_debug_on THEN
2608: WSH_DEBUG_SV.logmsg(l_module_name,'APP_EXCEPTION.APPLICATION_EXCEPTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2609: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APP_EXCEPTION.APPLICATION_EXCEPTION');
2610: END IF;
2611: --
2612: RAISE;
2613:
2696: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2697: --
2698: IF l_debug_on IS NULL
2699: THEN
2700: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2701: END IF;
2702: --
2703: IF l_debug_on THEN
2704: WSH_DEBUG_SV.push(l_module_name);
2700: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2701: END IF;
2702: --
2703: IF l_debug_on THEN
2704: WSH_DEBUG_SV.push(l_module_name);
2705: --
2706: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
2707: WSH_DEBUG_SV.log(l_module_name,'p_copy_legs',p_copy_legs);
2708: END IF;
2702: --
2703: IF l_debug_on THEN
2704: WSH_DEBUG_SV.push(l_module_name);
2705: --
2706: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
2707: WSH_DEBUG_SV.log(l_module_name,'p_copy_legs',p_copy_legs);
2708: END IF;
2709: --
2710: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2703: IF l_debug_on THEN
2704: WSH_DEBUG_SV.push(l_module_name);
2705: --
2706: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
2707: WSH_DEBUG_SV.log(l_module_name,'p_copy_legs',p_copy_legs);
2708: END IF;
2709: --
2710: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2711: --
2725: l_delivery_name := wsh_custom_pub.delivery_name(l_delivery_id,p_delivery_rec);
2726:
2727: -- shipping default make sure the delivery name is not duplicate
2728: IF l_debug_on THEN
2729: WSH_DEBUG_SV.log(l_module_name,'l_delivery_name',l_delivery_name);
2730: WSH_DEBUG_SV.log(l_module_name,'l_delivery_id',l_delivery_id);
2731: END IF;
2732: IF ( l_delivery_name = to_char(l_delivery_id) ) THEN
2733: l_temp_id := l_delivery_id;
2726:
2727: -- shipping default make sure the delivery name is not duplicate
2728: IF l_debug_on THEN
2729: WSH_DEBUG_SV.log(l_module_name,'l_delivery_name',l_delivery_name);
2730: WSH_DEBUG_SV.log(l_module_name,'l_delivery_id',l_delivery_id);
2731: END IF;
2732: IF ( l_delivery_name = to_char(l_delivery_id) ) THEN
2733: l_temp_id := l_delivery_id;
2734:
2738:
2739: OPEN count_delivery_rows( l_delivery_name);
2740: FETCH count_delivery_rows INTO l_row_check;
2741: IF l_debug_on THEN
2742: WSH_DEBUG_SV.log(l_module_name,'l_row_check',l_row_check);
2743: END IF;
2744: IF (count_delivery_rows%NOTFOUND) THEN
2745: CLOSE count_delivery_rows;
2746: EXIT;
2751: OPEN get_next_delivery;
2752: FETCH get_next_delivery INTO l_temp_id;
2753: CLOSE get_next_delivery;
2754: IF l_debug_on THEN
2755: WSH_DEBUG_SV.log(l_module_name,'l_temp_id',l_temp_id);
2756: END IF;
2757: END LOOP;
2758:
2759: l_delivery_id := l_temp_id;
3081: END IF;
3082: --
3083: --
3084: IF l_debug_on THEN
3085: WSH_DEBUG_SV.log(l_module_name, 'l_delivery_id', l_delivery_id );
3086: END IF;
3087: --
3088: --
3089: OPEN dlvy_csr(l_delivery_id);
3235: FROM WSH_DELIVERY_LEGS
3236: WHERE DELIVERY_ID = p_delivery_id;
3237: --
3238: IF l_debug_on THEN
3239: WSH_DEBUG_SV.logmsg(l_module_name, 'Inserted ' || SQL%ROWCOUNT || ' Legs' );
3240: END IF;
3241: --
3242: OPEN leg_csr(l_delivery_id);
3243: FETCH leg_csr BULK COLLECT INTO x_leg_id_tab;
3249: --
3250: x_delivery_id := l_delivery_id;
3251: --
3252: IF l_debug_on THEN
3253: WSH_DEBUG_SV.pop(l_module_name);
3254: END IF;
3255: --
3256: --}
3257: EXCEPTION
3259:
3260: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3261: --
3262: IF l_debug_on THEN
3263: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3264: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3265: END IF;
3266: WHEN others THEN
3267: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3260: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3261: --
3262: IF l_debug_on THEN
3263: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3264: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3265: END IF;
3266: WHEN others THEN
3267: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3268: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.CLONE',l_module_name);
3267: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3268: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.CLONE',l_module_name);
3269: --
3270: IF l_debug_on THEN
3271: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3272: END IF;
3273: --
3274: END CLONE;
3275: -- J-IB-NPARIKH-}
3472: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3473: --
3474: IF l_debug_on IS NULL
3475: THEN
3476: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3477: END IF;
3478: --
3479: IF l_debug_on THEN
3480: WSH_DEBUG_SV.push(l_module_name);
3476: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3477: END IF;
3478: --
3479: IF l_debug_on THEN
3480: WSH_DEBUG_SV.push(l_module_name);
3481: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id', p_delivery_id);
3482: END IF;
3483: --
3484:
3477: END IF;
3478: --
3479: IF l_debug_on THEN
3480: WSH_DEBUG_SV.push(l_module_name);
3481: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id', p_delivery_id);
3482: END IF;
3483: --
3484:
3485: OPEN c_tbl_rec (p_delivery_id);
3491: --
3492: END IF;
3493: CLOSE c_tbl_rec;
3494: IF l_debug_on THEN
3495: WSH_DEBUG_SV.pop(l_module_name);
3496: END IF;
3497: x_return_status := wsh_util_core.g_ret_sts_success;
3498:
3499: EXCEPTION
3507: --
3508: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.Table_to_Record',l_module_name);
3509: --
3510: IF l_debug_on THEN
3511: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3512: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3513: END IF;
3514: --
3515:
3508: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.Table_to_Record',l_module_name);
3509: --
3510: IF l_debug_on THEN
3511: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3512: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3513: END IF;
3514: --
3515:
3516: END Table_to_Record;
3560: --
3561: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3562: --
3563: IF l_debug_on IS NULL THEN
3564: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3565: END IF;
3566: --
3567: IF l_debug_on THEN
3568: WSH_DEBUG_SV.push(l_module_name);
3564: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3565: END IF;
3566: --
3567: IF l_debug_on THEN
3568: WSH_DEBUG_SV.push(l_module_name);
3569: WSH_DEBUG_SV.log(l_module_name,'Delivery ID count', p_delivery_id_tab.COUNT);
3570: WSH_DEBUG_SV.log(l_module_name,'Interface Flag count', p_tms_interface_flag_tab.COUNT);
3571: END IF;
3572: --
3565: END IF;
3566: --
3567: IF l_debug_on THEN
3568: WSH_DEBUG_SV.push(l_module_name);
3569: WSH_DEBUG_SV.log(l_module_name,'Delivery ID count', p_delivery_id_tab.COUNT);
3570: WSH_DEBUG_SV.log(l_module_name,'Interface Flag count', p_tms_interface_flag_tab.COUNT);
3571: END IF;
3572: --
3573: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3566: --
3567: IF l_debug_on THEN
3568: WSH_DEBUG_SV.push(l_module_name);
3569: WSH_DEBUG_SV.log(l_module_name,'Delivery ID count', p_delivery_id_tab.COUNT);
3570: WSH_DEBUG_SV.log(l_module_name,'Interface Flag count', p_tms_interface_flag_tab.COUNT);
3571: END IF;
3572: --
3573: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3574:
3586: SAVEPOINT tms_update;
3587:
3588: IF (p_delivery_id_tab.COUNT <> p_tms_interface_flag_tab.COUNT) THEN
3589: IF l_debug_on THEN
3590: WSH_DEBUG_SV.logmsg(l_module_name,'Delivery ID and TMS_interface_flag_tab count does not match');
3591: END IF;
3592: RAISE FND_API.G_EXC_ERROR;
3593: END IF;
3594:
3602: l_trip_not_found := 'N';
3603:
3604: --get trip information for delivery, no update when trip not OPEN
3605: IF l_debug_on THEN
3606: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_VALIDATIONS.GET_TRIP_INFORMATION',WSH_DEBUG_SV.C_PROC_LEVEL);
3607: END IF;
3608: WSH_DELIVERY_VALIDATIONS.get_trip_information
3609: (p_delivery_id => p_delivery_id_tab(i),
3610: x_trip_info_rec => l_trip_info_rec,
3610: x_trip_info_rec => l_trip_info_rec,
3611: x_return_status => l_return_status);
3612:
3613: IF l_debug_on THEN
3614: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_DELIVERY_VALIDATIONS.GET_TRIP_INFORMATION',l_return_status);
3615: END IF;
3616:
3617: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3618: IF l_debug_on THEN
3615: END IF;
3616:
3617: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3618: IF l_debug_on THEN
3619: WSH_DEBUG_SV.logmsg(l_module_name,'Delivery ' || p_delivery_id_tab(i) || ' failed during get_trip_information');
3620: END IF;
3621: l_num_error := l_num_error + 1;
3622: EXIT;
3623: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
3633: --Bug 7408338 Trip in status 'In-Transit' should also get processed.
3634: IF (l_trip_info_rec.status_code IN ('OP','IT','CL') OR l_trip_not_found = 'Y') THEN
3635:
3636: IF l_debug_on THEN
3637: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_VALIDATIONS.get_delivery_information',WSH_DEBUG_SV.C_PROC_LEVEL);
3638: END IF;
3639:
3640: WSH_DELIVERY_VALIDATIONS.get_delivery_information(
3641: p_delivery_id => p_delivery_id_tab(i),
3642: x_delivery_rec => l_delivery_info,
3643: x_return_status => l_return_status);
3644:
3645: IF l_debug_on THEN
3646: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_DELIVERY_VALIDATIONS.get_delivery_information',l_return_status);
3647: END IF;
3648:
3649: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3650: IF l_debug_on THEN
3647: END IF;
3648:
3649: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3650: IF l_debug_on THEN
3651: WSH_DEBUG_SV.logmsg(l_module_name,'Delivery ' || p_delivery_id_tab(i) || ' failed during table_to_record');
3652: END IF;
3653: l_num_error := l_num_error + 1;
3654: EXIT;
3655: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
3705: l_new_tms_version_number_tab(l_count) := NVL(l_delivery_info.tms_version_number, 1)+1;
3706: END IF;
3707:
3708: IF l_debug_on THEN
3709: WSH_DEBUG_SV.log(l_module_name, 'p interface flag for '|| i, p_tms_interface_flag_tab(i));
3710: WSH_DEBUG_SV.log(l_module_name, 'new interface flag for '|| i, l_new_tms_interface_flag_tab(l_count));
3711: WSH_DEBUG_SV.log(l_module_name, 'new version number for '|| i, l_new_tms_version_number_tab(l_count));
3712: END IF;
3713:
3706: END IF;
3707:
3708: IF l_debug_on THEN
3709: WSH_DEBUG_SV.log(l_module_name, 'p interface flag for '|| i, p_tms_interface_flag_tab(i));
3710: WSH_DEBUG_SV.log(l_module_name, 'new interface flag for '|| i, l_new_tms_interface_flag_tab(l_count));
3711: WSH_DEBUG_SV.log(l_module_name, 'new version number for '|| i, l_new_tms_version_number_tab(l_count));
3712: END IF;
3713:
3714: END IF;
3707:
3708: IF l_debug_on THEN
3709: WSH_DEBUG_SV.log(l_module_name, 'p interface flag for '|| i, p_tms_interface_flag_tab(i));
3710: WSH_DEBUG_SV.log(l_module_name, 'new interface flag for '|| i, l_new_tms_interface_flag_tab(l_count));
3711: WSH_DEBUG_SV.log(l_module_name, 'new version number for '|| i, l_new_tms_version_number_tab(l_count));
3712: END IF;
3713:
3714: END IF;
3715:
3725: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3726: END IF;
3727:
3728: IF l_debug_on THEN
3729: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
3730: END IF;
3731:
3732: --proceed with update if not error status
3733: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS, WSH_UTIL_CORE.G_RET_STS_WARNING)
3743: ,last_update_login = FND_GLOBAL.LOGIN_ID
3744: WHERE DELIVERY_ID = l_delivery_id_tab(j);
3745:
3746: IF l_debug_on THEN
3747: WSH_DEBUG_SV.log(l_module_name,'Rows updated',SQL%ROWCOUNT);
3748: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.LOG_OTM_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
3749: END IF;
3750:
3751: WSH_XC_UTIL.log_otm_exception(
3744: WHERE DELIVERY_ID = l_delivery_id_tab(j);
3745:
3746: IF l_debug_on THEN
3747: WSH_DEBUG_SV.log(l_module_name,'Rows updated',SQL%ROWCOUNT);
3748: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.LOG_OTM_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
3749: END IF;
3750:
3751: WSH_XC_UTIL.log_otm_exception(
3752: p_delivery_info_tab => l_delivery_info_tab,
3753: p_new_interface_flag_tab => l_new_tms_interface_flag_tab,
3754: x_return_status => l_return_status);
3755:
3756: IF l_debug_on THEN
3757: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_XC_UTIL.LOG_OTM_EXCEPTION',l_return_status);
3758: END IF;
3759:
3760: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
3761: IF l_debug_on THEN
3758: END IF;
3759:
3760: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
3761: IF l_debug_on THEN
3762: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR: WSH_XC_UTIL.log_otm_exception failed');
3763: END IF;
3764: RAISE FND_API.G_EXC_ERROR;
3765: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3766: IF l_debug_on THEN
3763: END IF;
3764: RAISE FND_API.G_EXC_ERROR;
3765: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3766: IF l_debug_on THEN
3767: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR: WSH_XC_UTIL.log_otm_exception failed unexpectedly');
3768: END IF;
3769: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3770: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
3771: --set return status to warning if l_return_status is warning
3777: END IF;
3778: -- Debug Statements
3779: --
3780: IF l_debug_on THEN
3781: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
3782: WSH_DEBUG_SV.pop(l_module_name);
3783: END IF;
3784: --
3785:
3778: -- Debug Statements
3779: --
3780: IF l_debug_on THEN
3781: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
3782: WSH_DEBUG_SV.pop(l_module_name);
3783: END IF;
3784: --
3785:
3786: EXCEPTION
3788: ROLLBACK TO tms_update;
3789: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3790:
3791: IF l_debug_on THEN
3792: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3793: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3794: END IF;
3795:
3796: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3789: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3790:
3791: IF l_debug_on THEN
3792: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3793: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3794: END IF;
3795:
3796: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3797: ROLLBACK TO tms_update;
3797: ROLLBACK TO tms_update;
3798: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3799:
3800: IF l_debug_on THEN
3801: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3802: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3803: END IF;
3804:
3805: WHEN RECORD_LOCKED THEN
3798: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3799:
3800: IF l_debug_on THEN
3801: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3802: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3803: END IF;
3804:
3805: WHEN RECORD_LOCKED THEN
3806: ROLLBACK TO tms_update;
3805: WHEN RECORD_LOCKED THEN
3806: ROLLBACK TO tms_update;
3807: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3808: IF l_debug_on THEN
3809: WSH_DEBUG_SV.logmsg(l_module_name,'Record_locked exception has occured. Cannot update delivery tms_interface_flag', WSH_DEBUG_SV.C_EXCEP_LEVEL);
3810: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
3811: END IF;
3812:
3813: WHEN others THEN
3806: ROLLBACK TO tms_update;
3807: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3808: IF l_debug_on THEN
3809: WSH_DEBUG_SV.logmsg(l_module_name,'Record_locked exception has occured. Cannot update delivery tms_interface_flag', WSH_DEBUG_SV.C_EXCEP_LEVEL);
3810: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
3811: END IF;
3812:
3813: WHEN others THEN
3814: ROLLBACK TO tms_update;
3814: ROLLBACK TO tms_update;
3815: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG',l_module_name);
3816: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3817: IF l_debug_on THEN
3818: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3819: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3820: END IF;
3821:
3822: END UPDATE_TMS_INTERFACE_FLAG;
3815: wsh_util_core.default_handler('WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG',l_module_name);
3816: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3817: IF l_debug_on THEN
3818: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3819: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3820: END IF;
3821:
3822: END UPDATE_TMS_INTERFACE_FLAG;
3823: --END OTM R12