[Home] [Help]
56: -- Forward Declarations for local procedures
57: PROCEDURE Create_Delivery_Detail(
58: p_detail_info_tab IN WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type,
59: p_detail_IN_rec IN WSH_GLBL_VAR_STRCT_GRP.detailInRecType,
60: p_valid_index_tab IN wsh_util_core.id_tab_type,
61: x_detail_OUT_rec OUT NOCOPY WSH_GLBL_VAR_STRCT_GRP.detailOutRecType,
62: x_return_status OUT NOCOPY VARCHAR2,
63: x_msg_count OUT NOCOPY NUMBER,
64: x_msg_data OUT NOCOPY VARCHAR2
67: PROCEDURE Validate_Delivery_Detail(
68: x_detail_info_tab IN OUT NOCOPY WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type,
69: p_in_detail_tab IN WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type,
70: p_action IN VARCHAR2,
71: p_validation_tab IN wsh_util_core.Id_Tab_Type,
72: p_caller IN varchar2,
73: x_valid_index_tab OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
74: x_details_marked OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
75: x_detail_tender_tab OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
69: p_in_detail_tab IN WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type,
70: p_action IN VARCHAR2,
71: p_validation_tab IN wsh_util_core.Id_Tab_Type,
72: p_caller IN varchar2,
73: x_valid_index_tab OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
74: x_details_marked OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
75: x_detail_tender_tab OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
76: x_return_status OUT NOCOPY VARCHAR2,
77: x_msg_count OUT NOCOPY NUMBER,
70: p_action IN VARCHAR2,
71: p_validation_tab IN wsh_util_core.Id_Tab_Type,
72: p_caller IN varchar2,
73: x_valid_index_tab OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
74: x_details_marked OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
75: x_detail_tender_tab OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
76: x_return_status OUT NOCOPY VARCHAR2,
77: x_msg_count OUT NOCOPY NUMBER,
78: x_msg_data OUT NOCOPY VARCHAR2,
71: p_validation_tab IN wsh_util_core.Id_Tab_Type,
72: p_caller IN varchar2,
73: x_valid_index_tab OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
74: x_details_marked OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
75: x_detail_tender_tab OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
76: x_return_status OUT NOCOPY VARCHAR2,
77: x_msg_count OUT NOCOPY NUMBER,
78: x_msg_data OUT NOCOPY VARCHAR2,
79: p_in_rec IN WSH_GLBL_VAR_STRCT_GRP.detailInRecType,
81: );
82:
83: PROCEDURE Update_Delivery_Detail(
84: p_detail_info_tab IN WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type ,
85: p_valid_index_tab IN wsh_util_core.id_tab_type,
86: x_return_status OUT NOCOPY varchar2,
87: x_msg_count OUT NOCOPY NUMBER,
88: x_msg_data OUT NOCOPY VARCHAR2,
89: p_caller IN VARCHAR2 DEFAULT NULL
111: PROCEDURE Validate_Detail_Line(
112: x_detail_rec IN OUT NOCOPY WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Rec_Type,
113: p_in_detail_rec IN WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Rec_Type,
114: p_original_rec IN c_original_detail_cur%ROWTYPE,
115: p_validation_tab IN WSH_UTIL_CORE.id_tab_type,
116: x_mark_reprice_flag OUT NOCOPY VARCHAR2,
117: x_return_status OUT NOCOPY VARCHAR2,
118: x_msg_count OUT NOCOPY NUMBER,
119: x_msg_data OUT NOCOPY VARCHAR2,
123:
124: PROCEDURE Validate_Detail_Container(
125: x_detail_rec IN OUT NOCOPY WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Rec_Type,
126: p_original_rec IN c_original_detail_cur%ROWTYPE,
127: p_validation_tab IN WSH_UTIL_CORE.id_tab_type,
128: x_mark_reprice_flag OUT NOCOPY VARCHAR2,
129: x_return_status OUT NOCOPY VARCHAR2,
130: x_msg_count OUT NOCOPY NUMBER,
131: x_msg_data OUT NOCOPY VARCHAR2
133:
134: PROCEDURE Validate_Detail_Common(
135: x_detail_rec IN OUT NOCOPY WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Rec_Type,
136: p_original_rec IN c_original_detail_cur%ROWTYPE,
137: p_validation_tab IN wsh_util_core.id_tab_type,
138: x_mark_reprice_flag OUT NOCOPY VARCHAR2,
139: x_return_status OUT NOCOPY VARCHAR2,
140: x_msg_count OUT NOCOPY NUMBER,
141: x_msg_data OUT NOCOPY VARCHAR2
176: x_return_status OUT NOCOPY VARCHAR2,
177: x_msg_count OUT NOCOPY NUMBER,
178: x_msg_data OUT NOCOPY VARCHAR2,
179: -- procedure specific parameters
180: p_tabofdeldets IN WSH_UTIL_CORE.id_tab_type,
181: p_action IN VARCHAR2,
182: p_delivery_id IN NUMBER,
183: p_delivery_name IN VARCHAR2,
184: p_action_prms IN WSH_GLBL_VAR_STRCT_GRP.dd_action_parameters_rec_type -- J-IB-NPARIKH
188: l_api_name CONSTANT VARCHAR2(30) := 'delivery_detail_to_delivery';
189: l_return_status VARCHAR2(30) := NULL;
190: l_delivery_id NUMBER := NULL;
191: l_cont_ins_id NUMBER := NULL;
192: l_tabofdeldets wsh_util_core.id_tab_type;
193: l_msg_summary VARCHAR2(2000) := NULL;
194: l_msg_details VARCHAR2(4000) := NULL;
195: l_del_params wsh_delivery_autocreate.grp_attr_tab_type;
196: wsh_no_del_det_tbl EXCEPTION;
228: l_pack_status_dummy VARCHAR2(100);
229: l_msg_data VARCHAR2(32767);
230:
231: -- anxsharm for Load Tender
232: l_trip_id_tab wsh_util_core.id_tab_type;
233: l_det_tab wsh_util_core.id_tab_type;
234: l_number_of_errors NUMBER := 0;
235: l_number_of_warnings NUMBER := 0;
236: --
229: l_msg_data VARCHAR2(32767);
230:
231: -- anxsharm for Load Tender
232: l_trip_id_tab wsh_util_core.id_tab_type;
233: l_det_tab wsh_util_core.id_tab_type;
234: l_number_of_errors NUMBER := 0;
235: l_number_of_warnings NUMBER := 0;
236: --
237: l_cnt NUMBER;
237: l_cnt NUMBER;
238: i number;
239:
240: -- deliveryMerge
241: l_adjust_planned_del_tab wsh_util_core.id_tab_type;
242: l_delivery_already_included boolean;
243: --LPN Convergence
244: e_invalid_quantity EXCEPTION;
245:
288: IF fnd_api.to_boolean(p_init_msg_list) THEN
289: fnd_msg_pub.initialize;
290: END IF;
291:
292: x_return_status := wsh_util_core.g_ret_sts_success;
293:
294: IF (p_tabofdeldets.COUNT = 0) THEN
295: RAISE wsh_no_del_det_tbl;
296: END IF;
361: p_delivery_id => p_delivery_id,
362: x_pack_status => l_pack_status_dummy,
363: x_return_status => l_return_status
364: );
365: wsh_util_core.api_post_call(
366: p_return_status => l_return_status,
367: x_num_warnings => l_number_of_warnings,
368: x_num_errors => l_number_of_errors);
369: /* Patchset I : Harmonization Project End */
372: p_entity => 'DLVY',
373: p_entity_ids =>l_det_tab,
374: x_return_status => x_return_status);
375:
376: wsh_util_core.api_post_call(
377: p_return_status => l_return_status,
378: x_num_warnings => l_number_of_warnings,
379: x_num_errors => l_number_of_errors);
380:
398: wsh_details_validations.check_unassign_from_delivery(
399: p_detail_rows => l_tabofdeldets,
400: x_return_status => l_return_status);
401:
402: wsh_util_core.api_post_call(
403: p_return_status => l_return_status,
404: x_num_warnings => l_number_of_warnings,
405: x_num_errors => l_number_of_errors);
406:
447: p_delivery_flag => 'Y',
448: x_return_status => l_return_status,
449: p_action_prms => p_action_prms
450: );
451: wsh_util_core.api_post_call(
452: p_return_status => l_return_status,
453: x_num_warnings => l_number_of_warnings,
454: x_num_errors => l_number_of_errors);
455: /* Patchset I : Harmonization Project End */
466: IF l_debug_on THEN
467: WSH_DEBUG_SV.log(l_module_name,'Adjust_Planned_Flag returns ',l_return_status);
468: END IF;
469:
470: wsh_util_core.api_post_call(
471: p_return_status => l_return_status,
472: x_num_warnings => l_number_of_warnings,
473: x_num_errors => l_number_of_errors);
474:
478: IF l_debug_on THEN
479: wsh_debug_sv.log(l_module_name, 'Number of warnings', l_number_of_warnings);
480: END IF;
481:
482: RAISE wsh_util_core.g_exc_warning;
483: END IF;
484:
485: fnd_msg_pub.count_and_get(
486: p_count => x_msg_count,
522: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
523: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
524: END IF;
525: --
526: WHEN wsh_util_core.g_exc_warning THEN
527: x_return_status := wsh_util_core.g_ret_sts_warning;
528: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
529: p_encoded => fnd_api.g_false);
530:
523: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
524: END IF;
525: --
526: WHEN wsh_util_core.g_exc_warning THEN
527: x_return_status := wsh_util_core.g_ret_sts_warning;
528: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
529: p_encoded => fnd_api.g_false);
530:
531: --
529: p_encoded => fnd_api.g_false);
530:
531: --
532: IF l_debug_on THEN
533: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
534: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
535: END IF;
536:
537: WHEN wsh_invalid_action THEN
530:
531: --
532: IF l_debug_on THEN
533: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
534: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
535: END IF;
536:
537: WHEN wsh_invalid_action THEN
538: ROLLBACK TO detail_to_delivery_grp;
535: END IF;
536:
537: WHEN wsh_invalid_action THEN
538: ROLLBACK TO detail_to_delivery_grp;
539: x_return_status := wsh_util_core.g_ret_sts_error;
540: fnd_message.set_name('WSH', 'WSH_PUB_INVALID_ACTION');
541: wsh_util_core.add_message(x_return_status);
542: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
543: p_encoded => fnd_api.g_false);
537: WHEN wsh_invalid_action THEN
538: ROLLBACK TO detail_to_delivery_grp;
539: x_return_status := wsh_util_core.g_ret_sts_error;
540: fnd_message.set_name('WSH', 'WSH_PUB_INVALID_ACTION');
541: wsh_util_core.add_message(x_return_status);
542: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
543: p_encoded => fnd_api.g_false);
544:
545: IF l_debug_on THEN
548: END IF;
549:
550: WHEN wsh_no_del_det_tbl THEN
551: ROLLBACK TO detail_to_delivery_grp;
552: x_return_status := wsh_util_core.g_ret_sts_error;
553: fnd_message.set_name('WSH', 'WSH_PUB_NO_DEL_DET_TBL');
554: wsh_util_core.add_message(x_return_status);
555: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
556: p_encoded => fnd_api.g_false);
550: WHEN wsh_no_del_det_tbl THEN
551: ROLLBACK TO detail_to_delivery_grp;
552: x_return_status := wsh_util_core.g_ret_sts_error;
553: fnd_message.set_name('WSH', 'WSH_PUB_NO_DEL_DET_TBL');
554: wsh_util_core.add_message(x_return_status);
555: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
556: p_encoded => fnd_api.g_false);
557:
558: IF l_debug_on THEN
561: END IF;
562: --
563: WHEN wsh_no_delivery_id THEN
564: ROLLBACK TO detail_to_delivery_grp;
565: x_return_status := wsh_util_core.g_ret_sts_error;
566: fnd_message.set_name('WSH', 'WSH_PUB_NO_DELIVERY');
567: wsh_util_core.add_message(x_return_status);
568: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
569: p_encoded => fnd_api.g_false);
563: WHEN wsh_no_delivery_id THEN
564: ROLLBACK TO detail_to_delivery_grp;
565: x_return_status := wsh_util_core.g_ret_sts_error;
566: fnd_message.set_name('WSH', 'WSH_PUB_NO_DELIVERY');
567: wsh_util_core.add_message(x_return_status);
568: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
569: p_encoded => fnd_api.g_false);
570:
571: IF l_debug_on THEN
577: /*Start of 2777869*/
578:
579: WHEN wsh_no_delivery THEN
580: ROLLBACK TO detail_to_delivery_grp;
581: x_return_status := wsh_util_core.g_ret_sts_error;
582: fnd_message.set_name('WSH', 'WSH_DELIVERY_NOT_EXIST');
583: fnd_message.set_token('DELIVERY_NAME', p_delivery_name);
584: wsh_util_core.add_message(x_return_status);
585: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
580: ROLLBACK TO detail_to_delivery_grp;
581: x_return_status := wsh_util_core.g_ret_sts_error;
582: fnd_message.set_name('WSH', 'WSH_DELIVERY_NOT_EXIST');
583: fnd_message.set_token('DELIVERY_NAME', p_delivery_name);
584: wsh_util_core.add_message(x_return_status);
585: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
586: p_encoded => fnd_api.g_false);
587:
588: IF l_debug_on THEN
591: END IF;
592: --
593: WHEN wsh_invalid_delivery_id THEN
594: ROLLBACK TO detail_to_delivery_grp;
595: x_return_status := wsh_util_core.g_ret_sts_error;
596: fnd_message.set_name('WSH', 'WSH_INVALID_DELIVERY');
597: fnd_message.set_token('DELIVERY', p_delivery_id);
598: wsh_util_core.add_message(x_return_status);
599: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
594: ROLLBACK TO detail_to_delivery_grp;
595: x_return_status := wsh_util_core.g_ret_sts_error;
596: fnd_message.set_name('WSH', 'WSH_INVALID_DELIVERY');
597: fnd_message.set_token('DELIVERY', p_delivery_id);
598: wsh_util_core.add_message(x_return_status);
599: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
600: p_encoded => fnd_api.g_false);
601:
602: IF l_debug_on THEN
608: --
609:
610: WHEN OTHERS THEN
611: ROLLBACK TO detail_to_delivery_grp;
612: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
613: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_GRP.DETAIL_TO_DELIVERY');
614: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
615: p_encoded => fnd_api.g_false);
616:
609:
610: WHEN OTHERS THEN
611: ROLLBACK TO detail_to_delivery_grp;
612: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
613: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_GRP.DETAIL_TO_DELIVERY');
614: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
615: p_encoded => fnd_api.g_false);
616:
617: IF l_debug_on THEN
632: x_return_status OUT NOCOPY VARCHAR2,
633: x_msg_count OUT NOCOPY NUMBER,
634: x_msg_data OUT NOCOPY VARCHAR2,
635: -- procedure specific parameters
636: p_tabofdeldets IN WSH_UTIL_CORE.id_tab_type,
637: p_action IN VARCHAR2,
638: p_delivery_id IN NUMBER,
639: p_delivery_name IN VARCHAR2
640: ) IS
696: --
697: EXCEPTION
698:
699: WHEN OTHERS THEN
700: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
701: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_GRP.DETAIL_TO_DELIVERY');
702: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
703: p_encoded => fnd_api.g_false);
704:
697: EXCEPTION
698:
699: WHEN OTHERS THEN
700: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
701: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_GRP.DETAIL_TO_DELIVERY');
702: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
703: p_encoded => fnd_api.g_false);
704:
705: IF l_debug_on THEN
773: l_organization_id NUMBER;
774: l_requested_quantity_uom VARCHAR2(32767);
775: l_return_status VARCHAR2(32767);
776: l_output_quantity NUMBER;
777: l_validation_level_tab wsh_util_core.id_tab_type;
778:
779: -- bug 3524851
780: l_top_model_line_id NUMBER;
781:
824: IF fnd_api.to_boolean(p_init_msg_list) THEN
825: fnd_msg_pub.initialize;
826: END IF;
827:
828: x_return_status := wsh_util_core.g_ret_sts_success;
829: --
830: /* Patchset I : Harmonization Project */
831: l_validation_level_tab := wsh_actions_levels.g_validation_level_tab;
832: /* OPM changes NC - added l_requested_quantity2 */
902: wsh_debug_sv.LOG(l_module_name, 'Output qty after check decimal', l_output_quantity);
903: END IF;
904:
905: -- UT Bug fix 2650839
906: --IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
907: -- RAISE fnd_api.g_exc_error;
908: --END IF;
909: -- Reverting the fix made in 2650839 as we need to return warning instead of
910: -- error to public API users.
907: -- RAISE fnd_api.g_exc_error;
908: --END IF;
909: -- Reverting the fix made in 2650839 as we need to return warning instead of
910: -- error to public API users.
911: wsh_util_core.api_post_call(
912: p_return_status => l_return_status,
913: x_num_warnings => l_number_of_warnings,
914: x_num_errors => l_number_of_errors);
915:
929: p_converted_flag => p_converted_flag,
930: x_new_detail_id => x_new_detail_id,
931: x_return_status => l_return_status
932: );
933: wsh_util_core.api_post_call(
934: p_return_status => l_return_status,
935: x_num_warnings => l_number_of_warnings,
936: x_num_errors => l_number_of_errors);
937:
939: IF l_debug_on THEN
940: wsh_debug_sv.log(l_module_name, 'Number of warnings', l_number_of_warnings);
941: END IF;
942:
943: RAISE wsh_util_core.g_exc_warning;
944: END IF;
945:
946: fnd_msg_pub.count_and_get(
947: p_count => x_msg_count,
982: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
983: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
984: END IF;
985: --
986: WHEN wsh_util_core.g_exc_warning THEN
987: x_return_status := wsh_util_core.g_ret_sts_warning;
988: fnd_msg_pub.count_and_get(
989: p_count => x_msg_count,
990: p_data => x_msg_data,
983: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
984: END IF;
985: --
986: WHEN wsh_util_core.g_exc_warning THEN
987: x_return_status := wsh_util_core.g_ret_sts_warning;
988: fnd_msg_pub.count_and_get(
989: p_count => x_msg_count,
990: p_data => x_msg_data,
991: p_encoded => fnd_api.g_false);
991: p_encoded => fnd_api.g_false);
992:
993: --
994: IF l_debug_on THEN
995: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
996: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
997: END IF;
998: WHEN wsh_inalid_detail_id THEN
999: ROLLBACK TO split_line_grp;
992:
993: --
994: IF l_debug_on THEN
995: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
996: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
997: END IF;
998: WHEN wsh_inalid_detail_id THEN
999: ROLLBACK TO split_line_grp;
1000: x_return_status := wsh_util_core.g_ret_sts_error;
996: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
997: END IF;
998: WHEN wsh_inalid_detail_id THEN
999: ROLLBACK TO split_line_grp;
1000: x_return_status := wsh_util_core.g_ret_sts_error;
1001:
1002: /* Bug 2777869 : Instead of message "WSH_PUB_INALID_DETAIL_ID",now we are using
1003: "WSH_DET_INVALID_DETAIL".*/
1004:
1003: "WSH_DET_INVALID_DETAIL".*/
1004:
1005: fnd_message.set_name('WSH', 'WSH_DET_INVALID_DETAIL');
1006: fnd_message.set_token('DETAIL_ID',p_from_detail_id);
1007: wsh_util_core.add_message(x_return_status);
1008:
1009: fnd_msg_pub.count_and_get(
1010: p_count => x_msg_count,
1011: p_data => x_msg_data,
1017: END IF;
1018: --
1019: WHEN wsh_invalid_split_qty THEN
1020: ROLLBACK TO split_line_grp;
1021: x_return_status := wsh_util_core.g_ret_sts_error;
1022: fnd_message.set_name('WSH', 'WSH_DET_SPLIT_EXCEED');
1023: wsh_util_core.add_message(x_return_status);
1024:
1025: fnd_msg_pub.count_and_get(
1019: WHEN wsh_invalid_split_qty THEN
1020: ROLLBACK TO split_line_grp;
1021: x_return_status := wsh_util_core.g_ret_sts_error;
1022: fnd_message.set_name('WSH', 'WSH_DET_SPLIT_EXCEED');
1023: wsh_util_core.add_message(x_return_status);
1024:
1025: fnd_msg_pub.count_and_get(
1026: p_count => x_msg_count,
1027: p_data => x_msg_data,
1033: END IF;
1034: --
1035: WHEN wsh_invalid_split_qty2 THEN /* OPM changes. NC - Added */
1036: ROLLBACK TO split_line_grp;
1037: x_return_status := wsh_util_core.g_ret_sts_error;
1038: fnd_message.set_name('WSH', 'WSH_PUB_INVALID_SPLIT_QTY');
1039: wsh_util_core.add_message(x_return_status);
1040:
1041: fnd_msg_pub.count_and_get(
1035: WHEN wsh_invalid_split_qty2 THEN /* OPM changes. NC - Added */
1036: ROLLBACK TO split_line_grp;
1037: x_return_status := wsh_util_core.g_ret_sts_error;
1038: fnd_message.set_name('WSH', 'WSH_PUB_INVALID_SPLIT_QTY');
1039: wsh_util_core.add_message(x_return_status);
1040:
1041: fnd_msg_pub.count_and_get(
1042: p_count => x_msg_count,
1043: p_data => x_msg_data,
1050: --
1051: WHEN OTHERS THEN
1052: ROLLBACK TO split_line_grp;
1053: x_return_status := fnd_api.g_ret_sts_unexp_error;
1054: wsh_util_core.add_message(x_return_status, l_module_name);
1055: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_GRP.Split_Line');
1056:
1057: fnd_msg_pub.count_and_get(
1058: p_count => x_msg_count,
1051: WHEN OTHERS THEN
1052: ROLLBACK TO split_line_grp;
1053: x_return_status := fnd_api.g_ret_sts_unexp_error;
1054: wsh_util_core.add_message(x_return_status, l_module_name);
1055: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_GRP.Split_Line');
1056:
1057: fnd_msg_pub.count_and_get(
1058: p_count => x_msg_count,
1059: p_data => x_msg_data,
1126: l_msg_data VARCHAR2(32767);
1127: l_detail_info_tab WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type;
1128: l_detail_in_rec WSH_GLBL_VAR_STRCT_GRP.detailInRecType;
1129: l_detail_out_rec WSH_GLBL_VAR_STRCT_GRP.detailOutRecType;
1130: l_dummy_ids wsh_util_core.id_Tab_type;
1131: invalid_source_code exception;
1132: mark_reprice_error exception;
1133: update_failed exception;
1134: detail_no_found EXCEPTION;
1172: WSH_DEBUG_SV.log(l_module_name,'Table Count',p_changed_attributes.COUNT);
1173:
1174: END IF;
1175: --
1176: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1177:
1178: -- Standard call to check for call compatibility
1179: IF NOT FND_API.Compatible_API_Call(
1180: l_api_version_number,
1386: x_OUT_rec => l_detail_out_rec
1387: );
1388:
1389: IF l_debug_on THEN
1390: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1391: END IF;
1392: --
1393: wsh_util_core.api_post_call(
1394: p_return_status => l_return_status,
1389: IF l_debug_on THEN
1390: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1391: END IF;
1392: --
1393: wsh_util_core.api_post_call(
1394: p_return_status => l_return_status,
1395: x_num_warnings => l_number_of_warnings,
1396: x_num_errors => l_number_of_errors,
1397: p_msg_data => l_msg_data
1420: WHEN mark_reprice_error then
1421: ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
1422: FND_MESSAGE.Set_Name('WSH', 'WSH_REPRICE_REQUIRED_ERR');
1423: x_return_status := l_return_status;
1424: WSH_UTIL_CORE.add_message (x_return_status);
1425: FND_MSG_PUB.Count_And_Get
1426: ( p_count => x_msg_count,
1427: p_data => x_msg_data,
1428: p_encoded => FND_API.G_FALSE
1438: WHEN invalid_source_code THEN
1439: ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
1440: x_return_status := FND_API.G_RET_STS_ERROR;
1441: FND_MESSAGE.Set_Name('WSH', 'WSH_INVALID_SOURCE_CODE');
1442: WSH_UTIL_CORE.Add_Message(x_return_status);
1443: FND_MSG_PUB.Count_And_Get
1444: ( p_count => x_msg_count,
1445: p_data => x_msg_data,
1446: p_encoded => FND_API.G_FALSE
1454: END IF;
1455: --
1456: WHEN update_failed THEN
1457: ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
1458: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1459: FND_MESSAGE.SET_NAME('WSH', 'WSH_DETAIL_VALIDATION_FAILED');
1460: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', l_error_attribute);
1461: FND_MESSAGE.SET_TOKEN('ATTRB_VALUE', l_error_attribute_value);
1462: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL', l_error_detail_id);
1459: FND_MESSAGE.SET_NAME('WSH', 'WSH_DETAIL_VALIDATION_FAILED');
1460: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', l_error_attribute);
1461: FND_MESSAGE.SET_TOKEN('ATTRB_VALUE', l_error_attribute_value);
1462: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL', l_error_detail_id);
1463: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
1464: FND_MSG_PUB.Count_And_Get
1465: ( p_count => x_msg_count,
1466: p_data => x_msg_data,
1467: p_encoded => FND_API.G_FALSE
1474: END IF;
1475: --
1476: WHEN invalid_released_status THEN
1477: ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
1478: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1479: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
1480: FND_MSG_PUB.Count_And_Get
1481: ( p_count => x_msg_count,
1482: p_data => x_msg_data,
1475: --
1476: WHEN invalid_released_status THEN
1477: ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
1478: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1479: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
1480: FND_MSG_PUB.Count_And_Get
1481: ( p_count => x_msg_count,
1482: p_data => x_msg_data,
1483: p_encoded => FND_API.G_FALSE
1493: IF get_org%isopen THEN
1494: close get_org;
1495: END IF;
1496: ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
1497: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1498: WSH_UTIL_CORE.add_message (x_return_status);
1499: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Update_Shipping_Attributes');
1500: FND_MSG_PUB.Count_And_Get
1501: ( p_count => x_msg_count,
1494: close get_org;
1495: END IF;
1496: ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
1497: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1498: WSH_UTIL_CORE.add_message (x_return_status);
1499: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Update_Shipping_Attributes');
1500: FND_MSG_PUB.Count_And_Get
1501: ( p_count => x_msg_count,
1502: p_data => x_msg_data,
1495: END IF;
1496: ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
1497: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1498: WSH_UTIL_CORE.add_message (x_return_status);
1499: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Update_Shipping_Attributes');
1500: FND_MSG_PUB.Count_And_Get
1501: ( p_count => x_msg_count,
1502: p_data => x_msg_data,
1503: p_encoded => FND_API.G_FALSE
1551: --
1552: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1553: END IF;
1554: --
1555: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1556:
1557: -- get line status for delivery detail
1558: OPEN del_assign;
1559: FETCH del_assign INTO l_assign_rec;
1576:
1577: /*
1578: EXCEPTION
1579: WHEN others then
1580: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_GRP.Get_Detail_Status');
1581: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1582: WSH_UTIL_CORE.get_messages('Y', l_msg_summary, l_msg_details, x_msg_count);
1583: if x_msg_count > 1 then
1584: x_msg_data := l_msg_summary || l_msg_details;
1577: /*
1578: EXCEPTION
1579: WHEN others then
1580: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_GRP.Get_Detail_Status');
1581: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1582: WSH_UTIL_CORE.get_messages('Y', l_msg_summary, l_msg_details, x_msg_count);
1583: if x_msg_count > 1 then
1584: x_msg_data := l_msg_summary || l_msg_details;
1585: else
1578: EXCEPTION
1579: WHEN others then
1580: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_GRP.Get_Detail_Status');
1581: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1582: WSH_UTIL_CORE.get_messages('Y', l_msg_summary, l_msg_details, x_msg_count);
1583: if x_msg_count > 1 then
1584: x_msg_data := l_msg_summary || l_msg_details;
1585: else
1586: x_msg_data := l_msg_summary;
1607: , p_caller IN VARCHAR2 DEFAULT NULL
1608: , x_return_status OUT NOCOPY VARCHAR2
1609: , x_msg_count OUT NOCOPY NUMBER
1610: , x_msg_data OUT NOCOPY VARCHAR2
1611: , p_line_rows IN WSH_UTIL_CORE.id_tab_type
1612: , p_group_by_header_flag IN VARCHAR2
1613: , x_del_rows OUT NOCOPY wsh_util_core.id_tab_type
1614: )
1615: IS
1609: , x_msg_count OUT NOCOPY NUMBER
1610: , x_msg_data OUT NOCOPY VARCHAR2
1611: , p_line_rows IN WSH_UTIL_CORE.id_tab_type
1612: , p_group_by_header_flag IN VARCHAR2
1613: , x_del_rows OUT NOCOPY wsh_util_core.id_tab_type
1614: )
1615: IS
1616: l_dummy_rows WSH_UTIL_CORE.id_tab_type;
1617: l_api_version_number NUMBER := 1.0;
1612: , p_group_by_header_flag IN VARCHAR2
1613: , x_del_rows OUT NOCOPY wsh_util_core.id_tab_type
1614: )
1615: IS
1616: l_dummy_rows WSH_UTIL_CORE.id_tab_type;
1617: l_api_version_number NUMBER := 1.0;
1618: l_api_name CONSTANT VARCHAR2(30):= 'Autocreate_Deliveries';
1619: l_return_status VARCHAR2(30);
1620: autocreate_delivery_failed EXCEPTION;
1635: l_reset_flags BOOLEAN;
1636: --
1637: BEGIN
1638: -- Bugfix 4070732
1639: IF WSH_UTIL_CORE.G_START_OF_SESSION_API is null
1640: THEN
1641: WSH_UTIL_CORE.G_START_OF_SESSION_API := l_api_session_name;
1642: WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API := FALSE;
1643: END IF;
1637: BEGIN
1638: -- Bugfix 4070732
1639: IF WSH_UTIL_CORE.G_START_OF_SESSION_API is null
1640: THEN
1641: WSH_UTIL_CORE.G_START_OF_SESSION_API := l_api_session_name;
1642: WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API := FALSE;
1643: END IF;
1644: -- End of Code Bugfix 4070732
1645: --
1638: -- Bugfix 4070732
1639: IF WSH_UTIL_CORE.G_START_OF_SESSION_API is null
1640: THEN
1641: WSH_UTIL_CORE.G_START_OF_SESSION_API := l_api_session_name;
1642: WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API := FALSE;
1643: END IF;
1644: -- End of Code Bugfix 4070732
1645: --
1646: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1674: -- Check p_init_msg_list
1675: IF FND_API.to_boolean(p_init_msg_list) THEN
1676: FND_MSG_PUB.initialize;
1677: END IF;
1678: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1679:
1680: IF l_debug_on THEN
1681: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DEL_ACROSS_ORGS',WSH_DEBUG_SV.C_PROC_LEVEL);
1682: END IF;
1692: x_del_rows => x_del_rows,
1693: x_grouping_rows => l_dummy_rows,
1694: x_return_status => l_return_status);
1695:
1696: wsh_util_core.api_post_call(
1697: p_return_status => l_return_status,
1698: x_num_warnings => l_number_of_warnings,
1699: x_num_errors => l_number_of_errors,
1700: p_msg_data => l_msg_data
1703: IF l_number_of_warnings > 0 THEN
1704: IF l_debug_on THEN
1705: wsh_debug_sv.log(l_module_name,'Number of warnings', l_number_of_warnings);
1706: END IF;
1707: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
1708: END IF;
1709:
1710:
1711: IF FND_API.TO_BOOLEAN(p_commit) THEN
1711: IF FND_API.TO_BOOLEAN(p_commit) THEN
1712: --
1713: -- Start code for Bugfix 4070732
1714: --
1715: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1716: IF l_debug_on THEN
1717: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1718: END IF;
1719: l_reset_flags := FALSE;
1713: -- Start code for Bugfix 4070732
1714: --
1715: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1716: IF l_debug_on THEN
1717: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1718: END IF;
1719: l_reset_flags := FALSE;
1720:
1721: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
1717: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1718: END IF;
1719: l_reset_flags := FALSE;
1720:
1721: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
1722: x_return_status => l_return_status);
1723:
1724: IF l_debug_on THEN
1725: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1724: IF l_debug_on THEN
1725: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1726: END IF;
1727:
1728: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
1729: RAISE FND_API.G_EXC_ERROR;
1730: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1731: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1732: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1726: END IF;
1727:
1728: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
1729: RAISE FND_API.G_EXC_ERROR;
1730: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1731: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1732: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1733: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
1734: END IF;
1728: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
1729: RAISE FND_API.G_EXC_ERROR;
1730: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1731: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1732: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1733: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
1734: END IF;
1735:
1736: END IF;
1729: RAISE FND_API.G_EXC_ERROR;
1730: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1731: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1732: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1733: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
1734: END IF;
1735:
1736: END IF;
1737: --
1742:
1743:
1744: --bug 4070732
1745: --End of the API handling of calls to process_stops_for_load_tender
1746: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
1747: --{
1748: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1749: --{
1750:
1744: --bug 4070732
1745: --End of the API handling of calls to process_stops_for_load_tender
1746: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
1747: --{
1748: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1749: --{
1750:
1751: IF FND_API.TO_BOOLEAN(p_commit) THEN
1752:
1750:
1751: IF FND_API.TO_BOOLEAN(p_commit) THEN
1752:
1753: IF l_debug_on THEN
1754: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1755: END IF;
1756:
1757: WSH_UTIL_CORE.reset_stops_for_load_tender(p_reset_flags => TRUE,
1758: x_return_status => l_return_status);
1753: IF l_debug_on THEN
1754: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1755: END IF;
1756:
1757: WSH_UTIL_CORE.reset_stops_for_load_tender(p_reset_flags => TRUE,
1758: x_return_status => l_return_status);
1759:
1760: ELSE
1761:
1759:
1760: ELSE
1761:
1762: IF l_debug_on THEN
1763: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1764: END IF;
1765:
1766: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
1767: x_return_status => l_return_status);
1762: IF l_debug_on THEN
1763: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1764: END IF;
1765:
1766: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
1767: x_return_status => l_return_status);
1768: END IF;
1769:
1770: IF l_debug_on THEN
1770: IF l_debug_on THEN
1771: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1772: END IF;
1773:
1774: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1775: x_return_status := l_return_status;
1776:
1777: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
1778: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1773:
1774: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1775: x_return_status := l_return_status;
1776:
1777: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
1778: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1779: IF NOT(FND_API.TO_BOOLEAN(p_commit)) THEN
1780: ROLLBACK TO AUTOCREATE_DEL_GRP;
1781: end if;
1774: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1775: x_return_status := l_return_status;
1776:
1777: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
1778: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1779: IF NOT(FND_API.TO_BOOLEAN(p_commit)) THEN
1780: ROLLBACK TO AUTOCREATE_DEL_GRP;
1781: end if;
1782: END IF;
1807: x_return_status := FND_API.G_RET_STS_ERROR ;
1808: --
1809: -- Start code for Bugfix 4070732
1810: --
1811: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
1812: THEN
1813: --{
1814: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1815: --{
1810: --
1811: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
1812: THEN
1813: --{
1814: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1815: --{
1816: IF l_debug_on THEN
1817: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1818: END IF;
1813: --{
1814: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1815: --{
1816: IF l_debug_on THEN
1817: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1818: END IF;
1819:
1820: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1821: x_return_status => l_return_status);
1816: IF l_debug_on THEN
1817: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1818: END IF;
1819:
1820: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1821: x_return_status => l_return_status);
1822:
1823: IF l_debug_on THEN
1824: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1823: IF l_debug_on THEN
1824: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1825: END IF;
1826:
1827: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1828: x_return_status := l_return_status;
1829: END IF;
1830: --}
1831: END IF;
1849: --
1850:
1851: WHEN autocreate_delivery_failed THEN
1852: ROLLBACK TO AUTOCREATE_DEL_GRP;
1853: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1854: wsh_util_core.add_message(x_return_status, l_module_name);
1855: --
1856: -- Start code for Bugfix 4070732
1857: --
1850:
1851: WHEN autocreate_delivery_failed THEN
1852: ROLLBACK TO AUTOCREATE_DEL_GRP;
1853: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1854: wsh_util_core.add_message(x_return_status, l_module_name);
1855: --
1856: -- Start code for Bugfix 4070732
1857: --
1858: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
1854: wsh_util_core.add_message(x_return_status, l_module_name);
1855: --
1856: -- Start code for Bugfix 4070732
1857: --
1858: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
1859: THEN
1860: --{
1861: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1862: --{
1857: --
1858: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
1859: THEN
1860: --{
1861: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1862: --{
1863: IF l_debug_on THEN
1864: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1865: END IF;
1860: --{
1861: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1862: --{
1863: IF l_debug_on THEN
1864: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1865: END IF;
1866:
1867: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1868: x_return_status => l_return_status);
1863: IF l_debug_on THEN
1864: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1865: END IF;
1866:
1867: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1868: x_return_status => l_return_status);
1869:
1870: IF l_debug_on THEN
1871: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1870: IF l_debug_on THEN
1871: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1872: END IF;
1873:
1874: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1875: x_return_status := l_return_status;
1876: END IF;
1877: --}
1878: END IF;
1894: WSH_DEBUG_SV.logmsg(l_module_name,'AUTOCREATE_DELIVERY_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1895: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:AUTOCREATE_DELIVERY_FAILED');
1896: END IF;
1897:
1898: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1899: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1900: --
1901: -- Start code for Bugfix 4070732
1902: --
1895: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:AUTOCREATE_DELIVERY_FAILED');
1896: END IF;
1897:
1898: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1899: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1900: --
1901: -- Start code for Bugfix 4070732
1902: --
1903: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
1899: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1900: --
1901: -- Start code for Bugfix 4070732
1902: --
1903: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
1904: THEN
1905: --{
1906: IF NOT (WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API)
1907: THEN
1902: --
1903: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
1904: THEN
1905: --{
1906: IF NOT (WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API)
1907: THEN
1908: --{
1909:
1910: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
1906: IF NOT (WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API)
1907: THEN
1908: --{
1909:
1910: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
1911: x_return_status => l_return_status);
1912:
1913: IF l_debug_on THEN
1914: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1913: IF l_debug_on THEN
1914: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1915: END IF;
1916:
1917: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1918: x_return_status := l_return_status;
1919:
1920: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
1921: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1916:
1917: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1918: x_return_status := l_return_status;
1919:
1920: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
1921: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1922: ROLLBACK TO AUTOCREATE_DEL_GRP;
1923: END IF;
1924: END IF;
1917: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1918: x_return_status := l_return_status;
1919:
1920: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
1921: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1922: ROLLBACK TO AUTOCREATE_DEL_GRP;
1923: END IF;
1924: END IF;
1925: --}
1938: );
1939:
1940:
1941: IF l_debug_on THEN
1942: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1943: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1944: END IF;
1945: --
1946: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1939:
1940:
1941: IF l_debug_on THEN
1942: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1943: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1944: END IF;
1945: --
1946: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1947: ROLLBACK TO AUTOCREATE_DEL_GRP;
1948: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1949: --
1950: -- Start of code for Bugfix 4070732
1951: --
1952: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
1953: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1954: IF l_debug_on THEN
1955: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1956: END IF;
1949: --
1950: -- Start of code for Bugfix 4070732
1951: --
1952: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
1953: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1954: IF l_debug_on THEN
1955: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1956: END IF;
1957:
1951: --
1952: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
1953: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1954: IF l_debug_on THEN
1955: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1956: END IF;
1957:
1958: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1959: x_return_status => l_return_status);
1954: IF l_debug_on THEN
1955: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1956: END IF;
1957:
1958: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1959: x_return_status => l_return_status);
1960:
1961:
1962: IF l_debug_on THEN
1982: --
1983: WHEN OTHERS THEN
1984: ROLLBACK TO AUTOCREATE_DEL_GRP;
1985: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1986: wsh_util_core.add_message(x_return_status, l_module_name);
1987: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Autocreate_Deliveries');
1988: --
1989: -- Start of code for Bugfix 4070732
1990: --
1983: WHEN OTHERS THEN
1984: ROLLBACK TO AUTOCREATE_DEL_GRP;
1985: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1986: wsh_util_core.add_message(x_return_status, l_module_name);
1987: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Autocreate_Deliveries');
1988: --
1989: -- Start of code for Bugfix 4070732
1990: --
1991: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
1987: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Autocreate_Deliveries');
1988: --
1989: -- Start of code for Bugfix 4070732
1990: --
1991: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
1992: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1993: IF l_debug_on THEN
1994: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1995: END IF;
1988: --
1989: -- Start of code for Bugfix 4070732
1990: --
1991: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
1992: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1993: IF l_debug_on THEN
1994: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1995: END IF;
1996:
1990: --
1991: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
1992: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1993: IF l_debug_on THEN
1994: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1995: END IF;
1996:
1997: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1998: x_return_status => l_return_status);
1993: IF l_debug_on THEN
1994: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1995: END IF;
1996:
1997: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1998: x_return_status => l_return_status);
1999:
2000:
2001: IF l_debug_on THEN
2028: , p_commit IN VARCHAR2
2029: , x_return_status OUT NOCOPY VARCHAR2
2030: , x_msg_count OUT NOCOPY NUMBER
2031: , x_msg_data OUT NOCOPY VARCHAR2
2032: , p_line_rows IN WSH_UTIL_CORE.id_tab_type
2033: , x_del_rows OUT NOCOPY WSH_UTIL_CORE.id_tab_type
2034: , x_trip_rows OUT NOCOPY WSH_UTIL_CORE.id_tab_type
2035: )
2036: IS
2029: , x_return_status OUT NOCOPY VARCHAR2
2030: , x_msg_count OUT NOCOPY NUMBER
2031: , x_msg_data OUT NOCOPY VARCHAR2
2032: , p_line_rows IN WSH_UTIL_CORE.id_tab_type
2033: , x_del_rows OUT NOCOPY WSH_UTIL_CORE.id_tab_type
2034: , x_trip_rows OUT NOCOPY WSH_UTIL_CORE.id_tab_type
2035: )
2036: IS
2037: l_api_name CONSTANT VARCHAR2(30):= 'Autocreate_del_trip';
2030: , x_msg_count OUT NOCOPY NUMBER
2031: , x_msg_data OUT NOCOPY VARCHAR2
2032: , p_line_rows IN WSH_UTIL_CORE.id_tab_type
2033: , x_del_rows OUT NOCOPY WSH_UTIL_CORE.id_tab_type
2034: , x_trip_rows OUT NOCOPY WSH_UTIL_CORE.id_tab_type
2035: )
2036: IS
2037: l_api_name CONSTANT VARCHAR2(30):= 'Autocreate_del_trip';
2038: l_api_version_number CONSTANT NUMBER := 1.0;
2039: l_return_status VARCHAR2(30);
2040: autocreate_trip_failed EXCEPTION;
2041: l_msg_summary varchar2(2000) := NULL;
2042: l_msg_details varchar2(4000) := NULL;
2043: l_org_rows wsh_util_core.id_tab_type; -- bug 1668578
2044: l_number_of_errors NUMBER := 0;
2045: l_number_of_warnings NUMBER := 0;
2046: l_msg_data VARCHAR2(32767);
2047: --
2082: -- Check p_init_msg_list
2083: IF FND_API.to_boolean(p_init_msg_list) THEN
2084: FND_MSG_PUB.initialize;
2085: END IF;
2086: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2087:
2088: IF l_debug_on THEN
2089: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.AUTOCREATE_DEL_TRIP',WSH_DEBUG_SV.C_PROC_LEVEL);
2090: END IF;
2095: x_del_rows => x_del_rows,
2096: x_trip_rows => x_trip_rows,
2097: x_return_status => l_return_status);
2098:
2099: wsh_util_core.api_post_call(
2100: p_return_status => l_return_status,
2101: x_num_warnings => l_number_of_warnings,
2102: x_num_errors => l_number_of_errors,
2103: p_msg_data => l_msg_data
2107: IF l_number_of_warnings > 0 THEN
2108: IF l_debug_on THEN
2109: wsh_debug_sv.log(l_module_name,'Number of warnings', l_number_of_warnings);
2110: END IF;
2111: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
2112: END IF;
2113:
2114:
2115: FND_MSG_PUB.Count_And_Get
2146: END IF;
2147: --
2148: WHEN autocreate_trip_failed THEN
2149: ROLLBACK TO AUTOCREATE_TRIP_GRP;
2150: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2151: wsh_util_core.add_message(x_return_status);
2152: FND_MSG_PUB.Count_And_Get
2153: (
2154: p_count => x_msg_count,
2147: --
2148: WHEN autocreate_trip_failed THEN
2149: ROLLBACK TO AUTOCREATE_TRIP_GRP;
2150: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2151: wsh_util_core.add_message(x_return_status);
2152: FND_MSG_PUB.Count_And_Get
2153: (
2154: p_count => x_msg_count,
2155: p_data => x_msg_data,
2159: WSH_DEBUG_SV.logmsg(l_module_name,'AUTOCREATE_TRIP_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2160: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:AUTOCREATE_TRIP_FAILED');
2161: END IF;
2162: --
2163: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2164: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2165: FND_MSG_PUB.Count_And_Get
2166: (
2167: p_count => x_msg_count,
2160: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:AUTOCREATE_TRIP_FAILED');
2161: END IF;
2162: --
2163: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2164: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2165: FND_MSG_PUB.Count_And_Get
2166: (
2167: p_count => x_msg_count,
2168: p_data => x_msg_data,
2169: p_encoded => FND_API.G_FALSE
2170: );
2171: --
2172: IF l_debug_on THEN
2173: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2174: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2175: END IF;
2176: --
2177: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2170: );
2171: --
2172: IF l_debug_on THEN
2173: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2174: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2175: END IF;
2176: --
2177: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2178: ROLLBACK TO AUTOCREATE_TRIP_GRP;
2192: --
2193: WHEN OTHERS THEN
2194: ROLLBACK TO AUTOCREATE_TRIP_GRP;
2195: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2196: wsh_util_core.add_message(x_return_status, l_module_name);
2197: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Autocreate_Del_Trip');
2198: FND_MSG_PUB.Count_And_Get
2199: (
2200: p_count => x_msg_count,
2193: WHEN OTHERS THEN
2194: ROLLBACK TO AUTOCREATE_TRIP_GRP;
2195: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2196: wsh_util_core.add_message(x_return_status, l_module_name);
2197: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Autocreate_Del_Trip');
2198: FND_MSG_PUB.Count_And_Get
2199: (
2200: p_count => x_msg_count,
2201: p_data => x_msg_data,
2257: l_index NUMBER;
2258: check_status NUMBER;
2259:
2260: -- Variables for pack, unpack, auto-pack
2261: l_group_id_tab WSH_UTIL_CORE.ID_TAB_TYPE;
2262: l_entity_type VARCHAR2(32767);
2263: l_cont_flag VARCHAR2(32767);
2264: l_container_name VARCHAR2(32767);
2265: l_delivery_flag VARCHAR2(32767);
2266: l_cont_instance_id NUMBER;
2267:
2268:
2269: -- Variables for cycle_count
2270: l_bo_rows WSH_UTIL_CORE.Id_Tab_Type;
2271: l_bo_qtys WSH_UTIL_CORE.Id_Tab_Type;
2272: l_req_qtys WSH_UTIL_CORE.Id_Tab_Type;
2273: l_bo_qtys2 WSH_UTIL_CORE.Id_Tab_Type;
2274: l_overpick_qtys WSH_UTIL_CORE.Id_Tab_Type;
2267:
2268:
2269: -- Variables for cycle_count
2270: l_bo_rows WSH_UTIL_CORE.Id_Tab_Type;
2271: l_bo_qtys WSH_UTIL_CORE.Id_Tab_Type;
2272: l_req_qtys WSH_UTIL_CORE.Id_Tab_Type;
2273: l_bo_qtys2 WSH_UTIL_CORE.Id_Tab_Type;
2274: l_overpick_qtys WSH_UTIL_CORE.Id_Tab_Type;
2275: l_overpick_qtys2 WSH_UTIL_CORE.Id_Tab_Type;
2268:
2269: -- Variables for cycle_count
2270: l_bo_rows WSH_UTIL_CORE.Id_Tab_Type;
2271: l_bo_qtys WSH_UTIL_CORE.Id_Tab_Type;
2272: l_req_qtys WSH_UTIL_CORE.Id_Tab_Type;
2273: l_bo_qtys2 WSH_UTIL_CORE.Id_Tab_Type;
2274: l_overpick_qtys WSH_UTIL_CORE.Id_Tab_Type;
2275: l_overpick_qtys2 WSH_UTIL_CORE.Id_Tab_Type;
2276: l_sources WSH_UTIL_CORE.Column_Tab_Type; -- RTV BO Cons Changes
2269: -- Variables for cycle_count
2270: l_bo_rows WSH_UTIL_CORE.Id_Tab_Type;
2271: l_bo_qtys WSH_UTIL_CORE.Id_Tab_Type;
2272: l_req_qtys WSH_UTIL_CORE.Id_Tab_Type;
2273: l_bo_qtys2 WSH_UTIL_CORE.Id_Tab_Type;
2274: l_overpick_qtys WSH_UTIL_CORE.Id_Tab_Type;
2275: l_overpick_qtys2 WSH_UTIL_CORE.Id_Tab_Type;
2276: l_sources WSH_UTIL_CORE.Column_Tab_Type; -- RTV BO Cons Changes
2277:
2270: l_bo_rows WSH_UTIL_CORE.Id_Tab_Type;
2271: l_bo_qtys WSH_UTIL_CORE.Id_Tab_Type;
2272: l_req_qtys WSH_UTIL_CORE.Id_Tab_Type;
2273: l_bo_qtys2 WSH_UTIL_CORE.Id_Tab_Type;
2274: l_overpick_qtys WSH_UTIL_CORE.Id_Tab_Type;
2275: l_overpick_qtys2 WSH_UTIL_CORE.Id_Tab_Type;
2276: l_sources WSH_UTIL_CORE.Column_Tab_Type; -- RTV BO Cons Changes
2277:
2278: --
2271: l_bo_qtys WSH_UTIL_CORE.Id_Tab_Type;
2272: l_req_qtys WSH_UTIL_CORE.Id_Tab_Type;
2273: l_bo_qtys2 WSH_UTIL_CORE.Id_Tab_Type;
2274: l_overpick_qtys WSH_UTIL_CORE.Id_Tab_Type;
2275: l_overpick_qtys2 WSH_UTIL_CORE.Id_Tab_Type;
2276: l_sources WSH_UTIL_CORE.Column_Tab_Type; -- RTV BO Cons Changes
2277:
2278: --
2279: l_released_status VARCHAR2(32767);
2272: l_req_qtys WSH_UTIL_CORE.Id_Tab_Type;
2273: l_bo_qtys2 WSH_UTIL_CORE.Id_Tab_Type;
2274: l_overpick_qtys WSH_UTIL_CORE.Id_Tab_Type;
2275: l_overpick_qtys2 WSH_UTIL_CORE.Id_Tab_Type;
2276: l_sources WSH_UTIL_CORE.Column_Tab_Type; -- RTV BO Cons Changes
2277:
2278: --
2279: l_released_status VARCHAR2(32767);
2280: l_line_direction VARCHAR2(32767);
2297: l_manual_split VARCHAR2(1);
2298: l_converted_flag VARCHAR2(1); -- HW OPM
2299:
2300: --
2301: l_validation_level_tab WSH_UTIL_CORE.Id_Tab_Type;
2302: l_id_tab WSH_UTIL_CORE.Id_Tab_Type;
2303: l_dummy_ids WSH_UTIL_CORE.Id_Tab_Type;
2304: l_request_ids WSH_UTIL_CORE.Id_Tab_Type;
2305: l_valid_ids WSH_UTIL_CORE.Id_Tab_Type;
2298: l_converted_flag VARCHAR2(1); -- HW OPM
2299:
2300: --
2301: l_validation_level_tab WSH_UTIL_CORE.Id_Tab_Type;
2302: l_id_tab WSH_UTIL_CORE.Id_Tab_Type;
2303: l_dummy_ids WSH_UTIL_CORE.Id_Tab_Type;
2304: l_request_ids WSH_UTIL_CORE.Id_Tab_Type;
2305: l_valid_ids WSH_UTIL_CORE.Id_Tab_Type;
2306: l_error_ids WSH_UTIL_CORE.Id_Tab_Type;
2299:
2300: --
2301: l_validation_level_tab WSH_UTIL_CORE.Id_Tab_Type;
2302: l_id_tab WSH_UTIL_CORE.Id_Tab_Type;
2303: l_dummy_ids WSH_UTIL_CORE.Id_Tab_Type;
2304: l_request_ids WSH_UTIL_CORE.Id_Tab_Type;
2305: l_valid_ids WSH_UTIL_CORE.Id_Tab_Type;
2306: l_error_ids WSH_UTIL_CORE.Id_Tab_Type;
2307: l_valid_index_tab WSH_UTIL_CORE.Id_Tab_Type;
2300: --
2301: l_validation_level_tab WSH_UTIL_CORE.Id_Tab_Type;
2302: l_id_tab WSH_UTIL_CORE.Id_Tab_Type;
2303: l_dummy_ids WSH_UTIL_CORE.Id_Tab_Type;
2304: l_request_ids WSH_UTIL_CORE.Id_Tab_Type;
2305: l_valid_ids WSH_UTIL_CORE.Id_Tab_Type;
2306: l_error_ids WSH_UTIL_CORE.Id_Tab_Type;
2307: l_valid_index_tab WSH_UTIL_CORE.Id_Tab_Type;
2308: l_valid_ids_tab WSH_UTIL_CORE.Id_Tab_Type;
2301: l_validation_level_tab WSH_UTIL_CORE.Id_Tab_Type;
2302: l_id_tab WSH_UTIL_CORE.Id_Tab_Type;
2303: l_dummy_ids WSH_UTIL_CORE.Id_Tab_Type;
2304: l_request_ids WSH_UTIL_CORE.Id_Tab_Type;
2305: l_valid_ids WSH_UTIL_CORE.Id_Tab_Type;
2306: l_error_ids WSH_UTIL_CORE.Id_Tab_Type;
2307: l_valid_index_tab WSH_UTIL_CORE.Id_Tab_Type;
2308: l_valid_ids_tab WSH_UTIL_CORE.Id_Tab_Type;
2309: --
2302: l_id_tab WSH_UTIL_CORE.Id_Tab_Type;
2303: l_dummy_ids WSH_UTIL_CORE.Id_Tab_Type;
2304: l_request_ids WSH_UTIL_CORE.Id_Tab_Type;
2305: l_valid_ids WSH_UTIL_CORE.Id_Tab_Type;
2306: l_error_ids WSH_UTIL_CORE.Id_Tab_Type;
2307: l_valid_index_tab WSH_UTIL_CORE.Id_Tab_Type;
2308: l_valid_ids_tab WSH_UTIL_CORE.Id_Tab_Type;
2309: --
2310: --anxsharm for load tender
2303: l_dummy_ids WSH_UTIL_CORE.Id_Tab_Type;
2304: l_request_ids WSH_UTIL_CORE.Id_Tab_Type;
2305: l_valid_ids WSH_UTIL_CORE.Id_Tab_Type;
2306: l_error_ids WSH_UTIL_CORE.Id_Tab_Type;
2307: l_valid_index_tab WSH_UTIL_CORE.Id_Tab_Type;
2308: l_valid_ids_tab WSH_UTIL_CORE.Id_Tab_Type;
2309: --
2310: --anxsharm for load tender
2311: l_trip_id_tab WSH_UTIL_CORE.Id_Tab_Type;
2304: l_request_ids WSH_UTIL_CORE.Id_Tab_Type;
2305: l_valid_ids WSH_UTIL_CORE.Id_Tab_Type;
2306: l_error_ids WSH_UTIL_CORE.Id_Tab_Type;
2307: l_valid_index_tab WSH_UTIL_CORE.Id_Tab_Type;
2308: l_valid_ids_tab WSH_UTIL_CORE.Id_Tab_Type;
2309: --
2310: --anxsharm for load tender
2311: l_trip_id_tab WSH_UTIL_CORE.Id_Tab_Type;
2312:
2307: l_valid_index_tab WSH_UTIL_CORE.Id_Tab_Type;
2308: l_valid_ids_tab WSH_UTIL_CORE.Id_Tab_Type;
2309: --
2310: --anxsharm for load tender
2311: l_trip_id_tab WSH_UTIL_CORE.Id_Tab_Type;
2312:
2313: l_dlvy_organization_id NUMBER;
2314: l_dlvy_status_code VARCHAR2(32767);
2315: l_dlvy_planned_flag VARCHAR2(32767);
2316: l_dlvy_shipment_direction VARCHAR2(30);
2317: --
2318: l_detail_rec_tab WSH_DETAILS_VALIDATIONS.detail_rec_tab_type;
2319: l_dlvy_rec_tab WSH_DELIVERY_VALIDATIONS.dlvy_rec_tab_type;
2320: l_det_id_tab WSH_UTIL_CORE.ID_TAB_TYPE;
2321: l_detail_group_params wsh_delivery_autocreate.grp_attr_rec_type;
2322:
2323: l_attr_tab wsh_delivery_autocreate.grp_attr_tab_type;
2324: l_group_info wsh_delivery_autocreate.grp_attr_tab_type;
2323: l_attr_tab wsh_delivery_autocreate.grp_attr_tab_type;
2324: l_group_info wsh_delivery_autocreate.grp_attr_tab_type;
2325: l_action_rec wsh_delivery_autocreate.action_rec_type;
2326: l_target_rec wsh_delivery_autocreate.grp_attr_rec_type;
2327: l_matched_entities wsh_util_core.id_tab_type;
2328: l_out_rec wsh_delivery_autocreate.out_rec_type;
2329:
2330: -- Consolidation of BO Delivery details project
2331: l_line_ids WSH_UTIL_CORE.Id_Tab_Type;
2327: l_matched_entities wsh_util_core.id_tab_type;
2328: l_out_rec wsh_delivery_autocreate.out_rec_type;
2329:
2330: -- Consolidation of BO Delivery details project
2331: l_line_ids WSH_UTIL_CORE.Id_Tab_Type;
2332: l_cons_flags WSH_UTIL_CORE.Column_Tab_Type;
2333: l_global_param_rec WSH_SHIPPING_PARAMS_PVT.Global_Parameters_Rec_Typ;
2334:
2335: CURSOR det_cur(p_del_det_id NUMBER) IS
2328: l_out_rec wsh_delivery_autocreate.out_rec_type;
2329:
2330: -- Consolidation of BO Delivery details project
2331: l_line_ids WSH_UTIL_CORE.Id_Tab_Type;
2332: l_cons_flags WSH_UTIL_CORE.Column_Tab_Type;
2333: l_global_param_rec WSH_SHIPPING_PARAMS_PVT.Global_Parameters_Rec_Typ;
2334:
2335: CURSOR det_cur(p_del_det_id NUMBER) IS
2336: SELECT inventory_item_id
2394:
2395:
2396: b_cc_linefailed boolean;
2397: b_cc_groupidexists boolean;
2398: l_id_tab_temp wsh_util_core.id_tab_type;
2399: l_id_tab_t wsh_util_core.id_tab_type;
2400: l_cc_count_success NUMBER;
2401: l_cc_count_group_ids NUMBER;
2402: l_cc_count_rec NUMBER;
2395:
2396: b_cc_linefailed boolean;
2397: b_cc_groupidexists boolean;
2398: l_id_tab_temp wsh_util_core.id_tab_type;
2399: l_id_tab_t wsh_util_core.id_tab_type;
2400: l_cc_count_success NUMBER;
2401: l_cc_count_group_ids NUMBER;
2402: l_cc_count_rec NUMBER;
2403: l_cc_group_ids wsh_util_core.id_tab_type;
2399: l_id_tab_t wsh_util_core.id_tab_type;
2400: l_cc_count_success NUMBER;
2401: l_cc_count_group_ids NUMBER;
2402: l_cc_count_rec NUMBER;
2403: l_cc_group_ids wsh_util_core.id_tab_type;
2404:
2405: l_cc_upd_dlvy_intmed_ship_to VARCHAR2(1);
2406: l_cc_upd_dlvy_ship_method VARCHAR2(1);
2407: l_cc_dlvy_intmed_ship_to NUMBER;
2408: l_cc_dlvy_ship_method VARCHAR2(30);
2409:
2410: l_cc_count_del_rows NUMBER;
2411: l_num_errors NUMBER;
2412: l_cc_del_rows wsh_util_core.id_tab_type;
2413: l_cc_grouping_rows wsh_util_core.id_tab_type;
2414: l_cc_return_status VARCHAR2(1);
2415: l_trip_id NUMBER;
2416:
2409:
2410: l_cc_count_del_rows NUMBER;
2411: l_num_errors NUMBER;
2412: l_cc_del_rows wsh_util_core.id_tab_type;
2413: l_cc_grouping_rows wsh_util_core.id_tab_type;
2414: l_cc_return_status VARCHAR2(1);
2415: l_trip_id NUMBER;
2416:
2417: --dummy tables for calling validate_constraint_mainper
2418: l_cc_del_attr_tab WSH_NEW_DELIVERIES_PVT.Delivery_Attr_Tbl_Type;
2419: l_cc_det_attr_tab WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type;
2420: l_cc_trip_attr_tab WSH_TRIPS_PVT.Trip_Attr_Tbl_Type;
2421: l_cc_stop_attr_tab WSH_TRIP_STOPS_PVT.Stop_Attr_Tbl_Type;
2422: l_cc_in_ids wsh_util_core.id_tab_type;
2423: l_cc_fail_ids wsh_util_core.id_tab_type;
2424:
2425: l_delivery_detail_id NUMBER;
2426:
2419: l_cc_det_attr_tab WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type;
2420: l_cc_trip_attr_tab WSH_TRIPS_PVT.Trip_Attr_Tbl_Type;
2421: l_cc_stop_attr_tab WSH_TRIP_STOPS_PVT.Stop_Attr_Tbl_Type;
2422: l_cc_in_ids wsh_util_core.id_tab_type;
2423: l_cc_fail_ids wsh_util_core.id_tab_type;
2424:
2425: l_delivery_detail_id NUMBER;
2426:
2427: CURSOR c_delcur(p_dlvy_id NUMBER) IS
2433:
2434: l_action_code VARCHAR2(32767);
2435: --
2436: -- deliveryMerge
2437: l_delivery_ids wsh_util_core.id_tab_type;
2438: l_delivery_id NUMBER;
2439: l_delivery_already_included boolean;
2440: --
2441: --
2442: l_cnt NUMBER;
2443: l_action_prms WSH_GLBL_VAR_STRCT_GRP.dd_action_parameters_rec_type;
2444: --
2445:
2446: l_dummy_line_ids WSH_UTIL_CORE.Id_Tab_Type;
2447:
2448: e_end_of_api EXCEPTION;
2449: --dcp
2450: l_check_dcp NUMBER;
2472: --dcp
2473: <
2474:
2475: -- Bugfix 4070732
2476: IF WSH_UTIL_CORE.G_START_OF_SESSION_API is null
2477: THEN
2478: WSH_UTIL_CORE.G_START_OF_SESSION_API := l_api_session_name;
2479: WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API := FALSE;
2480: END IF;
2474:
2475: -- Bugfix 4070732
2476: IF WSH_UTIL_CORE.G_START_OF_SESSION_API is null
2477: THEN
2478: WSH_UTIL_CORE.G_START_OF_SESSION_API := l_api_session_name;
2479: WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API := FALSE;
2480: END IF;
2481: -- End of Code Bugfix 4070732
2482:
2475: -- Bugfix 4070732
2476: IF WSH_UTIL_CORE.G_START_OF_SESSION_API is null
2477: THEN
2478: WSH_UTIL_CORE.G_START_OF_SESSION_API := l_api_session_name;
2479: WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API := FALSE;
2480: END IF;
2481: -- End of Code Bugfix 4070732
2482:
2483: -- Standard Start of API savepoint
2523: END IF;
2524: END IF;
2525: --
2526: -- Initialize API return status to success
2527: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2528: l_number_of_errors := 0;
2529: l_number_of_warnings := 0;
2530:
2531: -- deliveryMerge
2534: -- Mandatory parameters check
2535: IF( p_action_prms.caller IS NULL) THEN
2536: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
2537: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'CALLER');
2538: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2539: IF l_debug_on THEN
2540: wsh_debug_sv.logmsg(l_module_name,'Null Caller');
2541: END IF;
2542: RAISE FND_API.G_EXC_ERROR;
2542: RAISE FND_API.G_EXC_ERROR;
2543: ELSIF(p_action_prms.action_code IS NULL) THEN
2544: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
2545: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'ACTION_CODE');
2546: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2547: IF l_debug_on THEN
2548: wsh_debug_sv.logmsg(l_module_name,'WSH_INVALID_ACTION_CODE');
2549: END IF;
2550: RAISE FND_API.G_EXC_ERROR;
2574: THEN
2575: --{
2576: l_action_prms := p_action_prms;
2577: --
2578: l_action_prms.caller := p_action_prms.caller || WSH_UTIL_CORE.C_SPLIT_DLVY_SUFFIX;
2579: l_action_prms.action_code := 'UNASSIGN';
2580: --
2581: Delivery_Detail_Action
2582: (
2592: x_action_out_rec => x_action_out_rec
2593: );
2594: --
2595: --
2596: wsh_util_core.api_post_call
2597: (
2598: p_return_status => l_return_status,
2599: x_num_warnings => l_number_of_warnings,
2600: x_num_errors => l_number_of_errors,
2601: p_msg_data => l_msg_data
2602: );
2603: --
2604: --
2605: l_action_prms.caller := p_action_prms.caller || WSH_UTIL_CORE.C_SPLIT_DLVY_SUFFIX;
2606: --
2607: --
2608: IF p_action_prms.delivery_id IS NULL
2609: AND p_action_prms.delivery_name IS NULL
2627: x_action_out_rec => x_action_out_rec
2628: );
2629: --
2630: --
2631: wsh_util_core.api_post_call
2632: (
2633: p_return_status => l_return_status,
2634: x_num_warnings => l_number_of_warnings,
2635: x_num_errors => l_number_of_errors,
2659: );
2660:
2661: --
2662: IF l_debug_on THEN
2663: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2664: END IF;
2665: --
2666: wsh_util_core.api_post_call(
2667: p_return_status => l_return_status,
2662: IF l_debug_on THEN
2663: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2664: END IF;
2665: --
2666: wsh_util_core.api_post_call(
2667: p_return_status => l_return_status,
2668: x_num_warnings => l_number_of_warnings,
2669: x_num_errors => l_number_of_errors,
2670: p_msg_data => l_msg_data
2726: wsh_debug_sv.log(l_module_name,'Is_Action_Enabled returns',
2727: l_return_status);
2728: END IF;
2729: --
2730: wsh_util_core.api_post_call(
2731: p_return_status => l_return_status,
2732: x_num_warnings => l_number_of_warnings,
2733: x_num_errors => l_number_of_errors,
2734: p_msg_data => l_msg_data,
2739: IF(l_number_of_errors >0 ) THEN
2740: --{
2741: IF p_action_prms.caller = 'WSH_FSTRX' THEN
2742: FND_MESSAGE.SET_NAME('WSH', 'WSH_DISABLE_ACTION');
2743: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2744: END IF;
2745: --
2746: IF l_debug_on THEN
2747: wsh_debug_sv.logmsg(l_module_name, 'WSH_DISABLE_ACTION');
2766: IF del_cur%NOTFOUND THEN
2767: CLOSE del_cur;
2768: FND_MESSAGE.SET_NAME('WSH', 'WSH_INVALID_DELIVERY');
2769: FND_MESSAGE.SET_TOKEN('DELIVERY', p_action_prms.delivery_id);
2770: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2771: IF l_debug_on THEN
2772: wsh_debug_sv.logmsg(l_module_name, 'Delivery does not exist');
2773: END IF;
2774: RAISE FND_API.G_EXC_ERROR;
2776: CLOSE del_cur;
2777: ELSE
2778: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
2779: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'DELIVERY_ID');
2780: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2781: IF l_debug_on THEN
2782: wsh_debug_sv.logmsg(l_module_name, 'Null Delivery Id');
2783: END IF;
2784: RAISE FND_API.G_EXC_ERROR;
2812: x_error_ids => l_error_ids,
2813: x_valid_index_tab => l_valid_index_tab
2814: );
2815: --
2816: wsh_util_core.api_post_call(
2817: p_return_status => l_return_status,
2818: x_num_warnings => l_number_of_warnings,
2819: x_num_errors => l_number_of_errors,
2820: p_msg_data => l_msg_data,
2850:
2851: x_action_out_rec.valid_id_tab := l_valid_ids_tab;
2852:
2853: --
2854: wsh_util_core.api_post_call(
2855: p_return_status => l_return_status,
2856: x_num_warnings => l_number_of_warnings,
2857: x_num_errors => l_number_of_errors,
2858: p_msg_data => l_msg_data,
2863:
2864: --
2865: IF(l_number_of_errors >0 ) THEN
2866: FND_MESSAGE.SET_NAME('WSH', 'WSH_DISABLE_ACTION');
2867: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2868: IF l_debug_on THEN
2869: wsh_debug_sv.logmsg(l_module_name, 'WSH_DISABLE_ACTION');
2870: END IF;
2871: RAISE FND_API.G_EXC_ERROR;
2873: --
2874: IF l_number_of_warnings > 0 THEN
2875:
2876: FND_MESSAGE.SET_NAME('WSH', 'WSH_DISABLE_ACTION_WARN');
2877: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2878: IF l_debug_on THEN
2879: wsh_debug_sv.logmsg(l_module_name, 'WSH_DISABLE_ACTION_WARN');
2880: END IF;
2881:
2880: END IF;
2881:
2882: IF(p_action_prms.caller = 'WSH_FSTRX') THEN
2883: x_action_out_rec.selection_issue_flag := 'Y';
2884: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
2885: ELSE
2886: IF l_debug_on THEN
2887: wsh_debug_sv.log(l_module_name,'Number of warnings', l_number_of_warnings);
2888: END IF;
2898: -- Autocreate trip calls autocreate del and then autocreate trip so the constraint validation
2899: -- will be done at that point (in private API)
2900: -- actions PACK, AUTO-PACK, AUTO-PACK-MASTER only post-I (constraints for these have not been implemented yet)
2901:
2902: IF wsh_util_core.fte_is_installed = 'Y' THEN
2903:
2904: WSH_FTE_COMP_CONSTRAINT_PKG.validate_constraint_main(
2905: p_api_version_number => 1.0,
2906: p_init_msg_list => FND_API.G_FALSE,
2931: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
2932: END IF;
2933: --
2934:
2935: IF l_return_status=wsh_util_core.g_ret_sts_error THEN
2936: --fix p_rec_attr_tab to have only successful records
2937: l_cc_count_success:=1;
2938:
2939: IF l_debug_on THEN
2943: IF l_cc_failed_records.COUNT>0 AND p_rec_attr_tab.COUNT>0 THEN
2944:
2945: --set return_status as warning
2946: IF l_cc_failed_records.COUNT<>p_rec_attr_tab.COUNT THEN
2947: l_return_status:=wsh_util_core.g_ret_sts_warning;
2948: END IF;
2949:
2950: FOR i in p_rec_attr_tab.FIRST..p_rec_attr_tab.LAST LOOP
2951: b_cc_linefailed:=FALSE;
2953: IF (p_rec_attr_tab(i).delivery_detail_id=l_cc_failed_records(j).entity_line_id) THEN
2954: b_cc_linefailed:=TRUE;
2955: FND_MESSAGE.SET_NAME('WSH','WSH_DELDET_COMP_FAILED');
2956: FND_MESSAGE.SET_TOKEN('DELDET_ID',l_cc_failed_records(j).entity_line_id);
2957: wsh_util_core.add_message(l_return_status);
2958: END IF;
2959: END LOOP;
2960: IF (NOT(b_cc_linefailed)) THEN
2961: l_id_tab_t(l_cc_count_success):=p_rec_attr_tab(i).delivery_detail_id;
2966: --bsadri for assign, if one line fails, then fail all lines {
2967: IF l_action_code = 'ASSIGN'
2968: AND l_cc_failed_records.COUNT > 0 THEN
2969: l_id_tab_t.DELETE;
2970: l_return_status := wsh_util_core.g_ret_sts_error;
2971: END IF;
2972: --}
2973:
2974: IF l_id_tab_t.COUNT>0 THEN
2976: ELSE
2977: IF l_debug_on THEN
2978: wsh_debug_sv.logmsg(l_module_name,'all lines errored in compatibility check');
2979: END IF;
2980: wsh_util_core.api_post_call(
2981: p_return_status => l_return_status,
2982: x_num_warnings => l_number_of_warnings,
2983: x_num_errors => l_num_errors,
2984: p_msg_data => l_msg_data);
2989: END IF;
2990:
2991: END IF;
2992:
2993: ELSIF l_return_status=wsh_util_core.g_ret_sts_unexp_error THEN
2994: wsh_util_core.api_post_call(
2995: p_return_status => l_return_status,
2996: x_num_warnings => l_number_of_warnings,
2997: x_num_errors => l_num_errors,
2990:
2991: END IF;
2992:
2993: ELSIF l_return_status=wsh_util_core.g_ret_sts_unexp_error THEN
2994: wsh_util_core.api_post_call(
2995: p_return_status => l_return_status,
2996: x_num_warnings => l_number_of_warnings,
2997: x_num_errors => l_num_errors,
2998: p_msg_data => l_msg_data);
2997: x_num_errors => l_num_errors,
2998: p_msg_data => l_msg_data);
2999: END IF;
3000:
3001: wsh_util_core.api_post_call(
3002: p_return_status => l_return_status,
3003: x_num_warnings => l_number_of_warnings,
3004: x_num_errors => l_num_errors,
3005: p_msg_data => l_msg_data,
3045: p_released_status => l_released_status)
3046: ) THEN
3047: FND_MESSAGE.SET_NAME('WSH', 'WSH_OPM_LOT_INDIVISIBLE');
3048: IF p_action_prms.caller = 'WSH_FSTRX' THEN
3049: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3050: END IF;
3051: RAISE FND_API.G_EXC_ERROR;
3052: END IF;
3053: END IF; -- Added for bug 15885718
3073:
3074: IF p_action_prms.action_code IN('SPLIT-LINE', 'CYCLE-COUNT', 'PICK-RELEASE-UI', 'RESOLVE-EXCEPTIONS-UI') THEN
3075: IF(p_rec_attr_tab.count > 1) THEN
3076: FND_MESSAGE.SET_NAME('WSH','WSH_UI_MULTI_SELECTION');
3077: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3078: IF l_debug_on THEN
3079: wsh_debug_sv.logmsg(l_module_name,'WSH_UI_MULTI_SELECTION');
3080: END IF;
3081: RAISE FND_API.G_EXC_ERROR;
3103: IF l_debug_on THEN
3104: WSH_DEBUG_SV.log(l_module_name, 'return status after calling check_assign_del_multi', l_return_status);
3105: WSH_DEBUG_SV.log(l_module_name, 'group id', l_detail_group_params.group_id);
3106: END IF;
3107: wsh_util_core.api_post_call(
3108: p_return_status => l_return_status,
3109: x_num_warnings => l_number_of_warnings,
3110: x_num_errors => l_number_of_errors,
3111: p_msg_data => l_msg_data
3129: x_matched_entities => l_matched_entities,
3130: x_out_rec => l_out_rec,
3131: x_return_status => l_return_status);
3132:
3133: wsh_util_core.api_post_call(
3134: p_return_status => l_return_status,
3135: x_num_warnings => l_number_of_warnings,
3136: x_num_errors => l_number_of_errors,
3137: p_msg_data => l_msg_data
3169: p_action_prms => p_action_prms);
3170:
3171:
3172: --
3173: wsh_util_core.api_post_call(
3174: p_return_status => l_return_status,
3175: x_num_warnings => l_number_of_warnings,
3176: x_num_errors => l_number_of_errors,
3177: p_msg_data => l_msg_data
3176: x_num_errors => l_number_of_errors,
3177: p_msg_data => l_msg_data
3178: );
3179:
3180: IF (l_return_status in (WSH_UTIL_CORE.G_RET_STS_SUCCESS, WSH_UTIL_CORE.G_RET_STS_WARNING)
3181: AND p_action_prms.action_code = 'ASSIGN' ) THEN
3182: IF l_debug_on THEN
3183: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.ASSIGN_DELIVERY_UPDATE',WSH_DEBUG_SV.C_PROC_LEVEL);
3184: END IF;
3187: p_delivery_id => p_action_prms.delivery_id,
3188: p_del_params => l_detail_group_params,
3189: x_return_status => l_return_status);
3190:
3191: wsh_util_core.api_post_call(
3192: p_return_status => l_return_status,
3193: x_num_warnings => l_number_of_warnings,
3194: x_num_errors => l_number_of_errors,
3195: p_msg_data => l_msg_data
3206: --
3207: --
3208: IF(nvl(p_action_prms.split_quantity,0) =0) THEN
3209: FND_MESSAGE.SET_NAME('WSH', 'WSH_NO_ZERO_NUM');
3210: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3211: IF l_debug_on THEN
3212: wsh_debug_sv.logmsg(l_module_name,'Zero or Null split quantity');
3213: END IF;
3214: RAISE FND_API.G_EXC_ERROR;
3261: x_msg_count => l_msg_count,
3262: x_msg_data => l_msg_data
3263: );
3264: --
3265: wsh_util_core.api_post_call(
3266: p_return_status => l_return_status,
3267: x_num_warnings => l_number_of_warnings,
3268: x_num_errors => l_number_of_errors,
3269: p_msg_data => l_msg_data
3305: x_action_out_rec.split_quantity := l_split_quantity;
3306: x_action_out_rec.split_quantity2 := l_split_quantity2;
3307:
3308: --
3309: wsh_util_core.api_post_call(
3310: p_return_status => l_return_status,
3311: x_num_warnings => l_number_of_warnings,
3312: x_num_errors => l_number_of_errors,
3313: p_msg_data => l_msg_data
3320: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_GRP.AUTOCREATE_DELIVERIES',WSH_DEBUG_SV.C_PROC_LEVEL);
3321: END IF;
3322: --
3323: --Compatibility Changes
3324: IF wsh_util_core.fte_is_installed = 'Y' AND l_cc_line_groups.COUNT>0 THEN
3325:
3326: --1. get the group ids by which the constraints API has grouped the lines
3327: l_cc_count_group_ids:=1;
3328: FOR i in l_cc_line_groups.FIRST..l_cc_line_groups.LAST LOOP
3428: END LOOP;
3429: END IF;
3430: END IF;
3431:
3432: IF (l_cc_return_status is not null AND l_cc_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3433: l_return_status:=l_cc_return_status;
3434: ELSIF (l_cc_return_status is not null AND l_cc_return_status=WSH_UTIL_CORE.G_RET_STS_WARNING AND l_return_status=WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3435: l_return_status:=l_cc_return_status;
3436: ELSE
3430: END IF;
3431:
3432: IF (l_cc_return_status is not null AND l_cc_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3433: l_return_status:=l_cc_return_status;
3434: ELSIF (l_cc_return_status is not null AND l_cc_return_status=WSH_UTIL_CORE.G_RET_STS_WARNING AND l_return_status=WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3435: l_return_status:=l_cc_return_status;
3436: ELSE
3437: l_cc_return_status:=l_return_status;
3438: END IF;
3467: wsh_debug_sv.log(l_module_name,'Return Status After Calling Autocreate_Deliveries',l_return_status);
3468: END IF;
3469:
3470: --
3471: wsh_util_core.api_post_call(
3472: p_return_status => l_return_status,
3473: x_num_warnings => l_number_of_warnings,
3474: x_num_errors => l_number_of_errors,
3475: p_msg_data => l_msg_data
3482: p_force_appending_limit => 'N',
3483: p_call_lcss => 'Y',
3484: x_return_status => l_return_status);
3485:
3486: wsh_util_core.api_post_call(
3487: p_return_status => l_return_status,
3488: x_num_warnings => l_number_of_warnings,
3489: x_num_errors => l_number_of_errors,
3490: p_msg_data => l_msg_data
3507: x_del_rows => x_action_out_rec.delivery_id_tab,
3508: x_trip_rows => x_action_out_rec.result_id_tab);
3509:
3510: --
3511: wsh_util_core.api_post_call(
3512: p_return_status => l_return_status,
3513: x_num_warnings => l_number_of_warnings,
3514: x_num_errors => l_number_of_errors,
3515: p_msg_data => l_msg_data
3525: IF l_debug_on THEN
3526: wsh_debug_sv.log(l_module_name,'Return Status After Calling change_ignoreplan_status ',l_return_status);
3527: END IF;
3528: --
3529: wsh_util_core.api_post_call(
3530: p_return_status => l_return_status,
3531: x_num_warnings => l_number_of_warnings,
3532: x_num_errors => l_number_of_errors);
3533: --
3552: x_request_ids => l_request_ids,
3553: x_return_status => l_return_status);
3554:
3555: --
3556: wsh_util_core.api_post_call(
3557: p_return_status => l_return_status,
3558: x_num_warnings => l_number_of_warnings,
3559: x_num_errors => l_number_of_errors,
3560: p_msg_data => l_msg_data
3579: x_return_status => l_return_status,
3580: p_auto_pack_ship => 'PS');
3581:
3582: --
3583: wsh_util_core.api_post_call(
3584: p_return_status => l_return_status,
3585: x_num_warnings => l_number_of_warnings,
3586: x_num_errors => l_number_of_errors,
3587: p_msg_data => l_msg_data
3606: x_return_status => l_return_status,
3607: p_auto_pack_ship => 'SC');
3608:
3609: --
3610: wsh_util_core.api_post_call(
3611: p_return_status => l_return_status,
3612: x_num_warnings => l_number_of_warnings,
3613: x_num_errors => l_number_of_errors,
3614: p_msg_data => l_msg_data
3621: -- This change was introduced to mark the G_RESET_WV flag
3622: -- before calling detail_weight_volume so the procedure will know
3623: -- to invoke update tms_interface_flag process.
3624:
3625: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;
3626: IF l_gc3_is_installed IS NULL THEN
3627: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
3628: END IF;
3629:
3623: -- to invoke update tms_interface_flag process.
3624:
3625: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;
3626: IF l_gc3_is_installed IS NULL THEN
3627: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
3628: END IF;
3629:
3630: IF l_gc3_is_installed = 'Y' THEN
3631: WSH_WV_UTILS.G_RESET_WV := 'Y'; -- set to Y to enable the update
3641: p_override_flag => 'Y', -- Need to see if we can Use p_action_prms.wv_override_flag
3642: x_return_status => l_return_status);
3643:
3644: --
3645: wsh_util_core.api_post_call(
3646: p_return_status => l_return_status,
3647: x_num_warnings => l_number_of_warnings,
3648: x_num_errors => l_number_of_errors,
3649: p_msg_data => l_msg_data
3685: p_action_code => 'PACK',
3686: p_caller => p_action_prms.caller);
3687:
3688: --
3689: wsh_util_core.api_post_call(
3690: p_return_status => l_return_status,
3691: x_num_warnings => l_number_of_warnings,
3692: x_num_errors => l_number_of_errors,
3693: p_msg_data => l_msg_data
3733: WSH_DEBUG_SV.log(l_module_name,'Adjust_Planned_Flag returns ',l_return_status);
3734: END IF;
3735: END IF;
3736:
3737: wsh_util_core.api_post_call(
3738: p_return_status => l_return_status,
3739: x_num_warnings => l_number_of_warnings,
3740: x_num_errors => l_number_of_errors,
3741: p_msg_data => l_msg_data
3764: p_pack_cont_flag => 'N' ,
3765: x_cont_inst_tab => x_action_out_rec.result_id_tab);
3766:
3767: --
3768: wsh_util_core.api_post_call(
3769: p_return_status => l_return_status,
3770: x_num_warnings => l_number_of_warnings,
3771: x_num_errors => l_number_of_errors,
3772: p_msg_data => l_msg_data
3798: x_cont_inst_tab => x_action_out_rec.result_id_tab);
3799:
3800: -- Handle return status
3801: --
3802: wsh_util_core.api_post_call(
3803: p_return_status => l_return_status,
3804: x_num_warnings => l_number_of_warnings,
3805: x_num_errors => l_number_of_errors,
3806: p_msg_data => l_msg_data
3860: p_action_code => 'UNPACK',
3861: p_caller => p_action_prms.caller);
3862:
3863: --
3864: wsh_util_core.api_post_call(
3865: p_return_status => l_return_status,
3866: x_num_warnings => l_number_of_warnings,
3867: x_num_errors => l_number_of_errors,
3868: p_msg_data => l_msg_data
3881: WSH_DEBUG_SV.log(l_module_name,'Adjust_Planned_Flag returns ',l_return_status);
3882: END IF;
3883: END IF;
3884:
3885: wsh_util_core.api_post_call(
3886: p_return_status => l_return_status,
3887: x_num_warnings => l_number_of_warnings,
3888: x_num_errors => l_number_of_errors,
3889: p_msg_data => l_msg_data);
3925: IF l_debug_on THEN
3926: wsh_debug_sv.logmsg(l_module_name,'Incorrect Released status or incorrect quantities');
3927: END IF;
3928: fnd_message.set_name('WSH', 'WSH_CC_RSV_INSUFF');
3929: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3930: raise FND_API.G_EXC_ERROR;
3931: END IF;
3932: --
3933: --
3950: ) THEN
3951: FND_MESSAGE.SET_NAME('WSH', 'WSH_NO_PARTIAL_CYCLE_COUNT');
3952:
3953: IF p_action_prms.caller = 'WSH_FSTRX' THEN
3954: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3955: END IF;
3956: RAISE FND_API.G_EXC_ERROR;
3957: END IF;
3958:
3984: IF l_debug_on THEN
3985: wsh_debug_sv.logmsg(l_module_name,'Incorrect quantities');
3986: END IF;
3987: FND_MESSAGE.SET_NAME('WSH', 'WSH_DET_SPLIT_EXCEED');
3988: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3989: raise FND_API.G_EXC_ERROR;
3990:
3991: END IF;
3992:
4038: x_output_quantity => l_output_quantity,
4039: x_return_status => l_return_status);
4040:
4041: IF l_debug_on THEN
4042: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4043: END IF;
4044: --
4045:
4046: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
4042: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4043: END IF;
4044: --
4045:
4046: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
4047: raise FND_API.G_EXC_ERROR;
4048: END IF;
4049:
4050: --
4073: x_return_status => l_return_status);
4074:
4075: -- Handle return status
4076: -- set message if necessary
4077: wsh_util_core.api_post_call(
4078: p_return_status => l_return_status,
4079: x_num_warnings => l_number_of_warnings,
4080: x_num_errors => l_number_of_errors,
4081: p_msg_data => l_msg_data
4097: WSH_SHIPPING_PARAMS_PVT.Get_Global_Parameters(l_global_param_rec, l_return_status);
4098:
4099: -- Handle return status
4100: -- set message if necessary
4101: wsh_util_core.api_post_call(
4102: p_return_status => l_return_status,
4103: x_num_warnings => l_number_of_warnings,
4104: x_num_errors => l_number_of_errors,
4105: p_msg_data => l_msg_data
4130: ELSIF p_action_prms.action_code = 'DELETE' THEN
4131: --{
4132: IF l_debug_on THEN
4133: --{
4134: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Delete',WSH_DEBUG_SV.C_PROC_LEVEL);
4135: --}
4136: END IF;
4137: --
4138: WSH_UTIL_CORE.Delete(
4134: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Delete',WSH_DEBUG_SV.C_PROC_LEVEL);
4135: --}
4136: END IF;
4137: --
4138: WSH_UTIL_CORE.Delete(
4139: p_type => 'DLVB',
4140: p_rows => l_id_tab,
4141: x_return_status => l_return_status);
4142: --
4145: wsh_debug_sv.log(l_module_name,'Return Status After Calling Delete',l_return_status);
4146: --}
4147: END IF;
4148: --
4149: wsh_util_core.api_post_call(
4150: p_return_status => l_return_status,
4151: x_num_warnings => l_number_of_warnings,
4152: x_num_errors => l_number_of_errors);
4153:
4156: ELSE
4157: --
4158: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_ACTION_CODE');
4159: FND_MESSAGE.SET_TOKEN('ACT_CODE',p_action_prms.action_code );
4160: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
4161: IF l_debug_on THEN
4162: wsh_debug_sv.logmsg(l_module_name,'WSH_INVALID_ACTION_CODE');
4163: END IF;
4164: RAISE FND_API.G_EXC_ERROR;
4244: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
4245: END IF;
4246: --
4247: --
4248: WSH_UTIL_CORE.API_POST_CALL
4249: (
4250: p_return_status => l_return_status,
4251: x_num_warnings => l_number_of_warnings,
4252: x_num_errors => l_number_of_errors,
4261: IF l_number_of_warnings > 0 THEN
4262: IF l_debug_on THEN
4263: wsh_debug_sv.log (l_module_name,'Number of warnings', l_number_of_warnings);
4264: END IF;
4265: -- RAISE WSH_UTIL_CORE.G_EXC_WARNING;
4266: l1_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4267: ELSE
4268: l1_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4269: END IF;
4262: IF l_debug_on THEN
4263: wsh_debug_sv.log (l_module_name,'Number of warnings', l_number_of_warnings);
4264: END IF;
4265: -- RAISE WSH_UTIL_CORE.G_EXC_WARNING;
4266: l1_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4267: ELSE
4268: l1_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4269: END IF;
4270: --
4264: END IF;
4265: -- RAISE WSH_UTIL_CORE.G_EXC_WARNING;
4266: l1_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4267: ELSE
4268: l1_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4269: END IF;
4270: --
4271: -- Standard check of p_commit.
4272: IF FND_API.To_Boolean( p_commit ) THEN
4275: END IF;
4276: --
4277: -- Start code for Bugfix 4070732
4278: --
4279: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4280: IF l_debug_on THEN
4281: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4282: END IF;
4283:
4277: -- Start code for Bugfix 4070732
4278: --
4279: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4280: IF l_debug_on THEN
4281: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4282: END IF;
4283:
4284: l_reset_flags := FALSE;
4285: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
4281: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4282: END IF;
4283:
4284: l_reset_flags := FALSE;
4285: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
4286: x_return_status => l_return_status);
4287:
4288: IF l_debug_on THEN
4289: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4288: IF l_debug_on THEN
4289: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4290: END IF;
4291:
4292: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4293: l1_return_status := l_return_status;
4294: END IF;
4295:
4296: END IF;
4302: END IF;
4303:
4304: --bug 4070732
4305: --End of the API handling of calls to process_stops_for_load_tender
4306: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
4307: --{
4308: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4309: --{
4310:
4304: --bug 4070732
4305: --End of the API handling of calls to process_stops_for_load_tender
4306: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
4307: --{
4308: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4309: --{
4310:
4311: IF FND_API.To_Boolean( p_commit ) THEN
4312: IF l_debug_on THEN
4309: --{
4310:
4311: IF FND_API.To_Boolean( p_commit ) THEN
4312: IF l_debug_on THEN
4313: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4314: END IF;
4315:
4316: WSH_UTIL_CORE.reset_stops_for_load_tender(p_reset_flags => TRUE,
4317: x_return_status => l_return_status);
4312: IF l_debug_on THEN
4313: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4314: END IF;
4315:
4316: WSH_UTIL_CORE.reset_stops_for_load_tender(p_reset_flags => TRUE,
4317: x_return_status => l_return_status);
4318:
4319: ELSE
4320: IF l_debug_on THEN
4317: x_return_status => l_return_status);
4318:
4319: ELSE
4320: IF l_debug_on THEN
4321: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4322: END IF;
4323:
4324: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
4325: x_return_status => l_return_status);
4320: IF l_debug_on THEN
4321: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4322: END IF;
4323:
4324: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
4325: x_return_status => l_return_status);
4326:
4327: END IF;
4328:
4329: IF l_debug_on THEN
4330: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4331: END IF;
4332:
4333: IF l1_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
4334: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4335: IF l1_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
4336: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4337: l1_return_status := l_return_status;
4330: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4331: END IF;
4332:
4333: IF l1_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
4334: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4335: IF l1_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
4336: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4337: l1_return_status := l_return_status;
4338: END IF;
4331: END IF;
4332:
4333: IF l1_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
4334: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4335: IF l1_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
4336: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4337: l1_return_status := l_return_status;
4338: END IF;
4339: ELSE
4332:
4333: IF l1_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
4334: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4335: IF l1_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
4336: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4337: l1_return_status := l_return_status;
4338: END IF;
4339: ELSE
4340: l1_return_status := l_return_status;
4389: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
4390: END IF;
4391: --
4392: --
4393: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4394: x_return_status := l_return_status;
4395: END IF;
4396: --
4397: --}
4401: --
4402: --
4403: -- Start code for Bugfix 4070732
4404: --
4405: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
4406: THEN
4407: --{
4408: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4409: --{
4404: --
4405: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
4406: THEN
4407: --{
4408: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4409: --{
4410: IF l_debug_on THEN
4411: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4412: END IF;
4407: --{
4408: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4409: --{
4410: IF l_debug_on THEN
4411: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4412: END IF;
4413:
4414: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
4415: x_return_status => l_return_status);
4410: IF l_debug_on THEN
4411: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4412: END IF;
4413:
4414: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
4415: x_return_status => l_return_status);
4416:
4417: IF l_debug_on THEN
4418: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4417: IF l_debug_on THEN
4418: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4419: END IF;
4420:
4421: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4422: x_return_status := l_return_status;
4423: END IF;
4424: --}
4425: END IF;
4479: --
4480: --
4481: -- Start code for Bugfix 4070732
4482: --
4483: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
4484: THEN
4485: --{
4486: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4487: --{
4482: --
4483: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
4484: THEN
4485: --{
4486: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4487: --{
4488: IF l_debug_on THEN
4489: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4490: END IF;
4485: --{
4486: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4487: --{
4488: IF l_debug_on THEN
4489: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4490: END IF;
4491:
4492: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
4493: x_return_status => l_return_status);
4488: IF l_debug_on THEN
4489: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4490: END IF;
4491:
4492: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
4493: x_return_status => l_return_status);
4494:
4495: IF l_debug_on THEN
4496: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4514: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4515: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4516: END IF;
4517: --
4518: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4519: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4520: IF del_cur%ISOPEN THEN
4521: CLOSE del_cur;
4522: END IF;
4515: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4516: END IF;
4517: --
4518: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4519: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4520: IF del_cur%ISOPEN THEN
4521: CLOSE del_cur;
4522: END IF;
4523:
4543: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
4544: END IF;
4545: --
4546: --
4547: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR) and x_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4548: x_return_status := l_return_status;
4549: END IF;
4550: --
4551: --}
4555: --
4556: --
4557: -- Start code for Bugfix 4070732
4558: --
4559: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
4560: THEN
4561: --{
4562: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API)
4563: THEN
4558: --
4559: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
4560: THEN
4561: --{
4562: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API)
4563: THEN
4564: --{
4565: IF l_debug_on THEN
4566: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4562: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API)
4563: THEN
4564: --{
4565: IF l_debug_on THEN
4566: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4567: END IF;
4568:
4569: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
4570: x_return_status => l_return_status);
4565: IF l_debug_on THEN
4566: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4567: END IF;
4568:
4569: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
4570: x_return_status => l_return_status);
4571:
4572: IF l_debug_on THEN
4573: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4572: IF l_debug_on THEN
4573: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4574: END IF;
4575:
4576: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4577: x_return_status := l_return_status;
4578: END IF;
4579: --}
4580: END IF;
4590: p_encoded => FND_API.G_FALSE
4591: );
4592:
4593: IF l_debug_on THEN
4594: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4595: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4596: END IF;
4597: --
4598: WHEN OTHERS THEN
4591: );
4592:
4593: IF l_debug_on THEN
4594: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4595: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4596: END IF;
4597: --
4598: WHEN OTHERS THEN
4599: IF del_cur%ISOPEN THEN
4604: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4605: IF cycle_count_cur%ISOPEN THEN
4606: Close cycle_count_cur;
4607: END IF;
4608: wsh_util_core.add_message(x_return_status, l_module_name);
4609: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Delivery_Detail_Action');
4610: --
4611: -- K LPN CONV. rv
4612: --
4605: IF cycle_count_cur%ISOPEN THEN
4606: Close cycle_count_cur;
4607: END IF;
4608: wsh_util_core.add_message(x_return_status, l_module_name);
4609: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Delivery_Detail_Action');
4610: --
4611: -- K LPN CONV. rv
4612: --
4613: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
4637: --
4638: --
4639: -- Start code for Bugfix 4070732
4640: --
4641: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
4642: THEN
4643: --{
4644: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4645: --{
4640: --
4641: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
4642: THEN
4643: --{
4644: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4645: --{
4646: IF l_debug_on THEN
4647: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4648: END IF;
4643: --{
4644: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4645: --{
4646: IF l_debug_on THEN
4647: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4648: END IF;
4649:
4650: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
4651: x_return_status => l_return_status);
4646: IF l_debug_on THEN
4647: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4648: END IF;
4649:
4650: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
4651: x_return_status => l_return_status);
4652:
4653: IF l_debug_on THEN
4654: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4718: l_counter NUMBER := 0;
4719: l_index NUMBER;
4720:
4721: l_detail_info_tab WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type;
4722: l_valid_index_tab wsh_util_core.id_tab_type;
4723: l_delivery_id NUMBER;
4724: l_delivery_detail_rec WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Rec_Type;
4725: l_validation_tab wsh_util_core.id_tab_type;
4726: --
4721: l_detail_info_tab WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type;
4722: l_valid_index_tab wsh_util_core.id_tab_type;
4723: l_delivery_id NUMBER;
4724: l_delivery_detail_rec WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Rec_Type;
4725: l_validation_tab wsh_util_core.id_tab_type;
4726: --
4727: l_details_marked WSH_UTIL_CORE.Id_Tab_Type;
4728: l_dummy_ser_range_tab WSH_GLBL_VAR_STRCT_GRP.ddSerialRangeTabType;
4729: mark_reprice_error EXCEPTION;
4723: l_delivery_id NUMBER;
4724: l_delivery_detail_rec WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Rec_Type;
4725: l_validation_tab wsh_util_core.id_tab_type;
4726: --
4727: l_details_marked WSH_UTIL_CORE.Id_Tab_Type;
4728: l_dummy_ser_range_tab WSH_GLBL_VAR_STRCT_GRP.ddSerialRangeTabType;
4729: mark_reprice_error EXCEPTION;
4730:
4731: --
4734: FROM wsh_delivery_assignments_v wda
4735: WHERE wda.delivery_detail_id = p_detail_id;
4736:
4737: -- anxsharm for Load Tender
4738: l_detail_tender_tab wsh_util_core.id_tab_type;
4739: l_trip_id_tab wsh_util_core.id_tab_type;
4740:
4741: --
4742: l_debug_on BOOLEAN;
4735: WHERE wda.delivery_detail_id = p_detail_id;
4736:
4737: -- anxsharm for Load Tender
4738: l_detail_tender_tab wsh_util_core.id_tab_type;
4739: l_trip_id_tab wsh_util_core.id_tab_type;
4740:
4741: --
4742: l_debug_on BOOLEAN;
4743: --
4777: FND_MSG_PUB.initialize;
4778: END IF;
4779:
4780: -- Initialize API return status to success
4781: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4782: l_number_of_errors := 0;
4783: l_number_of_warnings := 0;
4784:
4785: /* Call the New Overloaded API */
4796: x_OUT_rec => x_out_rec,
4797: p_serial_range_tab => l_dummy_ser_range_tab
4798: );
4799:
4800: wsh_util_core.api_post_call(
4801: p_return_status =>l_return_status,
4802: x_num_warnings =>l_number_of_warnings,
4803: x_num_errors =>l_number_of_errors);
4804:
4805: IF l_number_of_warnings > 0 THEN
4806: IF l_debug_on THEN
4807: wsh_debug_sv.log(l_module_name,'Number of warnings', l_number_of_warnings);
4808: END IF;
4809: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
4810: END IF;
4811:
4812:
4813: -- Standard check of p_commit.
4860: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4861: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4862: END IF;
4863: --
4864: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4865: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4866: FND_MSG_PUB.Count_And_Get
4867: (
4868: p_count => x_msg_count,
4861: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4862: END IF;
4863: --
4864: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4865: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4866: FND_MSG_PUB.Count_And_Get
4867: (
4868: p_count => x_msg_count,
4869: p_data => x_msg_data,
4870: p_encoded => FND_API.G_FALSE
4871: );
4872: --
4873: IF l_debug_on THEN
4874: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4875: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4876: END IF;
4877: --
4878: WHEN mark_reprice_error then
4871: );
4872: --
4873: IF l_debug_on THEN
4874: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4875: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4876: END IF;
4877: --
4878: WHEN mark_reprice_error then
4879: FND_MESSAGE.Set_Name('WSH', 'WSH_REPRICE_REQUIRED_ERR');
4876: END IF;
4877: --
4878: WHEN mark_reprice_error then
4879: FND_MESSAGE.Set_Name('WSH', 'WSH_REPRICE_REQUIRED_ERR');
4880: wsh_util_core.add_message(x_return_status, l_module_name);
4881: x_return_status := l_return_status;
4882: FND_MSG_PUB.Count_And_Get
4883: (
4884: p_count => x_msg_count,
4895: --
4896: WHEN OTHERS THEN
4897: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP;
4898: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4899: wsh_util_core.add_message(x_return_status, l_module_name);
4900: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Create_Update_Delivery_Detail');
4901: FND_MSG_PUB.Count_And_Get
4902: (
4903: p_count => x_msg_count,
4896: WHEN OTHERS THEN
4897: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP;
4898: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4899: wsh_util_core.add_message(x_return_status, l_module_name);
4900: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Create_Update_Delivery_Detail');
4901: FND_MSG_PUB.Count_And_Get
4902: (
4903: p_count => x_msg_count,
4904: p_data => x_msg_data,
4920: -- lpn conv
4921: PROCEDURE Create_containers(
4922: p_detail_info_tab IN WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type ,
4923: p_detail_IN_rec IN WSH_GLBL_VAR_STRCT_GRP.detailInRecType,
4924: x_container_ids OUT NOCOPY WSH_UTIL_CORE.ID_TAB_TYPE,
4925: x_return_status OUT NOCOPY varchar2
4926: )
4927: IS
4928: l_debug_on BOOLEAN;
4950: l_name_suffix VARCHAR2(30);
4951: l_base_number NUMBER;
4952: l_base_number_dummy NUMBER;
4953: l_container_names WSH_GLBL_VAR_STRCT_GRP.v50_Tbl_Type;
4954: l_lpn_ids wsh_util_core.id_tab_type;
4955: i NUMBER;
4956: j NUMBER;
4957: l_orig_value varchar2(2);
4958: l_update_container_orig VARCHAR2(2) := WSH_WMS_LPN_GRP.g_update_to_container;
4959: -- bmso
4960: l_lpn_table WMS_Data_Type_Definitions_pub.LPNTableType;
4961: l_container_info_rec WSH_GLBL_VAR_STRCT_GRP.ContInfoRectype;
4962: l_container_rec WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Rec_Type;
4963: l_cont_dummy_tab WSH_UTIL_CORE.id_tab_type;
4964: l_del_assg_rec WSH_DELIVERY_DETAILS_PKG.Delivery_Assignments_Rec_Type;
4965: l_assignment_dummy_tab WSH_UTIL_CORE.id_tab_type;
4966: l_wms_enabled BOOLEAN;
4967: l_return_status VARCHAR2(2);
4961: l_container_info_rec WSH_GLBL_VAR_STRCT_GRP.ContInfoRectype;
4962: l_container_rec WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Rec_Type;
4963: l_cont_dummy_tab WSH_UTIL_CORE.id_tab_type;
4964: l_del_assg_rec WSH_DELIVERY_DETAILS_PKG.Delivery_Assignments_Rec_Type;
4965: l_assignment_dummy_tab WSH_UTIL_CORE.id_tab_type;
4966: l_wms_enabled BOOLEAN;
4967: l_return_status VARCHAR2(2);
4968: l_number_of_warnings NUMBER := 0;
4969: l_number_of_errors NUMBER := 0;
5043: --
5044: WSH_UTIL_VALIDATE.Validate_Org (l_organization_id,
5045: l_organization_code,
5046: l_return_status);
5047: IF l_return_status NOT IN ( wsh_util_core.g_ret_sts_success ,WSH_UTIL_CORE.G_RET_STS_WARNING)
5048: THEN
5049: fnd_message.set_name('WSH', 'WSH_OI_INVALID_ORG');
5050: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5051: END IF;
5046: l_return_status);
5047: IF l_return_status NOT IN ( wsh_util_core.g_ret_sts_success ,WSH_UTIL_CORE.G_RET_STS_WARNING)
5048: THEN
5049: fnd_message.set_name('WSH', 'WSH_OI_INVALID_ORG');
5050: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5051: END IF;
5052:
5053: wsh_util_core.api_post_call(
5054: p_return_status => l_return_status,
5049: fnd_message.set_name('WSH', 'WSH_OI_INVALID_ORG');
5050: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5051: END IF;
5052:
5053: wsh_util_core.api_post_call(
5054: p_return_status => l_return_status,
5055: x_num_warnings => l_number_of_warnings,
5056: x_num_errors => l_number_of_errors
5057: );
5076: l_wms_msg_count,
5077: l_wms_msg_data,
5078: l_organization_id);
5079:
5080: wsh_util_core.api_post_call(
5081: p_return_status => l_wms_return_status,
5082: x_num_warnings => l_number_of_warnings,
5083: x_num_errors => l_number_of_errors
5084: );
5091: IF (l_cont_item_id IS NULL
5092: AND l_cont_item_name IS NULL
5093: AND l_cont_item_seg.count = 0) then --{
5094: fnd_message.set_name('WSH', 'WSH_CONT_INVALID_ITEM');
5095: WSH_UTIL_CORE.ADD_MESSAGE(wsh_util_core.g_ret_sts_error, l_module_name);
5096: RAISE e_NO_INV_ITEM;
5097: ELSE --}{
5098: --
5099: WSH_UTIL_VALIDATE.Validate_Item
5102: p_organization_id => l_organization_id,
5103: p_seg_array => l_cont_item_seg,
5104: x_return_status => l_return_status,
5105: p_item_type => 'CONT_ITEM');
5106: IF l_return_status NOT IN ( WSH_UTIL_CORE.G_RET_STS_SUCCESS, WSH_UTIL_CORE.G_RET_STS_WARNING)
5107: THEN
5108: fnd_message.set_name('WSH', 'WSH_CONT_INVALID_ITEM');
5109: WSH_UTIL_CORE.ADD_MESSAGE(wsh_util_core.g_ret_sts_error, l_module_name);
5110: wsh_util_core.api_post_call(
5105: p_item_type => 'CONT_ITEM');
5106: IF l_return_status NOT IN ( WSH_UTIL_CORE.G_RET_STS_SUCCESS, WSH_UTIL_CORE.G_RET_STS_WARNING)
5107: THEN
5108: fnd_message.set_name('WSH', 'WSH_CONT_INVALID_ITEM');
5109: WSH_UTIL_CORE.ADD_MESSAGE(wsh_util_core.g_ret_sts_error, l_module_name);
5110: wsh_util_core.api_post_call(
5111: p_return_status => l_return_status,
5112: x_num_warnings => l_number_of_warnings,
5113: x_num_errors => l_number_of_errors
5106: IF l_return_status NOT IN ( WSH_UTIL_CORE.G_RET_STS_SUCCESS, WSH_UTIL_CORE.G_RET_STS_WARNING)
5107: THEN
5108: fnd_message.set_name('WSH', 'WSH_CONT_INVALID_ITEM');
5109: WSH_UTIL_CORE.ADD_MESSAGE(wsh_util_core.g_ret_sts_error, l_module_name);
5110: wsh_util_core.api_post_call(
5111: p_return_status => l_return_status,
5112: x_num_warnings => l_number_of_warnings,
5113: x_num_errors => l_number_of_errors
5114: );
5116: END IF; --}
5117: ELSE --}{
5118: fnd_message.set_name('WSH', 'WSH_INCORRECT_ORG');
5119: fnd_message.set_token('ORG_CODE', l_organization_code);
5120: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5121: RAISE FND_API.G_EXC_ERROR;
5122: END IF; -- wms_enabled }
5123: END IF; -- verify item}
5124: --
5134: IF l_debug_on THEN
5135: 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);
5136: END IF;
5137: FND_MESSAGE.SET_NAME('WSH', 'WSH_UCC128_ERROR'); --bmso new
5138: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5139: RAISE FND_API.G_EXC_ERROR;
5140: END IF;
5141:
5142: IF p_detail_IN_rec.ucc_128_suffix_flag = 1 THEN
5147: <> NVL(p_detail_IN_rec.name_prefix,0)
5148: OR TRUNC(NVL(p_detail_IN_rec.name_prefix,0)) < 0
5149: THEN
5150: FND_MESSAGE.SET_NAME('WSH', 'WSH_UCC128_PREFIX_ERR'); --bmso new
5151: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5152:
5153: END IF;
5154: EXCEPTION
5155: WHEN OTHERS THEN
5153: END IF;
5154: EXCEPTION
5155: WHEN OTHERS THEN
5156: FND_MESSAGE.SET_NAME('WSH', 'WSH_UCC128_PREFIX_ERR'); --bmso new
5157: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5158: END;
5159: ELSE
5160: l_suffix_length := NVL(LENGTH(p_detail_IN_rec.name_suffix),0);
5161: END IF;
5244:
5245: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5246: WSH_WMS_LPN_GRP.g_update_to_container := l_update_container_orig;
5247:
5248: wsh_util_core.api_post_call(
5249: p_return_status => l_return_status,
5250: x_num_warnings => l_number_of_warnings,
5251: x_num_errors => l_number_of_errors,
5252: p_msg_data => l_wms_msg_data
5271:
5272: IF l_container_info_rec.lpn_ids(j) IS NULL THEN
5273: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5274: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'LPN_ID');
5275: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5276: RAISE FND_API.G_EXC_ERROR;
5277:
5278: ELSIF l_container_info_rec.container_names(j) IS NULL THEN
5279: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5277:
5278: ELSIF l_container_info_rec.container_names(j) IS NULL THEN
5279: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5280: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'CONTAINER_NAME');
5281: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5282: RAISE FND_API.G_EXC_ERROR;
5283:
5284: END IF;
5285:
5320: p_quantity => p_detail_IN_rec.quantity,
5321: x_cont_names => l_container_info_rec.container_names,
5322: x_return_status => l_return_status
5323: );
5324: wsh_util_core.api_post_call(
5325: p_return_status => l_return_status,
5326: x_num_warnings => l_number_of_warnings,
5327: x_num_errors => l_number_of_errors
5328: );
5367: );
5368: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5369: WSH_WMS_LPN_GRP.g_update_to_container := l_update_container_orig;
5370:
5371: wsh_util_core.api_post_call(
5372: p_return_status => l_return_status,
5373: x_num_warnings => l_number_of_warnings,
5374: x_num_errors => l_number_of_errors,
5375: p_msg_data => l_wms_msg_data
5379:
5380: IF l_container_info_rec.lpn_ids(1) IS NULL THEN
5381: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5382: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'LPN_ID');
5383: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5384: RAISE FND_API.G_EXC_ERROR;
5385:
5386: ELSIF l_container_info_rec.container_names(1) IS NULL THEN
5387: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5385:
5386: ELSIF l_container_info_rec.container_names(1) IS NULL THEN
5387: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5388: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'CONTAINER_NAME');
5389: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5390: RAISE FND_API.G_EXC_ERROR;
5391:
5392: END IF;
5393:
5422: p_quantity => p_detail_IN_rec.quantity,
5423: x_cont_names => l_container_info_rec.container_names,
5424: x_return_status => l_return_status
5425: );
5426: wsh_util_core.api_post_call(
5427: p_return_status => l_return_status,
5428: x_num_warnings => l_number_of_warnings,
5429: x_num_errors => l_number_of_errors
5430: );
5436: wsh_container_actions.default_container_attr(l_container_rec,
5437: l_additional_cont_attr,
5438: p_detail_IN_rec.caller,
5439: l_return_status);
5440: wsh_util_core.api_post_call(
5441: p_return_status => l_return_status,
5442: x_num_warnings => l_number_of_warnings,
5443: x_num_errors => l_number_of_errors
5444: );
5450: x_dd_id_tab => l_cont_dummy_tab
5451: );
5452:
5453: IF l_return_status IN
5454: (WSH_UTIL_CORE.G_RET_STS_ERROR,
5455: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ) THEN
5456: --
5457: IF l_debug_on THEN
5458: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR CREATING CONTAINER');
5451: );
5452:
5453: IF l_return_status IN
5454: (WSH_UTIL_CORE.G_RET_STS_ERROR,
5455: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ) THEN
5456: --
5457: IF l_debug_on THEN
5458: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR CREATING CONTAINER');
5459: END IF;
5458: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR CREATING CONTAINER');
5459: END IF;
5460: --
5461: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
5462: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5463: RAISE FND_API.G_EXC_ERROR;
5464: END IF;
5465:
5466: IF l_debug_on THEN
5467: WSH_DEBUG_SV.log(l_module_name,'COUNT OF WDD RECORDS',
5468: l_cont_dummy_tab.count);
5469: END IF;
5470:
5471: wsh_util_core.api_post_call(
5472: p_return_status => l_return_status,
5473: x_num_warnings => l_number_of_warnings,
5474: x_num_errors => l_number_of_errors
5475: );
5487: l_assignment_dummy_tab.count);
5488: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
5489: END IF;
5490:
5491: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
5492: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5493: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
5494: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5495: RAISE FND_API.G_EXC_ERROR;
5488: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
5489: END IF;
5490:
5491: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
5492: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5493: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
5494: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5495: RAISE FND_API.G_EXC_ERROR;
5496: END IF;
5490:
5491: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
5492: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5493: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
5494: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5495: RAISE FND_API.G_EXC_ERROR;
5496: END IF;
5497:
5498:
5495: RAISE FND_API.G_EXC_ERROR;
5496: END IF;
5497:
5498:
5499: wsh_util_core.api_post_call(
5500: p_return_status => l_return_status,
5501: x_num_warnings => l_number_of_warnings,
5502: x_num_errors => l_number_of_errors
5503: );
5508: WHILE i IS NOT NULL LOOP --{
5509: IF p_detail_info_tab(i).organization_id IS NULL THEN --{
5510: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5511: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'ORGANIZATION_ID');
5512: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5513: IF l_debug_on THEN
5514: wsh_debug_sv.log(l_module_name,'ERROR organization id is null for', p_detail_info_tab(i).lpn_id);
5515: END IF;
5516:
5519: END IF; --}
5520: IF p_detail_info_tab(i).lpn_id IS NULL THEN
5521: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5522: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'LPN_ID');
5523: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5524: RAISE FND_API.G_EXC_ERROR;
5525:
5526: ELSIF p_detail_info_tab(i).container_name IS NULL THEN
5527: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5525:
5526: ELSIF p_detail_info_tab(i).container_name IS NULL THEN
5527: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5528: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'CONTAINER_NAME');
5529: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5530: RAISE FND_API.G_EXC_ERROR;
5531:
5532: END IF;
5533:
5548: wsh_container_actions.default_container_attr(l_container_rec,
5549: l_additional_cont_attr,
5550: p_detail_IN_rec.caller,
5551: l_return_status);
5552: wsh_util_core.api_post_call(
5553: p_return_status => l_return_status,
5554: x_num_warnings => l_number_of_warnings,
5555: x_num_errors => l_number_of_errors
5556: );
5562: x_dd_id_tab => l_cont_dummy_tab
5563: );
5564:
5565: IF l_return_status IN
5566: (WSH_UTIL_CORE.G_RET_STS_ERROR,
5567: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ) THEN
5568: --
5569: IF l_debug_on THEN
5570: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR CREATING CONTAINER');
5563: );
5564:
5565: IF l_return_status IN
5566: (WSH_UTIL_CORE.G_RET_STS_ERROR,
5567: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ) THEN
5568: --
5569: IF l_debug_on THEN
5570: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR CREATING CONTAINER');
5571: END IF;
5570: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR CREATING CONTAINER');
5571: END IF;
5572: --
5573: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
5574: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5575: RAISE FND_API.G_EXC_ERROR;
5576: END IF;
5577:
5578: IF l_debug_on THEN
5579: WSH_DEBUG_SV.log(l_module_name,'COUNT OF WDD RECORDS',
5580: l_cont_dummy_tab.count);
5581: END IF;
5582:
5583: wsh_util_core.api_post_call(
5584: p_return_status => l_return_status,
5585: x_num_warnings => l_number_of_warnings,
5586: x_num_errors => l_number_of_errors
5587: );
5599: l_assignment_dummy_tab.count);
5600: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
5601: END IF;
5602:
5603: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
5604: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5605: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
5606: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5607: RAISE FND_API.G_EXC_ERROR;
5600: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
5601: END IF;
5602:
5603: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
5604: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5605: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
5606: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5607: RAISE FND_API.G_EXC_ERROR;
5608: END IF;
5602:
5603: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
5604: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5605: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
5606: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5607: RAISE FND_API.G_EXC_ERROR;
5608: END IF;
5609: --
5610: wsh_util_core.api_post_call(
5606: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5607: RAISE FND_API.G_EXC_ERROR;
5608: END IF;
5609: --
5610: wsh_util_core.api_post_call(
5611: p_return_status => l_return_status,
5612: x_num_warnings => l_number_of_warnings,
5613: x_num_errors => l_number_of_errors
5614: );
5622: x_container_ids := l_cont_dummy_tab;
5623:
5624: IF l_number_of_errors > 0
5625: THEN
5626: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5627: ELSIF l_number_of_warnings > 0
5628: THEN
5629: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5630: ELSE
5625: THEN
5626: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5627: ELSIF l_number_of_warnings > 0
5628: THEN
5629: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5630: ELSE
5631: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5632: END IF;
5633:
5627: ELSIF l_number_of_warnings > 0
5628: THEN
5629: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5630: ELSE
5631: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5632: END IF;
5633:
5634: IF l_debug_on THEN
5635: WSH_DEBUG_SV.pop(l_module_name);
5640: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5641: WSH_WMS_LPN_GRP.g_update_to_container := l_update_container_orig;
5642:
5643: rollback to s_create_containers_DDGPB;
5644: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5645: IF l_debug_on THEN
5646: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:e_NO_INV_ITEM');
5647: END IF;
5648: WHEN e_lpn_count_invalid then
5649: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5650: WSH_WMS_LPN_GRP.g_update_to_container := l_update_container_orig;
5651:
5652: rollback to s_create_containers_DDGPB;
5653: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5654: fnd_message.set_name('WSH', 'WSH_LPN_COUNT_INVALID');
5655: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
5656: IF l_debug_on THEN
5657: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:e_lpn_count_invalid');
5651:
5652: rollback to s_create_containers_DDGPB;
5653: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5654: fnd_message.set_name('WSH', 'WSH_LPN_COUNT_INVALID');
5655: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
5656: IF l_debug_on THEN
5657: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:e_lpn_count_invalid');
5658: END IF;
5659: --
5684: WSH_DEBUG_SV.pop(l_module_name
5685: ,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
5686: END IF;
5687: --
5688: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
5689: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5690: WSH_WMS_LPN_GRP.g_update_to_container := l_update_container_orig;
5691:
5692: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5688: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
5689: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5690: WSH_WMS_LPN_GRP.g_update_to_container := l_update_container_orig;
5691:
5692: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5693: IF l_debug_on THEN
5694: WSH_DEBUG_SV.logmsg(l_module_name
5695: ,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured '
5696: ,WSH_DEBUG_SV.C_EXCEP_LEVEL);
5691:
5692: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5693: IF l_debug_on THEN
5694: WSH_DEBUG_SV.logmsg(l_module_name
5695: ,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured '
5696: ,WSH_DEBUG_SV.C_EXCEP_LEVEL);
5697: WSH_DEBUG_SV.pop(l_module_name
5698: ,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
5699: END IF;
5694: WSH_DEBUG_SV.logmsg(l_module_name
5695: ,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured '
5696: ,WSH_DEBUG_SV.C_EXCEP_LEVEL);
5697: WSH_DEBUG_SV.pop(l_module_name
5698: ,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
5699: END IF;
5700: WHEN OTHERS THEN
5701: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5702: rollback to s_create_containers_DDGPB;
5700: WHEN OTHERS THEN
5701: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5702: rollback to s_create_containers_DDGPB;
5703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5704: wsh_util_core.add_message(x_return_status, l_module_name);
5705: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Create_containers');
5706: IF l_debug_on THEN
5707: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5708: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5701: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5702: rollback to s_create_containers_DDGPB;
5703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5704: wsh_util_core.add_message(x_return_status, l_module_name);
5705: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Create_containers');
5706: IF l_debug_on THEN
5707: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5708: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5709: END IF;
5721:
5722: PROCEDURE Create_Delivery_Detail(
5723: p_detail_info_tab IN WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type ,
5724: p_detail_IN_rec IN WSH_GLBL_VAR_STRCT_GRP.detailInRecType,
5725: p_valid_index_tab IN wsh_util_core.id_tab_type,
5726: x_detail_OUT_rec OUT NOCOPY WSH_GLBL_VAR_STRCT_GRP.detailOutRecType,
5727: x_return_status OUT NOCOPY varchar2,
5728: x_msg_count OUT NOCOPY NUMBER,
5729: x_msg_data OUT NOCOPY VARCHAR2)
5755:
5756: --OTM R12
5757: l_delivery_detail_tab WSH_ENTITY_INFO_TAB;
5758: l_delivery_detail_rec WSH_ENTITY_INFO_REC;
5759: l_item_quantity_uom_tab WSH_UTIL_CORE.COLUMN_TAB_TYPE;
5760: l_gc3_is_installed VARCHAR2(1);
5761: l_counter NUMBER;
5762: --
5763:
5795: END IF;
5796: --
5797:
5798: -- Initialize API return status to success
5799: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5800: l_number_of_errors := 0;
5801: l_number_of_warnings := 0;
5802:
5803: --OTM R12 initialize
5800: l_number_of_errors := 0;
5801: l_number_of_warnings := 0;
5802:
5803: --OTM R12 initialize
5804: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;
5805:
5806: IF (l_gc3_is_installed IS NULL) THEN
5807: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
5808: END IF;
5803: --OTM R12 initialize
5804: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;
5805:
5806: IF (l_gc3_is_installed IS NULL) THEN
5807: l_gc3_is_installed := WSH_UTIL_CORE.GC3_IS_INSTALLED;
5808: END IF;
5809:
5810: IF (l_gc3_is_installed = 'Y') THEN
5811: l_delivery_detail_tab := WSH_ENTITY_INFO_TAB();
5820: -- logic for creating containers
5821: IF nvl(WSH_WMS_LPN_GRP.g_caller,'WSH') NOT LIKE 'WMS%' THEN --{
5822: IF( p_detail_IN_rec.organization_id IS NULL and p_detail_IN_rec.organization_code IS NULL) THEN
5823: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_ORG_NULL');
5824: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5825: IF l_debug_on THEN
5826: wsh_debug_sv.logmsg(l_module_name,'Null Organization');
5827: END IF;
5828: raise FND_API.G_EXC_ERROR;
5830: AND p_detail_IN_rec.container_item_name IS NULL
5831: AND p_detail_IN_rec.container_item_seg.count = 0) THEN
5832: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5833: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'CONTAINER_ITEM');
5834: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5835: IF l_debug_on THEN
5836: wsh_debug_sv.logmsg(l_module_name,'Null Container item');
5837: END IF;
5838:
5846: p_detail_IN_rec => p_detail_IN_rec,
5847: x_container_ids => x_detail_out_rec.detail_ids,
5848: x_return_status => l_return_status
5849: );
5850: wsh_util_core.api_post_call(
5851: p_return_status => l_return_status,
5852: x_num_warnings => l_number_of_warnings,
5853: x_num_errors => l_number_of_errors
5854: );
5882: IF l_debug_on THEN
5883: wsh_debug_sv.log(l_module_name, 'Item Type', l_item_type);
5884: END IF;
5885: --
5886: wsh_util_core.api_post_call(
5887: p_return_status => l_return_status,
5888: x_num_warnings => l_number_of_warnings,
5889: x_num_errors => l_number_of_errors,
5890: p_msg_data => l_msg_data
5913: wsh_debug_sv.log(l_module_name, 'New Detail Created', l_new_detail_id);
5914: END IF;
5915:
5916: --
5917: wsh_util_core.api_post_call(
5918: p_return_status => l_return_status,
5919: x_num_warnings => l_number_of_warnings,
5920: x_num_errors => l_number_of_errors,
5921: p_msg_data => l_msg_data,
5921: p_msg_data => l_msg_data,
5922: p_raise_error_flag => FALSE
5923: );
5924: --
5925: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
5926: FND_MESSAGE.SET_NAME('WSH', 'WSH_DET_CREATE_DET_FAILED');
5927: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5928: RAISE FND_API.G_EXC_ERROR;
5929: END IF;
5923: );
5924: --
5925: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
5926: FND_MESSAGE.SET_NAME('WSH', 'WSH_DET_CREATE_DET_FAILED');
5927: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5928: RAISE FND_API.G_EXC_ERROR;
5929: END IF;
5930: l_delivery_assignments_info.delivery_id := NULL;
5931: l_delivery_assignments_info.parent_delivery_id := NULL;
5944: x_return_status => l_return_status);
5945:
5946: x_detail_out_Rec.detail_ids(l_index) := l_new_detail_id;
5947:
5948: wsh_util_core.api_post_call(
5949: p_return_status => l_return_status,
5950: x_num_warnings => l_number_of_warnings,
5951: x_num_errors => l_number_of_errors,
5952: p_msg_data => l_msg_data,
5952: p_msg_data => l_msg_data,
5953: p_raise_error_flag => FALSE
5954: );
5955:
5956: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
5957: FND_MESSAGE.SET_NAME('WSH', 'WSH_DET_CREATE_AS_FAILED');
5958: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5959: RAISE FND_API.G_EXC_ERROR;
5960: END IF;
5954: );
5955:
5956: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
5957: FND_MESSAGE.SET_NAME('WSH', 'WSH_DET_CREATE_AS_FAILED');
5958: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5959: RAISE FND_API.G_EXC_ERROR;
5960: END IF;
5961:
5962: --OTM R12, calling delivery detail splitter
6015: -- we will not fail based on l_return_status here because
6016: -- we do not want to stop the flow
6017: -- if the detail doesn't split, it will be caught later in
6018: -- delivery splitting and will have exception on the detail
6019: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
6020: IF l_debug_on THEN
6021: WSH_DEBUG_SV.logmsg(l_module_name, 'Delivery detail split failed for ' || l_new_detail_id );
6022: END IF;
6023: END IF;
6067: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6068: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6069: END IF;
6070: --
6071: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
6072: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6073: FND_MSG_PUB.Count_And_Get
6074: (
6075: p_count => x_msg_count,
6068: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6069: END IF;
6070: --
6071: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
6072: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6073: FND_MSG_PUB.Count_And_Get
6074: (
6075: p_count => x_msg_count,
6076: p_data => x_msg_data,
6077: p_encoded => FND_API.G_FALSE
6078: );
6079: --
6080: IF l_debug_on THEN
6081: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6082: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
6083: END IF;
6084: --
6085: WHEN OTHERS THEN
6078: );
6079: --
6080: IF l_debug_on THEN
6081: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6082: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
6083: END IF;
6084: --
6085: WHEN OTHERS THEN
6086:
6085: WHEN OTHERS THEN
6086:
6087: ROLLBACK to CREATE_DEL_DETAIL_GRP;
6088: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6089: wsh_util_core.add_message(x_return_status, l_module_name);
6090: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Create_Delivery_Detail');
6091: FND_MSG_PUB.Count_And_Get
6092: (
6093: p_count => x_msg_count,
6086:
6087: ROLLBACK to CREATE_DEL_DETAIL_GRP;
6088: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6089: wsh_util_core.add_message(x_return_status, l_module_name);
6090: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Create_Delivery_Detail');
6091: FND_MSG_PUB.Count_And_Get
6092: (
6093: p_count => x_msg_count,
6094: p_data => x_msg_data,
6132: PROCEDURE Validate_Delivery_Detail(
6133: x_detail_info_tab IN OUT NOCOPY WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type,
6134: p_in_detail_tab IN WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type,
6135: p_action IN VARCHAR2,
6136: p_validation_tab IN wsh_util_core.id_tab_type,
6137: p_caller IN VARCHAR2,
6138: x_valid_index_tab OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
6139: x_details_marked OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
6140: x_detail_tender_tab OUT NOCOPY wsh_util_core.id_tab_type,
6134: p_in_detail_tab IN WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type,
6135: p_action IN VARCHAR2,
6136: p_validation_tab IN wsh_util_core.id_tab_type,
6137: p_caller IN VARCHAR2,
6138: x_valid_index_tab OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
6139: x_details_marked OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
6140: x_detail_tender_tab OUT NOCOPY wsh_util_core.id_tab_type,
6141: x_return_status OUT NOCOPY VARCHAR2,
6142: x_msg_count OUT NOCOPY NUMBER,
6135: p_action IN VARCHAR2,
6136: p_validation_tab IN wsh_util_core.id_tab_type,
6137: p_caller IN VARCHAR2,
6138: x_valid_index_tab OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
6139: x_details_marked OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
6140: x_detail_tender_tab OUT NOCOPY wsh_util_core.id_tab_type,
6141: x_return_status OUT NOCOPY VARCHAR2,
6142: x_msg_count OUT NOCOPY NUMBER,
6143: x_msg_data OUT NOCOPY VARCHAR2,
6136: p_validation_tab IN wsh_util_core.id_tab_type,
6137: p_caller IN VARCHAR2,
6138: x_valid_index_tab OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
6139: x_details_marked OUT NOCOPY WSH_UTIL_CORE.Id_Tab_Type,
6140: x_detail_tender_tab OUT NOCOPY wsh_util_core.id_tab_type,
6141: x_return_status OUT NOCOPY VARCHAR2,
6142: x_msg_count OUT NOCOPY NUMBER,
6143: x_msg_data OUT NOCOPY VARCHAR2,
6144: p_in_rec IN WSH_GLBL_VAR_STRCT_GRP.detailInRecType,
6175:
6176: /* H projects: pricing integration csun */
6177: l_mark_reprice_flag VARCHAR2(1) := 'N';
6178: m NUMBER := 0;
6179: l_details_marked WSH_UTIL_CORE.Id_Tab_Type;
6180: mark_reprice_error EXCEPTION;
6181:
6182: l_original_detail_rec c_original_detail_cur%ROWTYPE;
6183: --
6286: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
6287: END IF;
6288: --
6289: -- Initialize API return status to success
6290: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6291: l_number_of_errors := 0;
6292: l_number_of_warnings := 0;
6293:
6294: IF p_caller IN ( 'WSH_FSTRX' , 'WSH_TPW_INBOUND')
6297: END IF;
6298:
6299: l_index := x_detail_info_tab.FIRST;
6300:
6301: IF wsh_util_core.fte_is_installed = 'Y' THEN
6302: l_fte_installed := 'Y';
6303: END IF;
6304:
6305: --
6416: p_location_id => x_detail_info_tab(l_index).ship_from_location_id,
6417: x_return_status => l_return_status,
6418: p_isWshLocation => l_isWshLocation);
6419:
6420: wsh_util_core.api_post_call(
6421: p_return_status => l_return_status,
6422: x_num_warnings => l_number_of_warnings,
6423: x_num_errors => l_number_of_errors,
6424: p_msg_data => l_msg_data
6436: p_location_id => x_detail_info_tab(l_index).ship_to_location_id,
6437: x_return_status => l_return_status,
6438: p_isWshLocation => l_isWshLocation);
6439:
6440: wsh_util_core.api_post_call(
6441: p_return_status => l_return_status,
6442: x_num_warnings => l_number_of_warnings,
6443: x_num_errors => l_number_of_errors,
6444: p_msg_data => l_msg_data
6474: l_inventory_item_info.primary_uom_code,
6475: x_detail_info_tab(l_index).src_requested_quantity,
6476: x_detail_info_tab(l_index).inventory_item_id);
6477:
6478: wsh_util_core.api_post_call(
6479: p_return_status => l_return_status,
6480: x_num_warnings => l_number_of_warnings,
6481: x_num_errors => l_number_of_errors,
6482: p_msg_data => l_msg_data
6521: END IF;
6522: l_number_of_errors := l_number_of_errors + 1;
6523: FND_MESSAGE.SET_NAME('WSH', 'WSH_DET_INVALID_DETAIL');
6524: FND_MESSAGE.SET_TOKEN('DETAIL_ID', x_detail_info_tab(l_index).delivery_detail_id);
6525: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
6526: RAISE FND_API.G_EXC_ERROR;
6527: END IF;
6528:
6529: CLOSE c_original_detail_cur;
6547: x_msg_data => l_msg_data
6548: );
6549:
6550: IF l_debug_on THEN
6551: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6552: END IF;
6553: --
6554: wsh_util_core.api_post_call(
6555: p_return_status => l_return_status,
6550: IF l_debug_on THEN
6551: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6552: END IF;
6553: --
6554: wsh_util_core.api_post_call(
6555: p_return_status => l_return_status,
6556: x_num_warnings => l_number_of_warnings,
6557: x_num_errors => l_number_of_errors,
6558: p_msg_data => l_msg_data
6570: x_msg_data => l_msg_data
6571: );
6572:
6573: IF l_debug_on THEN
6574: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6575: END IF;
6576: --
6577: wsh_util_core.api_post_call(
6578: p_return_status => l_return_status,
6573: IF l_debug_on THEN
6574: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6575: END IF;
6576: --
6577: wsh_util_core.api_post_call(
6578: p_return_status => l_return_status,
6579: x_num_warnings => l_number_of_warnings,
6580: x_num_errors => l_number_of_errors,
6581: p_msg_data => l_msg_data
6596: p_serial_range_tab => p_serial_range_tab
6597: );
6598:
6599: IF l_debug_on THEN
6600: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6601: END IF;
6602: --
6603: wsh_util_core.api_post_call(
6604: p_return_status => l_return_status,
6599: IF l_debug_on THEN
6600: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6601: END IF;
6602: --
6603: wsh_util_core.api_post_call(
6604: p_return_status => l_return_status,
6605: x_num_warnings => l_number_of_warnings,
6606: x_num_errors => l_number_of_errors,
6607: p_msg_data => l_msg_data
6717: x_msg_count => l_msg_count,
6718: x_msg_data => l_msg_data
6719: );
6720: --
6721: wsh_util_core.api_post_call(
6722: p_return_status => l_return_status,
6723: x_num_warnings => l_number_of_warnings,
6724: x_num_errors => l_number_of_errors,
6725: p_msg_data => l_msg_data
6754: x_msg_data => l_msg_data
6755: );
6756:
6757:
6758: wsh_util_core.api_post_call(
6759: p_return_status => l_return_status,
6760: x_num_warnings => l_number_of_warnings,
6761: x_num_errors => l_number_of_errors,
6762: p_msg_data => l_msg_data
6791: ROLLBACK TO validate_det_loop_grp;
6792: l_number_of_errors := l_number_of_errors + 1;
6793: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
6794: FND_MESSAGE.SET_TOKEN('FIELD_NAME', l_required_field);
6795: WSH_UTIL_CORE.ADD_MESSAGE(wsh_util_core.g_ret_sts_error, l_module_name);
6796: IF l_debug_on THEN
6797: WSH_DEBUG_SV.logmsg(l_module_name,'E_REQUIRED_FIELD_NULL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6798: END IF;
6799: -- J-IB-NPARIKH-{
6800: WHEN e_ib_create_error THEN
6801: ROLLBACK TO validate_det_loop_grp;
6802: l_number_of_errors := l_number_of_errors + 1;
6803: FND_MESSAGE.SET_NAME('WSH', 'WSH_IB_CREATE_LINE_ERROR');
6804: WSH_UTIL_CORE.ADD_MESSAGE(wsh_util_core.g_ret_sts_error, l_module_name);
6805: IF l_debug_on THEN
6806: WSH_DEBUG_SV.logmsg(l_module_name,'e_ib_create_error exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6807: END IF;
6808: -- J-IB-NPARIKH-}
6808: -- J-IB-NPARIKH-}
6809:
6810: when uom_conversion_failed then
6811: FND_MESSAGE.SEt_NAME('WSH','UOM_CONVERSION_FAILED');
6812: WSH_UTIL_CORE.ADD_MESSAGE(wsh_util_core.g_ret_sts_error, l_module_name);
6813:
6814: IF l_debug_on THEN
6815: WSH_DEBUG_SV.logmsg(l_module_name,'UOM_CONVERSION_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6816: END IF;
6843: p_caller => 'WSH',
6844: x_changed_id_tab => x_detail_tender_tab,
6845: x_return_status => l_return_status
6846: );
6847: wsh_util_core.api_post_call(
6848: p_return_status => l_return_status,
6849: x_num_warnings => l_number_of_warnings,
6850: x_num_errors => l_number_of_errors,
6851: p_msg_data => l_msg_data
6862: IF x_detail_info_tab.count > 0 THEN
6863: IF l_number_of_errors >= x_detail_info_tab.count THEN
6864: RAISE FND_API.G_EXC_ERROR;
6865: ELSIF l_number_of_errors >0 THEN
6866: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
6867: ELSIF l_number_of_warnings > 0 THEN
6868: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
6869: END IF;
6870: END IF;
6864: RAISE FND_API.G_EXC_ERROR;
6865: ELSIF l_number_of_errors >0 THEN
6866: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
6867: ELSIF l_number_of_warnings > 0 THEN
6868: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
6869: END IF;
6870: END IF;
6871:
6872: FND_MSG_PUB.Count_And_Get
6912: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6913: END IF;
6914: --
6915: --
6916: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
6917: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6918: FND_MSG_PUB.Count_And_Get
6919: (
6920: p_count => x_msg_count,
6913: END IF;
6914: --
6915: --
6916: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
6917: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6918: FND_MSG_PUB.Count_And_Get
6919: (
6920: p_count => x_msg_count,
6921: p_data => x_msg_data,
6922: p_encoded => FND_API.G_FALSE
6923: );
6924: --
6925: IF l_debug_on THEN
6926: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6927: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
6928: END IF;
6929: --
6930:
6923: );
6924: --
6925: IF l_debug_on THEN
6926: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6927: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
6928: END IF;
6929: --
6930:
6931:
6932: WHEN OTHERS THEN
6933:
6934: ROLLBACK to VALIDATE_DEL_DETAIL_GRP;
6935: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6936: wsh_util_core.add_message(x_return_status, l_module_name);
6937: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Validate_Delivery_Detail');
6938:
6939: FND_MSG_PUB.Count_And_Get
6940: (
6933:
6934: ROLLBACK to VALIDATE_DEL_DETAIL_GRP;
6935: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6936: wsh_util_core.add_message(x_return_status, l_module_name);
6937: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Validate_Delivery_Detail');
6938:
6939: FND_MSG_PUB.Count_And_Get
6940: (
6941: p_count => x_msg_count,
6960: -- -----------------------------------------------------------------------
6961:
6962: PROCEDURE Update_Delivery_Detail(
6963: p_detail_info_tab IN WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type ,
6964: p_valid_index_tab IN wsh_util_core.id_tab_type,
6965: x_return_status OUT NOCOPY VARCHAR2,
6966: x_msg_count OUT NOCOPY NUMBER,
6967: x_msg_data OUT NOCOPY VARCHAR2,
6968: p_caller IN VARCHAR2 DEFAULT NULL)
7020: END IF;
7021: --
7022:
7023: -- Initialize API return status to success
7024: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7025: l_number_of_errors := 0;
7026: l_number_of_warnings := 0;
7027:
7028: l_index := p_valid_index_tab.FIRST;
7056: x_return_status => l_return_status);
7057:
7058: --
7059: IF l_debug_on THEN
7060: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7061: END IF;
7062: --
7063: wsh_util_core.api_post_call(
7064: p_return_status => l_return_status,
7059: IF l_debug_on THEN
7060: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7061: END IF;
7062: --
7063: wsh_util_core.api_post_call(
7064: p_return_status => l_return_status,
7065: x_num_warnings => l_number_of_warnings,
7066: x_num_errors => l_number_of_errors,
7067: p_msg_data => l_msg_data
7085: x_return_status => l_return_status,
7086: x_out_rec => l_out_rec
7087: );
7088:
7089: wsh_util_core.api_post_call(
7090: p_return_status => l_return_status,
7091: x_num_warnings => l_number_of_warnings,
7092: x_num_errors => l_number_of_errors
7093: );
7149: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7150: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7151: END IF;
7152: --
7153: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
7154: IF lock_delivery_details%isopen THEN
7155: CLOSE lock_delivery_details;
7156: END IF;
7157: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
7153: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
7154: IF lock_delivery_details%isopen THEN
7155: CLOSE lock_delivery_details;
7156: END IF;
7157: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
7158: --
7159: -- K LPN CONV. rv
7160: --
7161: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
7177: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
7178: END IF;
7179: --
7180: --
7181: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR) and x_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
7182: x_return_status := l_return_status;
7183: END IF;
7184: --
7185: --}
7196: p_encoded => FND_API.G_FALSE
7197: );
7198: --
7199: IF l_debug_on THEN
7200: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7201: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
7202: END IF;
7203: --
7204: WHEN delivery_detail_locked THEN
7197: );
7198: --
7199: IF l_debug_on THEN
7200: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7201: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
7202: END IF;
7203: --
7204: WHEN delivery_detail_locked THEN
7205: IF lock_delivery_details%isopen THEN
7227: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
7228: END IF;
7229: --
7230: --
7231: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR) and x_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
7232: x_return_status := l_return_status;
7233: END IF;
7234: --
7235: --}
7238: -- K LPN CONV. rv
7239: --
7240: WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED := 'Y';
7241: WSH_WMS_LPN_GRP.g_update_to_container := 'N';
7242: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7243: FND_MESSAGE.Set_Name('WSH', 'WSH_NO_LOCK');
7244: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
7245: IF l_debug_on THEN
7246: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:delivery_detail_locked');
7240: WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED := 'Y';
7241: WSH_WMS_LPN_GRP.g_update_to_container := 'N';
7242: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7243: FND_MESSAGE.Set_Name('WSH', 'WSH_NO_LOCK');
7244: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
7245: IF l_debug_on THEN
7246: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:delivery_detail_locked');
7247: END IF;
7248:
7254: ROLLBACK to UPDATE_DEL_DETAIL_GRP;
7255: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7256: WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED := 'Y';
7257: WSH_WMS_LPN_GRP.g_update_to_container := 'N';
7258: wsh_util_core.add_message(x_return_status, l_module_name);
7259: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Update_Delivery_Detail');
7260:
7261: FND_MSG_PUB.Count_And_Get
7262: (
7255: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7256: WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED := 'Y';
7257: WSH_WMS_LPN_GRP.g_update_to_container := 'N';
7258: wsh_util_core.add_message(x_return_status, l_module_name);
7259: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Update_Delivery_Detail');
7260:
7261: FND_MSG_PUB.Count_And_Get
7262: (
7263: p_count => x_msg_count,
7332: END IF;
7333: --
7334:
7335: -- Initialize API return status to success
7336: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7337: l_number_of_errors := 0;
7338: l_number_of_warnings := 0;
7339:
7340:
7374: );
7375:
7376: --
7377: IF l_debug_on THEN
7378: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7379: END IF;
7380: --
7381: --
7382: wsh_util_core.api_post_call(
7378: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7379: END IF;
7380: --
7381: --
7382: wsh_util_core.api_post_call(
7383: p_return_status => l_return_status,
7384: x_num_warnings => l_number_of_warnings,
7385: x_num_errors => l_number_of_errors,
7386: p_msg_data => l_msg_data
7392: IF l_debug_on THEN
7393: wsh_debug_sv.log(l_module_name, 'Number of warnings', l_number_of_warnings);
7394: END IF;
7395:
7396: RAISE wsh_util_core.g_exc_warning;
7397: END IF;
7398:
7399:
7400:
7444: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7445: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7446: END IF;
7447: --
7448: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
7449: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
7450: FND_MSG_PUB.Count_And_Get
7451: (
7452: p_count => x_msg_count,
7445: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7446: END IF;
7447: --
7448: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
7449: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
7450: FND_MSG_PUB.Count_And_Get
7451: (
7452: p_count => x_msg_count,
7453: p_data => x_msg_data,
7454: p_encoded => FND_API.G_FALSE
7455: );
7456: --
7457: IF l_debug_on THEN
7458: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7459: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
7460: END IF;
7461: --
7462: WHEN OTHERS THEN
7455: );
7456: --
7457: IF l_debug_on THEN
7458: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7459: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
7460: END IF;
7461: --
7462: WHEN OTHERS THEN
7463:
7462: WHEN OTHERS THEN
7463:
7464: ROLLBACK to CANCEL_DEL_DETAIL_GRP;
7465: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7466: wsh_util_core.add_message(x_return_status, l_module_name);
7467: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Delete_Delivery_Detail');
7468: FND_MSG_PUB.Count_And_Get
7469: (
7470: p_count => x_msg_count,
7463:
7464: ROLLBACK to CANCEL_DEL_DETAIL_GRP;
7465: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7466: wsh_util_core.add_message(x_return_status, l_module_name);
7467: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Delete_Delivery_Detail');
7468: FND_MSG_PUB.Count_And_Get
7469: (
7470: p_count => x_msg_count,
7471: p_data => x_msg_data,
7506: PROCEDURE validate_detail_line(
7507: x_detail_rec IN OUT NOCOPY WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Rec_Type,
7508: p_in_detail_rec IN WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Rec_Type,
7509: p_original_rec IN c_original_detail_cur%ROWTYPE,
7510: p_validation_tab IN wsh_util_core.id_tab_type,
7511: x_mark_reprice_flag OUT NOCOPY VARCHAR2,
7512: x_return_status OUT NOCOPY VARCHAR2,
7513: x_msg_count OUT NOCOPY NUMBER,
7514: x_msg_data OUT NOCOPY VARCHAR2,
7652: WSH_DEBUG_SV.LOG(l_module_name, 'SQ', x_detail_rec.shipped_quantity);
7653: END IF;
7654:
7655: -- Initialize API return status to success --
7656: x_return_status := wsh_util_core.g_ret_sts_success;
7657: l_number_of_errors := 0;
7658: l_number_of_warnings := 0;
7659:
7660: --
7692: p_field_name => 'ship_tolerance_above',
7693: x_return_status => l_return_status );
7694: --
7695:
7696: wsh_util_core.api_post_call(
7697: p_return_status => l_return_status,
7698: x_num_warnings => l_number_of_warnings,
7699: x_num_errors => l_number_of_errors,
7700: p_msg_data => l_msg_data
7713: p_field_name => 'ship_tolerance_below',
7714: x_return_status => l_return_status );
7715: --
7716:
7717: wsh_util_core.api_post_call(
7718: p_return_status => l_return_status,
7719: x_num_warnings => l_number_of_warnings,
7720: x_num_errors => l_number_of_errors,
7721: p_msg_data => l_msg_data
7738: p_source_code => x_detail_rec.source_code, --RTV changes
7739: x_transaction_type_id => l_trx_type_id,
7740: x_return_status => l_return_status);
7741: --
7742: wsh_util_core.api_post_call(
7743: p_return_status => l_return_status,
7744: x_num_warnings => l_number_of_warnings,
7745: x_num_errors => l_number_of_errors,
7746: p_msg_data => l_msg_data);
7807: WSH_DEBUG_SV.log(l_module_name, 'Locator Flag', l_inv_controls.loc_flag);
7808: WSH_DEBUG_SV.log(l_module_name, 'Serial Control Code', l_inv_controls.serial_code);
7809: END IF;
7810:
7811: wsh_util_core.api_post_call(
7812: p_return_status => l_return_status,
7813: x_num_warnings => l_number_of_warnings,
7814: x_num_errors => l_number_of_errors,
7815: p_msg_data => l_msg_data
7891: --}
7892: END IF;
7893:
7894: --
7895: wsh_util_core.api_post_call(
7896: p_return_status => l_return_status,
7897: x_num_warnings => l_number_of_warnings,
7898: x_num_errors => l_number_of_errors,
7899: p_msg_data => l_msg_data
7951: x_detail_rec.shipped_quantity2 := l_det_qty_rec.shipped_quantity2;
7952: --PK added for Bug 3055126 Next line.
7953: x_detail_rec.cycle_count_quantity2 := l_det_qty_rec.cycle_count_quantity2;
7954: --
7955: wsh_util_core.api_post_call(
7956: p_return_status => l_return_status,
7957: x_num_warnings => l_number_of_warnings,
7958: x_num_errors => l_number_of_errors,
7959: p_msg_data => l_msg_data
8010: );
8011: x_detail_rec.cycle_count_quantity := l_det_qty_rec.cycle_count_quantity;
8012:
8013: --
8014: wsh_util_core.api_post_call(
8015: p_return_status => l_return_status,
8016: x_num_warnings => l_number_of_warnings,
8017: x_num_errors => l_number_of_errors,
8018: p_msg_data => l_msg_data
8068: );
8069: x_detail_rec.cycle_count_quantity2 :=
8070: l_det_qty_rec.cycle_count_quantity2;
8071: --
8072: wsh_util_core.api_post_call(
8073: p_return_status => l_return_status,
8074: x_num_warnings => l_number_of_warnings,
8075: x_num_errors => l_number_of_errors,
8076: p_msg_data => l_msg_data
8092: p_ship_method_code => x_detail_rec.ship_method_code,
8093: p_ship_method_name => l_ship_method_name,
8094: x_return_status => l_return_status);
8095: --
8096: wsh_util_core.api_post_call(
8097: p_return_status => l_return_status,
8098: x_num_warnings => l_number_of_warnings,
8099: x_num_errors => l_number_of_errors,
8100: p_msg_data => l_msg_data
8113: wsh_util_validate.validate_boolean(
8114: p_flag => x_detail_rec.dep_plan_required_flag,
8115: x_return_status => l_return_status);
8116: --
8117: wsh_util_core.api_post_call(
8118: p_return_status => l_return_status,
8119: x_num_warnings => l_number_of_warnings,
8120: x_num_errors => l_number_of_errors,
8121: p_msg_data => l_msg_data
8134: wsh_util_validate.validate_boolean(
8135: p_flag => x_detail_rec.ship_model_complete_flag,
8136: x_return_status => l_return_status);
8137: --
8138: wsh_util_core.api_post_call(
8139: p_return_status => l_return_status,
8140: x_num_warnings => l_number_of_warnings,
8141: x_num_errors => l_number_of_errors,
8142: p_msg_data => l_msg_data
8171: IF l_debug_on THEN
8172: WSH_DEBUG_SV.logmsg(l_module_name, 'Invalid subinventory');
8173: END IF;
8174:
8175: l_return_status := wsh_util_core.g_ret_sts_error;
8176: END IF;
8177:
8178: wsh_util_core.api_post_call(
8179: p_return_status => l_return_status,
8174:
8175: l_return_status := wsh_util_core.g_ret_sts_error;
8176: END IF;
8177:
8178: wsh_util_core.api_post_call(
8179: p_return_status => l_return_status,
8180: x_num_warnings => l_number_of_warnings,
8181: x_num_errors => l_number_of_errors,
8182: p_msg_data => l_msg_data
8233:
8234: RAISE fnd_api.g_exc_error;
8235: END IF;
8236:
8237: wsh_util_core.api_post_call(
8238: p_return_status => l_return_status,
8239: x_num_warnings => l_number_of_warnings,
8240: x_num_errors => l_number_of_errors,
8241: p_msg_data => l_msg_data
8297: RAISE fnd_api.g_exc_error;
8298: END IF;
8299:
8300: --
8301: wsh_util_core.api_post_call(
8302: p_return_status => l_return_status,
8303: x_num_warnings => l_number_of_warnings,
8304: x_num_errors => l_number_of_errors,
8305: p_msg_data => l_msg_data
8380:
8381: -- HW OPM end of changes
8382:
8383: --
8384: wsh_util_core.api_post_call(
8385: p_return_status => l_return_status,
8386: x_num_warnings => l_number_of_warnings,
8387: x_num_errors => l_number_of_errors,
8388: p_msg_data => l_msg_data
8403: --
8404: wsh_util_validate.validate_contact(
8405: p_contact_id => x_detail_rec.sold_to_contact_id,
8406: x_return_status => l_return_status);
8407: wsh_util_core.api_post_call(
8408: p_return_status => l_return_status,
8409: x_num_warnings => l_number_of_warnings,
8410: x_num_errors => l_number_of_errors,
8411: p_msg_data => l_msg_data
8424: wsh_util_validate.validate_contact(
8425: p_contact_id => x_detail_rec.ship_to_contact_id,
8426: x_return_status => l_return_status);
8427: --
8428: wsh_util_core.api_post_call(
8429: p_return_status => l_return_status,
8430: x_num_warnings => l_number_of_warnings,
8431: x_num_errors => l_number_of_errors,
8432: p_msg_data => l_msg_data
8445: wsh_util_validate.validate_contact(
8446: p_contact_id => x_detail_rec.deliver_to_contact_id,
8447: x_return_status => l_return_status);
8448: --
8449: wsh_util_core.api_post_call(
8450: p_return_status => l_return_status,
8451: x_num_warnings => l_number_of_warnings,
8452: x_num_errors => l_number_of_errors,
8453: p_msg_data => l_msg_data
8466: wsh_util_validate.validate_contact(
8467: p_contact_id => x_detail_rec.intmed_ship_to_contact_id,
8468: x_return_status => l_return_status);
8469: --
8470: wsh_util_core.api_post_call(
8471: p_return_status => l_return_status,
8472: x_num_warnings => l_number_of_warnings,
8473: x_num_errors => l_number_of_errors,
8474: p_msg_data => l_msg_data
8798: -- (
8799: IF l_inv_controls.ser_flag = 'N'
8800: THEN
8801: -- (
8802: l_return_status := wsh_util_core.g_ret_sts_error;
8803: fnd_message.set_name('WSH', 'WSH_INV_INVALID');
8804: fnd_message.set_token('INV_ATTRIBUTE', 'Serial Number Code');
8805: wsh_util_core.add_message(l_return_status);
8806: RAISE fnd_api.g_exc_error;
8801: -- (
8802: l_return_status := wsh_util_core.g_ret_sts_error;
8803: fnd_message.set_name('WSH', 'WSH_INV_INVALID');
8804: fnd_message.set_token('INV_ATTRIBUTE', 'Serial Number Code');
8805: wsh_util_core.add_message(l_return_status);
8806: RAISE fnd_api.g_exc_error;
8807: -- )
8808: END IF;
8809: -- )
8842: IF l_debug_on THEN
8843: wsh_debug_sv.log(l_module_name, 'Return status after Unmark ', l_return_status);
8844: END IF;
8845:
8846: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
8847: RAISE fnd_api.g_exc_error;
8848: END IF;
8849:
8850: -- Transaction temp id exists in WDD,now 1 serial number is being
8875: IF l_debug_on THEN
8876: wsh_debug_sv.log(l_module_name, 'Return status after Unmark ', l_return_status);
8877: END IF;
8878:
8879: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
8880: RAISE fnd_api.g_exc_error;
8881: END IF;
8882:
8883: END IF;
8927: WSH_DEBUG_SV.log(l_module_name, 'Return Status',l_return_status);
8928: END IF;
8929:
8930: IF NOT l_result THEN
8931: l_return_status := wsh_util_core.g_ret_sts_error;
8932: END IF;
8933:
8934: wsh_util_core.api_post_call(
8935: p_return_status => l_return_status,
8930: IF NOT l_result THEN
8931: l_return_status := wsh_util_core.g_ret_sts_error;
8932: END IF;
8933:
8934: wsh_util_core.api_post_call(
8935: p_return_status => l_return_status,
8936: x_num_warnings => l_number_of_warnings,
8937: x_num_errors => l_number_of_errors,
8938: p_msg_data => l_msg_data
8962: WSH_DEBUG_SV.log(l_module_name, 'Return Status',l_return_status);
8963: END IF;
8964: --
8965: IF NOT l_result THEN
8966: l_return_status := wsh_util_core.g_ret_sts_error;
8967: END IF;
8968: --
8969: wsh_util_core.api_post_call(
8970: p_return_status => l_return_status,
8965: IF NOT l_result THEN
8966: l_return_status := wsh_util_core.g_ret_sts_error;
8967: END IF;
8968: --
8969: wsh_util_core.api_post_call(
8970: p_return_status => l_return_status,
8971: x_num_warnings => l_number_of_warnings,
8972: x_num_errors => l_number_of_errors,
8973: p_msg_data => l_msg_data
9008: x_prefix => l_prefix,
9009: x_return_status => l_return_status
9010: );
9011: --
9012: wsh_util_core.api_post_call(
9013: p_return_status => l_return_status,
9014: x_num_warnings => l_number_of_warnings,
9015: x_num_errors => l_number_of_errors,
9016: p_msg_data => l_msg_data
9034: p_locator_id => l_locator,
9035: x_return_status => l_return_status
9036: );
9037: --
9038: wsh_util_core.api_post_call(
9039: p_return_status => l_return_status,
9040: x_num_warnings => l_number_of_warnings,
9041: x_num_errors => l_number_of_errors,
9042: p_msg_data => l_msg_data
9189: p_serial_number => NULL,
9190: p_transaction_temp_id => l_transaction_id,
9191: x_return_status => l_return_status
9192: );
9193: wsh_util_core.api_post_call(
9194: p_return_status => l_return_status,
9195: x_num_warnings => l_number_of_warnings,
9196: x_num_errors => l_number_of_errors,
9197: p_msg_data => l_msg_data
9210: p_serial_number => p_in_detail_rec.serial_number,
9211: p_transaction_temp_id => l_transaction_id,
9212: x_return_status => l_return_status
9213: );
9214: wsh_util_core.api_post_call(
9215: p_return_status => l_return_status,
9216: x_num_warnings => l_number_of_warnings,
9217: x_num_errors => l_number_of_errors,
9218: p_msg_data => l_msg_data
9244: IF l_debug_on THEN
9245: wsh_debug_sv.log(l_module_name, 'Return status after Update_Marked_Serial ', l_return_status);
9246: END IF;
9247: --
9248: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
9249: RAISE fnd_api.g_exc_error;
9250: END IF;
9251: --}
9252: END IF; -- l_update_attributes;
9317: WSH_DEBUG_SV.pop(l_module_name,
9318: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9319: END IF;
9320: --
9321: WHEN wsh_util_core.g_exc_warning THEN
9322: x_return_status := wsh_util_core.g_ret_sts_warning;
9323: fnd_msg_pub.count_and_get(
9324: p_count => x_msg_count,
9325: p_data => x_msg_data,
9318: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9319: END IF;
9320: --
9321: WHEN wsh_util_core.g_exc_warning THEN
9322: x_return_status := wsh_util_core.g_ret_sts_warning;
9323: fnd_msg_pub.count_and_get(
9324: p_count => x_msg_count,
9325: p_data => x_msg_data,
9326: p_encoded => fnd_api.g_false);
9327:
9328: --
9329: IF l_debug_on THEN
9330: WSH_DEBUG_SV.logmsg(l_module_name,
9331: 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',
9332: WSH_DEBUG_SV.c_excep_level);
9333: WSH_DEBUG_SV.pop(l_module_name,
9334: 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9335: END IF;
9330: WSH_DEBUG_SV.logmsg(l_module_name,
9331: 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',
9332: WSH_DEBUG_SV.c_excep_level);
9333: WSH_DEBUG_SV.pop(l_module_name,
9334: 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9335: END IF;
9336: --
9337: WHEN OTHERS THEN
9338: ROLLBACK TO validate_det_line_grp;
9336: --
9337: WHEN OTHERS THEN
9338: ROLLBACK TO validate_det_line_grp;
9339: x_return_status := fnd_api.g_ret_sts_unexp_error;
9340: wsh_util_core.add_message(x_return_status, l_module_name);
9341: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_GRP.Validate_Detail_Line');
9342: fnd_msg_pub.count_and_get(
9343: p_count => x_msg_count,
9344: p_data => x_msg_data,
9337: WHEN OTHERS THEN
9338: ROLLBACK TO validate_det_line_grp;
9339: x_return_status := fnd_api.g_ret_sts_unexp_error;
9340: wsh_util_core.add_message(x_return_status, l_module_name);
9341: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_GRP.Validate_Detail_Line');
9342: fnd_msg_pub.count_and_get(
9343: p_count => x_msg_count,
9344: p_data => x_msg_data,
9345: p_encoded => fnd_api.g_false);
9367: -- -----------------------------------------------------------------------
9368: PROCEDURE Validate_Detail_Container(
9369: x_detail_rec IN OUT NOCOPY WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Rec_Type,
9370: p_original_rec IN c_original_detail_cur%ROWTYPE,
9371: p_validation_tab IN wsh_util_core.id_tab_type,
9372: x_mark_reprice_flag OUT NOCOPY VARCHAR2,
9373: x_return_status OUT NOCOPY VARCHAR2,
9374: x_msg_count OUT NOCOPY NUMBER,
9375: x_msg_data OUT NOCOPY VARCHAR2
9412: WSH_DEBUG_SV.push(l_module_name);
9413: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', x_detail_rec.delivery_detail_id);
9414: END IF;
9415: -- Initialize API return status to success
9416: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9417: l_number_of_errors := 0;
9418: l_number_of_warnings := 0;
9419:
9420: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_CONT_ITEM_LVL) = 1 ) THEN
9434: p_item_type => 'CONT_ITEM',
9435: x_return_status => l_return_status);
9436:
9437: --
9438: wsh_util_core.api_post_call(
9439: p_return_status => l_return_status,
9440: x_num_warnings => l_number_of_warnings,
9441: x_num_errors => l_number_of_errors,
9442: p_msg_data => l_msg_data
9481: WHEN e_invalid_delivered_qty THEN
9482: ROLLBACK TO VALIDATE_DET_CONTAINER_GRP;
9483: x_return_status := FND_API.G_RET_STS_ERROR ;
9484: FND_MESSAGE.SET_NAME('WSH', 'WSH_INVALID_DELIVERED_QTY');
9485: WSH_UTIL_CORE.ADD_MESSAGE(wsh_util_core.g_ret_sts_error, l_module_name);
9486: FND_MSG_PUB.Count_And_Get
9487: (
9488: p_count => x_msg_count,
9489: p_data => x_msg_data,
9526: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9527: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9528: END IF;
9529: --
9530: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9531: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9532: FND_MSG_PUB.Count_And_Get
9533: (
9534: p_count => x_msg_count,
9527: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9528: END IF;
9529: --
9530: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9531: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9532: FND_MSG_PUB.Count_And_Get
9533: (
9534: p_count => x_msg_count,
9535: p_data => x_msg_data,
9536: p_encoded => FND_API.G_FALSE
9537: );
9538: --
9539: IF l_debug_on THEN
9540: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9541: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9542: END IF;
9543: --
9544: WHEN OTHERS THEN
9537: );
9538: --
9539: IF l_debug_on THEN
9540: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9541: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9542: END IF;
9543: --
9544: WHEN OTHERS THEN
9545: ROLLBACK TO VALIDATE_DET_CONTAINER_GRP;
9543: --
9544: WHEN OTHERS THEN
9545: ROLLBACK TO VALIDATE_DET_CONTAINER_GRP;
9546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9547: wsh_util_core.add_message(x_return_status, l_module_name);
9548: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Validate_Detail_Container');
9549: FND_MSG_PUB.Count_And_Get
9550: (
9551: p_count => x_msg_count,
9544: WHEN OTHERS THEN
9545: ROLLBACK TO VALIDATE_DET_CONTAINER_GRP;
9546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9547: wsh_util_core.add_message(x_return_status, l_module_name);
9548: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Validate_Detail_Container');
9549: FND_MSG_PUB.Count_And_Get
9550: (
9551: p_count => x_msg_count,
9552: p_data => x_msg_data,
9573:
9574: PROCEDURE Validate_Detail_Common(
9575: x_detail_rec IN OUT NOCOPY WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Rec_Type,
9576: p_original_rec IN c_original_detail_cur%ROWTYPE,
9577: p_validation_tab IN wsh_util_core.id_tab_type,
9578: x_mark_reprice_flag OUT NOCOPY VARCHAR2,
9579: x_return_status OUT NOCOPY VARCHAR2,
9580: x_msg_count OUT NOCOPY NUMBER,
9581: x_msg_data OUT NOCOPY VARCHAR2
9625: END IF;
9626: --
9627:
9628: -- Initialize API return status to success
9629: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9630: l_number_of_errors := 0;
9631: l_number_of_warnings := 0;
9632:
9633: --HW OPMCONV - Removed checking for process org
9642: p_value => x_detail_rec.gross_weight,
9643: p_field_name => 'gross_weight',
9644: x_return_status => l_return_status );
9645: --
9646: wsh_util_core.api_post_call(
9647: p_return_status => l_return_status,
9648: x_num_warnings => l_number_of_warnings,
9649: x_num_errors => l_number_of_errors,
9650: p_msg_data => l_msg_data
9664: p_value => x_detail_rec.net_weight,
9665: p_field_name => 'net_weight',
9666: x_return_status => l_return_status );
9667: --
9668: wsh_util_core.api_post_call(
9669: p_return_status => l_return_status,
9670: x_num_warnings => l_number_of_warnings,
9671: x_num_errors => l_number_of_errors,
9672: p_msg_data => l_msg_data
9687: p_value => x_detail_rec.volume,
9688: p_field_name => 'volume',
9689: x_return_status => l_return_status );
9690: --
9691: wsh_util_core.api_post_call(
9692: p_return_status => l_return_status,
9693: x_num_warnings => l_number_of_warnings,
9694: x_num_errors => l_number_of_errors,
9695: p_msg_data => l_msg_data
9720:
9721: IF(l_parent_detail_id IS NOT NULL) THEN
9722: x_detail_rec.master_serial_number := p_original_rec.master_serial_number;
9723: FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_MASTER_SERIAL');
9724: wsh_util_core.add_message(wsh_util_core.g_ret_sts_warning, l_module_name);
9725: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
9726: END IF;
9727: ELSIF (p_original_rec.container_flag = 'N') THEN -- R12 MDC
9728: x_detail_rec.master_serial_number := p_original_rec.master_serial_number;
9721: IF(l_parent_detail_id IS NOT NULL) THEN
9722: x_detail_rec.master_serial_number := p_original_rec.master_serial_number;
9723: FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_MASTER_SERIAL');
9724: wsh_util_core.add_message(wsh_util_core.g_ret_sts_warning, l_module_name);
9725: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
9726: END IF;
9727: ELSIF (p_original_rec.container_flag = 'N') THEN -- R12 MDC
9728: x_detail_rec.master_serial_number := p_original_rec.master_serial_number;
9729: FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_MASTER_SERIAL');
9726: END IF;
9727: ELSIF (p_original_rec.container_flag = 'N') THEN -- R12 MDC
9728: x_detail_rec.master_serial_number := p_original_rec.master_serial_number;
9729: FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_MASTER_SERIAL');
9730: wsh_util_core.add_message(wsh_util_core.g_ret_sts_warning, l_module_name);
9731: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
9732: END IF;
9733: END IF;
9734:
9727: ELSIF (p_original_rec.container_flag = 'N') THEN -- R12 MDC
9728: x_detail_rec.master_serial_number := p_original_rec.master_serial_number;
9729: FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_MASTER_SERIAL');
9730: wsh_util_core.add_message(wsh_util_core.g_ret_sts_warning, l_module_name);
9731: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
9732: END IF;
9733: END IF;
9734:
9735: END IF;
9745:
9746: IF(x_detail_rec.inspection_flag = 'N' AND p_original_rec.inspection_flag IN ('I', 'R')) THEN
9747: x_detail_rec.inspection_flag := p_original_rec.inspection_flag;
9748: FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_INSPECT_FLAG');
9749: wsh_util_core.add_message(wsh_util_core.g_ret_sts_warning, l_module_name);
9750: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
9751: END IF;
9752:
9753: END IF;
9746: IF(x_detail_rec.inspection_flag = 'N' AND p_original_rec.inspection_flag IN ('I', 'R')) THEN
9747: x_detail_rec.inspection_flag := p_original_rec.inspection_flag;
9748: FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_INSPECT_FLAG');
9749: wsh_util_core.add_message(wsh_util_core.g_ret_sts_warning, l_module_name);
9750: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
9751: END IF;
9752:
9753: END IF;
9754:
9770: p_item_type => 'CONT_ITEM',
9771: x_return_status => l_return_status);
9772:
9773: --
9774: wsh_util_core.api_post_call(
9775: p_return_status => l_return_status,
9776: x_num_warnings => l_number_of_warnings,
9777: x_num_errors => l_number_of_errors,
9778: p_msg_data => l_msg_data
9796: p_item_type => 'CONT_ITEM',
9797: x_return_status => l_return_status);
9798:
9799: --
9800: wsh_util_core.api_post_call(
9801: p_return_status => l_return_status,
9802: x_num_warnings => l_number_of_warnings,
9803: x_num_errors => l_number_of_errors,
9804: p_msg_data => l_msg_data
9812:
9813: --{
9814: IF (nvl(x_detail_rec.delivered_quantity, FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM) THEN
9815: --{
9816: x_detail_rec.delivered_quantity := round(x_detail_rec.delivered_quantity,wsh_util_core.c_max_decimal_digits_inv);
9817: --}
9818: END IF;
9819: --}
9820:
9862: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9863: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9864: END IF;
9865:
9866: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9867: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9868: FND_MSG_PUB.Count_And_Get
9869: (
9870: p_count => x_msg_count,
9863: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9864: END IF;
9865:
9866: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9867: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9868: FND_MSG_PUB.Count_And_Get
9869: (
9870: p_count => x_msg_count,
9871: p_data => x_msg_data,
9872: p_encoded => FND_API.G_FALSE
9873: );
9874: --
9875: IF l_debug_on THEN
9876: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9877: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9878: END IF;
9879:
9880: WHEN OTHERS THEN
9873: );
9874: --
9875: IF l_debug_on THEN
9876: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9877: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9878: END IF;
9879:
9880: WHEN OTHERS THEN
9881: ROLLBACK TO VALIDATE_DET_COMMON_GRP;
9879:
9880: WHEN OTHERS THEN
9881: ROLLBACK TO VALIDATE_DET_COMMON_GRP;
9882: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9883: wsh_util_core.add_message(x_return_status, l_module_name);
9884: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Validate_Detail_Common');
9885: FND_MSG_PUB.Count_And_Get
9886: (
9887: p_count => x_msg_count,
9880: WHEN OTHERS THEN
9881: ROLLBACK TO VALIDATE_DET_COMMON_GRP;
9882: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9883: wsh_util_core.add_message(x_return_status, l_module_name);
9884: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Validate_Detail_Common');
9885: FND_MSG_PUB.Count_And_Get
9886: (
9887: p_count => x_msg_count,
9888: p_data => x_msg_data,
9945: WSH_DEBUG_SV.log(l_module_name, 'Shipped Qty', p_shipped_quantity);
9946: END IF;
9947: --
9948:
9949: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9950:
9951: if p_transaction_temp_id is not null then
9952:
9953: open c_serial_qty(p_transaction_temp_id);
9986: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9987: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9988: END IF;
9989:
9990: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9991: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9992: IF l_debug_on THEN
9993: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9994: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9987: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9988: END IF;
9989:
9990: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9991: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9992: IF l_debug_on THEN
9993: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9994: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9995: END IF;
9989:
9990: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9991: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9992: IF l_debug_on THEN
9993: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9994: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9995: END IF;
9996:
9997: WHEN OTHERS THEN
9990: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9991: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9992: IF l_debug_on THEN
9993: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9994: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9995: END IF;
9996:
9997: WHEN OTHERS THEN
9998: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9995: END IF;
9996:
9997: WHEN OTHERS THEN
9998: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9999: wsh_util_core.add_message(x_return_status, l_module_name);
10000: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Get_Serial_Quantity');
10001: --
10002:
10003: IF l_debug_on THEN
9996:
9997: WHEN OTHERS THEN
9998: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9999: wsh_util_core.add_message(x_return_status, l_module_name);
10000: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Get_Serial_Quantity');
10001: --
10002:
10003: IF l_debug_on THEN
10004: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10054: l_counter NUMBER := 0;
10055: l_index NUMBER;
10056:
10057: l_detail_info_tab WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type;
10058: l_valid_index_tab wsh_util_core.id_tab_type;
10059: l_delivery_id NUMBER;
10060: l_delivery_detail_rec WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Rec_Type;
10061: l_validation_tab wsh_util_core.id_tab_type;
10062: --
10057: l_detail_info_tab WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type;
10058: l_valid_index_tab wsh_util_core.id_tab_type;
10059: l_delivery_id NUMBER;
10060: l_delivery_detail_rec WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Rec_Type;
10061: l_validation_tab wsh_util_core.id_tab_type;
10062: --
10063: l_details_marked WSH_UTIL_CORE.Id_Tab_Type;
10064: mark_reprice_error EXCEPTION;
10065:
10059: l_delivery_id NUMBER;
10060: l_delivery_detail_rec WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Rec_Type;
10061: l_validation_tab wsh_util_core.id_tab_type;
10062: --
10063: l_details_marked WSH_UTIL_CORE.Id_Tab_Type;
10064: mark_reprice_error EXCEPTION;
10065:
10066: --
10067: CURSOR det_to_del_cur(p_detail_id NUMBER) IS
10069: FROM wsh_delivery_assignments_v wda
10070: WHERE wda.delivery_detail_id = p_detail_id;
10071:
10072: -- anxsharm for Load Tender
10073: l_detail_tender_tab wsh_util_core.id_tab_type;
10074: l_trip_id_tab wsh_util_core.id_tab_type;
10075:
10076: --
10077: l_weight_uom_code VARCHAR2(10);
10070: WHERE wda.delivery_detail_id = p_detail_id;
10071:
10072: -- anxsharm for Load Tender
10073: l_detail_tender_tab wsh_util_core.id_tab_type;
10074: l_trip_id_tab wsh_util_core.id_tab_type;
10075:
10076: --
10077: l_weight_uom_code VARCHAR2(10);
10078: l_volume_uom_code VARCHAR2(10);
10085: l_reset_flags BOOLEAN;
10086: --
10087: BEGIN
10088: -- Bugfix 4070732
10089: IF WSH_UTIL_CORE.G_START_OF_SESSION_API is null
10090: THEN
10091: WSH_UTIL_CORE.G_START_OF_SESSION_API := l_api_session_name;
10092: WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API := FALSE;
10093: END IF;
10087: BEGIN
10088: -- Bugfix 4070732
10089: IF WSH_UTIL_CORE.G_START_OF_SESSION_API is null
10090: THEN
10091: WSH_UTIL_CORE.G_START_OF_SESSION_API := l_api_session_name;
10092: WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API := FALSE;
10093: END IF;
10094: -- End of Code Bugfix 4070732
10095:
10088: -- Bugfix 4070732
10089: IF WSH_UTIL_CORE.G_START_OF_SESSION_API is null
10090: THEN
10091: WSH_UTIL_CORE.G_START_OF_SESSION_API := l_api_session_name;
10092: WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API := FALSE;
10093: END IF;
10094: -- End of Code Bugfix 4070732
10095:
10096: -- Standard Start of API savepoint
10128: END IF;
10129: --
10130: --
10131: -- Initialize API return status to success
10132: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
10133: l_number_of_errors := 0;
10134: l_number_of_warnings := 0;
10135:
10136: -- Check for generic mandatory parameters
10136: -- Check for generic mandatory parameters
10137: IF p_In_rec.caller IS NULL THEN
10138: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
10139: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'CALLER');
10140: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
10141: IF l_debug_on THEN
10142: wsh_debug_sv.logmsg(l_module_name,'Null Caller');
10143: END IF;
10144: RAISE FND_API.G_EXC_ERROR;
10146:
10147: IF p_In_rec.action_code IS NULL THEN
10148: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
10149: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'ACTION_CODE');
10150: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
10151: IF l_debug_on THEN
10152: wsh_debug_sv.logmsg(l_module_name,'Null Action Code');
10153: END IF;
10154: RAISE FND_API.G_EXC_ERROR;
10155: ELSIF(p_In_rec.action_code NOT IN('CREATE', 'UPDATE', 'CANCEL')
10156: OR (p_In_rec.action_code = 'CANCEL' AND p_In_rec.caller <> 'WSH_INBOUND')) THEN
10157: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_ACTION_CODE');
10158: FND_MESSAGE.SET_TOKEN('ACT_CODE',p_In_rec.action_code );
10159: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
10160: IF l_debug_on THEN
10161: wsh_debug_sv.logmsg(l_module_name,'WSH_INVALID_ACTION_CODE');
10162: END IF;
10163: RAISE FND_API.G_EXC_ERROR;
10177: x_return_status => l_return_status
10178: );
10179:
10180: --
10181: wsh_util_core.api_post_call(
10182: p_return_status => l_return_status,
10183: x_num_warnings => l_number_of_warnings,
10184: x_num_errors => l_number_of_errors,
10185: p_msg_data => l_msg_data
10231: );
10232:
10233:
10234: --
10235: wsh_util_core.api_post_call(
10236: p_return_status => l_return_status,
10237: x_num_warnings => l_loop_num_warn,
10238: x_num_errors => l_loop_num_error,
10239: p_msg_data => l_msg_data
10256: quantity => l_delivery_detail_rec.gross_weight,
10257: item_id => l_delivery_detail_rec.inventory_item_id,
10258: x_return_status => l_return_status );
10259:
10260: wsh_util_core.api_post_call(
10261: p_return_status => l_return_status,
10262: x_num_warnings => l_loop_num_warn,
10263: x_num_errors => l_loop_num_error
10264: );
10270: quantity => l_delivery_detail_rec.net_weight,
10271: item_id => l_delivery_detail_rec.inventory_item_id,
10272: x_return_status => l_return_status);
10273:
10274: wsh_util_core.api_post_call(
10275: p_return_status => l_return_status,
10276: x_num_warnings => l_loop_num_warn,
10277: x_num_errors => l_loop_num_error
10278: );
10300: quantity => l_delivery_detail_rec.volume,
10301: item_id => l_delivery_detail_rec.inventory_item_id,
10302: x_return_status => l_return_status);
10303:
10304: wsh_util_core.api_post_call(
10305: p_return_status => l_return_status,
10306: x_num_warnings => l_loop_num_warn,
10307: x_num_errors => l_loop_num_error
10308: );
10313: to_uom => l_delivery_detail_rec.volume_uom_code,
10314: quantity => l_delivery_detail_rec.filled_volume,
10315: item_id => l_delivery_detail_rec.inventory_item_id,
10316: x_return_status => l_return_status);
10317: wsh_util_core.api_post_call(
10318: p_return_status => l_return_status,
10319: x_num_warnings => l_loop_num_warn,
10320: x_num_errors => l_loop_num_error
10321: );
10407: p_in_rec => p_in_rec,
10408: p_serial_range_tab => p_serial_range_tab);
10409:
10410: --
10411: wsh_util_core.api_post_call(
10412: p_return_status => l_return_status,
10413: x_num_warnings => l_number_of_warnings,
10414: x_num_errors => l_number_of_errors,
10415: p_msg_data => l_msg_data
10426: x_msg_count => l_msg_count,
10427: x_msg_data => l_msg_data);
10428:
10429: --
10430: wsh_util_core.api_post_call(
10431: p_return_status => l_return_status,
10432: x_num_warnings => l_number_of_warnings,
10433: x_num_errors => l_number_of_errors,
10434: p_msg_data => l_msg_data
10436:
10437:
10438: ELSIF(p_In_rec.action_code = 'UPDATE') THEN
10439:
10440: IF( WSH_UTIL_CORE.FTE_Is_Installed = 'Y') THEN
10441: IF l_details_marked.count > 0 THEN
10442: --
10443: IF l_debug_on THEN
10444: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.MARK_REPRICE_REQUIRED',WSH_DEBUG_SV.C_PROC_LEVEL);
10449: p_entity_ids => l_details_marked,
10450: x_return_status => l_return_status);
10451:
10452: --
10453: wsh_util_core.api_post_call(
10454: p_return_status => l_return_status,
10455: x_num_warnings => l_number_of_warnings,
10456: x_num_errors => l_number_of_errors,
10457: p_msg_data => l_msg_data
10456: x_num_errors => l_number_of_errors,
10457: p_msg_data => l_msg_data
10458: );
10459:
10460: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10461: raise mark_reprice_error;
10462: END IF;
10463: END IF;
10464: END IF;
10489: x_msg_data => l_msg_data,
10490: p_caller => p_in_rec.caller);
10491:
10492: --
10493: wsh_util_core.api_post_call(
10494: p_return_status => l_return_status,
10495: x_num_warnings => l_number_of_warnings,
10496: x_num_errors => l_number_of_errors,
10497: p_msg_data => l_msg_data
10506: x_msg_count => l_msg_count,
10507: x_msg_data => l_msg_data,
10508: p_caller => p_in_rec.caller);
10509:
10510: wsh_util_core.api_post_call(p_return_status =>l_return_status,
10511: x_num_warnings =>l_number_of_warnings,
10512: x_num_errors =>l_number_of_errors);
10513:
10514: -- jckwok
10519: IF l_debug_on THEN
10520: wsh_debug_sv.log(l_module_name, 'Number of warnings', l_number_of_warnings);
10521: END IF;
10522:
10523: RAISE wsh_util_core.g_exc_warning;
10524: END IF;
10525:
10526: -- Standard check of p_commit.
10527: IF FND_API.To_Boolean( p_commit ) THEN
10530: END IF;
10531: --
10532: -- Start code for Bugfix 4070732
10533: --
10534: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10535: IF l_debug_on THEN
10536: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10537: END IF;
10538:
10532: -- Start code for Bugfix 4070732
10533: --
10534: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10535: IF l_debug_on THEN
10536: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10537: END IF;
10538:
10539: l_reset_flags := FALSE;
10540:
10537: END IF;
10538:
10539: l_reset_flags := FALSE;
10540:
10541: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
10542: x_return_status => l_return_status);
10543:
10544: IF l_debug_on THEN
10545: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10544: IF l_debug_on THEN
10545: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10546: END IF;
10547:
10548: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
10549: RAISE FND_API.G_EXC_ERROR;
10550: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
10551: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10552: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10546: END IF;
10547:
10548: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
10549: RAISE FND_API.G_EXC_ERROR;
10550: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
10551: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10552: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10553: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
10554: END IF;
10548: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
10549: RAISE FND_API.G_EXC_ERROR;
10550: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
10551: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10552: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10553: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
10554: END IF;
10555:
10556: END IF;
10549: RAISE FND_API.G_EXC_ERROR;
10550: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
10551: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10552: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10553: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
10554: END IF;
10555:
10556: END IF;
10557: --
10561: END IF;
10562:
10563: --bug 4070732
10564: --End of the API handling of calls to process_stops_for_load_tender
10565: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
10566: --{
10567: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10568: --{
10569:
10563: --bug 4070732
10564: --End of the API handling of calls to process_stops_for_load_tender
10565: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
10566: --{
10567: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10568: --{
10569:
10570: IF FND_API.TO_BOOLEAN(p_commit) THEN
10571:
10569:
10570: IF FND_API.TO_BOOLEAN(p_commit) THEN
10571:
10572: IF l_debug_on THEN
10573: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10574: END IF;
10575:
10576: WSH_UTIL_CORE.reset_stops_for_load_tender(p_reset_flags => TRUE,
10577: x_return_status => l_return_status);
10572: IF l_debug_on THEN
10573: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10574: END IF;
10575:
10576: WSH_UTIL_CORE.reset_stops_for_load_tender(p_reset_flags => TRUE,
10577: x_return_status => l_return_status);
10578: ELSE
10579:
10580: IF l_debug_on THEN
10577: x_return_status => l_return_status);
10578: ELSE
10579:
10580: IF l_debug_on THEN
10581: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10582: END IF;
10583:
10584: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
10585: x_return_status => l_return_status);
10580: IF l_debug_on THEN
10581: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10582: END IF;
10583:
10584: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
10585: x_return_status => l_return_status);
10586: END IF;
10587:
10588: IF l_debug_on THEN
10589: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10590: END IF;
10591:
10592:
10593: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10594: x_return_status := l_return_status;
10595:
10596: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
10597: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
10592:
10593: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10594: x_return_status := l_return_status;
10595:
10596: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
10597: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
10598: THEN
10599: IF NOT(FND_API.TO_BOOLEAN(p_commit)) THEN
10600: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
10593: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10594: x_return_status := l_return_status;
10595:
10596: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
10597: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
10598: THEN
10599: IF NOT(FND_API.TO_BOOLEAN(p_commit)) THEN
10600: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
10601: END IF;
10625: x_return_status := FND_API.G_RET_STS_ERROR ;
10626: --
10627: -- Start code for Bugfix 4070732
10628: --
10629: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
10630: THEN
10631: --{
10632: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10633: --{
10628: --
10629: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
10630: THEN
10631: --{
10632: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10633: --{
10634: IF l_debug_on THEN
10635: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10636: END IF;
10631: --{
10632: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10633: --{
10634: IF l_debug_on THEN
10635: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10636: END IF;
10637:
10638: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
10639: x_return_status => l_return_status);
10634: IF l_debug_on THEN
10635: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10636: END IF;
10637:
10638: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
10639: x_return_status => l_return_status);
10640:
10641: IF l_debug_on THEN
10642: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10641: IF l_debug_on THEN
10642: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10643: END IF;
10644:
10645: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
10646: x_return_status := l_return_status;
10647: END IF;
10648: --}
10649: END IF;
10672: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10673: --
10674: -- Start code for Bugfix 4070732
10675: --
10676: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
10677: THEN
10678: --{
10679: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10680: --{
10675: --
10676: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
10677: THEN
10678: --{
10679: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10680: --{
10681: IF l_debug_on THEN
10682: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10683: END IF;
10678: --{
10679: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10680: --{
10681: IF l_debug_on THEN
10682: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10683: END IF;
10684:
10685: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
10686: x_return_status => l_return_status);
10681: IF l_debug_on THEN
10682: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10683: END IF;
10684:
10685: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
10686: x_return_status => l_return_status);
10687:
10688: IF l_debug_on THEN
10689: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10709: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10710: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10711: END IF;
10712: --
10713: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10714: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10715: --
10716: -- Start code for Bugfix 4070732
10717: --
10710: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10711: END IF;
10712: --
10713: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10714: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10715: --
10716: -- Start code for Bugfix 4070732
10717: --
10718: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
10714: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10715: --
10716: -- Start code for Bugfix 4070732
10717: --
10718: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
10719: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10720: IF l_debug_on THEN
10721: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10722: END IF;
10715: --
10716: -- Start code for Bugfix 4070732
10717: --
10718: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
10719: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10720: IF l_debug_on THEN
10721: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10722: END IF;
10723:
10717: --
10718: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
10719: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10720: IF l_debug_on THEN
10721: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10722: END IF;
10723:
10724: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
10725: x_return_status => l_return_status);
10720: IF l_debug_on THEN
10721: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10722: END IF;
10723:
10724: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
10725: x_return_status => l_return_status);
10726:
10727: IF l_debug_on THEN
10728: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10727: IF l_debug_on THEN
10728: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10729: END IF;
10730:
10731: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10732: x_return_status := l_return_status;
10733:
10734: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
10735: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
10730:
10731: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10732: x_return_status := l_return_status;
10733:
10734: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
10735: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
10736: THEN
10737: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
10738: END IF;
10731: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10732: x_return_status := l_return_status;
10733:
10734: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
10735: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
10736: THEN
10737: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
10738: END IF;
10739: END IF;
10753:
10754:
10755: --
10756: IF l_debug_on THEN
10757: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10758: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10759: END IF;
10760: --
10761: WHEN mark_reprice_error then
10754:
10755: --
10756: IF l_debug_on THEN
10757: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10758: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10759: END IF;
10760: --
10761: WHEN mark_reprice_error then
10762: FND_MESSAGE.Set_Name('WSH', 'WSH_REPRICE_REQUIRED_ERR');
10759: END IF;
10760: --
10761: WHEN mark_reprice_error then
10762: FND_MESSAGE.Set_Name('WSH', 'WSH_REPRICE_REQUIRED_ERR');
10763: wsh_util_core.add_message(x_return_status, l_module_name);
10764: x_return_status := l_return_status;
10765: --
10766: -- Start code for Bugfix 4070732
10767: --
10764: x_return_status := l_return_status;
10765: --
10766: -- Start code for Bugfix 4070732
10767: --
10768: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
10769: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10770: IF l_debug_on THEN
10771: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10772: END IF;
10765: --
10766: -- Start code for Bugfix 4070732
10767: --
10768: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
10769: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10770: IF l_debug_on THEN
10771: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10772: END IF;
10773:
10767: --
10768: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
10769: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10770: IF l_debug_on THEN
10771: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10772: END IF;
10773:
10774: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
10775: x_return_status => l1_return_status);
10770: IF l_debug_on THEN
10771: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10772: END IF;
10773:
10774: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
10775: x_return_status => l1_return_status);
10776:
10777: IF l_debug_on THEN
10778: WSH_DEBUG_SV.log(l_module_name,'l1_return_status',l1_return_status);
10777: IF l_debug_on THEN
10778: WSH_DEBUG_SV.log(l_module_name,'l1_return_status',l1_return_status);
10779: END IF;
10780:
10781: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
10782: IF l1_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10783: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
10784: IF l1_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10785: l_return_status := l1_return_status;
10778: WSH_DEBUG_SV.log(l_module_name,'l1_return_status',l1_return_status);
10779: END IF;
10780:
10781: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
10782: IF l1_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10783: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
10784: IF l1_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10785: l_return_status := l1_return_status;
10786: END IF;
10779: END IF;
10780:
10781: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
10782: IF l1_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10783: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
10784: IF l1_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10785: l_return_status := l1_return_status;
10786: END IF;
10787: ELSE
10780:
10781: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
10782: IF l1_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10783: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
10784: IF l1_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10785: l_return_status := l1_return_status;
10786: END IF;
10787: ELSE
10788: l_return_status := l1_return_status;
10790: END IF;
10791: END IF;
10792:
10793: x_return_status := l_return_status;
10794: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
10795: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
10796: THEN
10797: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
10798: END IF;
10791: END IF;
10792:
10793: x_return_status := l_return_status;
10794: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
10795: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
10796: THEN
10797: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
10798: END IF;
10799:
10818: --
10819: WHEN OTHERS THEN
10820: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
10821: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10822: wsh_util_core.add_message(x_return_status, l_module_name);
10823: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Create_Update_Delivery_Detail');
10824: --
10825: -- Start code for Bugfix 4070732
10826: --
10819: WHEN OTHERS THEN
10820: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
10821: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10822: wsh_util_core.add_message(x_return_status, l_module_name);
10823: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Create_Update_Delivery_Detail');
10824: --
10825: -- Start code for Bugfix 4070732
10826: --
10827: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
10823: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Create_Update_Delivery_Detail');
10824: --
10825: -- Start code for Bugfix 4070732
10826: --
10827: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
10828: THEN
10829: --{
10830: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10831: --{
10826: --
10827: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name)
10828: THEN
10829: --{
10830: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10831: --{
10832: IF l_debug_on THEN
10833: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10834: END IF;
10829: --{
10830: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10831: --{
10832: IF l_debug_on THEN
10833: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10834: END IF;
10835:
10836: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
10837: x_return_status => l_return_status);
10832: IF l_debug_on THEN
10833: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10834: END IF;
10835:
10836: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
10837: x_return_status => l_return_status);
10838:
10839: IF l_debug_on THEN
10840: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10872: -- Bug 6790938 :
10873: -- Calling Find_Matching_Groups api instead of calling Autocreate_deliveries
10874: -- -----------------------------------------------------------------------
10875: -- Added for Bug 4295161
10876: PROCEDURE Get_Carton_Grouping (p_line_rows IN WSH_UTIL_CORE.id_tab_type,
10877: x_grouping_rows OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
10878: x_return_status OUT NOCOPY VARCHAR2) IS
10879:
10880: l_attr_tab wsh_delivery_autocreate.grp_attr_tab_type;
10873: -- Calling Find_Matching_Groups api instead of calling Autocreate_deliveries
10874: -- -----------------------------------------------------------------------
10875: -- Added for Bug 4295161
10876: PROCEDURE Get_Carton_Grouping (p_line_rows IN WSH_UTIL_CORE.id_tab_type,
10877: x_grouping_rows OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
10878: x_return_status OUT NOCOPY VARCHAR2) IS
10879:
10880: l_attr_tab wsh_delivery_autocreate.grp_attr_tab_type;
10881: l_group_tab wsh_delivery_autocreate.grp_attr_tab_type;
10880: l_attr_tab wsh_delivery_autocreate.grp_attr_tab_type;
10881: l_group_tab wsh_delivery_autocreate.grp_attr_tab_type;
10882: l_action_rec wsh_delivery_autocreate.action_rec_type;
10883: l_target_rec wsh_delivery_autocreate.grp_attr_rec_type;
10884: l_matched_entities wsh_util_core.id_tab_type;
10885: l_out_rec wsh_delivery_autocreate.out_rec_type;
10886:
10887: l_debug_on Boolean;
10888:
10981: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10982: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10983: END IF;
10984:
10985: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10986: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10987: IF l_debug_on THEN
10988: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10989: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10982: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10983: END IF;
10984:
10985: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10986: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10987: IF l_debug_on THEN
10988: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10989: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10990: END IF;
10984:
10985: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10986: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10987: IF l_debug_on THEN
10988: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10989: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10990: END IF;
10991:
10992: WHEN OTHERS THEN
10985: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10986: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10987: IF l_debug_on THEN
10988: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10989: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10990: END IF;
10991:
10992: WHEN OTHERS THEN
10993: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10990: END IF;
10991:
10992: WHEN OTHERS THEN
10993: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10994: wsh_util_core.add_message(x_return_status, l_module_name);
10995: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Get_Carton_Grouping');
10996: --
10997: IF l_debug_on THEN
10998: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10991:
10992: WHEN OTHERS THEN
10993: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10994: wsh_util_core.add_message(x_return_status, l_module_name);
10995: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Get_Carton_Grouping');
10996: --
10997: IF l_debug_on THEN
10998: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10999: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');