[Home] [Help]
270:
271: --
272: l_adjust_planned_del_tab.delete;
273:
274: IF NOT fnd_api.compatible_api_call(
275: l_api_version,
276: p_api_version,
277: l_api_name,
278: g_pkg_name
276: p_api_version,
277: l_api_name,
278: g_pkg_name
279: ) THEN
280: RAISE fnd_api.g_exc_unexpected_error;
281: END IF;
282:
283: -- Check p_init_msg_list
284: IF fnd_api.to_boolean(p_init_msg_list) THEN
280: RAISE fnd_api.g_exc_unexpected_error;
281: END IF;
282:
283: -- Check p_init_msg_list
284: IF fnd_api.to_boolean(p_init_msg_list) THEN
285: fnd_msg_pub.initialize;
286: END IF;
287:
288: x_return_status := wsh_util_core.g_ret_sts_success;
312:
313: IF UPPER(NVL(p_action, 'N')) = 'ASSIGN' THEN
314: IF (
315: (p_delivery_id IS NOT NULL)
316: AND (p_delivery_id <> fnd_api.g_miss_num)
317: OR (p_delivery_name IS NOT NULL)
318: AND (p_delivery_name <> fnd_api.g_miss_char)
319: ) THEN
320: IF (p_delivery_id IS NULL OR p_delivery_id = fnd_api.g_miss_num) THEN
314: IF (
315: (p_delivery_id IS NOT NULL)
316: AND (p_delivery_id <> fnd_api.g_miss_num)
317: OR (p_delivery_name IS NOT NULL)
318: AND (p_delivery_name <> fnd_api.g_miss_char)
319: ) THEN
320: IF (p_delivery_id IS NULL OR p_delivery_id = fnd_api.g_miss_num) THEN
321: /* convert delivery_name to delivery_id */
322: OPEN c_delivery_record;
316: AND (p_delivery_id <> fnd_api.g_miss_num)
317: OR (p_delivery_name IS NOT NULL)
318: AND (p_delivery_name <> fnd_api.g_miss_char)
319: ) THEN
320: IF (p_delivery_id IS NULL OR p_delivery_id = fnd_api.g_miss_num) THEN
321: /* convert delivery_name to delivery_id */
322: OPEN c_delivery_record;
323: FETCH c_delivery_record INTO l_delivery_id;
324:
480:
481: fnd_msg_pub.count_and_get(
482: p_count => x_msg_count,
483: p_data => x_msg_data,
484: p_encoded => fnd_api.g_false);
485:
486: IF fnd_api.to_boolean(p_commit) THEN
487: -- dbms_output.put_line('commit');
488: COMMIT WORK;
482: p_count => x_msg_count,
483: p_data => x_msg_data,
484: p_encoded => fnd_api.g_false);
485:
486: IF fnd_api.to_boolean(p_commit) THEN
487: -- dbms_output.put_line('commit');
488: COMMIT WORK;
489: END IF;
490:
492: wsh_debug_sv.pop(l_module_name);
493: END IF;
494: --
495: EXCEPTION
496: WHEN fnd_api.g_exc_error THEN
497: ROLLBACK TO detail_to_delivery_grp;
498: x_return_status := fnd_api.g_ret_sts_error;
499: fnd_msg_pub.count_and_get(
500: p_count => x_msg_count,
494: --
495: EXCEPTION
496: WHEN fnd_api.g_exc_error THEN
497: ROLLBACK TO detail_to_delivery_grp;
498: x_return_status := fnd_api.g_ret_sts_error;
499: fnd_msg_pub.count_and_get(
500: p_count => x_msg_count,
501: p_data => x_msg_data,
502: p_encoded => fnd_api.g_false);
498: x_return_status := fnd_api.g_ret_sts_error;
499: fnd_msg_pub.count_and_get(
500: p_count => x_msg_count,
501: p_data => x_msg_data,
502: p_encoded => fnd_api.g_false);
503:
504: --
505: IF l_debug_on THEN
506: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
502: p_encoded => fnd_api.g_false);
503:
504: --
505: IF l_debug_on THEN
506: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
507: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
508: END IF;
509: --
510: WHEN fnd_api.g_exc_unexpected_error THEN
503:
504: --
505: IF l_debug_on THEN
506: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
507: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
508: END IF;
509: --
510: WHEN fnd_api.g_exc_unexpected_error THEN
511: ROLLBACK TO detail_to_delivery_grp;
506: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
507: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
508: END IF;
509: --
510: WHEN fnd_api.g_exc_unexpected_error THEN
511: ROLLBACK TO detail_to_delivery_grp;
512: x_return_status := fnd_api.g_ret_sts_unexp_error;
513: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
514: p_encoded => fnd_api.g_false);
508: END IF;
509: --
510: WHEN fnd_api.g_exc_unexpected_error THEN
511: ROLLBACK TO detail_to_delivery_grp;
512: x_return_status := fnd_api.g_ret_sts_unexp_error;
513: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
514: p_encoded => fnd_api.g_false);
515:
516: --
510: WHEN fnd_api.g_exc_unexpected_error THEN
511: ROLLBACK TO detail_to_delivery_grp;
512: x_return_status := fnd_api.g_ret_sts_unexp_error;
513: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
514: p_encoded => fnd_api.g_false);
515:
516: --
517: IF l_debug_on THEN
518: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
514: p_encoded => fnd_api.g_false);
515:
516: --
517: IF l_debug_on THEN
518: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
519: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
520: END IF;
521: --
522: WHEN wsh_util_core.g_exc_warning THEN
515:
516: --
517: IF l_debug_on THEN
518: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
519: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
520: END IF;
521: --
522: WHEN wsh_util_core.g_exc_warning THEN
523: x_return_status := wsh_util_core.g_ret_sts_warning;
521: --
522: WHEN wsh_util_core.g_exc_warning THEN
523: x_return_status := wsh_util_core.g_ret_sts_warning;
524: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
525: p_encoded => fnd_api.g_false);
526:
527: --
528: IF l_debug_on THEN
529: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
535: x_return_status := wsh_util_core.g_ret_sts_error;
536: fnd_message.set_name('WSH', 'WSH_PUB_INVALID_ACTION');
537: wsh_util_core.add_message(x_return_status);
538: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
539: p_encoded => fnd_api.g_false);
540:
541: IF l_debug_on THEN
542: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_ACTION exception has occured.', wsh_debug_sv.c_excep_level);
543: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_ACTION');
548: x_return_status := wsh_util_core.g_ret_sts_error;
549: fnd_message.set_name('WSH', 'WSH_PUB_NO_DEL_DET_TBL');
550: wsh_util_core.add_message(x_return_status);
551: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
552: p_encoded => fnd_api.g_false);
553:
554: IF l_debug_on THEN
555: wsh_debug_sv.logmsg(l_module_name, 'WSH_NO_DEL_DET_TBL exception has occured.', wsh_debug_sv.c_excep_level);
556: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_NO_DEL_DET_TBL');
561: x_return_status := wsh_util_core.g_ret_sts_error;
562: fnd_message.set_name('WSH', 'WSH_PUB_NO_DELIVERY');
563: wsh_util_core.add_message(x_return_status);
564: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
565: p_encoded => fnd_api.g_false);
566:
567: IF l_debug_on THEN
568: wsh_debug_sv.logmsg(l_module_name, 'WSH_NO_DELIVERY_ID exception has occured.', wsh_debug_sv.c_excep_level);
569: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_NO_DELIVERY_ID');
578: fnd_message.set_name('WSH', 'WSH_DELIVERY_NOT_EXIST');
579: fnd_message.set_token('DELIVERY_NAME', p_delivery_name);
580: wsh_util_core.add_message(x_return_status);
581: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
582: p_encoded => fnd_api.g_false);
583:
584: IF l_debug_on THEN
585: wsh_debug_sv.logmsg(l_module_name, 'WSH_NO_DELIVERY exception has occured.', wsh_debug_sv.c_excep_level);
586: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_NO_DELIVERY');
592: fnd_message.set_name('WSH', 'WSH_INVALID_DELIVERY');
593: fnd_message.set_token('DELIVERY', p_delivery_id);
594: wsh_util_core.add_message(x_return_status);
595: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
596: p_encoded => fnd_api.g_false);
597:
598: IF l_debug_on THEN
599: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_DELIVERY_ID exception has occured.', wsh_debug_sv.c_excep_level);
600: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_DELIVERY_ID');
607: ROLLBACK TO detail_to_delivery_grp;
608: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
609: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_GRP.DETAIL_TO_DELIVERY');
610: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
611: p_encoded => fnd_api.g_false);
612:
613: IF l_debug_on THEN
614: wsh_debug_sv.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is ' || SQLERRM, wsh_debug_sv.c_unexpec_err_level);
615: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
695: WHEN OTHERS THEN
696: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
697: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_GRP.DETAIL_TO_DELIVERY');
698: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
699: p_encoded => fnd_api.g_false);
700:
701: IF l_debug_on THEN
702: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
703: END IF;
806: END IF;
807:
808: --
809:
810: IF NOT fnd_api.compatible_api_call(
811: l_api_version,
812: p_api_version,
813: l_api_name,
814: g_pkg_name
812: p_api_version,
813: l_api_name,
814: g_pkg_name
815: ) THEN
816: RAISE fnd_api.g_exc_unexpected_error;
817: END IF;
818:
819: -- Check p_init_msg_list
820: IF fnd_api.to_boolean(p_init_msg_list) THEN
816: RAISE fnd_api.g_exc_unexpected_error;
817: END IF;
818:
819: -- Check p_init_msg_list
820: IF fnd_api.to_boolean(p_init_msg_list) THEN
821: fnd_msg_pub.initialize;
822: END IF;
823:
824: x_return_status := wsh_util_core.g_ret_sts_success;
899: END IF;
900:
901: -- UT Bug fix 2650839
902: --IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
903: -- RAISE fnd_api.g_exc_error;
904: --END IF;
905: -- Reverting the fix made in 2650839 as we need to return warning instead of
906: -- error to public API users.
907: wsh_util_core.api_post_call(
941:
942: fnd_msg_pub.count_and_get(
943: p_count => x_msg_count,
944: p_data => x_msg_data,
945: p_encoded => fnd_api.g_false);
946:
947: IF l_debug_on THEN
948: wsh_debug_sv.LOG(l_module_name, 'X_NEW_DETAIL_ID', x_new_detail_id);
949: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY', x_split_quantity);
950: wsh_debug_sv.pop(l_module_name);
951: END IF;
952: --
953: EXCEPTION
954: WHEN fnd_api.g_exc_error THEN
955: ROLLBACK TO split_line_grp;
956: x_return_status := fnd_api.g_ret_sts_error;
957: fnd_msg_pub.count_and_get(
958: p_count => x_msg_count,
952: --
953: EXCEPTION
954: WHEN fnd_api.g_exc_error THEN
955: ROLLBACK TO split_line_grp;
956: x_return_status := fnd_api.g_ret_sts_error;
957: fnd_msg_pub.count_and_get(
958: p_count => x_msg_count,
959: p_data => x_msg_data,
960: p_encoded => fnd_api.g_false);
956: x_return_status := fnd_api.g_ret_sts_error;
957: fnd_msg_pub.count_and_get(
958: p_count => x_msg_count,
959: p_data => x_msg_data,
960: p_encoded => fnd_api.g_false);
961:
962: --
963: IF l_debug_on THEN
964: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
960: p_encoded => fnd_api.g_false);
961:
962: --
963: IF l_debug_on THEN
964: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
965: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
966: END IF;
967: --
968: WHEN fnd_api.g_exc_unexpected_error THEN
961:
962: --
963: IF l_debug_on THEN
964: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
965: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
966: END IF;
967: --
968: WHEN fnd_api.g_exc_unexpected_error THEN
969: ROLLBACK TO split_line_grp;
964: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
965: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
966: END IF;
967: --
968: WHEN fnd_api.g_exc_unexpected_error THEN
969: ROLLBACK TO split_line_grp;
970: x_return_status := fnd_api.g_ret_sts_unexp_error;
971: fnd_msg_pub.count_and_get(
972: p_count => x_msg_count,
966: END IF;
967: --
968: WHEN fnd_api.g_exc_unexpected_error THEN
969: ROLLBACK TO split_line_grp;
970: x_return_status := fnd_api.g_ret_sts_unexp_error;
971: fnd_msg_pub.count_and_get(
972: p_count => x_msg_count,
973: p_data => x_msg_data,
974: p_encoded => fnd_api.g_false);
970: x_return_status := fnd_api.g_ret_sts_unexp_error;
971: fnd_msg_pub.count_and_get(
972: p_count => x_msg_count,
973: p_data => x_msg_data,
974: p_encoded => fnd_api.g_false);
975:
976: --
977: IF l_debug_on THEN
978: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
974: p_encoded => fnd_api.g_false);
975:
976: --
977: IF l_debug_on THEN
978: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
979: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
980: END IF;
981: --
982: WHEN wsh_util_core.g_exc_warning THEN
975:
976: --
977: IF l_debug_on THEN
978: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
979: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
980: END IF;
981: --
982: WHEN wsh_util_core.g_exc_warning THEN
983: x_return_status := wsh_util_core.g_ret_sts_warning;
983: x_return_status := wsh_util_core.g_ret_sts_warning;
984: fnd_msg_pub.count_and_get(
985: p_count => x_msg_count,
986: p_data => x_msg_data,
987: p_encoded => fnd_api.g_false);
988:
989: --
990: IF l_debug_on THEN
991: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
1004:
1005: fnd_msg_pub.count_and_get(
1006: p_count => x_msg_count,
1007: p_data => x_msg_data,
1008: p_encoded => fnd_api.g_false);
1009:
1010: IF l_debug_on THEN
1011: wsh_debug_sv.logmsg(l_module_name, 'WSH_INALID_DETAIL_ID exception has occured.', wsh_debug_sv.c_excep_level);
1012: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INALID_DETAIL_ID');
1020:
1021: fnd_msg_pub.count_and_get(
1022: p_count => x_msg_count,
1023: p_data => x_msg_data,
1024: p_encoded => fnd_api.g_false);
1025:
1026: IF l_debug_on THEN
1027: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_SPLIT_QTY exception has occured.', wsh_debug_sv.c_excep_level);
1028: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_SPLIT_QTY');
1036:
1037: fnd_msg_pub.count_and_get(
1038: p_count => x_msg_count,
1039: p_data => x_msg_data,
1040: p_encoded => fnd_api.g_false);
1041:
1042: IF l_debug_on THEN
1043: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_SPLIT_QTY2 exception has occured.', wsh_debug_sv.c_excep_level);
1044: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_SPLIT_QTY2');
1045: END IF;
1046: --
1047: WHEN OTHERS THEN
1048: ROLLBACK TO split_line_grp;
1049: x_return_status := fnd_api.g_ret_sts_unexp_error;
1050: wsh_util_core.add_message(x_return_status, l_module_name);
1051: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_GRP.Split_Line');
1052:
1053: fnd_msg_pub.count_and_get(
1052:
1053: fnd_msg_pub.count_and_get(
1054: p_count => x_msg_count,
1055: p_data => x_msg_data,
1056: p_encoded => fnd_api.g_false);
1057: --
1058: IF l_debug_on THEN
1059: wsh_debug_sv.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is ' || SQLERRM, wsh_debug_sv.c_unexpec_err_level);
1060: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
1171: --
1172: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1173:
1174: -- Standard call to check for call compatibility
1175: IF NOT FND_API.Compatible_API_Call(
1176: l_api_version_number,
1177: p_api_version_number,
1178: l_api_name,
1179: G_PKG_NAME) THEN
1176: l_api_version_number,
1177: p_api_version_number,
1178: l_api_name,
1179: G_PKG_NAME) THEN
1180: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1181: END IF;
1182:
1183: -- Initialize message stack if required
1184: IF FND_API.to_Boolean(p_init_msg_list) THEN
1180: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1181: END IF;
1182:
1183: -- Initialize message stack if required
1184: IF FND_API.to_Boolean(p_init_msg_list) THEN
1185: FND_MSG_PUB.initialize;
1186: END IF;
1187:
1188: -- sperera source_code has to be 'OE' or 'WSH'
1185: FND_MSG_PUB.initialize;
1186: END IF;
1187:
1188: -- sperera source_code has to be 'OE' or 'WSH'
1189: IF (NVL(p_source_code, FND_API.G_MISS_CHAR)) NOT IN ('WSH', 'OE') THEN
1190: RAISE invalid_source_code;
1191: END IF;
1192:
1193: -- Patchset I : Harmonization Project.
1347: l_detail_info_tab(l_index).tp_attribute8 := p_changed_attributes(l_index).tp_attribute8;
1348: l_detail_info_tab(l_index).tp_attribute9 := p_changed_attributes(l_index).tp_attribute9;
1349: l_detail_info_tab(l_index).tracking_number := p_changed_attributes(l_index).tracking_number;
1350:
1351: -- jckwok Bug 3579965: must check whether transaction_temp_id <> FND_API.G_MISS_NUM also
1352: if (p_changed_attributes(l_index).transaction_temp_id is not null
1353: AND p_changed_attributes(l_index).transaction_temp_id <> FND_API.G_MISS_NUM) then
1354: l_detail_info_tab(l_index).transaction_temp_id := p_changed_attributes(l_index).transaction_temp_id;
1355: else
1349: l_detail_info_tab(l_index).tracking_number := p_changed_attributes(l_index).tracking_number;
1350:
1351: -- jckwok Bug 3579965: must check whether transaction_temp_id <> FND_API.G_MISS_NUM also
1352: if (p_changed_attributes(l_index).transaction_temp_id is not null
1353: AND p_changed_attributes(l_index).transaction_temp_id <> FND_API.G_MISS_NUM) then
1354: l_detail_info_tab(l_index).transaction_temp_id := p_changed_attributes(l_index).transaction_temp_id;
1355: else
1356: l_detail_info_tab(l_index).serial_number := p_changed_attributes(l_index).serial_number;
1357: end if;
1371:
1372: wsh_interface_grp.Create_Update_Delivery_Detail
1373: (
1374: p_api_version_number => l_api_version_number,
1375: p_init_msg_list => FND_API.G_FALSE,
1376: p_commit => FND_API.G_FALSE,
1377: x_return_status => l_return_status,
1378: x_msg_count => l_msg_count,
1379: x_msg_data => l_msg_data,
1372: wsh_interface_grp.Create_Update_Delivery_Detail
1373: (
1374: p_api_version_number => l_api_version_number,
1375: p_init_msg_list => FND_API.G_FALSE,
1376: p_commit => FND_API.G_FALSE,
1377: x_return_status => l_return_status,
1378: x_msg_count => l_msg_count,
1379: x_msg_data => l_msg_data,
1380: p_detail_info_tab => l_detail_info_tab,
1394: );
1395:
1396:
1397: -- report success
1398: IF FND_API.TO_BOOLEAN(p_commit) THEN
1399: COMMIT WORK;
1400: END IF;
1401:
1402: x_return_status := FND_API.G_RET_STS_SUCCESS;
1398: IF FND_API.TO_BOOLEAN(p_commit) THEN
1399: COMMIT WORK;
1400: END IF;
1401:
1402: x_return_status := FND_API.G_RET_STS_SUCCESS;
1403: FND_MSG_PUB.Count_And_Get
1404: ( p_count => x_msg_count,
1405: p_data => x_msg_data,
1406: p_encoded => FND_API.G_FALSE
1402: x_return_status := FND_API.G_RET_STS_SUCCESS;
1403: FND_MSG_PUB.Count_And_Get
1404: ( p_count => x_msg_count,
1405: p_data => x_msg_data,
1406: p_encoded => FND_API.G_FALSE
1407: );
1408: --
1409: -- Debug Statements
1410: --
1420: WSH_UTIL_CORE.add_message (x_return_status);
1421: FND_MSG_PUB.Count_And_Get
1422: ( p_count => x_msg_count,
1423: p_data => x_msg_data,
1424: p_encoded => FND_API.G_FALSE
1425: );
1426: --
1427: -- Debug Statements
1428: --
1432: END IF;
1433: --
1434: WHEN invalid_source_code THEN
1435: ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
1436: x_return_status := FND_API.G_RET_STS_ERROR;
1437: FND_MESSAGE.Set_Name('WSH', 'WSH_INVALID_SOURCE_CODE');
1438: WSH_UTIL_CORE.Add_Message(x_return_status);
1439: FND_MSG_PUB.Count_And_Get
1440: ( p_count => x_msg_count,
1438: WSH_UTIL_CORE.Add_Message(x_return_status);
1439: FND_MSG_PUB.Count_And_Get
1440: ( p_count => x_msg_count,
1441: p_data => x_msg_data,
1442: p_encoded => FND_API.G_FALSE
1443: );
1444: --
1445: -- Debug Statements
1446: --
1459: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
1460: FND_MSG_PUB.Count_And_Get
1461: ( p_count => x_msg_count,
1462: p_data => x_msg_data,
1463: p_encoded => FND_API.G_FALSE
1464: );
1465:
1466: -- Bug fix 2154602
1467: IF l_debug_on THEN
1475: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
1476: FND_MSG_PUB.Count_And_Get
1477: ( p_count => x_msg_count,
1478: p_data => x_msg_data,
1479: p_encoded => FND_API.G_FALSE
1480: );
1481: -- End of Bug fix 2154602
1482:
1483: IF l_debug_on THEN
1495: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Update_Shipping_Attributes');
1496: FND_MSG_PUB.Count_And_Get
1497: ( p_count => x_msg_count,
1498: p_data => x_msg_data,
1499: p_encoded => FND_API.G_FALSE
1500: );
1501: IF l_debug_on THEN
1502: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1503: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1658: WSH_DEBUG_SV.log(l_module_name,'P_LINE_ROWS.COUNT',P_LINE_ROWS.COUNT);
1659: END IF;
1660: --
1661:
1662: IF NOT FND_API.compatible_api_call(
1663: l_api_version_number,
1664: p_api_version_number,
1665: l_api_name,
1666: G_PKG_NAME) THEN
1663: l_api_version_number,
1664: p_api_version_number,
1665: l_api_name,
1666: G_PKG_NAME) THEN
1667: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1668: END IF;
1669:
1670: -- Check p_init_msg_list
1671: IF FND_API.to_boolean(p_init_msg_list) THEN
1667: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1668: END IF;
1669:
1670: -- Check p_init_msg_list
1671: IF FND_API.to_boolean(p_init_msg_list) THEN
1672: FND_MSG_PUB.initialize;
1673: END IF;
1674: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1675:
1703: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
1704: END IF;
1705:
1706:
1707: IF FND_API.TO_BOOLEAN(p_commit) THEN
1708: --
1709: -- Start code for Bugfix 4070732
1710: --
1711: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1721: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1722: END IF;
1723:
1724: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
1725: RAISE FND_API.G_EXC_ERROR;
1726: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1727: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1728: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1729: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
1723:
1724: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
1725: RAISE FND_API.G_EXC_ERROR;
1726: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1727: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1728: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1729: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
1730: END IF;
1731:
1743: --{
1744: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1745: --{
1746:
1747: IF FND_API.TO_BOOLEAN(p_commit) THEN
1748:
1749: IF l_debug_on THEN
1750: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1751: END IF;
1771: x_return_status := l_return_status;
1772:
1773: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
1774: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1775: IF NOT(FND_API.TO_BOOLEAN(p_commit)) THEN
1776: ROLLBACK TO AUTOCREATE_DEL_GRP;
1777: end if;
1778: END IF;
1779: END IF;
1787: FND_MSG_PUB.Count_And_Get
1788: (
1789: p_count => x_msg_count,
1790: p_data => x_msg_data,
1791: p_encoded => FND_API.G_FALSE
1792: );
1793:
1794:
1795: IF l_debug_on THEN
1797: WSH_DEBUG_SV.pop(l_module_name);
1798: END IF;
1799: --
1800: EXCEPTION
1801: WHEN FND_API.G_EXC_ERROR THEN
1802: ROLLBACK TO AUTOCREATE_DEL_GRP;
1803: x_return_status := FND_API.G_RET_STS_ERROR ;
1804: --
1805: -- Start code for Bugfix 4070732
1799: --
1800: EXCEPTION
1801: WHEN FND_API.G_EXC_ERROR THEN
1802: ROLLBACK TO AUTOCREATE_DEL_GRP;
1803: x_return_status := FND_API.G_RET_STS_ERROR ;
1804: --
1805: -- Start code for Bugfix 4070732
1806: --
1807: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
1833: FND_MSG_PUB.Count_And_Get
1834: (
1835: p_count => x_msg_count,
1836: p_data => x_msg_data,
1837: p_encoded => FND_API.G_FALSE
1838: );
1839:
1840:
1841: IF l_debug_on THEN
1838: );
1839:
1840:
1841: IF l_debug_on THEN
1842: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1843: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1844: END IF;
1845: --
1846:
1839:
1840:
1841: IF l_debug_on THEN
1842: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1843: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1844: END IF;
1845: --
1846:
1847: WHEN autocreate_delivery_failed THEN
1881: FND_MSG_PUB.Count_And_Get
1882: (
1883: p_count => x_msg_count,
1884: p_data => x_msg_data,
1885: p_encoded => FND_API.G_FALSE
1886: );
1887:
1888:
1889: IF l_debug_on THEN
1929: FND_MSG_PUB.Count_And_Get
1930: (
1931: p_count => x_msg_count,
1932: p_data => x_msg_data,
1933: p_encoded => FND_API.G_FALSE
1934: );
1935:
1936:
1937: IF l_debug_on THEN
1938: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1939: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1940: END IF;
1941: --
1942: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1943: ROLLBACK TO AUTOCREATE_DEL_GRP;
1944: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1945: --
1946: -- Start of code for Bugfix 4070732
1940: END IF;
1941: --
1942: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1943: ROLLBACK TO AUTOCREATE_DEL_GRP;
1944: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1945: --
1946: -- Start of code for Bugfix 4070732
1947: --
1948: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
1967: FND_MSG_PUB.Count_And_Get
1968: (
1969: p_count => x_msg_count,
1970: p_data => x_msg_data,
1971: p_encoded => FND_API.G_FALSE
1972: );
1973: --
1974: IF l_debug_on THEN
1975: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1971: p_encoded => FND_API.G_FALSE
1972: );
1973: --
1974: IF l_debug_on THEN
1975: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1976: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1977: END IF;
1978: --
1979: WHEN OTHERS THEN
1972: );
1973: --
1974: IF l_debug_on THEN
1975: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1976: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1977: END IF;
1978: --
1979: WHEN OTHERS THEN
1980: ROLLBACK TO AUTOCREATE_DEL_GRP;
1977: END IF;
1978: --
1979: WHEN OTHERS THEN
1980: ROLLBACK TO AUTOCREATE_DEL_GRP;
1981: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1982: wsh_util_core.add_message(x_return_status, l_module_name);
1983: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Autocreate_Deliveries');
1984: --
1985: -- Start of code for Bugfix 4070732
2006: FND_MSG_PUB.Count_And_Get
2007: (
2008: p_count => x_msg_count,
2009: p_data => x_msg_data,
2010: p_encoded => FND_API.G_FALSE
2011: );
2012: --
2013: IF l_debug_on THEN
2014: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2066: WSH_DEBUG_SV.log(l_module_name,'P_LINE_ROWS.COUNT',P_LINE_ROWS.COUNT);
2067: END IF;
2068: --
2069:
2070: IF NOT FND_API.compatible_api_call(
2071: l_api_version_number,
2072: p_api_version_number,
2073: l_api_name,
2074: G_PKG_NAME) THEN
2071: l_api_version_number,
2072: p_api_version_number,
2073: l_api_name,
2074: G_PKG_NAME) THEN
2075: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2076: END IF;
2077:
2078: -- Check p_init_msg_list
2079: IF FND_API.to_boolean(p_init_msg_list) THEN
2075: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2076: END IF;
2077:
2078: -- Check p_init_msg_list
2079: IF FND_API.to_boolean(p_init_msg_list) THEN
2080: FND_MSG_PUB.initialize;
2081: END IF;
2082: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2083:
2111: FND_MSG_PUB.Count_And_Get
2112: (
2113: p_count => x_msg_count,
2114: p_data => x_msg_data,
2115: p_encoded => FND_API.G_FALSE
2116: );
2117:
2118: IF FND_API.TO_BOOLEAN(p_commit) THEN
2119: COMMIT WORK;
2114: p_data => x_msg_data,
2115: p_encoded => FND_API.G_FALSE
2116: );
2117:
2118: IF FND_API.TO_BOOLEAN(p_commit) THEN
2119: COMMIT WORK;
2120: END IF;
2121:
2122: IF l_debug_on THEN
2125: WSH_DEBUG_SV.pop(l_module_name);
2126: END IF;
2127: --
2128: EXCEPTION
2129: WHEN FND_API.G_EXC_ERROR THEN
2130: ROLLBACK TO AUTOCREATE_TRIP_GRP;
2131: x_return_status := FND_API.G_RET_STS_ERROR ;
2132: FND_MSG_PUB.Count_And_Get
2133: (
2127: --
2128: EXCEPTION
2129: WHEN FND_API.G_EXC_ERROR THEN
2130: ROLLBACK TO AUTOCREATE_TRIP_GRP;
2131: x_return_status := FND_API.G_RET_STS_ERROR ;
2132: FND_MSG_PUB.Count_And_Get
2133: (
2134: p_count => x_msg_count,
2135: p_data => x_msg_data,
2132: FND_MSG_PUB.Count_And_Get
2133: (
2134: p_count => x_msg_count,
2135: p_data => x_msg_data,
2136: p_encoded => FND_API.G_FALSE
2137: );
2138:
2139: IF l_debug_on THEN
2140: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2136: p_encoded => FND_API.G_FALSE
2137: );
2138:
2139: IF l_debug_on THEN
2140: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2141: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2142: END IF;
2143: --
2144: WHEN autocreate_trip_failed THEN
2137: );
2138:
2139: IF l_debug_on THEN
2140: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2141: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2142: END IF;
2143: --
2144: WHEN autocreate_trip_failed THEN
2145: ROLLBACK TO AUTOCREATE_TRIP_GRP;
2148: FND_MSG_PUB.Count_And_Get
2149: (
2150: p_count => x_msg_count,
2151: p_data => x_msg_data,
2152: p_encoded => FND_API.G_FALSE
2153: );
2154: IF l_debug_on THEN
2155: WSH_DEBUG_SV.logmsg(l_module_name,'AUTOCREATE_TRIP_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2156: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:AUTOCREATE_TRIP_FAILED');
2161: FND_MSG_PUB.Count_And_Get
2162: (
2163: p_count => x_msg_count,
2164: p_data => x_msg_data,
2165: p_encoded => FND_API.G_FALSE
2166: );
2167: --
2168: IF l_debug_on THEN
2169: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2169: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2170: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2171: END IF;
2172: --
2173: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2174: ROLLBACK TO AUTOCREATE_TRIP_GRP;
2175: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2176: FND_MSG_PUB.Count_And_Get
2177: (
2171: END IF;
2172: --
2173: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2174: ROLLBACK TO AUTOCREATE_TRIP_GRP;
2175: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2176: FND_MSG_PUB.Count_And_Get
2177: (
2178: p_count => x_msg_count,
2179: p_data => x_msg_data,
2176: FND_MSG_PUB.Count_And_Get
2177: (
2178: p_count => x_msg_count,
2179: p_data => x_msg_data,
2180: p_encoded => FND_API.G_FALSE
2181: );
2182: --
2183:
2184: IF l_debug_on THEN
2181: );
2182: --
2183:
2184: IF l_debug_on THEN
2185: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2186: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2187: END IF;
2188: --
2189: WHEN OTHERS THEN
2182: --
2183:
2184: IF l_debug_on THEN
2185: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2186: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2187: END IF;
2188: --
2189: WHEN OTHERS THEN
2190: ROLLBACK TO AUTOCREATE_TRIP_GRP;
2187: END IF;
2188: --
2189: WHEN OTHERS THEN
2190: ROLLBACK TO AUTOCREATE_TRIP_GRP;
2191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2192: wsh_util_core.add_message(x_return_status, l_module_name);
2193: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Autocreate_Del_Trip');
2194: FND_MSG_PUB.Count_And_Get
2195: (
2194: FND_MSG_PUB.Count_And_Get
2195: (
2196: p_count => x_msg_count,
2197: p_data => x_msg_data,
2198: p_encoded => FND_API.G_FALSE
2199: );
2200: --
2201: IF l_debug_on THEN
2202: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2507: END IF;
2508: --
2509: -- Initialize message list if p_init_msg_list is set to TRUE.
2510: --
2511: IF FND_API.to_Boolean( p_init_msg_list )
2512: THEN
2513: FND_MSG_PUB.initialize;
2514: ELSE
2515: IF nvl(l_check_dcp, -99) IN (1,2) THEN
2532: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2533: IF l_debug_on THEN
2534: wsh_debug_sv.logmsg(l_module_name,'Null Caller');
2535: END IF;
2536: RAISE FND_API.G_EXC_ERROR;
2537: ELSIF(p_action_prms.action_code IS NULL) THEN
2538: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
2539: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'ACTION_CODE');
2540: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2540: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2541: IF l_debug_on THEN
2542: wsh_debug_sv.logmsg(l_module_name,'WSH_INVALID_ACTION_CODE');
2543: END IF;
2544: RAISE FND_API.G_EXC_ERROR;
2545: END IF;
2546:
2547: IF(p_rec_attr_tab.count = 0) THEN
2548: IF l_debug_on THEN
2547: IF(p_rec_attr_tab.count = 0) THEN
2548: IF l_debug_on THEN
2549: wsh_debug_sv.logmsg(l_module_name,'Table count zero');
2550: END IF;
2551: RAISE FND_API.G_EXC_ERROR;
2552: END IF;
2553: --
2554: -- bug 2788946
2555: -- This condition is added so that we treat these actions
2574: --
2575: Delivery_Detail_Action
2576: (
2577: p_api_version_number => p_api_version_number,
2578: p_init_msg_list => FND_API.G_FALSE,
2579: p_commit => FND_API.G_FALSE,
2580: x_return_status => l_return_status,
2581: x_msg_count => l_msg_count,
2582: x_msg_data => l_msg_data,
2575: Delivery_Detail_Action
2576: (
2577: p_api_version_number => p_api_version_number,
2578: p_init_msg_list => FND_API.G_FALSE,
2579: p_commit => FND_API.G_FALSE,
2580: x_return_status => l_return_status,
2581: x_msg_count => l_msg_count,
2582: x_msg_data => l_msg_data,
2583: p_rec_attr_tab => p_rec_attr_tab,
2609: --
2610: Delivery_Detail_Action
2611: (
2612: p_api_version_number => p_api_version_number,
2613: p_init_msg_list => FND_API.G_FALSE,
2614: p_commit => FND_API.G_FALSE,
2615: x_return_status => l_return_status,
2616: x_msg_count => l_msg_count,
2617: x_msg_data => l_msg_data,
2610: Delivery_Detail_Action
2611: (
2612: p_api_version_number => p_api_version_number,
2613: p_init_msg_list => FND_API.G_FALSE,
2614: p_commit => FND_API.G_FALSE,
2615: x_return_status => l_return_status,
2616: x_msg_count => l_msg_count,
2617: x_msg_data => l_msg_data,
2618: p_rec_attr_tab => p_rec_attr_tab,
2740: IF l_debug_on THEN
2741: wsh_debug_sv.logmsg(l_module_name, 'WSH_DISABLE_ACTION');
2742: END IF;
2743: --
2744: raise FND_API.G_EXC_ERROR;
2745: --}
2746: END IF;
2747:
2748: IF( l_validation_level_tab(wsh_actions_levels.C_DLVY_ACTION_ENABLED_LVL) = 1) THEN
2764: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2765: IF l_debug_on THEN
2766: wsh_debug_sv.logmsg(l_module_name, 'Delivery does not exist');
2767: END IF;
2768: RAISE FND_API.G_EXC_ERROR;
2769: END IF;
2770: CLOSE del_cur;
2771: ELSE
2772: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
2774: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2775: IF l_debug_on THEN
2776: wsh_debug_sv.logmsg(l_module_name, 'Null Delivery Id');
2777: END IF;
2778: RAISE FND_API.G_EXC_ERROR;
2779: END IF;
2780:
2781: l_dlvy_rec_tab(1).delivery_id := p_action_prms.delivery_id;
2782: l_dlvy_rec_tab(1).organization_id := l_dlvy_organization_id;
2861: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2862: IF l_debug_on THEN
2863: wsh_debug_sv.logmsg(l_module_name, 'WSH_DISABLE_ACTION');
2864: END IF;
2865: RAISE FND_API.G_EXC_ERROR;
2866: END IF;
2867: --
2868: IF l_number_of_warnings > 0 THEN
2869:
2879: ELSE
2880: IF l_debug_on THEN
2881: wsh_debug_sv.log(l_module_name,'Number of warnings', l_number_of_warnings);
2882: END IF;
2883: RAISE FND_API.G_EXC_ERROR;
2884: END IF;
2885: END IF;
2886:
2887:
2896: IF wsh_util_core.fte_is_installed = 'Y' THEN
2897:
2898: WSH_FTE_COMP_CONSTRAINT_PKG.validate_constraint_main(
2899: p_api_version_number => 1.0,
2900: p_init_msg_list => FND_API.G_FALSE,
2901: p_entity_type => 'L',
2902: p_target_id => p_action_prms.DELIVERY_ID,
2903: p_action_code => p_action_prms.action_code,
2904: p_del_attr_tab => l_cc_del_attr_tab,
3041: FND_MESSAGE.SET_NAME('WSH', 'WSH_OPM_LOT_INDIVISIBLE');
3042: IF p_action_prms.caller = 'WSH_FSTRX' THEN
3043: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3044: END IF;
3045: RAISE FND_API.G_EXC_ERROR;
3046: END IF;
3047: END IF;
3048:
3049: -- If caller is form, return. We are done
3070: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3071: IF l_debug_on THEN
3072: wsh_debug_sv.logmsg(l_module_name,'WSH_UI_MULTI_SELECTION');
3073: END IF;
3074: RAISE FND_API.G_EXC_ERROR;
3075: END IF;
3076: END IF;
3077:
3078: IF l_debug_on THEN
3148: END IF;
3149: --
3150: WSH_DELIVERY_DETAILS_GRP.detail_to_delivery(
3151: p_api_version => l_api_version,
3152: p_init_msg_list => FND_API.G_FALSE,
3153: p_commit => FND_API.G_FALSE,
3154: p_validation_level => l_validation_level,
3155: x_return_status => l_return_status,
3156: x_msg_count => l_msg_count,
3149: --
3150: WSH_DELIVERY_DETAILS_GRP.detail_to_delivery(
3151: p_api_version => l_api_version,
3152: p_init_msg_list => FND_API.G_FALSE,
3153: p_commit => FND_API.G_FALSE,
3154: p_validation_level => l_validation_level,
3155: x_return_status => l_return_status,
3156: x_msg_count => l_msg_count,
3157: x_msg_data => l_msg_data,
3203: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3204: IF l_debug_on THEN
3205: wsh_debug_sv.logmsg(l_module_name,'Zero or Null split quantity');
3206: END IF;
3207: RAISE FND_API.G_EXC_ERROR;
3208: END IF;
3209:
3210: --
3211: IF l_debug_on THEN
3227:
3228: -- HW OPMCONV - 1) No need to check for process_org
3229: -- - 2) check for value of UOM2 before calling the validation
3230: IF ( l_requested_quantity_uom2 IS NOT NULL
3231: AND l_requested_quantity_uom2 <> FND_API.G_MISS_CHAR) THEN
3232:
3233: --{
3234: IF l_debug_on THEN
3235: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.validate_secondary_quantity',WSH_DEBUG_SV.C_PROC_LEVEL);
3281: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_GRP.SPLIT_LINE',WSH_DEBUG_SV.C_PROC_LEVEL);
3282: END IF;
3283: WSH_DELIVERY_DETAILS_GRP.split_line(
3284: p_api_version => l_api_version,
3285: p_init_msg_list => FND_API.G_FALSE,
3286: p_commit => FND_API.G_FALSE,
3287: p_validation_level => l_validation_level,
3288: x_return_status => l_return_status,
3289: x_msg_count => l_msg_count,
3282: END IF;
3283: WSH_DELIVERY_DETAILS_GRP.split_line(
3284: p_api_version => l_api_version,
3285: p_init_msg_list => FND_API.G_FALSE,
3286: p_commit => FND_API.G_FALSE,
3287: p_validation_level => l_validation_level,
3288: x_return_status => l_return_status,
3289: x_msg_count => l_msg_count,
3290: x_msg_data => l_msg_data,
3350: END IF;
3351:
3352: WSH_DELIVERY_DETAILS_GRP.Autocreate_Deliveries(
3353: p_api_version_number => l_api_version,
3354: p_init_msg_list => FND_API.G_FALSE,
3355: p_commit => FND_API.G_FALSE,
3356: p_caller => p_action_prms.caller,
3357: x_return_status => l_return_status ,
3358: x_msg_count => l_msg_count,
3351:
3352: WSH_DELIVERY_DETAILS_GRP.Autocreate_Deliveries(
3353: p_api_version_number => l_api_version,
3354: p_init_msg_list => FND_API.G_FALSE,
3355: p_commit => FND_API.G_FALSE,
3356: p_caller => p_action_prms.caller,
3357: x_return_status => l_return_status ,
3358: x_msg_count => l_msg_count,
3359: x_msg_data => l_msg_data,
3441: ELSE
3442:
3443: WSH_DELIVERY_DETAILS_GRP.Autocreate_Deliveries(
3444: p_api_version_number => l_api_version,
3445: p_init_msg_list => FND_API.G_FALSE,
3446: p_commit => FND_API.G_FALSE,
3447: p_caller => p_action_prms.caller,
3448: x_return_status => l_return_status ,
3449: x_msg_count => l_msg_count,
3442:
3443: WSH_DELIVERY_DETAILS_GRP.Autocreate_Deliveries(
3444: p_api_version_number => l_api_version,
3445: p_init_msg_list => FND_API.G_FALSE,
3446: p_commit => FND_API.G_FALSE,
3447: p_caller => p_action_prms.caller,
3448: x_return_status => l_return_status ,
3449: x_msg_count => l_msg_count,
3450: x_msg_data => l_msg_data,
3490: END IF;
3491: --
3492: WSH_DELIVERY_DETAILS_GRP.Autocreate_del_trip(
3493: p_api_version_number => l_api_version,
3494: p_init_msg_list => FND_API.G_FALSE,
3495: p_commit => FND_API.G_FALSE,
3496: x_return_status => l_return_status,
3497: x_msg_count => l_msg_count,
3498: x_msg_data => l_msg_data,
3491: --
3492: WSH_DELIVERY_DETAILS_GRP.Autocreate_del_trip(
3493: p_api_version_number => l_api_version,
3494: p_init_msg_list => FND_API.G_FALSE,
3495: p_commit => FND_API.G_FALSE,
3496: x_return_status => l_return_status,
3497: x_msg_count => l_msg_count,
3498: x_msg_data => l_msg_data,
3499: p_line_rows => l_id_tab,
3663: END IF;
3664:
3665: wsh_container_grp.Container_Actions(
3666: p_api_version => l_api_version,
3667: p_init_msg_list => FND_API.G_FALSE,
3668: p_commit => FND_API.G_FALSE,
3669: p_validation_level => wsh_container_grp.C_DELIVERY_DETAIL_CALL,
3670: x_return_status => l_return_status,
3671: x_msg_count => l_msg_count,
3664:
3665: wsh_container_grp.Container_Actions(
3666: p_api_version => l_api_version,
3667: p_init_msg_list => FND_API.G_FALSE,
3668: p_commit => FND_API.G_FALSE,
3669: p_validation_level => wsh_container_grp.C_DELIVERY_DETAIL_CALL,
3670: x_return_status => l_return_status,
3671: x_msg_count => l_msg_count,
3672: x_msg_data => l_msg_data,
3744: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_GRP.AUTO_PACK',WSH_DEBUG_SV.C_PROC_LEVEL);
3745: END IF;
3746: wsh_container_grp.Auto_Pack (
3747: p_api_version => l_api_version,
3748: p_init_msg_list => FND_API.G_FALSE,
3749: p_commit => FND_API.G_FALSE,
3750: p_validation_level => l_validation_level,
3751: x_return_status => l_return_status,
3752: x_msg_count => l_msg_count,
3745: END IF;
3746: wsh_container_grp.Auto_Pack (
3747: p_api_version => l_api_version,
3748: p_init_msg_list => FND_API.G_FALSE,
3749: p_commit => FND_API.G_FALSE,
3750: p_validation_level => l_validation_level,
3751: x_return_status => l_return_status,
3752: x_msg_count => l_msg_count,
3753: x_msg_data => l_msg_data,
3777: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_GRP.AUTO_PACK',WSH_DEBUG_SV.C_PROC_LEVEL);
3778: END IF;
3779: wsh_container_grp.Auto_Pack (
3780: p_api_version => p_api_version_number,
3781: p_init_msg_list => FND_API.G_FALSE,
3782: p_commit => FND_API.G_FALSE,
3783: p_validation_level => l_validation_level,
3784: x_return_status => l_return_status,
3785: x_msg_count => l_msg_count,
3778: END IF;
3779: wsh_container_grp.Auto_Pack (
3780: p_api_version => p_api_version_number,
3781: p_init_msg_list => FND_API.G_FALSE,
3782: p_commit => FND_API.G_FALSE,
3783: p_validation_level => l_validation_level,
3784: x_return_status => l_return_status,
3785: x_msg_count => l_msg_count,
3786: x_msg_data => l_msg_data ,
3838: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_GRP.CONTAINER_ACTIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
3839: END IF;
3840: wsh_container_grp.Container_Actions(
3841: p_api_version => l_api_version,
3842: p_init_msg_list => FND_API.G_FALSE,
3843: p_commit => FND_API.G_FALSE,
3844: p_validation_level => wsh_container_grp.C_DELIVERY_DETAIL_CALL,
3845: x_return_status => l_return_status,
3846: x_msg_count => l_msg_count,
3839: END IF;
3840: wsh_container_grp.Container_Actions(
3841: p_api_version => l_api_version,
3842: p_init_msg_list => FND_API.G_FALSE,
3843: p_commit => FND_API.G_FALSE,
3844: p_validation_level => wsh_container_grp.C_DELIVERY_DETAIL_CALL,
3845: x_return_status => l_return_status,
3846: x_msg_count => l_msg_count,
3847: x_msg_data => l_msg_data ,
3904: CLOSE cycle_count_cur;
3905: IF l_debug_on THEN
3906: wsh_debug_sv.logmsg(l_module_name,'Detail not found');
3907: END IF;
3908: RAISE FND_API.G_EXC_ERROR;
3909: END IF;
3910:
3911: CLOSE cycle_count_cur;
3912: --
3918: wsh_debug_sv.logmsg(l_module_name,'Incorrect Released status or incorrect quantities');
3919: END IF;
3920: fnd_message.set_name('WSH', 'WSH_CC_RSV_INSUFF');
3921: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3922: raise FND_API.G_EXC_ERROR;
3923: END IF;
3924: --
3925: --
3926:
3944:
3945: IF p_action_prms.caller = 'WSH_FSTRX' THEN
3946: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3947: END IF;
3948: RAISE FND_API.G_EXC_ERROR;
3949: END IF;
3950:
3951: -- HW end of 2677054
3952:
3977: wsh_debug_sv.logmsg(l_module_name,'Incorrect quantities');
3978: END IF;
3979: FND_MESSAGE.SET_NAME('WSH', 'WSH_DET_SPLIT_EXCEED');
3980: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3981: raise FND_API.G_EXC_ERROR;
3982:
3983: END IF;
3984:
3985: -- Calculate the quantities to be passed to backorder API
4034: END IF;
4035: --
4036:
4037: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
4038: raise FND_API.G_EXC_ERROR;
4039: END IF;
4040:
4041: --
4042: END IF;
4150: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
4151: IF l_debug_on THEN
4152: wsh_debug_sv.logmsg(l_module_name,'WSH_INVALID_ACTION_CODE');
4153: END IF;
4154: RAISE FND_API.G_EXC_ERROR;
4155: --
4156: END IF;
4157: --
4158: --
4258: l1_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4259: END IF;
4260: --
4261: -- Standard check of p_commit.
4262: IF FND_API.To_Boolean( p_commit ) THEN
4263: IF(l_debug_on) THEN
4264: wsh_debug_sv.logmsg(l_module_name, 'Commit Work');
4265: END IF;
4266: --
4297: --{
4298: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4299: --{
4300:
4301: IF FND_API.To_Boolean( p_commit ) THEN
4302: IF l_debug_on THEN
4303: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4304: END IF;
4305:
4342: FND_MSG_PUB.Count_And_Get
4343: (
4344: p_count => x_msg_count,
4345: p_data => x_msg_data,
4346: p_encoded => FND_API.G_FALSE
4347: );
4348:
4349:
4350: IF l_debug_on THEN
4350: IF l_debug_on THEN
4351: WSH_DEBUG_SV.pop(l_module_name);
4352: END IF;
4353: --
4354: WHEN FND_API.G_EXC_ERROR THEN
4355: -- ROLLBACK TO DELIVERY_DETAIL_ACTION_GRP;
4356: x_return_status := FND_API.G_RET_STS_ERROR ;
4357: --
4358: IF del_cur%ISOPEN THEN
4352: END IF;
4353: --
4354: WHEN FND_API.G_EXC_ERROR THEN
4355: -- ROLLBACK TO DELIVERY_DETAIL_ACTION_GRP;
4356: x_return_status := FND_API.G_RET_STS_ERROR ;
4357: --
4358: IF del_cur%ISOPEN THEN
4359: CLOSE del_cur;
4360: END IF;
4421: FND_MSG_PUB.Count_And_Get
4422: (
4423: p_count => x_msg_count,
4424: p_data => x_msg_data,
4425: p_encoded => FND_API.G_FALSE
4426: );
4427:
4428:
4429: IF l_debug_on THEN
4426: );
4427:
4428:
4429: IF l_debug_on THEN
4430: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4431: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4432: END IF;
4433: --
4434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4427:
4428:
4429: IF l_debug_on THEN
4430: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4431: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4432: END IF;
4433: --
4434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4435: -- ROLLBACK TO DELIVERY_DETAIL_ACTION_GRP;
4430: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4431: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4432: END IF;
4433: --
4434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4435: -- ROLLBACK TO DELIVERY_DETAIL_ACTION_GRP;
4436: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4437:
4438: IF del_cur%ISOPEN THEN
4432: END IF;
4433: --
4434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4435: -- ROLLBACK TO DELIVERY_DETAIL_ACTION_GRP;
4436: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4437:
4438: IF del_cur%ISOPEN THEN
4439: CLOSE del_cur;
4440: END IF;
4495: FND_MSG_PUB.Count_And_Get
4496: (
4497: p_count => x_msg_count,
4498: p_data => x_msg_data,
4499: p_encoded => FND_API.G_FALSE
4500: );
4501:
4502:
4503: IF l_debug_on THEN
4500: );
4501:
4502:
4503: IF l_debug_on THEN
4504: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4505: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4506: END IF;
4507: --
4508: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4501:
4502:
4503: IF l_debug_on THEN
4504: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4505: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4506: END IF;
4507: --
4508: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4509: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4576: FND_MSG_PUB.Count_And_Get
4577: (
4578: p_count => x_msg_count,
4579: p_data => x_msg_data,
4580: p_encoded => FND_API.G_FALSE
4581: );
4582:
4583: IF l_debug_on THEN
4584: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4590: CLOSE del_cur;
4591: END IF;
4592:
4593: -- ROLLBACK TO DELIVERY_DETAIL_ACTION_GRP;
4594: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4595: IF cycle_count_cur%ISOPEN THEN
4596: Close cycle_count_cur;
4597: END IF;
4598: wsh_util_core.add_message(x_return_status, l_module_name);
4653: FND_MSG_PUB.Count_And_Get
4654: (
4655: p_count => x_msg_count,
4656: p_data => x_msg_data,
4657: p_encoded => FND_API.G_FALSE
4658: );
4659: --
4660:
4661: IF l_debug_on THEN
4761: END IF;
4762: --
4763:
4764: -- Initialize message list if p_init_msg_list is set to TRUE.
4765: IF FND_API.to_Boolean( p_init_msg_list )
4766: THEN
4767: FND_MSG_PUB.initialize;
4768: END IF;
4769:
4775: /* Call the New Overloaded API */
4776:
4777: create_update_delivery_detail(
4778: p_api_version_number => p_api_version_number,
4779: p_init_msg_list => FND_API.G_FALSE,
4780: p_commit => FND_API.G_FALSE,
4781: x_return_status => l_return_status,
4782: x_msg_count => l_msg_count,
4783: x_msg_data => l_msg_data,
4776:
4777: create_update_delivery_detail(
4778: p_api_version_number => p_api_version_number,
4779: p_init_msg_list => FND_API.G_FALSE,
4780: p_commit => FND_API.G_FALSE,
4781: x_return_status => l_return_status,
4782: x_msg_count => l_msg_count,
4783: x_msg_data => l_msg_data,
4784: p_detail_info_tab => p_detail_info_tab,
4800: END IF;
4801:
4802:
4803: -- Standard check of p_commit.
4804: IF FND_API.To_Boolean( p_commit ) THEN
4805: IF(l_debug_on) THEN
4806: wsh_debug_sv.logmsg(l_module_name, 'Commit Work');
4807: END IF;
4808: COMMIT WORK;
4811: FND_MSG_PUB.Count_And_Get
4812: (
4813: p_count => x_msg_count,
4814: p_data => x_msg_data,
4815: p_encoded => FND_API.G_FALSE
4816: );
4817:
4818: IF l_debug_on THEN
4819: WSH_DEBUG_SV.pop(l_module_name);
4819: WSH_DEBUG_SV.pop(l_module_name);
4820: END IF;
4821: --
4822: EXCEPTION
4823: WHEN FND_API.G_EXC_ERROR THEN
4824: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP;
4825: x_return_status := FND_API.G_RET_STS_ERROR ;
4826: FND_MSG_PUB.Count_And_Get
4827: (
4821: --
4822: EXCEPTION
4823: WHEN FND_API.G_EXC_ERROR THEN
4824: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP;
4825: x_return_status := FND_API.G_RET_STS_ERROR ;
4826: FND_MSG_PUB.Count_And_Get
4827: (
4828: p_count => x_msg_count,
4829: p_data => x_msg_data,
4826: FND_MSG_PUB.Count_And_Get
4827: (
4828: p_count => x_msg_count,
4829: p_data => x_msg_data,
4830: p_encoded => FND_API.G_FALSE
4831: );
4832: --
4833: IF l_debug_on THEN
4834: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4830: p_encoded => FND_API.G_FALSE
4831: );
4832: --
4833: IF l_debug_on THEN
4834: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4835: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4836: END IF;
4837: --
4838: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4831: );
4832: --
4833: IF l_debug_on THEN
4834: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4835: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4836: END IF;
4837: --
4838: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4839: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP;
4834: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4835: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4836: END IF;
4837: --
4838: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4839: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP;
4840: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4841: FND_MSG_PUB.Count_And_Get
4842: (
4836: END IF;
4837: --
4838: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4839: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP;
4840: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4841: FND_MSG_PUB.Count_And_Get
4842: (
4843: p_count => x_msg_count,
4844: p_data => x_msg_data,
4841: FND_MSG_PUB.Count_And_Get
4842: (
4843: p_count => x_msg_count,
4844: p_data => x_msg_data,
4845: p_encoded => FND_API.G_FALSE
4846: );
4847:
4848: --
4849: IF l_debug_on THEN
4846: );
4847:
4848: --
4849: IF l_debug_on THEN
4850: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4851: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4852: END IF;
4853: --
4854: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4847:
4848: --
4849: IF l_debug_on THEN
4850: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4851: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4852: END IF;
4853: --
4854: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4855: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4856: FND_MSG_PUB.Count_And_Get
4857: (
4858: p_count => x_msg_count,
4859: p_data => x_msg_data,
4860: p_encoded => FND_API.G_FALSE
4861: );
4862: --
4863: IF l_debug_on THEN
4864: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4872: FND_MSG_PUB.Count_And_Get
4873: (
4874: p_count => x_msg_count,
4875: p_data => x_msg_data,
4876: p_encoded => FND_API.G_FALSE
4877: );
4878: --
4879:
4880: --
4884: END IF;
4885: --
4886: WHEN OTHERS THEN
4887: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP;
4888: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4889: wsh_util_core.add_message(x_return_status, l_module_name);
4890: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Create_Update_Delivery_Detail');
4891: FND_MSG_PUB.Count_And_Get
4892: (
4891: FND_MSG_PUB.Count_And_Get
4892: (
4893: p_count => x_msg_count,
4894: p_data => x_msg_data,
4895: p_encoded => FND_API.G_FALSE
4896: );
4897: --
4898:
4899: IF l_debug_on THEN
5010: IF l_debug_on THEN
5011: WSH_DEBUG_SV.log(l_module_name,
5012: 'Invalid quantity', p_detail_IN_rec.quantity);
5013: END IF;
5014: raise fnd_api.g_exc_error;
5015: ELSE
5016: l_generate := TRUE;
5017: END IF;
5018:
5107: ELSE --}{
5108: fnd_message.set_name('WSH', 'WSH_INCORRECT_ORG');
5109: fnd_message.set_token('ORG_CODE', l_organization_code);
5110: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5111: RAISE FND_API.G_EXC_ERROR;
5112: END IF; -- wms_enabled }
5113: END IF; -- verify item}
5114: --
5115:
5125: wsh_debug_sv.log(l_module_name, 'Error ucc_128_suffix_flag is set to 1 and name_suffix is set to ',p_detail_IN_rec.name_suffix);
5126: END IF;
5127: FND_MESSAGE.SET_NAME('WSH', 'WSH_UCC128_ERROR'); --bmso new
5128: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5129: RAISE FND_API.G_EXC_ERROR;
5130: END IF;
5131:
5132: IF p_detail_IN_rec.ucc_128_suffix_flag = 1 THEN
5133: l_suffix_length := 1;
5192: + GREATEST(p_detail_IN_rec.num_digits,NVL(LENGTH(l_base_number_dummy),0));
5193: END IF;
5194:
5195:
5196: l_total_length := NVL(l_total_length,FND_API.G_MISS_NUM);
5197: l_name_prefix := NVL(p_detail_IN_rec.name_prefix,FND_API.G_MISS_CHAR);
5198: l_name_suffix := NVL(p_detail_IN_rec.name_suffix,FND_API.G_MISS_CHAR);
5199:
5200: l_gen_lpn_rec.container_item_id := l_cont_item_id;
5193: END IF;
5194:
5195:
5196: l_total_length := NVL(l_total_length,FND_API.G_MISS_NUM);
5197: l_name_prefix := NVL(p_detail_IN_rec.name_prefix,FND_API.G_MISS_CHAR);
5198: l_name_suffix := NVL(p_detail_IN_rec.name_suffix,FND_API.G_MISS_CHAR);
5199:
5200: l_gen_lpn_rec.container_item_id := l_cont_item_id;
5201: l_gen_lpn_rec.organization_id := l_organization_id;
5194:
5195:
5196: l_total_length := NVL(l_total_length,FND_API.G_MISS_NUM);
5197: l_name_prefix := NVL(p_detail_IN_rec.name_prefix,FND_API.G_MISS_CHAR);
5198: l_name_suffix := NVL(p_detail_IN_rec.name_suffix,FND_API.G_MISS_CHAR);
5199:
5200: l_gen_lpn_rec.container_item_id := l_cont_item_id;
5201: l_gen_lpn_rec.organization_id := l_organization_id;
5202: l_gen_lpn_rec.lpn_prefix:= l_name_prefix;
5202: l_gen_lpn_rec.lpn_prefix:= l_name_prefix;
5203: l_gen_lpn_rec.lpn_suffix := l_name_suffix;
5204: l_gen_lpn_rec.starting_num := p_detail_IN_rec.base_number;
5205: IF p_detail_IN_rec.base_number IS NOT NULL THEN --{
5206: IF p_detail_IN_rec.base_number <> FND_API.G_MISS_NUM THEN
5207: IF l_lpn_starting_num = p_detail_IN_rec.base_number THEN
5208: l_gen_lpn_rec.starting_num := NULL;
5209: END IF;
5210: END IF;
5221: wsh_debug_sv.logmsg(l_module_name, 'Calling wms_container_grp.Auto_Create_LPNs');
5222: END IF;
5223: wms_container_grp.Auto_Create_LPNs (
5224: p_api_version => 1.0
5225: , p_init_msg_list => fnd_api.g_false
5226: , p_commit => fnd_api.g_false
5227: , x_return_status => l_return_status
5228: , x_msg_count => l_wms_msg_count
5229: , x_msg_data => l_wms_msg_data
5222: END IF;
5223: wms_container_grp.Auto_Create_LPNs (
5224: p_api_version => 1.0
5225: , p_init_msg_list => fnd_api.g_false
5226: , p_commit => fnd_api.g_false
5227: , x_return_status => l_return_status
5228: , x_msg_count => l_wms_msg_count
5229: , x_msg_data => l_wms_msg_data
5230: , p_caller => 'WSH_GENERATE'
5262: IF l_container_info_rec.lpn_ids(j) IS NULL THEN
5263: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5264: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'LPN_ID');
5265: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5266: RAISE FND_API.G_EXC_ERROR;
5267:
5268: ELSIF l_container_info_rec.container_names(j) IS NULL THEN
5269: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5270: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'CONTAINER_NAME');
5268: ELSIF l_container_info_rec.container_names(j) IS NULL THEN
5269: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5270: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'CONTAINER_NAME');
5271: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5272: RAISE FND_API.G_EXC_ERROR;
5273:
5274: END IF;
5275:
5276: i := l_lpn_out_tab.NEXT(i);
5346: WSH_WMS_LPN_GRP.g_update_to_container := 'N';
5347:
5348: wms_container_grp.create_lpns(
5349: p_api_version => 1.0,
5350: p_init_msg_list => fnd_api.g_false,
5351: p_commit => fnd_api.g_false,
5352: x_return_status => l_return_status,
5353: x_msg_count => l_wms_msg_count,
5354: x_msg_data => l_wms_msg_data,
5347:
5348: wms_container_grp.create_lpns(
5349: p_api_version => 1.0,
5350: p_init_msg_list => fnd_api.g_false,
5351: p_commit => fnd_api.g_false,
5352: x_return_status => l_return_status,
5353: x_msg_count => l_wms_msg_count,
5354: x_msg_data => l_wms_msg_data,
5355: p_caller => 'WSH_CREATE',
5370: IF l_container_info_rec.lpn_ids(1) IS NULL THEN
5371: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5372: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'LPN_ID');
5373: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5374: RAISE FND_API.G_EXC_ERROR;
5375:
5376: ELSIF l_container_info_rec.container_names(1) IS NULL THEN
5377: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5378: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'CONTAINER_NAME');
5376: ELSIF l_container_info_rec.container_names(1) IS NULL THEN
5377: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5378: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'CONTAINER_NAME');
5379: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5380: RAISE FND_API.G_EXC_ERROR;
5381:
5382: END IF;
5383:
5384: l_container_rec.weight_uom_code :=
5449: END IF;
5450: --
5451: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
5452: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5453: RAISE FND_API.G_EXC_ERROR;
5454: END IF;
5455:
5456: IF l_debug_on THEN
5457: WSH_DEBUG_SV.log(l_module_name,'COUNT OF WDD RECORDS',
5481: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
5482: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5483: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
5484: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5485: RAISE FND_API.G_EXC_ERROR;
5486: END IF;
5487:
5488:
5489: wsh_util_core.api_post_call(
5503: IF l_debug_on THEN
5504: wsh_debug_sv.log(l_module_name,'ERROR organization id is null for', p_detail_info_tab(i).lpn_id);
5505: END IF;
5506:
5507: raise FND_API.G_EXC_ERROR;
5508:
5509: END IF; --}
5510: IF p_detail_info_tab(i).lpn_id IS NULL THEN
5511: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5510: IF p_detail_info_tab(i).lpn_id IS NULL THEN
5511: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5512: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'LPN_ID');
5513: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5514: RAISE FND_API.G_EXC_ERROR;
5515:
5516: ELSIF p_detail_info_tab(i).container_name IS NULL THEN
5517: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5518: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'CONTAINER_NAME');
5516: ELSIF p_detail_info_tab(i).container_name IS NULL THEN
5517: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5518: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'CONTAINER_NAME');
5519: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5520: RAISE FND_API.G_EXC_ERROR;
5521:
5522: END IF;
5523:
5524: l_container_info_rec.lpn_ids(1) := p_detail_info_tab(i).lpn_id;
5531: IF l_debug_on THEN
5532: WSH_DEBUG_SV.logmsg(l_module_name,
5533: 'organization is not passed');
5534: END IF;
5535: RAISE FND_API.G_EXC_ERROR;
5536: END IF; */
5537:
5538: wsh_container_actions.default_container_attr(l_container_rec,
5539: l_additional_cont_attr,
5561: END IF;
5562: --
5563: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
5564: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5565: RAISE FND_API.G_EXC_ERROR;
5566: END IF;
5567:
5568: IF l_debug_on THEN
5569: WSH_DEBUG_SV.log(l_module_name,'COUNT OF WDD RECORDS',
5593: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
5594: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5595: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
5596: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5597: RAISE FND_API.G_EXC_ERROR;
5598: END IF;
5599: --
5600: wsh_util_core.api_post_call(
5601: p_return_status => l_return_status,
5647: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:e_lpn_count_invalid');
5648: END IF;
5649: --
5650:
5651: WHEN FND_API.G_EXC_ERROR THEN
5652: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5653: WSH_WMS_LPN_GRP.g_update_to_container := l_update_container_orig;
5654:
5655: rollback to s_create_containers_DDGPB;
5652: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5653: WSH_WMS_LPN_GRP.g_update_to_container := l_update_container_orig;
5654:
5655: rollback to s_create_containers_DDGPB;
5656: x_return_status := FND_API.G_RET_STS_ERROR ;
5657: IF l_debug_on THEN
5658: WSH_DEBUG_SV.logmsg(l_module_name,
5659: 'FND_API.G_EXC_ERROR exception has occured.',
5660: WSH_DEBUG_SV.C_EXCEP_LEVEL);
5655: rollback to s_create_containers_DDGPB;
5656: x_return_status := FND_API.G_RET_STS_ERROR ;
5657: IF l_debug_on THEN
5658: WSH_DEBUG_SV.logmsg(l_module_name,
5659: 'FND_API.G_EXC_ERROR exception has occured.',
5660: WSH_DEBUG_SV.C_EXCEP_LEVEL);
5661: WSH_DEBUG_SV.pop(l_module_name,
5662: 'EXCEPTION:FND_API.G_EXC_ERROR');
5663: END IF;
5658: WSH_DEBUG_SV.logmsg(l_module_name,
5659: 'FND_API.G_EXC_ERROR exception has occured.',
5660: WSH_DEBUG_SV.C_EXCEP_LEVEL);
5661: WSH_DEBUG_SV.pop(l_module_name,
5662: 'EXCEPTION:FND_API.G_EXC_ERROR');
5663: END IF;
5664: --
5665: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5666: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5661: WSH_DEBUG_SV.pop(l_module_name,
5662: 'EXCEPTION:FND_API.G_EXC_ERROR');
5663: END IF;
5664: --
5665: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5666: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5667: rollback to s_create_containers_DDGPB;
5668: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5669:
5664: --
5665: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5666: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5667: rollback to s_create_containers_DDGPB;
5668: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5669:
5670: IF l_debug_on THEN
5671: WSH_DEBUG_SV.logmsg(l_module_name
5672: ,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.'
5668: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5669:
5670: IF l_debug_on THEN
5671: WSH_DEBUG_SV.logmsg(l_module_name
5672: ,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.'
5673: ,WSH_DEBUG_SV.C_EXCEP_LEVEL);
5674: WSH_DEBUG_SV.pop(l_module_name
5675: ,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
5676: END IF;
5671: WSH_DEBUG_SV.logmsg(l_module_name
5672: ,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.'
5673: ,WSH_DEBUG_SV.C_EXCEP_LEVEL);
5674: WSH_DEBUG_SV.pop(l_module_name
5675: ,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
5676: END IF;
5677: --
5678: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
5679: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5689: END IF;
5690: WHEN OTHERS THEN
5691: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5692: rollback to s_create_containers_DDGPB;
5693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5694: wsh_util_core.add_message(x_return_status, l_module_name);
5695: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Create_containers');
5696: IF l_debug_on THEN
5697: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5814: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5815: IF l_debug_on THEN
5816: wsh_debug_sv.logmsg(l_module_name,'Null Organization');
5817: END IF;
5818: raise FND_API.G_EXC_ERROR;
5819: ELSIF(p_detail_IN_rec.container_item_id IS NULL
5820: AND p_detail_IN_rec.container_item_name IS NULL
5821: AND p_detail_IN_rec.container_item_seg.count = 0) THEN
5822: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5825: IF l_debug_on THEN
5826: wsh_debug_sv.logmsg(l_module_name,'Null Container item');
5827: END IF;
5828:
5829: raise FND_API.G_EXC_ERROR;
5830:
5831: END IF;
5832: END IF; --}
5833:
5849: IF(p_detail_info_tab(l_index).container_flag in ('Y', 'C')) THEN
5850: IF l_debug_on THEN
5851: wsh_debug_sv.logmsg(l_module_name,'Container Flag Yes ');
5852: END IF;
5853: RAISE FND_API.G_EXC_ERROR;
5854: END IF;
5855:
5856: IF p_detail_info_tab(l_index).inventory_item_id IS NOT NULL THEN --{
5857: -- Validate Item and see if this is container item
5879: x_num_errors => l_number_of_errors,
5880: p_msg_data => l_msg_data
5881: );
5882:
5883: IF(nvl(l_item_type, 'FND_API.G_MISS_CHAR') = 'CONT_ITEM') THEN
5884: IF l_debug_on THEN
5885: wsh_debug_sv.logmsg(l_module_name,'Container Item');
5886: END IF;
5887: RAISE FND_API.G_EXC_ERROR;
5883: IF(nvl(l_item_type, 'FND_API.G_MISS_CHAR') = 'CONT_ITEM') THEN
5884: IF l_debug_on THEN
5885: wsh_debug_sv.logmsg(l_module_name,'Container Item');
5886: END IF;
5887: RAISE FND_API.G_EXC_ERROR;
5888: END IF;
5889: END IF; --}
5890:
5891:
5914: --
5915: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
5916: FND_MESSAGE.SET_NAME('WSH', 'WSH_DET_CREATE_DET_FAILED');
5917: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5918: RAISE FND_API.G_EXC_ERROR;
5919: END IF;
5920: l_delivery_assignments_info.delivery_id := NULL;
5921: l_delivery_assignments_info.parent_delivery_id := NULL;
5922: l_delivery_assignments_info.delivery_detail_id := l_new_detail_id;
5945:
5946: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
5947: FND_MESSAGE.SET_NAME('WSH', 'WSH_DET_CREATE_AS_FAILED');
5948: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5949: RAISE FND_API.G_EXC_ERROR;
5950: END IF;
5951:
5952: --OTM R12, calling delivery detail splitter
5953: IF (l_gc3_is_installed = 'Y') THEN
6017: FND_MSG_PUB.Count_And_Get
6018: (
6019: p_count => x_msg_count,
6020: p_data => x_msg_data,
6021: p_encoded => FND_API.G_FALSE
6022: );
6023:
6024: -- Debug Statements
6025: --
6027: WSH_DEBUG_SV.pop(l_module_name);
6028: END IF;
6029: --
6030: EXCEPTION
6031: WHEN FND_API.G_EXC_ERROR THEN
6032: ROLLBACK to CREATE_DEL_DETAIL_GRP;
6033: x_return_status := FND_API.G_RET_STS_ERROR ;
6034: FND_MSG_PUB.Count_And_Get
6035: (
6029: --
6030: EXCEPTION
6031: WHEN FND_API.G_EXC_ERROR THEN
6032: ROLLBACK to CREATE_DEL_DETAIL_GRP;
6033: x_return_status := FND_API.G_RET_STS_ERROR ;
6034: FND_MSG_PUB.Count_And_Get
6035: (
6036: p_count => x_msg_count,
6037: p_data => x_msg_data,
6034: FND_MSG_PUB.Count_And_Get
6035: (
6036: p_count => x_msg_count,
6037: p_data => x_msg_data,
6038: p_encoded => FND_API.G_FALSE
6039: );
6040:
6041: IF l_debug_on THEN
6042: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6038: p_encoded => FND_API.G_FALSE
6039: );
6040:
6041: IF l_debug_on THEN
6042: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6043: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6044: END IF;
6045: --
6046: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6039: );
6040:
6041: IF l_debug_on THEN
6042: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6043: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6044: END IF;
6045: --
6046: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6047: ROLLBACK to CREATE_DEL_DETAIL_GRP;
6042: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6043: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6044: END IF;
6045: --
6046: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6047: ROLLBACK to CREATE_DEL_DETAIL_GRP;
6048: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6049: FND_MSG_PUB.Count_And_Get
6050: (
6044: END IF;
6045: --
6046: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6047: ROLLBACK to CREATE_DEL_DETAIL_GRP;
6048: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6049: FND_MSG_PUB.Count_And_Get
6050: (
6051: p_count => x_msg_count,
6052: p_data => x_msg_data,
6049: FND_MSG_PUB.Count_And_Get
6050: (
6051: p_count => x_msg_count,
6052: p_data => x_msg_data,
6053: p_encoded => FND_API.G_FALSE
6054: );
6055:
6056: IF l_debug_on THEN
6057: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6053: p_encoded => FND_API.G_FALSE
6054: );
6055:
6056: IF l_debug_on THEN
6057: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6058: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6059: END IF;
6060: --
6061: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
6054: );
6055:
6056: IF l_debug_on THEN
6057: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6058: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6059: END IF;
6060: --
6061: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
6062: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6063: FND_MSG_PUB.Count_And_Get
6064: (
6065: p_count => x_msg_count,
6066: p_data => x_msg_data,
6067: p_encoded => FND_API.G_FALSE
6068: );
6069: --
6070: IF l_debug_on THEN
6071: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6074: --
6075: WHEN OTHERS THEN
6076:
6077: ROLLBACK to CREATE_DEL_DETAIL_GRP;
6078: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6079: wsh_util_core.add_message(x_return_status, l_module_name);
6080: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Create_Delivery_Detail');
6081: FND_MSG_PUB.Count_And_Get
6082: (
6081: FND_MSG_PUB.Count_And_Get
6082: (
6083: p_count => x_msg_count,
6084: p_data => x_msg_data,
6085: p_encoded => FND_API.G_FALSE
6086: );
6087:
6088: IF l_debug_on THEN
6089: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6320: /* you need to either have inventory_item_id or item_description */
6321: if (x_detail_info_tab(l_index).item_description is not NULL) then
6322:
6323: -- bug 2398865
6324: IF ( nvl(x_detail_info_tab(l_index).requested_quantity,fnd_api.g_miss_num) = fnd_api.g_miss_num ) THEN
6325: x_detail_info_tab(l_index).requested_quantity_uom := x_detail_info_tab(l_index).src_requested_quantity_uom;
6326: x_detail_info_tab(l_index).requested_quantity := x_detail_info_tab(l_index).src_requested_quantity;
6327: END IF;
6328: -- bug 2398865
6422: end if;
6423:
6424: -- bug 2398865
6425: --
6426: IF ( nvl(x_detail_info_tab(l_index).requested_quantity,fnd_api.g_miss_num) = fnd_api.g_miss_num ) THEN
6427:
6428: IF l_debug_on THEN
6429: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
6430: END IF;
6482: l_number_of_errors := l_number_of_errors + 1;
6483: FND_MESSAGE.SET_NAME('WSH', 'WSH_DET_INVALID_DETAIL');
6484: FND_MESSAGE.SET_TOKEN('DETAIL_ID', x_detail_info_tab(l_index).delivery_detail_id);
6485: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
6486: RAISE FND_API.G_EXC_ERROR;
6487: END IF;
6488:
6489: CLOSE c_original_detail_cur;
6490:
6618:
6619: -- HW OPMCONV - Removed checking for process
6620: -- PK Bug 3055126 Begin OPM Changes for validation of quantities
6621: IF ( p_caller = 'WSH_PUB') THEN
6622: IF (nvl(x_detail_info_tab(l_index).shipped_quantity,fnd_api.g_miss_num) <> fnd_api.g_miss_num OR
6623: nvl(x_detail_info_tab(l_index).shipped_quantity2,fnd_api.g_miss_num) <> fnd_api.g_miss_num) THEN
6624:
6625: -- HW OPMCONV - Use this API instead of GMI_RESERVATION_UTIL.validate_opm_quantities
6626:
6619: -- HW OPMCONV - Removed checking for process
6620: -- PK Bug 3055126 Begin OPM Changes for validation of quantities
6621: IF ( p_caller = 'WSH_PUB') THEN
6622: IF (nvl(x_detail_info_tab(l_index).shipped_quantity,fnd_api.g_miss_num) <> fnd_api.g_miss_num OR
6623: nvl(x_detail_info_tab(l_index).shipped_quantity2,fnd_api.g_miss_num) <> fnd_api.g_miss_num) THEN
6624:
6625: -- HW OPMCONV - Use this API instead of GMI_RESERVATION_UTIL.validate_opm_quantities
6626:
6627: WSH_DETAILS_VALIDATIONS.validate_secondary_quantity
6646: END IF;
6647:
6648: -- HW OPMCONV - Needed to add check for "0". Some cases cycle_count values
6649: -- had values of zeroes due to initialization issues
6650: IF ( ( nvl(x_detail_info_tab(l_index).cycle_count_quantity,fnd_api.g_miss_num) <> fnd_api.g_miss_num
6651: OR nvl(x_detail_info_tab(l_index).cycle_count_quantity2,fnd_api.g_miss_num) <> fnd_api.g_miss_num )
6652: AND ( x_detail_info_tab(l_index).cycle_count_quantity <> 0
6653: OR x_detail_info_tab(l_index).cycle_count_quantity2 <> 0) )
6654: THEN
6647:
6648: -- HW OPMCONV - Needed to add check for "0". Some cases cycle_count values
6649: -- had values of zeroes due to initialization issues
6650: IF ( ( nvl(x_detail_info_tab(l_index).cycle_count_quantity,fnd_api.g_miss_num) <> fnd_api.g_miss_num
6651: OR nvl(x_detail_info_tab(l_index).cycle_count_quantity2,fnd_api.g_miss_num) <> fnd_api.g_miss_num )
6652: AND ( x_detail_info_tab(l_index).cycle_count_quantity <> 0
6653: OR x_detail_info_tab(l_index).cycle_count_quantity2 <> 0) )
6654: THEN
6655:
6688: x_valid_index_tab(l_index) := l_index;
6689:
6690: --
6691: EXCEPTION -- for the local begin
6692: WHEN FND_API.G_EXC_ERROR THEN
6693: ROLLBACK TO validate_det_loop_grp;
6694: IF l_debug_on THEN
6695: wsh_debug_sv.log(l_module_name, 'Validation failure for detail', x_detail_info_tab(l_index).delivery_detail_id);
6696: END IF;
6694: IF l_debug_on THEN
6695: wsh_debug_sv.log(l_module_name, 'Validation failure for detail', x_detail_info_tab(l_index).delivery_detail_id);
6696: END IF;
6697:
6698: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6699: ROLLBACK TO validate_det_loop_grp;
6700: IF l_debug_on THEN
6701: wsh_debug_sv.logmsg(l_module_name, 'Unexpected error within loop');
6702: END IF;
6732: ROLLBACK TO validate_det_loop_grp;
6733: IF l_debug_on THEN
6734: wsh_debug_sv.logmsg(l_module_name, 'Others exception within loop');
6735: END IF;
6736: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6737: END; -- for the local begin
6738:
6739: -- Commented for bug 4399278, 4418754
6740: --x_valid_index_tab(l_index) := l_index;
6773: END IF;
6774:
6775: IF x_detail_info_tab.count > 0 THEN
6776: IF l_number_of_errors >= x_detail_info_tab.count THEN
6777: RAISE FND_API.G_EXC_ERROR;
6778: ELSIF l_number_of_errors >0 THEN
6779: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
6780: ELSIF l_number_of_warnings > 0 THEN
6781: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
6785: FND_MSG_PUB.Count_And_Get
6786: (
6787: p_count => x_msg_count,
6788: p_data => x_msg_data,
6789: p_encoded => FND_API.G_FALSE
6790: );
6791:
6792: IF l_debug_on THEN
6793: WSH_DEBUG_SV.pop(l_module_name);
6793: WSH_DEBUG_SV.pop(l_module_name);
6794: END IF;
6795: --
6796: EXCEPTION
6797: WHEN FND_API.G_EXC_ERROR THEN
6798: ROLLBACK to VALIDATE_DEL_DETAIL_GRP;
6799: x_return_status := FND_API.G_RET_STS_ERROR ;
6800: FND_MSG_PUB.Count_And_Get
6801: (
6795: --
6796: EXCEPTION
6797: WHEN FND_API.G_EXC_ERROR THEN
6798: ROLLBACK to VALIDATE_DEL_DETAIL_GRP;
6799: x_return_status := FND_API.G_RET_STS_ERROR ;
6800: FND_MSG_PUB.Count_And_Get
6801: (
6802: p_count => x_msg_count,
6803: p_data => x_msg_data,
6800: FND_MSG_PUB.Count_And_Get
6801: (
6802: p_count => x_msg_count,
6803: p_data => x_msg_data,
6804: p_encoded => FND_API.G_FALSE
6805: );
6806: --
6807: IF l_debug_on THEN
6808: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6804: p_encoded => FND_API.G_FALSE
6805: );
6806: --
6807: IF l_debug_on THEN
6808: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6809: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6810: END IF;
6811: --
6812: --
6805: );
6806: --
6807: IF l_debug_on THEN
6808: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6809: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6810: END IF;
6811: --
6812: --
6813: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6809: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6810: END IF;
6811: --
6812: --
6813: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6814: ROLLBACK to VALIDATE_DEL_DETAIL_GRP;
6815: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6816: FND_MSG_PUB.Count_And_Get
6817: (
6811: --
6812: --
6813: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6814: ROLLBACK to VALIDATE_DEL_DETAIL_GRP;
6815: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6816: FND_MSG_PUB.Count_And_Get
6817: (
6818: p_count => x_msg_count,
6819: p_data => x_msg_data,
6816: FND_MSG_PUB.Count_And_Get
6817: (
6818: p_count => x_msg_count,
6819: p_data => x_msg_data,
6820: p_encoded => FND_API.G_FALSE
6821: );
6822: --
6823: IF l_debug_on THEN
6824: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6820: p_encoded => FND_API.G_FALSE
6821: );
6822: --
6823: IF l_debug_on THEN
6824: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6825: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6826: END IF;
6827: --
6828: --
6821: );
6822: --
6823: IF l_debug_on THEN
6824: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6825: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6826: END IF;
6827: --
6828: --
6829: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
6831: FND_MSG_PUB.Count_And_Get
6832: (
6833: p_count => x_msg_count,
6834: p_data => x_msg_data,
6835: p_encoded => FND_API.G_FALSE
6836: );
6837: --
6838: IF l_debug_on THEN
6839: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6844:
6845: WHEN OTHERS THEN
6846:
6847: ROLLBACK to VALIDATE_DEL_DETAIL_GRP;
6848: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6849: wsh_util_core.add_message(x_return_status, l_module_name);
6850: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Validate_Delivery_Detail');
6851:
6852: FND_MSG_PUB.Count_And_Get
6852: FND_MSG_PUB.Count_And_Get
6853: (
6854: p_count => x_msg_count,
6855: p_data => x_msg_data,
6856: p_encoded => FND_API.G_FALSE
6857: );
6858: --
6859: IF l_debug_on THEN
6860: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7014: FND_MSG_PUB.Count_And_Get
7015: (
7016: p_count => x_msg_count,
7017: p_data => x_msg_data,
7018: p_encoded => FND_API.G_FALSE
7019: );
7020:
7021: --
7022: IF l_debug_on THEN
7023: WSH_DEBUG_SV.pop(l_module_name);
7024: END IF;
7025: --
7026: EXCEPTION
7027: WHEN FND_API.G_EXC_ERROR THEN
7028: ROLLBACK to UPDATE_DEL_DETAIL_GRP;
7029: x_return_status := FND_API.G_RET_STS_ERROR ;
7030: WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED := 'Y';
7031: WSH_WMS_LPN_GRP.g_update_to_container := 'N';
7025: --
7026: EXCEPTION
7027: WHEN FND_API.G_EXC_ERROR THEN
7028: ROLLBACK to UPDATE_DEL_DETAIL_GRP;
7029: x_return_status := FND_API.G_RET_STS_ERROR ;
7030: WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED := 'Y';
7031: WSH_WMS_LPN_GRP.g_update_to_container := 'N';
7032: FND_MSG_PUB.Count_And_Get
7033: (
7032: FND_MSG_PUB.Count_And_Get
7033: (
7034: p_count => x_msg_count,
7035: p_data => x_msg_data,
7036: p_encoded => FND_API.G_FALSE
7037: );
7038: --
7039:
7040: IF l_debug_on THEN
7037: );
7038: --
7039:
7040: IF l_debug_on THEN
7041: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7042: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
7043: END IF;
7044: --
7045: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7038: --
7039:
7040: IF l_debug_on THEN
7041: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7042: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
7043: END IF;
7044: --
7045: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7046: IF lock_delivery_details%isopen THEN
7041: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7042: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
7043: END IF;
7044: --
7045: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7046: IF lock_delivery_details%isopen THEN
7047: CLOSE lock_delivery_details;
7048: END IF;
7049: ROLLBACK to UPDATE_DEL_DETAIL_GRP;
7046: IF lock_delivery_details%isopen THEN
7047: CLOSE lock_delivery_details;
7048: END IF;
7049: ROLLBACK to UPDATE_DEL_DETAIL_GRP;
7050: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7051: WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED := 'Y';
7052: WSH_WMS_LPN_GRP.g_update_to_container := 'N';
7053: FND_MSG_PUB.Count_And_Get
7054: (
7053: FND_MSG_PUB.Count_And_Get
7054: (
7055: p_count => x_msg_count,
7056: p_data => x_msg_data,
7057: p_encoded => FND_API.G_FALSE
7058: );
7059: --
7060: --
7061: IF l_debug_on THEN
7058: );
7059: --
7060: --
7061: IF l_debug_on THEN
7062: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7063: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7064: END IF;
7065: --
7066: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
7059: --
7060: --
7061: IF l_debug_on THEN
7062: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7063: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7064: END IF;
7065: --
7066: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
7067: IF lock_delivery_details%isopen THEN
7105: FND_MSG_PUB.Count_And_Get
7106: (
7107: p_count => x_msg_count,
7108: p_data => x_msg_data,
7109: p_encoded => FND_API.G_FALSE
7110: );
7111: --
7112: IF l_debug_on THEN
7113: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7164: CLOSE lock_delivery_details;
7165: END IF;
7166:
7167: ROLLBACK to UPDATE_DEL_DETAIL_GRP;
7168: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7169: WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED := 'Y';
7170: WSH_WMS_LPN_GRP.g_update_to_container := 'N';
7171: wsh_util_core.add_message(x_return_status, l_module_name);
7172: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Update_Delivery_Detail');
7174: FND_MSG_PUB.Count_And_Get
7175: (
7176: p_count => x_msg_count,
7177: p_data => x_msg_data,
7178: p_encoded => FND_API.G_FALSE
7179: );
7180:
7181: IF l_debug_on THEN
7182: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7314: FND_MSG_PUB.Count_And_Get
7315: (
7316: p_count => x_msg_count,
7317: p_data => x_msg_data,
7318: p_encoded => FND_API.G_FALSE
7319: );
7320:
7321: --
7322: IF l_debug_on THEN
7327:
7328:
7329: --
7330: EXCEPTION
7331: WHEN FND_API.G_EXC_ERROR THEN
7332: ROLLBACK to CANCEL_DEL_DETAIL_GRP;
7333: x_return_status := FND_API.G_RET_STS_ERROR ;
7334: FND_MSG_PUB.Count_And_Get
7335: (
7329: --
7330: EXCEPTION
7331: WHEN FND_API.G_EXC_ERROR THEN
7332: ROLLBACK to CANCEL_DEL_DETAIL_GRP;
7333: x_return_status := FND_API.G_RET_STS_ERROR ;
7334: FND_MSG_PUB.Count_And_Get
7335: (
7336: p_count => x_msg_count,
7337: p_data => x_msg_data,
7334: FND_MSG_PUB.Count_And_Get
7335: (
7336: p_count => x_msg_count,
7337: p_data => x_msg_data,
7338: p_encoded => FND_API.G_FALSE
7339: );
7340:
7341: IF l_debug_on THEN
7342: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7338: p_encoded => FND_API.G_FALSE
7339: );
7340:
7341: IF l_debug_on THEN
7342: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7343: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
7344: END IF;
7345: --
7346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7339: );
7340:
7341: IF l_debug_on THEN
7342: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7343: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
7344: END IF;
7345: --
7346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7347: ROLLBACK to CANCEL_DEL_DETAIL_GRP;
7342: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7343: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
7344: END IF;
7345: --
7346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7347: ROLLBACK to CANCEL_DEL_DETAIL_GRP;
7348: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7349: FND_MSG_PUB.Count_And_Get
7350: (
7344: END IF;
7345: --
7346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7347: ROLLBACK to CANCEL_DEL_DETAIL_GRP;
7348: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7349: FND_MSG_PUB.Count_And_Get
7350: (
7351: p_count => x_msg_count,
7352: p_data => x_msg_data,
7349: FND_MSG_PUB.Count_And_Get
7350: (
7351: p_count => x_msg_count,
7352: p_data => x_msg_data,
7353: p_encoded => FND_API.G_FALSE
7354: );
7355:
7356: IF l_debug_on THEN
7357: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7353: p_encoded => FND_API.G_FALSE
7354: );
7355:
7356: IF l_debug_on THEN
7357: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7358: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7359: END IF;
7360: --
7361: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
7354: );
7355:
7356: IF l_debug_on THEN
7357: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7358: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7359: END IF;
7360: --
7361: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
7362: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
7363: FND_MSG_PUB.Count_And_Get
7364: (
7365: p_count => x_msg_count,
7366: p_data => x_msg_data,
7367: p_encoded => FND_API.G_FALSE
7368: );
7369: --
7370: IF l_debug_on THEN
7371: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7374: --
7375: WHEN OTHERS THEN
7376:
7377: ROLLBACK to CANCEL_DEL_DETAIL_GRP;
7378: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7379: wsh_util_core.add_message(x_return_status, l_module_name);
7380: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Delete_Delivery_Detail');
7381: FND_MSG_PUB.Count_And_Get
7382: (
7381: FND_MSG_PUB.Count_And_Get
7382: (
7383: p_count => x_msg_count,
7384: p_data => x_msg_data,
7385: p_encoded => FND_API.G_FALSE
7386: );
7387:
7388: IF l_debug_on THEN
7389: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7628: x_num_errors => l_number_of_errors,
7629: p_msg_data => l_msg_data);
7630: /***************Material Status Impact***********/
7631:
7632: IF x_detail_rec.locator_id <> fnd_api.g_miss_num THEN
7633: l_locator := x_detail_rec.locator_id;
7634: -- Modified Else condition for bug 4399278, 4418754
7635: ELSIF ( x_detail_rec.subinventory = p_original_rec.subinventory ) THEN
7636: l_locator := p_original_rec.locator_id;
7635: ELSIF ( x_detail_rec.subinventory = p_original_rec.subinventory ) THEN
7636: l_locator := p_original_rec.locator_id;
7637: END IF;
7638:
7639: IF x_detail_rec.revision <> fnd_api.g_miss_char THEN
7640: l_revision := x_detail_rec.revision;
7641: ELSE
7642: l_revision := p_original_rec.revision;
7643: END IF;
7641: ELSE
7642: l_revision := p_original_rec.revision;
7643: END IF;
7644:
7645: IF x_detail_rec.subinventory <> fnd_api.g_miss_char THEN
7646: l_subinventory := x_detail_rec.subinventory;
7647: ELSE
7648: l_subinventory := p_original_rec.subinventory;
7649: END IF;
7647: ELSE
7648: l_subinventory := p_original_rec.subinventory;
7649: END IF;
7650:
7651: IF x_detail_rec.lot_number <> fnd_api.g_miss_char THEN
7652: l_lot := x_detail_rec.lot_number;
7653: ELSE
7654: l_lot := p_original_rec.lot_number;
7655: END IF;
7706: IF l_debug_on THEN
7707: WSH_DEBUG_SV.log(l_module_name, 'Shipped Qty', x_detail_rec.shipped_quantity);
7708: WSH_DEBUG_SV.log(l_module_name, 'Existing Shipped Qty', p_original_rec.shipped_quantity);
7709: END IF;
7710: -- BugFix 4519867: Validate shipped qty only when it's not equal to fnd_api.g_miss_num.
7711: IF ((p_in_detail_rec.shipped_quantity IS NULL )
7712: OR (p_in_detail_rec.shipped_quantity <> fnd_api.g_miss_num))
7713: THEN
7714: l_det_qty_rec.delivery_detail_id := x_detail_rec.delivery_detail_id;
7708: WSH_DEBUG_SV.log(l_module_name, 'Existing Shipped Qty', p_original_rec.shipped_quantity);
7709: END IF;
7710: -- BugFix 4519867: Validate shipped qty only when it's not equal to fnd_api.g_miss_num.
7711: IF ((p_in_detail_rec.shipped_quantity IS NULL )
7712: OR (p_in_detail_rec.shipped_quantity <> fnd_api.g_miss_num))
7713: THEN
7714: l_det_qty_rec.delivery_detail_id := x_detail_rec.delivery_detail_id;
7715: l_det_qty_rec.requested_quantity := x_detail_rec.requested_quantity;
7716: l_det_qty_rec.requested_quantity2 := x_detail_rec.requested_quantity2;
7765: -- x_detail_rec.cycle_count_quantity := l_det_qty_rec.cycle_count_quantity;
7766:
7767: -- Bug 5466481: First consider the passed cycle count qty,
7768: -- If it is not passed then take the system calculated value.
7769: IF (p_in_detail_rec.cycle_count_quantity = fnd_api.g_miss_num) THEN
7770: --{
7771: x_detail_rec.cycle_count_quantity := l_det_qty_rec.cycle_count_quantity;
7772: ELSE
7773: x_detail_rec.cycle_count_quantity := p_in_detail_rec.cycle_count_quantity;
7787: -- HW Harmonization project for OPM.
7788: -- HW OPMCONV - Removed checking for process_flag
7789:
7790: IF (p_validation_tab(wsh_actions_levels.c_ship_qty2_lvl) = 1) THEN
7791: IF (x_detail_rec.shipped_quantity2 <> fnd_api.g_miss_num) THEN
7792: l_det_qty_rec.delivery_detail_id :=
7793: x_detail_rec.delivery_detail_id;
7794: l_det_qty_rec.requested_quantity :=
7795: x_detail_rec.requested_quantity;
7850: IF l_debug_on THEN
7851: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count Qty', x_detail_rec.cycle_count_quantity);
7852: WSH_DEBUG_SV.log(l_module_name, 'Existing Cycle_Count Qty', p_original_rec.cycle_count_quantity);
7853: END IF;
7854: -- BugFix 4519867: Validate cycle count qty only when it's not equal to fnd_api.g_miss_num.
7855: IF ( (p_in_detail_rec.cycle_count_quantity IS NULL)
7856: OR (p_in_detail_rec.cycle_count_quantity <> fnd_api.g_miss_num))
7857: THEN
7858: l_det_qty_rec.delivery_detail_id := x_detail_rec.delivery_detail_id;
7852: WSH_DEBUG_SV.log(l_module_name, 'Existing Cycle_Count Qty', p_original_rec.cycle_count_quantity);
7853: END IF;
7854: -- BugFix 4519867: Validate cycle count qty only when it's not equal to fnd_api.g_miss_num.
7855: IF ( (p_in_detail_rec.cycle_count_quantity IS NULL)
7856: OR (p_in_detail_rec.cycle_count_quantity <> fnd_api.g_miss_num))
7857: THEN
7858: l_det_qty_rec.delivery_detail_id := x_detail_rec.delivery_detail_id;
7859: l_det_qty_rec.requested_quantity := x_detail_rec.requested_quantity;
7860: l_det_qty_rec.requested_quantity2 := x_detail_rec.requested_quantity2;
7906: -- HW Harmonization project for OPM. Added cycle_count_qty2
7907: -- HW OPMCONV - Removed checking for process_flag
7908:
7909: IF (p_validation_tab(wsh_actions_levels.c_cc_qty2_lvl) = 1) THEN
7910: IF (x_detail_rec.cycle_count_quantity2 <> fnd_api.g_miss_num) THEN
7911: l_det_qty_rec.delivery_detail_id :=
7912: x_detail_rec.delivery_detail_id;
7913: l_det_qty_rec.requested_quantity :=
7914: x_detail_rec.requested_quantity;
7963:
7964: -- HW OPM end of changes
7965:
7966: IF (p_validation_tab(wsh_actions_levels.c_smc_lvl) = 1) THEN
7967: IF (x_detail_rec.ship_method_code <> fnd_api.g_miss_char) THEN
7968: IF l_debug_on THEN
7969: WSH_DEBUG_SV.log(l_module_name, 'Ship Method', x_detail_rec.ship_method_code);
7970: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_SHIP_METHOD', WSH_DEBUG_SV.c_proc_level);
7971: END IF;
7985: END IF;
7986: END IF;
7987:
7988: IF (p_validation_tab(wsh_actions_levels.c_dep_plan_lvl) = 1) THEN
7989: IF (x_detail_rec.dep_plan_required_flag <> fnd_api.g_miss_char) THEN
7990: IF l_debug_on THEN
7991: WSH_DEBUG_SV.log(l_module_name, 'Departure Plan Flag', x_detail_rec.dep_plan_required_flag);
7992: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_BOOLEAN', WSH_DEBUG_SV.c_proc_level);
7993: END IF;
8006: END IF;
8007: END IF;
8008:
8009: IF (p_validation_tab(wsh_actions_levels.c_ship_mod_comp_lvl) = 1) THEN
8010: IF (x_detail_rec.ship_model_complete_flag <> fnd_api.g_miss_char) THEN
8011: IF l_debug_on THEN
8012: WSH_DEBUG_SV.log(l_module_name, 'Ship Model Complete Flag', x_detail_rec.ship_model_complete_flag);
8013: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_BOOLEAN', WSH_DEBUG_SV.c_proc_level);
8014: END IF;
8027: END IF;
8028: END IF;
8029:
8030: IF (p_validation_tab(wsh_actions_levels.c_sub_inv_lvl) = 1) THEN
8031: IF (x_detail_rec.subinventory <> fnd_api.g_miss_char) THEN
8032: IF l_debug_on THEN
8033: WSH_DEBUG_SV.log(l_module_name, 'Subinventory', x_detail_rec.subinventory);
8034: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_SUBINVENTORY', WSH_DEBUG_SV.c_proc_level);
8035: END IF;
8070:
8071: IF (p_validation_tab(wsh_actions_levels.c_revision_lvl) = 1)
8072: THEN
8073: -- {
8074: IF (x_detail_rec.revision <> fnd_api.g_miss_char)
8075: THEN
8076: -- {
8077: -- UT bug fix 2657367
8078: IF l_debug_on THEN
8086: IF l_inv_controls.rev_flag = 'N'
8087: AND x_detail_rec.revision IS NOT NULL
8088: THEN
8089: l_number_of_errors := l_number_of_errors + 1;
8090: RAISE FND_API.G_EXC_ERROR;
8091: END IF;
8092: ELSE
8093: IF l_debug_on THEN
8094: WSH_DEBUG_SV.log(l_module_name, 'Revision', x_detail_rec.revision);
8113: IF l_debug_on THEN
8114: WSH_DEBUG_SV.logmsg(l_module_name, 'Invalid Revision');
8115: END IF;
8116:
8117: RAISE fnd_api.g_exc_error;
8118: END IF;
8119:
8120: wsh_util_core.api_post_call(
8121: p_return_status => l_return_status,
8130: -- }
8131: END IF;
8132:
8133: IF (p_validation_tab(wsh_actions_levels.c_locator_lvl) = 1) THEN
8134: IF (x_detail_rec.locator_id <> fnd_api.g_miss_num)
8135: THEN
8136: -- {
8137: -- UT bug fix 2657367
8138: IF l_debug_on THEN
8146: IF l_inv_controls.loc_flag = 'N'
8147: AND x_detail_rec.locator_id IS NOT NULL
8148: THEN
8149: l_number_of_errors := l_number_of_errors + 1;
8150: RAISE FND_API.G_EXC_ERROR;
8151: END IF;
8152: ELSE
8153:
8154: IF l_debug_on THEN
8176: IF l_debug_on THEN
8177: WSH_DEBUG_SV.logmsg(l_module_name, 'Invalid Locator');
8178: END IF;
8179:
8180: RAISE fnd_api.g_exc_error;
8181: END IF;
8182:
8183: --
8184: wsh_util_core.api_post_call(
8193: END IF;
8194: END IF;
8195:
8196: IF (p_validation_tab(wsh_actions_levels.c_lot_number_lvl) = 1) THEN
8197: IF (x_detail_rec.lot_number <> fnd_api.g_miss_char) THEN
8198: -- HW Harmonization project for OPM. Need to branch
8199: -- HW OPMCONV - Removed branching
8200:
8201: -- UT bug fix 2657367
8212: AND x_detail_rec.lot_number IS NOT NULL
8213: THEN
8214: -- For non-transactable items, lot number cannot be updated if item is not under lot control
8215: l_number_of_errors := l_number_of_errors + 1;
8216: RAISE FND_API.G_EXC_ERROR;
8217: END IF;
8218: ELSE
8219: -- bug 4766908 get the reservable_flag
8220: IF p_original_rec.released_status = 'Y' THEN
8251: IF l_debug_on THEN
8252: WSH_DEBUG_SV.logmsg(l_module_name, 'Invalid Lot Number');
8253: END IF;
8254:
8255: RAISE fnd_api.g_exc_error;
8256: END IF;
8257: END IF;
8258: -- }
8259: END IF;
8274: /* Since we are updating by delivery_detail, make sure source_line_id is populated */
8275: x_detail_rec.source_line_id := p_original_rec.source_line_id;
8276:
8277: IF (p_validation_tab(wsh_actions_levels.c_sold_contact_lvl) = 1) THEN
8278: IF (x_detail_rec.sold_to_contact_id <> fnd_api.g_miss_num) THEN
8279: IF l_debug_on THEN
8280: WSH_DEBUG_SV.log(l_module_name, 'Sold to Contact', x_detail_rec.sold_to_contact_id);
8281: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8282: END IF;
8294: END IF;
8295: END IF;
8296:
8297: IF (p_validation_tab(wsh_actions_levels.c_ship_contact_lvl) = 1) THEN
8298: IF (x_detail_rec.ship_to_contact_id <> fnd_api.g_miss_num) THEN
8299: IF l_debug_on THEN
8300: WSH_DEBUG_SV.log(l_module_name, 'Ship to Contact Id', x_detail_rec.ship_to_contact_id);
8301: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8302: END IF;
8315: END IF;
8316: END IF;
8317:
8318: IF (p_validation_tab(wsh_actions_levels.c_deliver_contact_lvl) = 1) THEN
8319: IF (x_detail_rec.deliver_to_contact_id <> fnd_api.g_miss_num) THEN
8320: IF l_debug_on THEN
8321: WSH_DEBUG_SV.log(l_module_name, 'Deliver To Contact', x_detail_rec.deliver_to_contact_id);
8322: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8323: END IF;
8336: END IF;
8337: END IF;
8338:
8339: IF (p_validation_tab(wsh_actions_levels.c_intmed_ship_contact_lvl) = 1) THEN
8340: IF (x_detail_rec.intmed_ship_to_contact_id <> fnd_api.g_miss_num) THEN
8341: IF l_debug_on THEN
8342: WSH_DEBUG_SV.log(l_module_name, 'Intmed Ship To Contact', x_detail_rec.intmed_ship_to_contact_id);
8343: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8344: END IF;
8377: -- If to_serial_number is null or is g_miss_char,
8378: -- then default it to from_serial_number
8379: IF ( p_serial_range_tab(l_index).to_serial_number IS NULL ) OR
8380: ( p_serial_range_tab(l_index).to_serial_number =
8381: fnd_api.g_miss_char ) THEN
8382: l_det_ser_range_tab(l_det_index).to_serial_number
8383: := p_serial_range_tab(l_index).from_serial_number;
8384: ELSE
8385: l_det_ser_range_tab(l_det_index).to_serial_number
8433: END IF;
8434:
8435: IF (
8436: p_in_detail_rec.serial_number IS NOT NULL
8437: AND p_in_detail_rec.serial_number <> fnd_api.g_miss_char
8438: )
8439: OR (
8440: p_in_detail_rec.to_serial_number IS NOT NULL
8441: AND p_in_detail_rec.to_serial_number <> fnd_api.g_miss_char
8437: AND p_in_detail_rec.serial_number <> fnd_api.g_miss_char
8438: )
8439: OR (
8440: p_in_detail_rec.to_serial_number IS NOT NULL
8441: AND p_in_detail_rec.to_serial_number <> fnd_api.g_miss_char
8442: )
8443: THEN
8444: -- (
8445: -- Error case. Inputs should be mutually exclusive
8446: IF l_debug_on THEN
8447: WSH_DEBUG_SV.logmsg(l_module_name, 'Serial number input not mutually exclusive');
8448: END IF;
8449:
8450: RAISE fnd_api.g_exc_error;
8451: -- )
8452: END IF;
8453: ELSIF l_detail_ser_count = 0
8454: THEN
8452: END IF;
8453: ELSIF l_detail_ser_count = 0
8454: THEN
8455: IF p_in_detail_rec.serial_number IS NOT NULL
8456: AND p_in_detail_rec.serial_number <> fnd_api.g_miss_char
8457: THEN
8458: -- (
8459: l_det_ser_range_tab(1).delivery_detail_id := x_detail_rec.delivery_detail_id;
8460: l_det_ser_range_tab(1).from_serial_number := p_in_detail_rec.serial_number;
8458: -- (
8459: l_det_ser_range_tab(1).delivery_detail_id := x_detail_rec.delivery_detail_id;
8460: l_det_ser_range_tab(1).from_serial_number := p_in_detail_rec.serial_number;
8461:
8462: IF p_in_detail_rec.to_serial_number <> fnd_api.g_miss_char
8463: THEN
8464: -- (
8465: l_det_ser_range_tab(1).to_serial_number := p_in_detail_rec.to_serial_number;
8466: -- )
8483: END IF;
8484:
8485: ELSE
8486: IF p_in_detail_rec.to_serial_number IS NOT NULL
8487: AND p_in_detail_rec.to_serial_number <> fnd_api.g_miss_char
8488: THEN
8489: -- (
8490: -- To serial number cannot exist with a from serial number
8491: IF l_debug_on THEN
8491: IF l_debug_on THEN
8492: WSH_DEBUG_SV.logmsg(l_module_name, 'From serial number is null');
8493: END IF;
8494:
8495: RAISE fnd_api.g_exc_error;
8496: -- )
8497: END IF;
8498: -- )
8499: END IF;
8512: IF l_debug_on THEN
8513: WSH_DEBUG_SV.logmsg(l_module_name, 'Cannot modify the serial numbers for WMS organizationx ');
8514: END IF;
8515:
8516: RAISE fnd_api.g_exc_error;
8517: END IF; --}
8518: END IF;--}
8519:
8520: -- Check 1: When serial number is input, Released Status should be Y or X
8524: IF l_debug_on THEN
8525: WSH_DEBUG_SV.logmsg(l_module_name, 'Released Status Not in X,Y');
8526: END IF;
8527:
8528: RAISE fnd_api.g_exc_error;
8529: -- )
8530: END IF;
8531:
8532: -- Check 2: When serial number is input, Shipped Qty should not be null or Zero. Bug 2652300
8536: -- Bug 2652300. Cannot update serial number if shipped qty is null or zero
8537: IF l_debug_on THEN
8538: WSH_DEBUG_SV.logmsg(l_module_name, 'Shipped qty zero or null. Not null serial number');
8539: END IF;
8540: raise FND_API.G_EXC_ERROR;
8541: ELSIF nvl(x_detail_rec.shipped_quantity, nvl(p_original_rec.shipped_quantity,0)) > 1
8542: THEN
8543: -- Check 3: If shipped qty is greater than one,
8544: -- if table count is one, then to_serial_number should exist. Bug 2652319
8548: -- (
8549: IF l_debug_on THEN
8550: WSH_DEBUG_SV.logmsg(l_module_name, 'Shipped qty greater than one. No to_serial_number');
8551: END IF;
8552: raise FND_API.G_EXC_ERROR;
8553: -- )
8554: END IF;
8555: -- )
8556: END IF;
8563: -- Error case.
8564: IF l_debug_on THEN
8565: WSH_DEBUG_SV.logmsg(l_module_name, 'Serial table qty greater than shipped qty');
8566: END IF;
8567: RAISE fnd_api.g_exc_error;
8568: ELSIF l_detail_ser_qty = 1
8569: THEN
8570: IF l_debug_on THEN
8571: WSH_DEBUG_SV.log(l_module_name, 'table from serial num', l_det_ser_range_tab(1).from_serial_number);
8581: IF l_debug_on THEN
8582: WSH_DEBUG_SV.logmsg(l_module_name, 'From serial number is null');
8583: END IF;
8584:
8585: RAISE fnd_api.g_exc_error;
8586: -- )
8587: END IF;
8588: ELSIF l_detail_ser_qty > 1
8589: THEN
8650:
8651: -- HW OPMCONV - Removed checking for l_process_flag
8652: IF (
8653: (
8654: (x_detail_rec.serial_number <> fnd_api.g_miss_char)
8655: OR x_detail_rec.serial_number IS NULL
8656: OR l_detail_ser_count > 0
8657: )
8658: -- AND l_process_flag = '0'
8683: l_return_status := wsh_util_core.g_ret_sts_error;
8684: fnd_message.set_name('WSH', 'WSH_INV_INVALID');
8685: fnd_message.set_token('INV_ATTRIBUTE', 'Serial Number Code');
8686: wsh_util_core.add_message(l_return_status);
8687: RAISE fnd_api.g_exc_error;
8688: -- )
8689: END IF;
8690: -- )
8691: END IF;
8702: -- Serial Number is being modified from Not null to Null/Not Null value,
8703: -- Unmark using serial number
8704: IF p_original_rec.serial_number IS NOT NULL AND
8705: l_detail_ser_qty = 1 AND l_update_attributes = FALSE AND
8706: x_detail_rec.serial_number <> fnd_api.g_miss_char
8707: -- AND (x_detail_rec.serial_number IS NULL OR
8708: -- x_detail_rec.serial_number <> p_original_rec.serial_number)
8709: THEN
8710:
8724: wsh_debug_sv.log(l_module_name, 'Return status after Unmark ', l_return_status);
8725: END IF;
8726:
8727: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
8728: RAISE fnd_api.g_exc_error;
8729: END IF;
8730:
8731: -- Transaction temp id exists in WDD,now 1 serial number is being
8732: -- specified, unmark using transaction temp id
8730:
8731: -- Transaction temp id exists in WDD,now 1 serial number is being
8732: -- specified, unmark using transaction temp id
8733: ELSIF (p_original_rec.transaction_temp_id IS NOT NULL AND
8734: x_detail_rec.serial_number <> fnd_api.g_miss_char AND
8735: l_detail_ser_qty = 1 AND l_update_attributes = FALSE)
8736: OR
8737: (p_original_rec.transaction_temp_id IS NOT NULL AND
8738: l_det_ser_range_tab.count > 0 AND
8757: wsh_debug_sv.log(l_module_name, 'Return status after Unmark ', l_return_status);
8758: END IF;
8759:
8760: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
8761: RAISE fnd_api.g_exc_error;
8762: END IF;
8763:
8764: END IF;
8765: END IF;
8862: END IF;
8863:
8864: IF (
8865: l_det_ser_range_tab(l_det_index).to_serial_number <>
8866: fnd_api.g_miss_char
8867: )
8868: AND l_det_ser_range_tab(l_det_index).to_serial_number IS NOT NULL THEN -- bug 1578114 condition added
8869: IF l_debug_on THEN
8870: WSH_DEBUG_SV.log(l_module_name, 'Transaction id created', l_transaction_id);
9077: x_num_errors => l_number_of_errors,
9078: p_msg_data => l_msg_data
9079: );
9080: ELSIF p_in_detail_rec.serial_number IS NOT NULL
9081: AND p_in_detail_rec.serial_number <> FND_API.G_MISS_CHAR
9082: THEN
9083: --
9084: IF l_debug_on THEN
9085: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.MARK_SERIAL_NUMBER', WSH_DEBUG_SV.c_proc_level);
9125: wsh_debug_sv.log(l_module_name, 'Return status after Update_Marked_Serial ', l_return_status);
9126: END IF;
9127: --
9128: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
9129: RAISE fnd_api.g_exc_error;
9130: END IF;
9131: --}
9132: END IF; -- l_update_attributes;
9133: -- )
9163:
9164: fnd_msg_pub.count_and_get(
9165: p_count => x_msg_count,
9166: p_data => x_msg_data,
9167: p_encoded => fnd_api.g_false);
9168:
9169: IF l_debug_on THEN
9170: WSH_DEBUG_SV.pop(l_module_name);
9171: END IF;
9170: WSH_DEBUG_SV.pop(l_module_name);
9171: END IF;
9172: --
9173: EXCEPTION
9174: WHEN fnd_api.g_exc_error THEN
9175: ROLLBACK TO validate_det_line_grp;
9176: x_return_status := fnd_api.g_ret_sts_error;
9177: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
9178: p_encoded => fnd_api.g_false);
9172: --
9173: EXCEPTION
9174: WHEN fnd_api.g_exc_error THEN
9175: ROLLBACK TO validate_det_line_grp;
9176: x_return_status := fnd_api.g_ret_sts_error;
9177: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
9178: p_encoded => fnd_api.g_false);
9179:
9180: --
9174: WHEN fnd_api.g_exc_error THEN
9175: ROLLBACK TO validate_det_line_grp;
9176: x_return_status := fnd_api.g_ret_sts_error;
9177: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
9178: p_encoded => fnd_api.g_false);
9179:
9180: --
9181: IF l_debug_on THEN
9182: WSH_DEBUG_SV.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', WSH_DEBUG_SV.c_excep_level);
9178: p_encoded => fnd_api.g_false);
9179:
9180: --
9181: IF l_debug_on THEN
9182: WSH_DEBUG_SV.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', WSH_DEBUG_SV.c_excep_level);
9183: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
9184: END IF;
9185: --
9186: WHEN fnd_api.g_exc_unexpected_error THEN
9179:
9180: --
9181: IF l_debug_on THEN
9182: WSH_DEBUG_SV.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', WSH_DEBUG_SV.c_excep_level);
9183: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
9184: END IF;
9185: --
9186: WHEN fnd_api.g_exc_unexpected_error THEN
9187: ROLLBACK TO validate_det_line_grp;
9182: WSH_DEBUG_SV.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', WSH_DEBUG_SV.c_excep_level);
9183: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
9184: END IF;
9185: --
9186: WHEN fnd_api.g_exc_unexpected_error THEN
9187: ROLLBACK TO validate_det_line_grp;
9188: x_return_status := fnd_api.g_ret_sts_unexp_error;
9189: fnd_msg_pub.count_and_get(
9190: p_count => x_msg_count,
9184: END IF;
9185: --
9186: WHEN fnd_api.g_exc_unexpected_error THEN
9187: ROLLBACK TO validate_det_line_grp;
9188: x_return_status := fnd_api.g_ret_sts_unexp_error;
9189: fnd_msg_pub.count_and_get(
9190: p_count => x_msg_count,
9191: p_data => x_msg_data,
9192: p_encoded => fnd_api.g_false);
9188: x_return_status := fnd_api.g_ret_sts_unexp_error;
9189: fnd_msg_pub.count_and_get(
9190: p_count => x_msg_count,
9191: p_data => x_msg_data,
9192: p_encoded => fnd_api.g_false);
9193:
9194: --
9195: IF l_debug_on THEN
9196: WSH_DEBUG_SV.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', WSH_DEBUG_SV.c_excep_level);
9192: p_encoded => fnd_api.g_false);
9193:
9194: --
9195: IF l_debug_on THEN
9196: WSH_DEBUG_SV.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', WSH_DEBUG_SV.c_excep_level);
9197: WSH_DEBUG_SV.pop(l_module_name,
9198: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9199: END IF;
9200: --
9194: --
9195: IF l_debug_on THEN
9196: WSH_DEBUG_SV.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', WSH_DEBUG_SV.c_excep_level);
9197: WSH_DEBUG_SV.pop(l_module_name,
9198: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9199: END IF;
9200: --
9201: WHEN wsh_util_core.g_exc_warning THEN
9202: x_return_status := wsh_util_core.g_ret_sts_warning;
9202: x_return_status := wsh_util_core.g_ret_sts_warning;
9203: fnd_msg_pub.count_and_get(
9204: p_count => x_msg_count,
9205: p_data => x_msg_data,
9206: p_encoded => fnd_api.g_false);
9207:
9208: --
9209: IF l_debug_on THEN
9210: WSH_DEBUG_SV.logmsg(l_module_name,
9215: END IF;
9216: --
9217: WHEN OTHERS THEN
9218: ROLLBACK TO validate_det_line_grp;
9219: x_return_status := fnd_api.g_ret_sts_unexp_error;
9220: wsh_util_core.add_message(x_return_status, l_module_name);
9221: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_GRP.Validate_Detail_Line');
9222: fnd_msg_pub.count_and_get(
9223: p_count => x_msg_count,
9221: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_GRP.Validate_Detail_Line');
9222: fnd_msg_pub.count_and_get(
9223: p_count => x_msg_count,
9224: p_data => x_msg_data,
9225: p_encoded => fnd_api.g_false);
9226:
9227: --
9228:
9229: IF l_debug_on THEN
9297: l_number_of_errors := 0;
9298: l_number_of_warnings := 0;
9299:
9300: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_CONT_ITEM_LVL) = 1 ) THEN
9301: IF (x_detail_rec.inventory_item_id <> FND_API.G_MISS_NUM) THEN
9302: --
9303: IF l_debug_on THEN
9304: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_detail_rec.inventory_item_id);
9305: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_detail_rec.organization_id);
9325: END IF;
9326: END IF;
9327: --
9328: --lpn CONV.. samanna
9329: IF (x_detail_rec.delivered_quantity <> FND_API.G_MISS_NUM) THEN
9330: IF p_original_rec.shipped_quantity IS NOT NULL THEN
9331: IF x_detail_rec.delivered_quantity > p_original_rec.shipped_quantity THEN
9332: RAISE e_invalid_delivered_qty;
9333: END IF;
9349: FND_MSG_PUB.Count_And_Get
9350: (
9351: p_count => x_msg_count,
9352: p_data => x_msg_data,
9353: p_encoded => FND_API.G_FALSE
9354: );
9355:
9356: IF l_debug_on THEN
9357: WSH_DEBUG_SV.pop(l_module_name);
9359:
9360: EXCEPTION
9361: WHEN e_invalid_delivered_qty THEN
9362: ROLLBACK TO VALIDATE_DET_CONTAINER_GRP;
9363: x_return_status := FND_API.G_RET_STS_ERROR ;
9364: FND_MESSAGE.SET_NAME('WSH', 'WSH_INVALID_DELIVERED_QTY');
9365: WSH_UTIL_CORE.ADD_MESSAGE(wsh_util_core.g_ret_sts_error, l_module_name);
9366: FND_MSG_PUB.Count_And_Get
9367: (
9366: FND_MSG_PUB.Count_And_Get
9367: (
9368: p_count => x_msg_count,
9369: p_data => x_msg_data,
9370: p_encoded => FND_API.G_FALSE
9371: );
9372: IF l_debug_on THEN
9373: WSH_DEBUG_SV.logmsg(l_module_name,'E_INVALID_DELIVERED_QTY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9374: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION: E_INVALID_DELIVERED_QTY');
9374: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION: E_INVALID_DELIVERED_QTY');
9375: END IF;
9376:
9377:
9378: WHEN FND_API.G_EXC_ERROR THEN
9379: ROLLBACK TO VALIDATE_DET_CONTAINER_GRP;
9380: x_return_status := FND_API.G_RET_STS_ERROR ;
9381: FND_MSG_PUB.Count_And_Get
9382: (
9376:
9377:
9378: WHEN FND_API.G_EXC_ERROR THEN
9379: ROLLBACK TO VALIDATE_DET_CONTAINER_GRP;
9380: x_return_status := FND_API.G_RET_STS_ERROR ;
9381: FND_MSG_PUB.Count_And_Get
9382: (
9383: p_count => x_msg_count,
9384: p_data => x_msg_data,
9381: FND_MSG_PUB.Count_And_Get
9382: (
9383: p_count => x_msg_count,
9384: p_data => x_msg_data,
9385: p_encoded => FND_API.G_FALSE
9386: );
9387: --
9388:
9389: IF l_debug_on THEN
9386: );
9387: --
9388:
9389: IF l_debug_on THEN
9390: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9391: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9392: END IF;
9393:
9394: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9387: --
9388:
9389: IF l_debug_on THEN
9390: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9391: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9392: END IF;
9393:
9394: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9395: ROLLBACK TO VALIDATE_DET_CONTAINER_GRP;
9390: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9391: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9392: END IF;
9393:
9394: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9395: ROLLBACK TO VALIDATE_DET_CONTAINER_GRP;
9396: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9397: FND_MSG_PUB.Count_And_Get
9398: (
9392: END IF;
9393:
9394: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9395: ROLLBACK TO VALIDATE_DET_CONTAINER_GRP;
9396: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9397: FND_MSG_PUB.Count_And_Get
9398: (
9399: p_count => x_msg_count,
9400: p_data => x_msg_data,
9397: FND_MSG_PUB.Count_And_Get
9398: (
9399: p_count => x_msg_count,
9400: p_data => x_msg_data,
9401: p_encoded => FND_API.G_FALSE
9402: );
9403: --
9404:
9405: IF l_debug_on THEN
9402: );
9403: --
9404:
9405: IF l_debug_on THEN
9406: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9407: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9408: END IF;
9409: --
9410: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9403: --
9404:
9405: IF l_debug_on THEN
9406: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9407: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9408: END IF;
9409: --
9410: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9411: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9412: FND_MSG_PUB.Count_And_Get
9413: (
9414: p_count => x_msg_count,
9415: p_data => x_msg_data,
9416: p_encoded => FND_API.G_FALSE
9417: );
9418: --
9419: IF l_debug_on THEN
9420: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9422: END IF;
9423: --
9424: WHEN OTHERS THEN
9425: ROLLBACK TO VALIDATE_DET_CONTAINER_GRP;
9426: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9427: wsh_util_core.add_message(x_return_status, l_module_name);
9428: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Validate_Detail_Container');
9429: FND_MSG_PUB.Count_And_Get
9430: (
9429: FND_MSG_PUB.Count_And_Get
9430: (
9431: p_count => x_msg_count,
9432: p_data => x_msg_data,
9433: p_encoded => FND_API.G_FALSE
9434: );
9435:
9436: IF l_debug_on THEN
9437: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9690: END IF;
9691: -- HW OPMCONV - Removed branching
9692:
9693: --{
9694: IF (nvl(x_detail_rec.delivered_quantity, FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM) THEN
9695: --{
9696: x_detail_rec.delivered_quantity := round(x_detail_rec.delivered_quantity,wsh_util_core.c_max_decimal_digits_inv);
9697: --}
9698: END IF;
9703: FND_MSG_PUB.Count_And_Get
9704: (
9705: p_count => x_msg_count,
9706: p_data => x_msg_data,
9707: p_encoded => FND_API.G_FALSE
9708: );
9709:
9710: IF l_debug_on THEN
9711: WSH_DEBUG_SV.pop(l_module_name);
9711: WSH_DEBUG_SV.pop(l_module_name);
9712: END IF;
9713:
9714: EXCEPTION
9715: WHEN FND_API.G_EXC_ERROR THEN
9716: ROLLBACK TO VALIDATE_DET_COMMON_GRP;
9717: x_return_status := FND_API.G_RET_STS_ERROR ;
9718: FND_MSG_PUB.Count_And_Get
9719: (
9713:
9714: EXCEPTION
9715: WHEN FND_API.G_EXC_ERROR THEN
9716: ROLLBACK TO VALIDATE_DET_COMMON_GRP;
9717: x_return_status := FND_API.G_RET_STS_ERROR ;
9718: FND_MSG_PUB.Count_And_Get
9719: (
9720: p_count => x_msg_count,
9721: p_data => x_msg_data,
9718: FND_MSG_PUB.Count_And_Get
9719: (
9720: p_count => x_msg_count,
9721: p_data => x_msg_data,
9722: p_encoded => FND_API.G_FALSE
9723: );
9724: --
9725: IF l_debug_on THEN
9726: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9722: p_encoded => FND_API.G_FALSE
9723: );
9724: --
9725: IF l_debug_on THEN
9726: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9727: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9728: END IF;
9729:
9730: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9723: );
9724: --
9725: IF l_debug_on THEN
9726: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9727: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9728: END IF;
9729:
9730: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9731: ROLLBACK TO VALIDATE_DET_COMMON_GRP;
9726: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9727: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9728: END IF;
9729:
9730: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9731: ROLLBACK TO VALIDATE_DET_COMMON_GRP;
9732: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9733: FND_MSG_PUB.Count_And_Get
9734: (
9728: END IF;
9729:
9730: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9731: ROLLBACK TO VALIDATE_DET_COMMON_GRP;
9732: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9733: FND_MSG_PUB.Count_And_Get
9734: (
9735: p_count => x_msg_count,
9736: p_data => x_msg_data,
9733: FND_MSG_PUB.Count_And_Get
9734: (
9735: p_count => x_msg_count,
9736: p_data => x_msg_data,
9737: p_encoded => FND_API.G_FALSE
9738: );
9739: --
9740:
9741: IF l_debug_on THEN
9738: );
9739: --
9740:
9741: IF l_debug_on THEN
9742: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9743: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9744: END IF;
9745:
9746: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9739: --
9740:
9741: IF l_debug_on THEN
9742: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9743: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9744: END IF;
9745:
9746: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9747: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9748: FND_MSG_PUB.Count_And_Get
9749: (
9750: p_count => x_msg_count,
9751: p_data => x_msg_data,
9752: p_encoded => FND_API.G_FALSE
9753: );
9754: --
9755: IF l_debug_on THEN
9756: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9758: END IF;
9759:
9760: WHEN OTHERS THEN
9761: ROLLBACK TO VALIDATE_DET_COMMON_GRP;
9762: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9763: wsh_util_core.add_message(x_return_status, l_module_name);
9764: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Validate_Detail_Common');
9765: FND_MSG_PUB.Count_And_Get
9766: (
9765: FND_MSG_PUB.Count_And_Get
9766: (
9767: p_count => x_msg_count,
9768: p_data => x_msg_data,
9769: p_encoded => FND_API.G_FALSE
9770: );
9771: --
9772:
9773: IF l_debug_on THEN
9852: END IF;
9853:
9854:
9855: EXCEPTION
9856: WHEN FND_API.G_EXC_ERROR THEN
9857: x_return_status := FND_API.G_RET_STS_ERROR ;
9858: IF l_debug_on THEN
9859: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9860: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9853:
9854:
9855: EXCEPTION
9856: WHEN FND_API.G_EXC_ERROR THEN
9857: x_return_status := FND_API.G_RET_STS_ERROR ;
9858: IF l_debug_on THEN
9859: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9860: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9861: END IF;
9855: EXCEPTION
9856: WHEN FND_API.G_EXC_ERROR THEN
9857: x_return_status := FND_API.G_RET_STS_ERROR ;
9858: IF l_debug_on THEN
9859: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9860: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9861: END IF;
9862:
9863: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9856: WHEN FND_API.G_EXC_ERROR THEN
9857: x_return_status := FND_API.G_RET_STS_ERROR ;
9858: IF l_debug_on THEN
9859: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9860: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9861: END IF;
9862:
9863: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9864: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9859: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9860: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9861: END IF;
9862:
9863: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9864: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9865: IF l_debug_on THEN
9866: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9867: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9860: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9861: END IF;
9862:
9863: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9864: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9865: IF l_debug_on THEN
9866: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9867: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9868: END IF;
9862:
9863: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9864: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9865: IF l_debug_on THEN
9866: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9867: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9868: END IF;
9869:
9870: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9863: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9864: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9865: IF l_debug_on THEN
9866: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9867: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9868: END IF;
9869:
9870: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9871: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9874: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9875: END IF;
9876:
9877: WHEN OTHERS THEN
9878: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9879: wsh_util_core.add_message(x_return_status, l_module_name);
9880: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Get_Serial_Quantity');
9881: --
9882:
10001:
10002: -- Initialize message list if p_init_msg_list is set to TRUE.
10003: --
10004: --
10005: IF FND_API.to_Boolean( p_init_msg_list )
10006: THEN
10007: FND_MSG_PUB.initialize;
10008: END IF;
10009: --
10020: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
10021: IF l_debug_on THEN
10022: wsh_debug_sv.logmsg(l_module_name,'Null Caller');
10023: END IF;
10024: RAISE FND_API.G_EXC_ERROR;
10025: END IF;
10026:
10027: IF p_In_rec.action_code IS NULL THEN
10028: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
10030: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
10031: IF l_debug_on THEN
10032: wsh_debug_sv.logmsg(l_module_name,'Null Action Code');
10033: END IF;
10034: RAISE FND_API.G_EXC_ERROR;
10035: ELSIF(p_In_rec.action_code NOT IN('CREATE', 'UPDATE', 'CANCEL')
10036: OR (p_In_rec.action_code = 'CANCEL' AND p_In_rec.caller <> 'WSH_INBOUND')) THEN
10037: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_ACTION_CODE');
10038: FND_MESSAGE.SET_TOKEN('ACT_CODE',p_In_rec.action_code );
10039: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
10040: IF l_debug_on THEN
10041: wsh_debug_sv.logmsg(l_module_name,'WSH_INVALID_ACTION_CODE');
10042: END IF;
10043: RAISE FND_API.G_EXC_ERROR;
10044: END IF;
10045:
10046: -- Set Validation Level
10047:
10126: AND l_delivery_detail_rec.container_flag in ('Y', 'C')
10127: THEN
10128: IF l_weight_uom_code <>
10129: l_delivery_detail_rec.weight_uom_code
10130: AND l_weight_uom_code <> FND_API.G_MISS_CHAR
10131: THEN
10132: l_delivery_detail_rec.gross_weight :=
10133: WSH_WV_UTILS.Convert_Uom_core (
10134: from_uom => l_weight_uom_code,
10169:
10170: END IF;
10171: IF l_volume_uom_code <>
10172: l_delivery_detail_rec.volume_uom_code
10173: AND l_volume_uom_code <> FND_API.G_MISS_CHAR
10174: THEN
10175:
10176: l_delivery_detail_rec.volume :=
10177: WSH_WV_UTILS.Convert_Uom_core (
10213:
10214: END IF;
10215: l_detail_info_tab(l_index) := l_delivery_detail_rec;
10216: EXCEPTION
10217: WHEN FND_API.G_EXC_ERROR THEN
10218: ROLLBACK TO before_det_disabled_grp;
10219: IF l_debug_on THEN
10220: wsh_debug_sv.logmsg(l_module_name, 'g exc error');
10221: END IF;
10218: ROLLBACK TO before_det_disabled_grp;
10219: IF l_debug_on THEN
10220: wsh_debug_sv.logmsg(l_module_name, 'g exc error');
10221: END IF;
10222: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10223: ROLLBACK TO before_det_disabled_grp;
10224: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10225: WHEN OTHERS THEN
10226: ROLLBACK TO before_det_disabled_grp;
10220: wsh_debug_sv.logmsg(l_module_name, 'g exc error');
10221: END IF;
10222: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10223: ROLLBACK TO before_det_disabled_grp;
10224: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10225: WHEN OTHERS THEN
10226: ROLLBACK TO before_det_disabled_grp;
10227: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10228:
10223: ROLLBACK TO before_det_disabled_grp;
10224: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10225: WHEN OTHERS THEN
10226: ROLLBACK TO before_det_disabled_grp;
10227: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10228:
10229: END;
10230: l_weight_uom_code := NULL;
10231: l_volume_uom_code := NULL;
10244: IF l_loop_num_error = p_detail_info_tab.count THEN
10245: IF l_debug_on THEN
10246: wsh_debug_sv.logmsg(l_module_name, 'get disabled list fail all records');
10247: END IF;
10248: RAISE FND_API.G_EXC_ERROR;
10249: ELSE
10250: l_number_of_warnings := l_loop_num_error;
10251: END IF;
10252: END IF;
10266: -- Should not proceed further
10267: IF l_debug_on THEN
10268: wsh_debug_sv.logmsg(l_module_name,'Table Count Zero');
10269: END IF;
10270: RAISE FND_API.G_EXC_ERROR;
10271: END IF;
10272:
10273: -- anxsharm for Load Tender
10274: IF(l_validation_tab(WSH_ACTIONS_LEVELS.C_WMS_CONTAINERS_LVL) = 1) THEN--{ lpn conv
10354: WSH_DEBUG_SV.log(l_module_name,'total count',l_detail_info_tab.COUNT);
10355: --
10356: END IF;
10357: --
10358: RAISE FND_API.G_EXC_ERROR;
10359: --
10360: END IF;
10361: --
10362: END IF; --}
10403: RAISE wsh_util_core.g_exc_warning;
10404: END IF;
10405:
10406: -- Standard check of p_commit.
10407: IF FND_API.To_Boolean( p_commit ) THEN
10408: IF(l_debug_on) THEN
10409: wsh_debug_sv.logmsg(l_module_name, 'Commit Work');
10410: END IF;
10411: --
10425: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10426: END IF;
10427:
10428: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
10429: RAISE FND_API.G_EXC_ERROR;
10430: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
10431: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10432: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10433: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
10427:
10428: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
10429: RAISE FND_API.G_EXC_ERROR;
10430: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
10431: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10432: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10433: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
10434: END IF;
10435:
10446: --{
10447: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10448: --{
10449:
10450: IF FND_API.TO_BOOLEAN(p_commit) THEN
10451:
10452: IF l_debug_on THEN
10453: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10454: END IF;
10475:
10476: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
10477: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
10478: THEN
10479: IF NOT(FND_API.TO_BOOLEAN(p_commit)) THEN
10480: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
10481: END IF;
10482: END IF;
10483: END IF;
10490: FND_MSG_PUB.Count_And_Get
10491: (
10492: p_count => x_msg_count,
10493: p_data => x_msg_data,
10494: p_encoded => FND_API.G_FALSE
10495: );
10496:
10497:
10498: IF l_debug_on THEN
10499: WSH_DEBUG_SV.pop(l_module_name);
10500: END IF;
10501: --
10502: EXCEPTION
10503: WHEN FND_API.G_EXC_ERROR THEN
10504: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
10505: x_return_status := FND_API.G_RET_STS_ERROR ;
10506: --
10507: -- Start code for Bugfix 4070732
10501: --
10502: EXCEPTION
10503: WHEN FND_API.G_EXC_ERROR THEN
10504: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
10505: x_return_status := FND_API.G_RET_STS_ERROR ;
10506: --
10507: -- Start code for Bugfix 4070732
10508: --
10509: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
10535: FND_MSG_PUB.Count_And_Get
10536: (
10537: p_count => x_msg_count,
10538: p_data => x_msg_data,
10539: p_encoded => FND_API.G_FALSE
10540: );
10541:
10542:
10543:
10542:
10543:
10544: --
10545: IF l_debug_on THEN
10546: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10547: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10548: END IF;
10549: --
10550: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10543:
10544: --
10545: IF l_debug_on THEN
10546: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10547: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10548: END IF;
10549: --
10550: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10551: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
10546: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10547: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10548: END IF;
10549: --
10550: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10551: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
10552: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10553: --
10554: -- Start code for Bugfix 4070732
10548: END IF;
10549: --
10550: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10551: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
10552: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10553: --
10554: -- Start code for Bugfix 4070732
10555: --
10556: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
10578: FND_MSG_PUB.Count_And_Get
10579: (
10580: p_count => x_msg_count,
10581: p_data => x_msg_data,
10582: p_encoded => FND_API.G_FALSE
10583: );
10584:
10585:
10586:
10585:
10586:
10587: --
10588: IF l_debug_on THEN
10589: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10590: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10591: END IF;
10592: --
10593: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10586:
10587: --
10588: IF l_debug_on THEN
10589: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10590: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10591: END IF;
10592: --
10593: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10594: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10626: FND_MSG_PUB.Count_And_Get
10627: (
10628: p_count => x_msg_count,
10629: p_data => x_msg_data,
10630: p_encoded => FND_API.G_FALSE
10631: );
10632:
10633:
10634:
10685: FND_MSG_PUB.Count_And_Get
10686: (
10687: p_count => x_msg_count,
10688: p_data => x_msg_data,
10689: p_encoded => FND_API.G_FALSE
10690: );
10691: --
10692:
10693: --
10697: END IF;
10698: --
10699: WHEN OTHERS THEN
10700: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
10701: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10702: wsh_util_core.add_message(x_return_status, l_module_name);
10703: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Create_Update_Delivery_Detail');
10704: --
10705: -- Start code for Bugfix 4070732
10729: FND_MSG_PUB.Count_And_Get
10730: (
10731: p_count => x_msg_count,
10732: p_data => x_msg_data,
10733: p_encoded => FND_API.G_FALSE
10734: );
10735: --
10736:
10737:
10785: WSH_DEBUG_SV.push(l_module_name);
10786: WSH_DEBUG_SV.LOG(l_module_name, 'Count of p_line_rows-', p_line_rows.count);
10787: END IF;
10788: --
10789: x_return_status := FND_API.G_RET_STS_SUCCESS;
10790:
10791: FOR i in 1..p_line_rows.count
10792: LOOP
10793: l_attr_tab(i).entity_id := p_line_rows(i);
10847: WSH_DEBUG_SV.pop(l_module_name);
10848: END IF;
10849:
10850: EXCEPTION
10851: WHEN FND_API.G_EXC_ERROR THEN
10852: x_return_status := FND_API.G_RET_STS_ERROR ;
10853: IF l_debug_on THEN
10854: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10855: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10848: END IF;
10849:
10850: EXCEPTION
10851: WHEN FND_API.G_EXC_ERROR THEN
10852: x_return_status := FND_API.G_RET_STS_ERROR ;
10853: IF l_debug_on THEN
10854: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10855: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10856: END IF;
10850: EXCEPTION
10851: WHEN FND_API.G_EXC_ERROR THEN
10852: x_return_status := FND_API.G_RET_STS_ERROR ;
10853: IF l_debug_on THEN
10854: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10855: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10856: END IF;
10857:
10858: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10851: WHEN FND_API.G_EXC_ERROR THEN
10852: x_return_status := FND_API.G_RET_STS_ERROR ;
10853: IF l_debug_on THEN
10854: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10855: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10856: END IF;
10857:
10858: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10859: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10854: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10855: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10856: END IF;
10857:
10858: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10859: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10860: IF l_debug_on THEN
10861: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10862: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10855: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10856: END IF;
10857:
10858: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10859: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10860: IF l_debug_on THEN
10861: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10862: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10863: END IF;
10857:
10858: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10859: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10860: IF l_debug_on THEN
10861: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10862: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10863: END IF;
10864:
10865: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10858: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10859: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10860: IF l_debug_on THEN
10861: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10862: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10863: END IF;
10864:
10865: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10866: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10869: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10870: END IF;
10871:
10872: WHEN OTHERS THEN
10873: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10874: wsh_util_core.add_message(x_return_status, l_module_name);
10875: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Get_Carton_Grouping');
10876: --
10877: IF l_debug_on THEN