46:
47:
48:
49: --dummy tables for calling validate_constraint_main
50: l_cc_del_attr_tab WSH_NEW_DELIVERIES_PVT.Delivery_Attr_Tbl_Type;
51: l_cc_det_attr_tab WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type;
52: l_cc_trip_attr_tab WSH_TRIPS_PVT.Trip_Attr_Tbl_Type;
53: l_cc_stop_attr_tab WSH_TRIP_STOPS_PVT.Stop_Attr_Tbl_Type;
54: l_cc_in_ids WSH_UTIL_CORE.id_tab_type;
137: ORDER BY d.creation_date;
138:
139:
140: -- OTM R12 : update delivery
141: l_delivery_info_tab WSH_NEW_DELIVERIES_PVT.Delivery_Attr_Tbl_Type;
142: l_delivery_info WSH_NEW_DELIVERIES_PVT.Delivery_Rec_Type;
143: l_new_interface_flag_tab WSH_UTIL_CORE.COLUMN_TAB_TYPE;
144: l_tms_update VARCHAR2(1);
145: l_trip_not_found VARCHAR2(1);
138:
139:
140: -- OTM R12 : update delivery
141: l_delivery_info_tab WSH_NEW_DELIVERIES_PVT.Delivery_Attr_Tbl_Type;
142: l_delivery_info WSH_NEW_DELIVERIES_PVT.Delivery_Rec_Type;
143: l_new_interface_flag_tab WSH_UTIL_CORE.COLUMN_TAB_TYPE;
144: l_tms_update VARCHAR2(1);
145: l_trip_not_found VARCHAR2(1);
146: l_trip_info_rec WSH_DELIVERY_VALIDATIONS.trip_info_rec_type;
506: nvl(l_delivery_info.mode_of_transport, '@@') <>
507: NVL(l_delivery_info.mode_of_transport,
508: nvl(l_attr_tab(1).mode_of_transport, '@@'))) THEN
509: IF (l_delivery_info.tms_interface_flag NOT IN
510: (WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT,
511: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED,
512: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED,
513: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,
514: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED)) THEN
507: NVL(l_delivery_info.mode_of_transport,
508: nvl(l_attr_tab(1).mode_of_transport, '@@'))) THEN
509: IF (l_delivery_info.tms_interface_flag NOT IN
510: (WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT,
511: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED,
512: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED,
513: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,
514: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED)) THEN
515: l_tms_update := 'Y';
508: nvl(l_attr_tab(1).mode_of_transport, '@@'))) THEN
509: IF (l_delivery_info.tms_interface_flag NOT IN
510: (WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT,
511: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED,
512: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED,
513: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,
514: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED)) THEN
515: l_tms_update := 'Y';
516: l_delivery_info_tab(1) := l_delivery_info;
509: IF (l_delivery_info.tms_interface_flag NOT IN
510: (WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT,
511: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED,
512: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED,
513: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,
514: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED)) THEN
515: l_tms_update := 'Y';
516: l_delivery_info_tab(1) := l_delivery_info;
517: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;
510: (WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT,
511: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED,
512: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED,
513: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,
514: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED)) THEN
515: l_tms_update := 'Y';
516: l_delivery_info_tab(1) := l_delivery_info;
517: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;
518: l_tms_version_number := nvl(l_delivery_info.tms_version_number, 1) + 1;
513: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,
514: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED)) THEN
515: l_tms_update := 'Y';
516: l_delivery_info_tab(1) := l_delivery_info;
517: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;
518: l_tms_version_number := nvl(l_delivery_info.tms_version_number, 1) + 1;
519: END IF;
520: END IF; -- checking the value differences
521: END IF; -- IF ((l_trip_not_found = 'N' AND
638: last_update_date = SYSDATE,
639: last_updated_by = FND_GLOBAL.user_id,
640: last_update_login = FND_GLOBAL.login_id,
641: -- OTM R12
642: TMS_INTERFACE_FLAG = decode(l_tms_update, 'Y', l_new_interface_flag_tab(1), nvl(TMS_INTERFACE_FLAG, WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT)),
643: TMS_VERSION_NUMBER = decode(l_tms_update, 'Y', l_tms_version_number, nvl(tms_version_number, 1))
644: -- End of OTM R12
645: WHERE delivery_id = l_delivery_id;
646:
788: last_update_date = SYSDATE,
789: last_updated_by = FND_GLOBAL.user_id,
790: last_update_login = FND_GLOBAL.login_id,
791: -- OTM R12
792: TMS_INTERFACE_FLAG = decode(l_tms_update, 'Y', l_new_interface_flag_tab(1), nvl(TMS_INTERFACE_FLAG, WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT)),
793: TMS_VERSION_NUMBER = decode(l_tms_update, 'Y', l_tms_version_number, nvl(tms_version_number, 1))
794: -- End of OTM R12
795: WHERE delivery_id = l_delivery_id;
796: