DBA Data[Home] [Help]

APPS.WSH_TP_RELEASE dependencies on WSH_NEW_DELIVERIES_PVT

Line 159: l_delivery_info_tab WSH_NEW_DELIVERIES_PVT.DELIVERY_ATTR_TBL_TYPE;

155: others EXCEPTION;
156: l_batch_size NUMBER:=10000;
157:
158: --OTM R12, glog proj
159: l_delivery_info_tab WSH_NEW_DELIVERIES_PVT.DELIVERY_ATTR_TBL_TYPE;
160: l_delivery_info WSH_NEW_DELIVERIES_PVT.DELIVERY_REC_TYPE;
161: l_new_interface_flag_tab WSH_UTIL_CORE.COLUMN_TAB_TYPE;
162: l_new_version_number_tab WSH_UTIL_CORE.ID_TAB_TYPE;
163: l_temp NUMBER;

Line 160: l_delivery_info WSH_NEW_DELIVERIES_PVT.DELIVERY_REC_TYPE;

156: l_batch_size NUMBER:=10000;
157:
158: --OTM R12, glog proj
159: l_delivery_info_tab WSH_NEW_DELIVERIES_PVT.DELIVERY_ATTR_TBL_TYPE;
160: l_delivery_info WSH_NEW_DELIVERIES_PVT.DELIVERY_REC_TYPE;
161: l_new_interface_flag_tab WSH_UTIL_CORE.COLUMN_TAB_TYPE;
162: l_new_version_number_tab WSH_UTIL_CORE.ID_TAB_TYPE;
163: l_temp NUMBER;
164: l_msg_count NUMBER;

Line 222: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT;

218: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
219: END IF;
220: -- Initialize these as they are used in UPDATE statement and in cases where
221: -- these are not actually populated
222: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT;
223: l_new_version_number_tab(1) := 1;
224: -- end of OTM R12, glog proj
225:
226: IF ((WSH_UTIL_CORE.TP_IS_INSTALLED = 'Y' OR

Line 334: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_del_cur.delivery_id));

330: and l_det_cur.container_flag='N'
331: AND l_gc3_is_installed = 'N' THEN -- OTM R12
332: --do not allow lines in thrid party instance to be set to include for planning
333: FND_MESSAGE.SET_NAME('WSH','WSH_IGNORE_PLAN_TPW_ERROR');
334: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_del_cur.delivery_id));
335: wsh_util_core.add_message(WSH_UTIL_CORE.g_ret_sts_error,l_module_name);
336: l_num_error:=l_num_error+1;
337: GOTO next_trip;
338: ELSE

Line 521: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.TABLE_TO_RECORD',WSH_DEBUG_SV.C_PROC_LEVEL);

517: FOR i in l_tmp_del_ids.FIRST..l_tmp_del_ids.LAST LOOP
518: --{
519: --
520: IF l_debug_on THEN
521: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.TABLE_TO_RECORD',WSH_DEBUG_SV.C_PROC_LEVEL);
522: END IF;
523: --
524: WSH_NEW_DELIVERIES_PVT.TABLE_TO_RECORD(p_delivery_id => l_tmp_del_ids(i),
525: x_delivery_rec => l_delivery_info,

Line 524: WSH_NEW_DELIVERIES_PVT.TABLE_TO_RECORD(p_delivery_id => l_tmp_del_ids(i),

520: IF l_debug_on THEN
521: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.TABLE_TO_RECORD',WSH_DEBUG_SV.C_PROC_LEVEL);
522: END IF;
523: --
524: WSH_NEW_DELIVERIES_PVT.TABLE_TO_RECORD(p_delivery_id => l_tmp_del_ids(i),
525: x_delivery_rec => l_delivery_info,
526: x_return_status => l_return_status);
527: --
528: IF l_debug_on THEN

Line 566: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.UPDATE_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);

562: goto next_trip;
563: END IF;
564: --
565: IF l_debug_on THEN
566: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.UPDATE_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
567: END IF;
568: --
569: WSH_NEW_DELIVERIES_PVT.UPDATE_DELIVERY( p_rowid => NULL,
570: p_delivery_info => l_delivery_info,

Line 569: WSH_NEW_DELIVERIES_PVT.UPDATE_DELIVERY( p_rowid => NULL,

565: IF l_debug_on THEN
566: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.UPDATE_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
567: END IF;
568: --
569: WSH_NEW_DELIVERIES_PVT.UPDATE_DELIVERY( p_rowid => NULL,
570: p_delivery_info => l_delivery_info,
571: x_return_status => l_return_status);
572: --
573: IF l_debug_on THEN

Line 724: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_del_cur.delivery_id));

720: and l_det_cur.container_flag='N'
721: and l_gc3_is_installed = 'N' THEN -- OTM R12
722: --do not allow lines in thrid party instance to be set to include for planning
723: FND_MESSAGE.SET_NAME('WSH','WSH_IGNORE_PLAN_TPW_ERROR');
724: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_del_cur.delivery_id));
725: wsh_util_core.add_message(WSH_UTIL_CORE.g_ret_sts_error,l_module_name);
726: l_num_error:=l_num_error+1;
727: GOTO next_del;
728: ELSE

Line 871: FND_MESSAGE.SET_TOKEN('NAME',wsh_new_deliveries_pvt.get_name(p_in_ids(i)));

867: ROLLBACK to before_update;
868: FND_MESSAGE.SET_NAME('WSH','WSH_IGNOREPLAN_UPDATE_ERROR');
869: l_entity := FND_MESSAGE.GET_STRING('WSH','WSH_DELIVERY');
870: FND_MESSAGE.SET_TOKEN('ENTITY',l_entity);
871: FND_MESSAGE.SET_TOKEN('NAME',wsh_new_deliveries_pvt.get_name(p_in_ids(i)));
872: wsh_util_core.add_message(WSH_UTIL_CORE.g_ret_sts_error,l_module_name);
873: l_num_error:=l_num_error+1;
874: GOTO next_del;
875: END IF;

Line 936: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) =

932: WSH_DEBUG_SV.log(l_module_name,'Delivery Tms_interface_flag',l_delivery_info.tms_interface_flag);
933: END IF;
934:
935: IF (nvl(l_delivery_info.tms_interface_flag,
936: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) =
937: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT
938: AND l_is_delivery_empty = 'N') THEN--{
939: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED;
940: l_new_version_number_tab(1) :=

Line 937: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT

933: END IF;
934:
935: IF (nvl(l_delivery_info.tms_interface_flag,
936: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) =
937: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT
938: AND l_is_delivery_empty = 'N') THEN--{
939: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED;
940: l_new_version_number_tab(1) :=
941: nvl(l_delivery_info.tms_version_number, 1) + 1;

Line 939: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED;

935: IF (nvl(l_delivery_info.tms_interface_flag,
936: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) =
937: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT
938: AND l_is_delivery_empty = 'N') THEN--{
939: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED;
940: l_new_version_number_tab(1) :=
941: nvl(l_delivery_info.tms_version_number, 1) + 1;
942: ELSIF
943: ((nvl(l_delivery_info.tms_interface_flag,

Line 944: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT)

940: l_new_version_number_tab(1) :=
941: nvl(l_delivery_info.tms_version_number, 1) + 1;
942: ELSIF
943: ((nvl(l_delivery_info.tms_interface_flag,
944: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT)
945: IN (WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED,
946: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS))
947: AND l_is_delivery_empty = 'N') THEN
948: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;

Line 945: IN (WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED,

941: nvl(l_delivery_info.tms_version_number, 1) + 1;
942: ELSIF
943: ((nvl(l_delivery_info.tms_interface_flag,
944: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT)
945: IN (WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED,
946: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS))
947: AND l_is_delivery_empty = 'N') THEN
948: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;
949: l_new_version_number_tab(1) :=

Line 946: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS))

942: ELSIF
943: ((nvl(l_delivery_info.tms_interface_flag,
944: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT)
945: IN (WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED,
946: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS))
947: AND l_is_delivery_empty = 'N') THEN
948: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;
949: l_new_version_number_tab(1) :=
950: nvl(l_delivery_info.tms_version_number, 1) + 1;

Line 948: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;

944: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT)
945: IN (WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED,
946: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS))
947: AND l_is_delivery_empty = 'N') THEN
948: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;
949: l_new_version_number_tab(1) :=
950: nvl(l_delivery_info.tms_version_number, 1) + 1;
951: ELSE
952: l_tms_update := 'N';

Line 957: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN

953: END IF;--}
954: ELSIF (l_ignoreplan = 'Y') THEN--} {
955:
956: IF (nvl(l_delivery_info.tms_interface_flag,
957: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN
958: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
959: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED,
960: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
961: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,

Line 958: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,

954: ELSIF (l_ignoreplan = 'Y') THEN--} {
955:
956: IF (nvl(l_delivery_info.tms_interface_flag,
957: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN
958: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
959: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED,
960: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
961: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
962: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN

Line 959: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED,

955:
956: IF (nvl(l_delivery_info.tms_interface_flag,
957: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN
958: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
959: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED,
960: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
961: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
962: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN
963: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED;

Line 960: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,

956: IF (nvl(l_delivery_info.tms_interface_flag,
957: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN
958: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
959: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED,
960: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
961: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
962: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN
963: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED;
964: l_new_version_number_tab(1) :=

Line 961: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,

957: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN
958: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
959: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED,
960: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
961: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
962: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN
963: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED;
964: l_new_version_number_tab(1) :=
965: nvl(l_delivery_info.tms_version_number, 1) + 1;

Line 962: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN

958: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_IN_PROCESS,
959: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED,
960: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
961: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
962: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN
963: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED;
964: l_new_version_number_tab(1) :=
965: nvl(l_delivery_info.tms_version_number, 1) + 1;
966: ELSIF (nvl(l_delivery_info.tms_interface_flag,

Line 963: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED;

959: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED,
960: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_IN_PROCESS,
961: WSH_NEW_DELIVERIES_PVT.C_TMS_AWAITING_ANSWER,
962: WSH_NEW_DELIVERIES_PVT.C_TMS_ANSWER_RECEIVED)) THEN
963: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED;
964: l_new_version_number_tab(1) :=
965: nvl(l_delivery_info.tms_version_number, 1) + 1;
966: ELSIF (nvl(l_delivery_info.tms_interface_flag,
967: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) =

Line 967: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) =

963: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED;
964: l_new_version_number_tab(1) :=
965: nvl(l_delivery_info.tms_version_number, 1) + 1;
966: ELSIF (nvl(l_delivery_info.tms_interface_flag,
967: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) =
968: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED)) THEN
969: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT;
970: l_new_version_number_tab(1) :=
971: nvl(l_delivery_info.tms_version_number, 1);

Line 968: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED)) THEN

964: l_new_version_number_tab(1) :=
965: nvl(l_delivery_info.tms_version_number, 1) + 1;
966: ELSIF (nvl(l_delivery_info.tms_interface_flag,
967: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) =
968: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED)) THEN
969: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT;
970: l_new_version_number_tab(1) :=
971: nvl(l_delivery_info.tms_version_number, 1);
972: ELSE

Line 969: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT;

965: nvl(l_delivery_info.tms_version_number, 1) + 1;
966: ELSIF (nvl(l_delivery_info.tms_interface_flag,
967: WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) =
968: (WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED)) THEN
969: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT;
970: l_new_version_number_tab(1) :=
971: nvl(l_delivery_info.tms_version_number, 1);
972: ELSE
973: l_tms_update := 'N';

Line 1059: FND_MESSAGE.SET_TOKEN('NAME',wsh_new_deliveries_pvt.get_name(p_in_ids(i)));

1055: ROLLBACK to before_update;
1056: FND_MESSAGE.SET_NAME('WSH','WSH_IGNOREPLAN_UPDATE_ERROR');
1057: l_entity := FND_MESSAGE.GET_STRING('WSH','WSH_DELIVERY');
1058: FND_MESSAGE.SET_TOKEN('ENTITY',l_entity);
1059: FND_MESSAGE.SET_TOKEN('NAME',wsh_new_deliveries_pvt.get_name(p_in_ids(i)));
1060: wsh_util_core.add_message(WSH_UTIL_CORE.g_ret_sts_error,l_module_name);
1061: l_num_error:=l_num_error+1;
1062: goto next_del;
1063: ELSE --Added for bug 7611042 .More than zero rows updated. So calling the API to update the hash string

Line 1067: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.TABLE_TO_RECORD',WSH_DEBUG_SV.C_PROC_LEVEL);

1063: ELSE --Added for bug 7611042 .More than zero rows updated. So calling the API to update the hash string
1064: --{
1065: --
1066: IF l_debug_on THEN
1067: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.TABLE_TO_RECORD',WSH_DEBUG_SV.C_PROC_LEVEL);
1068: END IF;
1069: --
1070: WSH_NEW_DELIVERIES_PVT.TABLE_TO_RECORD(p_delivery_id => p_in_ids(i),
1071: x_delivery_rec => l_delivery_info,

Line 1070: WSH_NEW_DELIVERIES_PVT.TABLE_TO_RECORD(p_delivery_id => p_in_ids(i),

1066: IF l_debug_on THEN
1067: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.TABLE_TO_RECORD',WSH_DEBUG_SV.C_PROC_LEVEL);
1068: END IF;
1069: --
1070: WSH_NEW_DELIVERIES_PVT.TABLE_TO_RECORD(p_delivery_id => p_in_ids(i),
1071: x_delivery_rec => l_delivery_info,
1072: x_return_status => l_return_status);
1073: --
1074: IF l_debug_on THEN

Line 1083: FND_MESSAGE.SET_TOKEN('NAME',wsh_new_deliveries_pvt.get_name(p_in_ids(i)));

1079: rollback to before_update;
1080: FND_MESSAGE.SET_NAME('WSH','WSH_IGNOREPLAN_UPDATE_ERROR');
1081: l_entity := FND_MESSAGE.GET_STRING('WSH','WSH_DELIVERY');
1082: FND_MESSAGE.SET_TOKEN('ENTITY',l_entity);
1083: FND_MESSAGE.SET_TOKEN('NAME',wsh_new_deliveries_pvt.get_name(p_in_ids(i)));
1084: wsh_util_core.add_message(WSH_UTIL_CORE.g_ret_sts_error,l_module_name);
1085: l_num_error:=l_num_error+1;
1086: goto next_del;
1087: END IF;

Line 1105: FND_MESSAGE.SET_TOKEN('NAME',wsh_new_deliveries_pvt.get_name(p_in_ids(i)));

1101: rollback to before_update;
1102: FND_MESSAGE.SET_NAME('WSH','WSH_IGNOREPLAN_UPDATE_ERROR');
1103: l_entity := FND_MESSAGE.GET_STRING('WSH','WSH_DELIVERY');
1104: FND_MESSAGE.SET_TOKEN('ENTITY',l_entity);
1105: FND_MESSAGE.SET_TOKEN('NAME',wsh_new_deliveries_pvt.get_name(p_in_ids(i)));
1106: wsh_util_core.add_message(WSH_UTIL_CORE.g_ret_sts_error,l_module_name);
1107: l_num_error:=l_num_error+1;
1108: goto next_del;
1109: END IF;

Line 1112: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.UPDATE_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);

1108: goto next_del;
1109: END IF;
1110: --
1111: IF l_debug_on THEN
1112: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.UPDATE_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
1113: END IF;
1114: --
1115: WSH_NEW_DELIVERIES_PVT.UPDATE_DELIVERY( p_rowid => NULL,
1116: p_delivery_info => l_delivery_info,

Line 1115: WSH_NEW_DELIVERIES_PVT.UPDATE_DELIVERY( p_rowid => NULL,

1111: IF l_debug_on THEN
1112: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.UPDATE_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
1113: END IF;
1114: --
1115: WSH_NEW_DELIVERIES_PVT.UPDATE_DELIVERY( p_rowid => NULL,
1116: p_delivery_info => l_delivery_info,
1117: x_return_status => l_return_status);
1118: --
1119: IF l_debug_on THEN

Line 1128: FND_MESSAGE.SET_TOKEN('NAME',wsh_new_deliveries_pvt.get_name(p_in_ids(i)));

1124: rollback to before_update;
1125: FND_MESSAGE.SET_NAME('WSH','WSH_IGNOREPLAN_UPDATE_ERROR');
1126: l_entity := FND_MESSAGE.GET_STRING('WSH','WSH_DELIVERY');
1127: FND_MESSAGE.SET_TOKEN('ENTITY',l_entity);
1128: FND_MESSAGE.SET_TOKEN('NAME',wsh_new_deliveries_pvt.get_name(p_in_ids(i)));
1129: wsh_util_core.add_message(WSH_UTIL_CORE.g_ret_sts_error,l_module_name);
1130: l_num_error:=l_num_error+1;
1131: goto next_del;
1132: END IF;

Line 1584: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(del_cur.delivery_id));

1580: x_return_status => x_return_status);
1581: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) OR (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1582: rollback to before_firm;
1583: FND_MESSAGE.SET_NAME('WSH','WSH_DELIVERY_CANNOT_FIRM');
1584: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(del_cur.delivery_id));
1585: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1586: wsh_util_core.add_message(x_return_status);
1587: IF l_debug_on THEN
1588: WSH_DEBUG_SV.pop(l_module_name);

Line 1604: FND_MESSAGE.SET_TOKEN('NAME',wsh_new_deliveries_pvt.get_name(del_cur.delivery_id));

1600: IF (SQL%NOTFOUND) THEN
1601: FND_MESSAGE.SET_NAME('WSH','WSH_FIRM_UPDATE_ERROR');
1602: l_entity := FND_MESSAGE.GET_STRING('WSH','WSH_DELIVERY');
1603: FND_MESSAGE.SET_TOKEN('ENTITY',l_entity);
1604: FND_MESSAGE.SET_TOKEN('NAME',wsh_new_deliveries_pvt.get_name(del_cur.delivery_id));
1605: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1606: wsh_util_core.add_message(x_return_status);
1607: IF l_debug_on THEN
1608: WSH_DEBUG_SV.pop(l_module_name);

Line 1740: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));

1736:
1737: --if l_plannedflag is null, no trip is associated => delivery can't be firmed
1738: IF l_plannedflag IS null THEN
1739: FND_MESSAGE.SET_NAME('WSH','WSH_FIRM_DELIVERY_ERROR');
1740: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1741: wsh_util_core.add_message(WSH_UTIL_CORE.g_ret_sts_error,l_module_name);
1742: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1743: IF l_debug_on THEN
1744: WSH_DEBUG_SV.pop(l_module_name);

Line 1922: FND_MESSAGE.SET_TOKEN('NAME',wsh_new_deliveries_pvt.get_name(del_cur.delivery_id));

1918: IF (SQL%NOTFOUND) THEN
1919: FND_MESSAGE.SET_NAME('WSH','WSH_FIRM_UPDATE_ERROR');
1920: l_entity := FND_MESSAGE.GET_STRING('WSH','WSH_DELIVERY');
1921: FND_MESSAGE.SET_TOKEN('ENTITY',l_entity);
1922: FND_MESSAGE.SET_TOKEN('NAME',wsh_new_deliveries_pvt.get_name(del_cur.delivery_id));
1923: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1924: wsh_util_core.add_message(x_return_status);
1925: IF l_debug_on THEN
1926: WSH_DEBUG_SV.pop(l_module_name);

Line 2795: l_delivery_info_tab WSH_NEW_DELIVERIES_PVT.Delivery_Attr_Tbl_Type;

2791:
2792: l_global_param_rec_type WSH_SHIPPING_PARAMS_PVT.Global_Parameters_Rec_Typ;
2793:
2794: --OTM R12, glog proj
2795: l_delivery_info_tab WSH_NEW_DELIVERIES_PVT.Delivery_Attr_Tbl_Type;
2796: l_delivery_info WSH_NEW_DELIVERIES_PVT.Delivery_Rec_Type;
2797: l_new_interface_flag_tab WSH_UTIL_CORE.COLUMN_TAB_TYPE;
2798: l_tms_update VARCHAR2(1);
2799: l_trip_not_found VARCHAR2(1);

Line 2796: l_delivery_info WSH_NEW_DELIVERIES_PVT.Delivery_Rec_Type;

2792: l_global_param_rec_type WSH_SHIPPING_PARAMS_PVT.Global_Parameters_Rec_Typ;
2793:
2794: --OTM R12, glog proj
2795: l_delivery_info_tab WSH_NEW_DELIVERIES_PVT.Delivery_Attr_Tbl_Type;
2796: l_delivery_info WSH_NEW_DELIVERIES_PVT.Delivery_Rec_Type;
2797: l_new_interface_flag_tab WSH_UTIL_CORE.COLUMN_TAB_TYPE;
2798: l_tms_update VARCHAR2(1);
2799: l_trip_not_found VARCHAR2(1);
2800: l_trip_info_rec WSH_DELIVERY_VALIDATIONS.trip_info_rec_type;

Line 2834: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT;

2830: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
2831: END IF;
2832: -- Initialize these as they are used in UPDATE statement and in cases where
2833: -- these are not actually populated
2834: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT;
2835: -- end of OTM R12, glog proj
2836:
2837: IF l_debug_on THEN
2838: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_SHIPPING_PARAMS_PVT. Get_Global_Parameters',WSH_DEBUG_SV.C_PROC_LEVEL);

Line 3103: IF (NVL(l_delivery_info.tms_interface_flag, WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN

3099: nvl(l_delivery_info.EARLIEST_DROPOFF_DATE, fnd_api.g_miss_date) <> nvl(l_earliest_mdropoff_date, fnd_api.g_miss_date) OR
3100: nvl(l_delivery_info.LATEST_DROPOFF_DATE, fnd_api.g_miss_date) <> nvl(l_latest_mdropoff_date, fnd_api.g_miss_date)
3101: ) THEN--{
3102:
3103: IF (NVL(l_delivery_info.tms_interface_flag, WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN
3104: (WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT,
3105: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED,
3106: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED,
3107: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,

Line 3104: (WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT,

3100: nvl(l_delivery_info.LATEST_DROPOFF_DATE, fnd_api.g_miss_date) <> nvl(l_latest_mdropoff_date, fnd_api.g_miss_date)
3101: ) THEN--{
3102:
3103: IF (NVL(l_delivery_info.tms_interface_flag, WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN
3104: (WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT,
3105: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED,
3106: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED,
3107: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,
3108: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED)) THEN

Line 3105: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED,

3101: ) THEN--{
3102:
3103: IF (NVL(l_delivery_info.tms_interface_flag, WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN
3104: (WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT,
3105: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED,
3106: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED,
3107: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,
3108: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED)) THEN
3109: l_tms_update := 'N';

Line 3106: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED,

3102:
3103: IF (NVL(l_delivery_info.tms_interface_flag, WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN
3104: (WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT,
3105: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED,
3106: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED,
3107: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,
3108: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED)) THEN
3109: l_tms_update := 'N';
3110: ELSE

Line 3107: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,

3103: IF (NVL(l_delivery_info.tms_interface_flag, WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) IN
3104: (WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT,
3105: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED,
3106: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED,
3107: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,
3108: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED)) THEN
3109: l_tms_update := 'N';
3110: ELSE
3111: l_tms_update := 'Y';

Line 3108: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED)) THEN

3104: (WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT,
3105: WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED,
3106: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED,
3107: WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_IN_PROCESS,
3108: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED)) THEN
3109: l_tms_update := 'N';
3110: ELSE
3111: l_tms_update := 'Y';
3112: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;

Line 3112: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;

3108: WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED)) THEN
3109: l_tms_update := 'N';
3110: ELSE
3111: l_tms_update := 'Y';
3112: l_new_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_UPDATE_REQUIRED;
3113: l_tms_version_number := NVL(l_delivery_info.tms_version_number, 1) + 1;
3114: END IF;
3115: ELSE
3116: l_tms_update := 'N';

Line 3136: NVL(TMS_INTERFACE_FLAG, WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT)),

3132: ultimate_dropoff_date = l_ultimate_mdropoff_date,
3133: --OTM R12, glog proj
3134: TMS_INTERFACE_FLAG = DECODE(l_tms_update,
3135: 'Y', l_new_interface_flag_tab(1),
3136: NVL(TMS_INTERFACE_FLAG, WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT)),
3137: TMS_VERSION_NUMBER = DECODE(l_tms_update,
3138: 'Y', l_tms_version_number,
3139: NVL(tms_version_number, 1)),
3140: --