[Home] [Help]
71:
72: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
73: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Compare_Sort_Value','start');
74:
75: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
76:
77:
78:
79: x_result:='=';
128: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Compare_Sort_Value');
129:
130: IF (l_warning_count > 0)
131: THEN
132: x_return_status:=WSH_UTIL_CORE.G_RET_STS_WARNING;
133: END IF;
134:
135: EXCEPTION
136:
136:
137:
138:
139: WHEN others THEN
140: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
141: FTE_FREIGHT_PRICING_UTIL.set_exception('Compare_Sort_Value',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
142: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
143: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Compare_Sort_Value');
144:
175:
176: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
177: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Partition','start');
178:
179: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
180:
181: j:=p_hi_index+1;
182: i:=p_low_index-1;
183: x_partition_index:=p_low_index;
195: p_value2=>l_pivot ,
196: x_result=> l_result,
197: x_return_status=>l_return_status);
198:
199: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
200: THEN
201: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
202: THEN
203: raise FTE_FREIGHT_PRICING_UTIL.g_quicksort_compare_fail;
197: x_return_status=>l_return_status);
198:
199: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
200: THEN
201: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
202: THEN
203: raise FTE_FREIGHT_PRICING_UTIL.g_quicksort_compare_fail;
204:
205: END IF;
221: x_result=> l_result,
222: x_return_status=>l_return_status);
223:
224:
225: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
226: THEN
227: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
228: THEN
229: raise FTE_FREIGHT_PRICING_UTIL.g_quicksort_compare_fail;
223:
224:
225: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
226: THEN
227: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
228: THEN
229: raise FTE_FREIGHT_PRICING_UTIL.g_quicksort_compare_fail;
230:
231: END IF;
260: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Partition');
261:
262: IF (l_warning_count > 0)
263: THEN
264: x_return_status:=WSH_UTIL_CORE.G_RET_STS_WARNING;
265: END IF;
266:
267: EXCEPTION
268:
267: EXCEPTION
268:
269:
270: WHEN FTE_FREIGHT_PRICING_UTIL.g_quicksort_compare_fail THEN
271: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
272: FTE_FREIGHT_PRICING_UTIL.set_exception('Partition',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_quicksort_compare_fail');
273: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Partition');
274:
275:
274:
275:
276:
277: WHEN others THEN
278: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
279: FTE_FREIGHT_PRICING_UTIL.set_exception('Partition',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
280: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
281: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Partition');
282:
310:
311: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
312: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Quick_Sort','start');
313:
314: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
315:
316: IF(p_low_index < p_hi_index)
317: THEN
318:
324: x_sorted_index=>x_sorted_index,
325: x_partition_index=>l_partition_index,
326: x_return_status=>l_return_status);
327:
328: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
329: THEN
330: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
331: THEN
332: raise FTE_FREIGHT_PRICING_UTIL.g_quicksort_partition_fail;
326: x_return_status=>l_return_status);
327:
328: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
329: THEN
330: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
331: THEN
332: raise FTE_FREIGHT_PRICING_UTIL.g_quicksort_partition_fail;
333:
334: END IF;
340: p_hi_index=>l_partition_index,
341: p_sort_type=>p_sort_type,
342: x_sorted_index=>x_sorted_index,
343: x_return_status=>l_return_status);
344: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
345: THEN
346: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
347: THEN
348: raise FTE_FREIGHT_PRICING_UTIL.g_quicksort_fail;
342: x_sorted_index=>x_sorted_index,
343: x_return_status=>l_return_status);
344: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
345: THEN
346: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
347: THEN
348: raise FTE_FREIGHT_PRICING_UTIL.g_quicksort_fail;
349:
350: END IF;
357: p_hi_index=>p_hi_index,
358: p_sort_type=>p_sort_type,
359: x_sorted_index=>x_sorted_index,
360: x_return_status=>l_return_status);
361: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
362: THEN
363: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
364: THEN
365: raise FTE_FREIGHT_PRICING_UTIL.g_quicksort_fail;
359: x_sorted_index=>x_sorted_index,
360: x_return_status=>l_return_status);
361: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
362: THEN
363: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
364: THEN
365: raise FTE_FREIGHT_PRICING_UTIL.g_quicksort_fail;
366:
367: END IF;
375: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Quick_Sort');
376:
377: IF (l_warning_count > 0)
378: THEN
379: x_return_status:=WSH_UTIL_CORE.G_RET_STS_WARNING;
380: END IF;
381:
382: EXCEPTION
383:
382: EXCEPTION
383:
384:
385: WHEN FTE_FREIGHT_PRICING_UTIL.g_quicksort_fail THEN
386: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
387: FTE_FREIGHT_PRICING_UTIL.set_exception('Quick_Sort',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_quicksort_fail');
388: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Quick_Sort');
389:
390:
388: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Quick_Sort');
389:
390:
391: WHEN FTE_FREIGHT_PRICING_UTIL.g_quicksort_partition_fail THEN
392: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
393: FTE_FREIGHT_PRICING_UTIL.set_exception('Quick_Sort',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_quicksort_partition_fail');
394: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Quick_Sort');
395:
396:
394: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Quick_Sort');
395:
396:
397: WHEN others THEN
398: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
399: FTE_FREIGHT_PRICING_UTIL.set_exception('Quick_Sort',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
400: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
401: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Quick_Sort');
402:
423:
424: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
425: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Sort','start');
426:
427: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
428:
429:
430: i:=p_values_tab.FIRST;
431: WHILE(i IS NOT NULL)
447: p_sort_type=>NULL,--To support variations in the future
448: x_sorted_index=>x_sorted_index,
449: x_return_status=>l_return_status);
450:
451: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
452: THEN
453: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
454: THEN
455: raise FTE_FREIGHT_PRICING_UTIL.g_quicksort_fail;
449: x_return_status=>l_return_status);
450:
451: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
452: THEN
453: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
454: THEN
455: raise FTE_FREIGHT_PRICING_UTIL.g_quicksort_fail;
456:
457: END IF;
464: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Sort');
465:
466: IF (l_warning_count > 0)
467: THEN
468: x_return_status:=WSH_UTIL_CORE.G_RET_STS_WARNING;
469: END IF;
470:
471: EXCEPTION
472:
471: EXCEPTION
472:
473:
474: WHEN FTE_FREIGHT_PRICING_UTIL.g_quicksort_fail THEN
475: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
476: FTE_FREIGHT_PRICING_UTIL.set_exception('Sort',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_quicksort_fail');
477: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Sort');
478:
479:
477: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Sort');
478:
479:
480: WHEN others THEN
481: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
482: FTE_FREIGHT_PRICING_UTIL.set_exception('Sort',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
483: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
484: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Sort');
485:
525: j NUMBER :=0;
526: l_request_id NUMBER;
527:
528: -- variables for shipment_price_compare
529: l_lane_id_tab wsh_util_core.id_tab_type;
530: l_sched_id_tab wsh_util_core.id_tab_type;
531: l_service_lane_tab wsh_util_core.column_tab_type;
532: l_service_sched_tab wsh_util_core.column_tab_type;
533: l_lane_price_tab wsh_util_core.id_tab_type;
526: l_request_id NUMBER;
527:
528: -- variables for shipment_price_compare
529: l_lane_id_tab wsh_util_core.id_tab_type;
530: l_sched_id_tab wsh_util_core.id_tab_type;
531: l_service_lane_tab wsh_util_core.column_tab_type;
532: l_service_sched_tab wsh_util_core.column_tab_type;
533: l_lane_price_tab wsh_util_core.id_tab_type;
534: l_lane_curr_tab wsh_util_core.column_tab_type;
527:
528: -- variables for shipment_price_compare
529: l_lane_id_tab wsh_util_core.id_tab_type;
530: l_sched_id_tab wsh_util_core.id_tab_type;
531: l_service_lane_tab wsh_util_core.column_tab_type;
532: l_service_sched_tab wsh_util_core.column_tab_type;
533: l_lane_price_tab wsh_util_core.id_tab_type;
534: l_lane_curr_tab wsh_util_core.column_tab_type;
535: l_sched_price_tab wsh_util_core.id_tab_type;
528: -- variables for shipment_price_compare
529: l_lane_id_tab wsh_util_core.id_tab_type;
530: l_sched_id_tab wsh_util_core.id_tab_type;
531: l_service_lane_tab wsh_util_core.column_tab_type;
532: l_service_sched_tab wsh_util_core.column_tab_type;
533: l_lane_price_tab wsh_util_core.id_tab_type;
534: l_lane_curr_tab wsh_util_core.column_tab_type;
535: l_sched_price_tab wsh_util_core.id_tab_type;
536: l_sched_curr_tab wsh_util_core.column_tab_type;
529: l_lane_id_tab wsh_util_core.id_tab_type;
530: l_sched_id_tab wsh_util_core.id_tab_type;
531: l_service_lane_tab wsh_util_core.column_tab_type;
532: l_service_sched_tab wsh_util_core.column_tab_type;
533: l_lane_price_tab wsh_util_core.id_tab_type;
534: l_lane_curr_tab wsh_util_core.column_tab_type;
535: l_sched_price_tab wsh_util_core.id_tab_type;
536: l_sched_curr_tab wsh_util_core.column_tab_type;
537: l_lane_xref dbms_utility.number_array;
530: l_sched_id_tab wsh_util_core.id_tab_type;
531: l_service_lane_tab wsh_util_core.column_tab_type;
532: l_service_sched_tab wsh_util_core.column_tab_type;
533: l_lane_price_tab wsh_util_core.id_tab_type;
534: l_lane_curr_tab wsh_util_core.column_tab_type;
535: l_sched_price_tab wsh_util_core.id_tab_type;
536: l_sched_curr_tab wsh_util_core.column_tab_type;
537: l_lane_xref dbms_utility.number_array;
538: l_sched_xref dbms_utility.number_array;
531: l_service_lane_tab wsh_util_core.column_tab_type;
532: l_service_sched_tab wsh_util_core.column_tab_type;
533: l_lane_price_tab wsh_util_core.id_tab_type;
534: l_lane_curr_tab wsh_util_core.column_tab_type;
535: l_sched_price_tab wsh_util_core.id_tab_type;
536: l_sched_curr_tab wsh_util_core.column_tab_type;
537: l_lane_xref dbms_utility.number_array;
538: l_sched_xref dbms_utility.number_array;
539:
532: l_service_sched_tab wsh_util_core.column_tab_type;
533: l_lane_price_tab wsh_util_core.id_tab_type;
534: l_lane_curr_tab wsh_util_core.column_tab_type;
535: l_sched_price_tab wsh_util_core.id_tab_type;
536: l_sched_curr_tab wsh_util_core.column_tab_type;
537: l_lane_xref dbms_utility.number_array;
538: l_sched_xref dbms_utility.number_array;
539:
540: -- variables for tl_trip_price_compare
561: PRAGMA AUTONOMOUS_TRANSACTION;
562:
563: BEGIN
564: SAVEPOINT COMPARE_TRIP_RATES;
565: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
566:
567: IF FND_API.to_Boolean( p_init_msg_list )
568: THEN
569: FND_MSG_PUB.initialize;
574:
575: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
576: x_return_status => l_return_status );
577:
578: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
579: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
580: x_return_status := l_return_status;
581: RETURN;
582: END IF;
575: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
576: x_return_status => l_return_status );
577:
578: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
579: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
580: x_return_status := l_return_status;
581: RETURN;
582: END IF;
583: ELSE
692: -- However, we can go more granular, and fail even on certain
693: -- errors caused in the child procedures
694:
695: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_return_status='||l_return_status);
696: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
697: THEN
698: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
699: THEN
700: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
694:
695: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_return_status='||l_return_status);
696: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
697: THEN
698: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
699: THEN
700: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
701: ELSE
702: l_warn_flag := 'Y';
727: x_schedule_rows =>l_exploded_schedule_rows,
728: x_ref_rows =>l_exploded_ref_rows,
729: x_return_status =>l_return_status);
730:
731: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
732: THEN
733: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
734: THEN
735: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
729: x_return_status =>l_return_status);
730:
731: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
732: THEN
733: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
734: THEN
735: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
736: ELSE
737: l_warn_flag := 'Y';
758: -- However, we can go more granular, and fail even on certain
759: -- errors caused in the child procedures
760:
761: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_return_status='||l_return_status);
762: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
763: THEN
764: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
765: THEN
766: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
760:
761: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_return_status='||l_return_status);
762: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
763: THEN
764: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
765: THEN
766: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
767: ELSE
768: l_warn_flag := 'Y';
944: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>7');
945: IF (l_warn_flag = 'Y') THEN
946: FTE_FREIGHT_PRICING_UTIL.set_trip_prc_comp_exit_warn;
947: --Added to ensure return status is warning if l_warn_flag=Y
948: x_return_status :=WSH_UTIL_CORE.G_RET_STS_WARNING;
949:
950: END IF;
951: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>8 l_warn_flag='||l_warn_flag);
952: x_request_id := l_request_id;
999: EXCEPTION
1000:
1001: WHEN FTE_FREIGHT_PRICING_UTIL.g_unexp_err THEN
1002: ROLLBACK;-- TO COMPARE_TRIP_RATES;
1003: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1004: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Compare_Trip_Rates','g_others');
1005: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Compare_Trip_Rates');
1006: IF(p_init_prc_log='Y')
1007: THEN
1010:
1011:
1012: WHEN others THEN
1013: ROLLBACK;-- TO COMPARE_TRIP_RATES;
1014: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1015: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Compare_Trip_Rates','g_others');
1016: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1017: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Compare_Trip_Rates');
1018: IF(p_init_prc_log='Y')
1088: BEGIN
1089:
1090: SAVEPOINT RATE_TRIP_INT;
1091:
1092: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1093: --
1094: IF l_debug_on THEN
1095: wsh_debug_sv.push(l_module_name);
1096: END IF;
1141: x_output_cost_tab => l_dummy_fc_tab,
1142: x_return_status => l_return_status);
1143:
1144: -- error checking
1145: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR)
1146: THEN
1147: RAISE FND_API.G_EXC_ERROR;
1148: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1149: THEN
1144: -- error checking
1145: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR)
1146: THEN
1147: RAISE FND_API.G_EXC_ERROR;
1148: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1149: THEN
1150: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1151: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING )
1152: THEN
1147: RAISE FND_API.G_EXC_ERROR;
1148: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1149: THEN
1150: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1151: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING )
1152: THEN
1153: x_return_status := l_return_status;
1154: END IF;
1155:
1163: p_check_reprice_flag => 'N',
1164: x_return_status => l_return_status);
1165:
1166: -- error checking
1167: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR)
1168: THEN
1169: RAISE FND_API.G_EXC_ERROR;
1170: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1171: THEN
1166: -- error checking
1167: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR)
1168: THEN
1169: RAISE FND_API.G_EXC_ERROR;
1170: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1171: THEN
1172: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1173: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING )
1174: THEN
1169: RAISE FND_API.G_EXC_ERROR;
1170: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1171: THEN
1172: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1173: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING )
1174: THEN
1175: x_return_status := l_return_status;
1176: END IF;
1177:
1202: x_output_cost_tab => l_dummy_fc_tab,
1203: x_return_status => l_return_status);
1204:
1205: -- error checking
1206: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR)
1207: THEN
1208: RAISE FND_API.G_EXC_ERROR;
1209: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1210: THEN
1205: -- error checking
1206: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR)
1207: THEN
1208: RAISE FND_API.G_EXC_ERROR;
1209: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1210: THEN
1211: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1212: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING )
1213: THEN
1208: RAISE FND_API.G_EXC_ERROR;
1209: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1210: THEN
1211: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1212: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING )
1213: THEN
1214: x_return_status := l_return_status;
1215: END IF;
1216:
1224: p_check_reprice_flag => 'Y',
1225: x_return_status => l_return_status);
1226:
1227: -- error checking
1228: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR)
1229: THEN
1230: RAISE FND_API.G_EXC_ERROR;
1231: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1232: THEN
1227: -- error checking
1228: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR)
1229: THEN
1230: RAISE FND_API.G_EXC_ERROR;
1231: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1232: THEN
1233: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1234: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING )
1235: THEN
1230: RAISE FND_API.G_EXC_ERROR;
1231: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1232: THEN
1233: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1234: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING )
1235: THEN
1236: x_return_status := l_return_status;
1237: END IF;
1238:
1256: x_msg_count => x_msg_count,
1257: x_msg_data => x_msg_data );
1258:
1259: -- error checking
1260: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR)
1261: THEN
1262: RAISE FND_API.G_EXC_ERROR;
1263: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1264: THEN
1259: -- error checking
1260: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR)
1261: THEN
1262: RAISE FND_API.G_EXC_ERROR;
1263: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1264: THEN
1265: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1266: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING )
1267: THEN
1262: RAISE FND_API.G_EXC_ERROR;
1263: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1264: THEN
1265: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1266: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING )
1267: THEN
1268: x_return_status := l_return_status;
1269: END IF;
1270: END IF;
1286: x_output_cost_tab => l_dummy_fc_tab,
1287: x_return_status => l_return_status);
1288:
1289: -- error checking
1290: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR)
1291: THEN
1292: RAISE FND_API.G_EXC_ERROR;
1293: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1294: THEN
1289: -- error checking
1290: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR)
1291: THEN
1292: RAISE FND_API.G_EXC_ERROR;
1293: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1294: THEN
1295: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1296: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING )
1297: THEN
1292: RAISE FND_API.G_EXC_ERROR;
1293: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1294: THEN
1295: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1296: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING )
1297: THEN
1298: x_return_status := l_return_status;
1299: END IF;
1300:
1308: p_check_reprice_flag => 'N',
1309: x_return_status => l_return_status);
1310:
1311: -- error checking
1312: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR)
1313: THEN
1314: RAISE FND_API.G_EXC_ERROR;
1315: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1316: THEN
1311: -- error checking
1312: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR)
1313: THEN
1314: RAISE FND_API.G_EXC_ERROR;
1315: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1316: THEN
1317: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1318: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING )
1319: THEN
1314: RAISE FND_API.G_EXC_ERROR;
1315: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1316: THEN
1317: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1318: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING )
1319: THEN
1320: x_return_status := l_return_status;
1321: END IF;
1322:
1331: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1332: --
1333: EXCEPTION
1334: WHEN FND_API.G_EXC_ERROR THEN
1335: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1336: IF l_debug_on THEN
1337: WSH_DEBUG_SV.pop(l_module_name);
1338: END IF;
1339: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1338: END IF;
1339: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1340: --
1341: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1342: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1343: IF l_debug_on THEN
1344: WSH_DEBUG_SV.pop(l_module_name);
1345: END IF;
1346: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1345: END IF;
1346: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1347: --
1348: WHEN OTHERS THEN
1349: WSH_UTIL_CORE.DEFAULT_HANDLER(G_PKG_NAME||'.Rate_Trip_Int');
1350: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1351: IF l_debug_on THEN
1352: WSH_DEBUG_SV.pop(l_module_name);
1353: END IF;
1346: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1347: --
1348: WHEN OTHERS THEN
1349: WSH_UTIL_CORE.DEFAULT_HANDLER(G_PKG_NAME||'.Rate_Trip_Int');
1350: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1351: IF l_debug_on THEN
1352: WSH_DEBUG_SV.pop(l_module_name);
1353: END IF;
1354: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1409: -- internal flag
1410: l_rate_mode VARCHAR2(30) := null;
1411: i NUMBER;
1412: j NUMBER;
1413: l_rated_move_ids WSH_UTIL_CORE.id_tab_type;
1414:
1415: l_msg_count NUMBER;
1416: l_msg_data VARCHAR2(32767);
1417:
1443: THEN
1444: FND_MSG_PUB.initialize;
1445: END IF;
1446:
1447: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1448: --
1449: IF l_debug_on THEN
1450: wsh_debug_sv.push(l_module_name);
1451: END IF;
1483:
1484: IF p_init_prc_log = 'Y' THEN
1485: FTE_FREIGHT_PRICING_UTIL.initialize_logging( x_return_status => l_return_status );
1486:
1487: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) and
1488: (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
1489: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1490: FTE_FREIGHT_RATING_DLVY_GRP.api_post_call
1491: (
1484: IF p_init_prc_log = 'Y' THEN
1485: FTE_FREIGHT_PRICING_UTIL.initialize_logging( x_return_status => l_return_status );
1486:
1487: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) and
1488: (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
1489: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1490: FTE_FREIGHT_RATING_DLVY_GRP.api_post_call
1491: (
1492: p_api_name => l_module_name,
1485: FTE_FREIGHT_PRICING_UTIL.initialize_logging( x_return_status => l_return_status );
1486:
1487: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) and
1488: (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
1489: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1490: FTE_FREIGHT_RATING_DLVY_GRP.api_post_call
1491: (
1492: p_api_name => l_module_name,
1493: p_api_return_status => l_return_status,
1496: x_number_of_warnings => l_number_of_warnings,
1497: x_return_status => l_return_status_1
1498: );
1499: --
1500: IF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_ERROR)
1501: THEN
1502: RAISE FND_API.G_EXC_ERROR;
1503: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1504: THEN
1499: --
1500: IF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_ERROR)
1501: THEN
1502: RAISE FND_API.G_EXC_ERROR;
1503: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1504: THEN
1505: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1506: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_WARNING )
1507: THEN
1502: RAISE FND_API.G_EXC_ERROR;
1503: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1504: THEN
1505: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1506: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_WARNING )
1507: THEN
1508: x_return_status := l_return_status_1;
1509: END IF;
1510: ELSE
1526: OR p_action_params.event IS NULL
1527: OR p_action_params.caller IS NULL
1528: OR p_action_params.action IS NULL ) THEN
1529:
1530: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1531: FTE_FREIGHT_RATING_DLVY_GRP.api_post_call
1532: (
1533: p_api_name => l_module_name,
1534: p_api_return_status => l_return_status,
1538: x_return_status => l_return_status_1
1539: );
1540: --
1541:
1542: IF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_ERROR)
1543: THEN
1544: RAISE FND_API.G_EXC_ERROR;
1545: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1546: THEN
1541:
1542: IF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_ERROR)
1543: THEN
1544: RAISE FND_API.G_EXC_ERROR;
1545: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1546: THEN
1547: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1548: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_WARNING )
1549: THEN
1544: RAISE FND_API.G_EXC_ERROR;
1545: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1546: THEN
1547: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1548: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_WARNING )
1549: THEN
1550: x_return_status := l_return_status_1;
1551: END IF;
1552: END IF;
1579: IF (p_action_params.event = 'TP-RELEASE'
1580: AND l_tp_rel_rate_event <> 'TP-RELEASE') THEN
1581: -- raise warning : rating is not required at this event
1582: -- exit
1583: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1584: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Warning =FTE_TRP_RATING_RATE_NOT_REQ');
1585: FTE_FREIGHT_RATING_DLVY_GRP.api_post_call
1586: (
1587: p_api_name => l_module_name,
1594: x_number_of_warnings => l_number_of_warnings,
1595: x_return_status => l_return_status_1
1596: );
1597: --
1598: IF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_ERROR)
1599: THEN
1600: RAISE FND_API.G_EXC_ERROR;
1601: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1602: THEN
1597: --
1598: IF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_ERROR)
1599: THEN
1600: RAISE FND_API.G_EXC_ERROR;
1601: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1602: THEN
1603: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1604: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_WARNING )
1605: THEN
1600: RAISE FND_API.G_EXC_ERROR;
1601: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1602: THEN
1603: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1604: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_WARNING )
1605: THEN
1606: x_return_status := l_return_status_1;
1607: RAISE g_finished_success;
1608: END IF;
1618: OPEN c_trip_info(p_action_params.trip_id_list(i));
1619: FETCH c_trip_info INTO l_trip_info_rec;
1620: IF (c_trip_info%NOTFOUND) THEN
1621: -- raise exception
1622: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1623: FTE_FREIGHT_RATING_DLVY_GRP.api_post_call
1624: (
1625: p_api_name => l_module_name,
1626: p_api_return_status => l_return_status,
1632: x_number_of_warnings => l_number_of_warnings,
1633: x_return_status => l_return_status_1
1634: );
1635: --
1636: IF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_ERROR)
1637: THEN
1638: RAISE FND_API.G_EXC_ERROR;
1639: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1640: THEN
1635: --
1636: IF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_ERROR)
1637: THEN
1638: RAISE FND_API.G_EXC_ERROR;
1639: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1640: THEN
1641: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1642: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_WARNING )
1643: THEN
1638: RAISE FND_API.G_EXC_ERROR;
1639: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1640: THEN
1641: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1642: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_WARNING )
1643: THEN
1644: x_return_status := l_return_status_1;
1645: END IF;
1646:
1674: OR l_trip_info_rec.mode_of_transport IS NULL
1675: OR l_trip_info_rec.service_level IS NULL ) THEN
1676:
1677: -- raise error: carrier info missing
1678: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1679: FTE_FREIGHT_RATING_DLVY_GRP.api_post_call
1680: (
1681: p_api_name => l_module_name,
1682: p_api_return_status => l_return_status,
1688: x_number_of_warnings => l_number_of_warnings,
1689: x_return_status => l_return_status_1
1690: );
1691: --
1692: IF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_ERROR)
1693: THEN
1694: RAISE FND_API.G_EXC_ERROR;
1695: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1696: THEN
1691: --
1692: IF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_ERROR)
1693: THEN
1694: RAISE FND_API.G_EXC_ERROR;
1695: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1696: THEN
1697: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1698: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_WARNING )
1699: THEN
1694: RAISE FND_API.G_EXC_ERROR;
1695: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1696: THEN
1697: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1698: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_WARNING )
1699: THEN
1700: x_return_status := l_return_status_1;
1701: END IF;
1702: END IF;
1708: -- global parameter has already been validated earlier
1709: l_rate_mode := 'TP-REL';
1710: ELSE
1711: -- for now raise error : trip is not a tp released trip
1712: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1713: FTE_FREIGHT_RATING_DLVY_GRP.api_post_call
1714: (
1715: p_api_name => l_module_name,
1716: p_api_return_status => l_return_status,
1722: x_number_of_warnings => l_number_of_warnings,
1723: x_return_status => l_return_status_1
1724: );
1725: --
1726: IF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_ERROR)
1727: THEN
1728: RAISE FND_API.G_EXC_ERROR;
1729: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1730: THEN
1725: --
1726: IF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_ERROR)
1727: THEN
1728: RAISE FND_API.G_EXC_ERROR;
1729: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1730: THEN
1731: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1732: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_WARNING )
1733: THEN
1728: RAISE FND_API.G_EXC_ERROR;
1729: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1730: THEN
1731: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1732: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_WARNING )
1733: THEN
1734: x_return_status := l_return_status_1;
1735: END IF;
1736: END IF;
1760: -- raise warning : rating not required for this trip
1761: -- exit
1762: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,
1763: 'Warning =FTE_TRP_RATING_RATE_NOT_REQ');
1764: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1765: FTE_FREIGHT_RATING_DLVY_GRP.api_post_call
1766: (
1767: p_api_name => l_module_name,
1768: p_api_return_status => l_return_status,
1774: x_number_of_warnings => l_number_of_warnings,
1775: x_return_status => l_return_status_1
1776: );
1777: --
1778: IF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_ERROR)
1779: THEN
1780: RAISE FND_API.G_EXC_ERROR;
1781: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1782: THEN
1777: --
1778: IF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_ERROR)
1779: THEN
1780: RAISE FND_API.G_EXC_ERROR;
1781: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1782: THEN
1783: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1784: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_WARNING )
1785: THEN
1780: RAISE FND_API.G_EXC_ERROR;
1781: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1782: THEN
1783: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1784: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_WARNING )
1785: THEN
1786: x_return_status := l_return_status_1;
1787: l_warn_count := l_warn_count + 1;
1788: -- RAISE g_finished_success;
1827: null;
1828: ELSE
1829: -- lane_id is null
1830: -- raise error : lane_id is missing on tp released trip
1831: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1832: FTE_FREIGHT_RATING_DLVY_GRP.api_post_call
1833: (
1834: p_api_name => l_module_name,
1835: p_api_return_status => l_return_status,
1841: x_number_of_warnings => l_number_of_warnings,
1842: x_return_status => l_return_status_1
1843: );
1844: --
1845: IF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_ERROR)
1846: THEN
1847: RAISE FND_API.G_EXC_ERROR;
1848: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1849: THEN
1844: --
1845: IF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_ERROR)
1846: THEN
1847: RAISE FND_API.G_EXC_ERROR;
1848: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1849: THEN
1850: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1851: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_WARNING )
1852: THEN
1847: RAISE FND_API.G_EXC_ERROR;
1848: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1849: THEN
1850: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1851: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_WARNING )
1852: THEN
1853: x_return_status := l_return_status_1;
1854: END IF;
1855:
1879: -- any trip that reports and error
1880: -- causes the entire action to terminate with errors
1881: -- bug 3278059 : Don't set this message if we get warning
1882: -- e.g. reprice not required is generally a warning
1883: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
1884: l_warn_count := l_warn_count + 1;
1885: ELSE
1886:
1887: FTE_FREIGHT_RATING_DLVY_GRP.api_post_call
1896: x_number_of_warnings => l_number_of_warnings,
1897: x_return_status => l_return_status_1
1898: );
1899: --
1900: IF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_ERROR)
1901: THEN
1902: RAISE FND_API.G_EXC_ERROR;
1903: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1904: THEN
1899: --
1900: IF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_ERROR)
1901: THEN
1902: RAISE FND_API.G_EXC_ERROR;
1903: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1904: THEN
1905: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1906: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_WARNING )
1907: THEN
1902: RAISE FND_API.G_EXC_ERROR;
1903: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
1904: THEN
1905: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1906: ELSIF (l_return_status_1 = WSH_UTIL_CORE.G_RET_STS_WARNING )
1907: THEN
1908: x_return_status := l_return_status_1;
1909: END IF;
1910: END IF;
1945: --
1946: --
1947: IF (l_warn_count > 0)
1948: THEN
1949: x_return_status:=WSH_UTIL_CORE.G_RET_STS_WARNING;
1950: END IF;
1951:
1952:
1953: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'x_return_status='||x_return_status);
1984: END IF;
1985: --
1986: WHEN FND_API.G_EXC_ERROR THEN
1987: ROLLBACK TO RATE_TRIP;
1988: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1989: FND_MSG_PUB.Count_And_Get
1990: (
1991: p_count => x_msg_count,
1992: p_data => x_msg_data,
2002: END IF;
2003: --
2004: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2005: ROLLBACK TO RATE_TRIP;
2006: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2007: FND_MSG_PUB.Count_And_Get
2008: (
2009: p_count => x_msg_count,
2010: p_data => x_msg_data,
2020: END IF;
2021: --
2022: WHEN OTHERS THEN
2023: ROLLBACK TO RATE_TRIP;
2024: WSH_UTIL_CORE.DEFAULT_HANDLER(G_PKG_NAME||'.Rate_Trip');
2025: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2026: FND_MSG_PUB.Count_And_Get
2027: (
2028: p_count => x_msg_count,
2021: --
2022: WHEN OTHERS THEN
2023: ROLLBACK TO RATE_TRIP;
2024: WSH_UTIL_CORE.DEFAULT_HANDLER(G_PKG_NAME||'.Rate_Trip');
2025: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2026: FND_MSG_PUB.Count_And_Get
2027: (
2028: p_count => x_msg_count,
2029: p_data => x_msg_data,
2105: x_msg_count => l_msg_count,
2106: x_msg_data => l_msg_data,
2107: x_return_status => l_return_status );
2108:
2109: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2110: l_status := 'NORMAL';
2111: errbuf := 'Trip Rerating is completed successfully';
2112: retcode := '0';
2113: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2109: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2110: l_status := 'NORMAL';
2111: errbuf := 'Trip Rerating is completed successfully';
2112: retcode := '0';
2113: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2114: l_status := 'WARNING';
2115: errbuf := 'Trip Rerating is completed with warning';
2116: retcode := '1';
2117: ELSE
2214:
2215: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
2216: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Move_Records_To_Main','start');
2217:
2218: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2219:
2220: SAVEPOINT Move_Records_To_Main_2;
2221: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
2222: 'p_trip_id=>'||p_trip_id||' p_lane_id=>'||p_lane_id
2252: p_schedule_id => p_schedule_id,
2253: p_comparison_request_id => p_comparison_request_id,
2254: x_return_status => l_return_status);
2255:
2256: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2257: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2258: x_return_status := l_return_status;
2259: raise FTE_FREIGHT_PRICING_UTIL.g_tl_move_rec_to_main_fail;
2260: END IF;
2253: p_comparison_request_id => p_comparison_request_id,
2254: x_return_status => l_return_status);
2255:
2256: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2257: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2258: x_return_status := l_return_status;
2259: raise FTE_FREIGHT_PRICING_UTIL.g_tl_move_rec_to_main_fail;
2260: END IF;
2261: ELSE
2274: p_schedule_id => p_schedule_id,
2275: p_service_type_code => p_service_type_code,
2276: x_return_status => l_return_status);
2277:
2278: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2279: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2280: x_return_status := l_return_status;
2281: raise FTE_FREIGHT_PRICING_UTIL.g_nontl_move_rec_to_main_fail;
2282: END IF;
2275: p_service_type_code => p_service_type_code,
2276: x_return_status => l_return_status);
2277:
2278: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2279: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2280: x_return_status := l_return_status;
2281: raise FTE_FREIGHT_PRICING_UTIL.g_nontl_move_rec_to_main_fail;
2282: END IF;
2283: END IF;
2290: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_Records_To_Main');
2291:
2292: IF (l_warning_count > 0)
2293: THEN
2294: x_return_status:=WSH_UTIL_CORE.G_RET_STS_WARNING;
2295: END IF;
2296:
2297: IF(p_init_prc_log='Y')
2298: THEN
2303: EXCEPTION
2304:
2305: WHEN FTE_FREIGHT_PRICING_UTIL.g_nontl_move_rec_to_main_fail THEN
2306: ROLLBACK TO Move_Records_To_Main_2;
2307: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2308: FTE_FREIGHT_PRICING_UTIL.set_exception('Move_Records_To_Main',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_nontl_move_rec_to_main_fail');
2309: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_Records_To_Main');
2310: FTE_FREIGHT_PRICING_UTIL.close_logs;
2311:
2310: FTE_FREIGHT_PRICING_UTIL.close_logs;
2311:
2312: WHEN FTE_FREIGHT_PRICING_UTIL.g_tl_move_rec_to_main_fail THEN
2313: ROLLBACK TO Move_Records_To_Main_2;
2314: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2315: FTE_FREIGHT_PRICING_UTIL.set_exception('Move_Records_To_Main',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_tl_move_rec_to_main_fail');
2316: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_Records_To_Main');
2317: IF(p_init_prc_log='Y')
2318: THEN
2321:
2322:
2323: WHEN others THEN
2324: ROLLBACK TO Move_Records_To_Main_2;
2325: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2326: FTE_FREIGHT_PRICING_UTIL.set_exception('Move_Records_To_Main',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
2327: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2328: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_Records_To_Main');
2329: IF(p_init_prc_log='Y')
2367:
2368: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
2369: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Delete_Main_Records','start');
2370:
2371: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2372:
2373: l_mode:=NULL;
2374:
2375: OPEN c_trip_mode(p_trip_id);
2381: FTE_TL_RATING.Delete_Main_Records(
2382: p_trip_id=>p_trip_id,
2383: x_return_status=>l_return_status);
2384:
2385: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
2386: THEN
2387: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
2388: THEN
2389: raise FTE_FREIGHT_PRICING_UTIL.g_tl_delete_main_rec_fail;
2383: x_return_status=>l_return_status);
2384:
2385: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
2386: THEN
2387: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
2388: THEN
2389: raise FTE_FREIGHT_PRICING_UTIL.g_tl_delete_main_rec_fail;
2390: END IF;
2391: END IF;
2397: FTE_FREIGHT_PRICING.delete_invalid_fc_recs (
2398: p_segment_id => p_trip_id,
2399: x_return_status => l_return_status ) ;
2400:
2401: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2402: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2403: raise FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed;
2404: END IF;
2405: END IF;
2398: p_segment_id => p_trip_id,
2399: x_return_status => l_return_status ) ;
2400:
2401: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2402: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2403: raise FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed;
2404: END IF;
2405: END IF;
2406:
2409: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Delete_Main_Records');
2410:
2411: IF (l_warning_count > 0)
2412: THEN
2413: x_return_status:=WSH_UTIL_CORE.G_RET_STS_WARNING;
2414: END IF;
2415:
2416: IF (p_init_prc_log='Y')
2417: THEN
2421:
2422: EXCEPTION
2423:
2424: WHEN FTE_FREIGHT_PRICING_UTIL.g_tl_delete_main_rec_fail THEN
2425: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2426: FTE_FREIGHT_PRICING_UTIL.set_exception('Delete_Main_Records',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_tl_delete_main_rec_fail');
2427: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Delete_Main_Records');
2428: IF (p_init_prc_log='Y')
2429: THEN
2431: FTE_FREIGHT_PRICING_UTIL.close_logs;
2432: END IF;
2433:
2434: WHEN FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed THEN
2435: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2436: FTE_FREIGHT_PRICING_UTIL.set_exception('Delete_Main_Records',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_delete_invalid_fc_failed');
2437: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Delete_Main_Records');
2438: IF (p_init_prc_log='Y')
2439: THEN
2442: END IF;
2443:
2444:
2445: WHEN others THEN
2446: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2447: FTE_FREIGHT_PRICING_UTIL.set_exception('Delete_Main_Records',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
2448: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2449: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Delete_Main_Records');
2450: IF (p_init_prc_log='Y')
2470:
2471: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
2472: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Copy_LaneSched_To_Rank','start');
2473:
2474: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2475:
2476:
2477: IF(p_lane_rec IS NOT NULL)
2478: THEN
2506: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Copy_LaneSched_To_Rank');
2507:
2508: EXCEPTION
2509: WHEN others THEN
2510: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2511: FTE_FREIGHT_PRICING_UTIL.set_exception('Copy_LaneSched_To_Rank',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
2512: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2513: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Copy_LaneSched_To_Rank');
2514:
2531:
2532: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
2533: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'LaneSched_Matches_Rank','start');
2534:
2535: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2536:
2537:
2538: x_match_result:='Y';
2539:
2625:
2626: EXCEPTION
2627:
2628: WHEN others THEN
2629: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2630: FTE_FREIGHT_PRICING_UTIL.set_exception('LaneSched_Matches_Rank',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
2631: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2632: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'LaneSched_Matches_Rank');
2633:
2660:
2661: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
2662: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Search_Multi_ShipMethods','start');
2663:
2664: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2665:
2666: l_search_criteria_tab:=fte_search_criteria_tab();
2667: j:=1;
2668:
2740:
2741: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'After FTE_LANE_SEARCH.Search_Lanes:'||TO_CHAR(SYSDATE, 'MM-DD-YYYY HH24:MI:SS'));
2742: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Status:'||l_return_status||':Message:'||l_msg_data);
2743:
2744: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
2745: THEN
2746: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
2747: THEN
2748: raise FTE_FREIGHT_PRICING_UTIL.g_lane_search_failed;
2742: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Status:'||l_return_status||':Message:'||l_msg_data);
2743:
2744: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
2745: THEN
2746: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
2747: THEN
2748: raise FTE_FREIGHT_PRICING_UTIL.g_lane_search_failed;
2749: ELSE
2750: l_warning_count:=l_warning_count+1;
2779: p_rank_rec =>p_ss_rate_sort_tab(j),
2780: x_match_result =>l_match_result,
2781: x_return_status =>l_return_status);
2782:
2783: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
2784: THEN
2785: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
2786: THEN
2787: raise FTE_FREIGHT_PRICING_UTIL.g_lane_matches_rank_fail;
2781: x_return_status =>l_return_status);
2782:
2783: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
2784: THEN
2785: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
2786: THEN
2787: raise FTE_FREIGHT_PRICING_UTIL.g_lane_matches_rank_fail;
2788: END IF;
2789: END IF;
2810: p_sched_rec =>NULL,
2811: x_rank_rec =>x_ss_rate_sort_tab(k),
2812: x_return_status =>l_return_status);
2813:
2814: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
2815: THEN
2816: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
2817: THEN
2818: raise FTE_FREIGHT_PRICING_UTIL.g_copy_lane_rank_fail;
2812: x_return_status =>l_return_status);
2813:
2814: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
2815: THEN
2816: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
2817: THEN
2818: raise FTE_FREIGHT_PRICING_UTIL.g_copy_lane_rank_fail;
2819: END IF;
2820: END IF;
2882: p_rank_rec =>p_ss_rate_sort_tab(j),
2883: x_match_result =>l_match_result,
2884: x_return_status =>l_return_status);
2885:
2886: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
2887: THEN
2888: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
2889: THEN
2890: raise FTE_FREIGHT_PRICING_UTIL.g_lane_matches_rank_fail;
2884: x_return_status =>l_return_status);
2885:
2886: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
2887: THEN
2888: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
2889: THEN
2890: raise FTE_FREIGHT_PRICING_UTIL.g_lane_matches_rank_fail;
2891: END IF;
2892: END IF;
2911: p_sched_rec =>l_schedules_tab(i),
2912: x_rank_rec =>x_ss_rate_sort_tab(k),
2913: x_return_status =>l_return_status);
2914:
2915: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
2916: THEN
2917: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
2918: THEN
2919: raise FTE_FREIGHT_PRICING_UTIL.g_copy_lane_rank_fail;
2913: x_return_status =>l_return_status);
2914:
2915: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
2916: THEN
2917: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
2918: THEN
2919: raise FTE_FREIGHT_PRICING_UTIL.g_copy_lane_rank_fail;
2920: END IF;
2921: END IF;
2963: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Search_Multi_ShipMethods');
2964:
2965: IF (l_warning_count > 0)
2966: THEN
2967: x_return_status:=WSH_UTIL_CORE.G_RET_STS_WARNING;
2968: END IF;
2969:
2970:
2971: EXCEPTION
2970:
2971: EXCEPTION
2972:
2973: WHEN FTE_FREIGHT_PRICING_UTIL.g_lane_search_failed THEN
2974: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2975: FTE_FREIGHT_PRICING_UTIL.set_exception('Search_Multi_ShipMethods',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_lane_search_failed');
2976: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Search_Multi_ShipMethods');
2977:
2978:
2977:
2978:
2979:
2980: WHEN FTE_FREIGHT_PRICING_UTIL.g_lane_matches_rank_fail THEN
2981: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2982: FTE_FREIGHT_PRICING_UTIL.set_exception('Search_Multi_ShipMethods',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_lane_matches_rank_fail');
2983: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Search_Multi_ShipMethods');
2984:
2985:
2983: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Search_Multi_ShipMethods');
2984:
2985:
2986: WHEN FTE_FREIGHT_PRICING_UTIL.g_copy_lane_rank_fail THEN
2987: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2988: FTE_FREIGHT_PRICING_UTIL.set_exception('Search_Multi_ShipMethods',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_copy_lane_rank_fail');
2989: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Search_Multi_ShipMethods');
2990:
2991: WHEN others THEN
2988: FTE_FREIGHT_PRICING_UTIL.set_exception('Search_Multi_ShipMethods',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_copy_lane_rank_fail');
2989: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Search_Multi_ShipMethods');
2990:
2991: WHEN others THEN
2992: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2993: FTE_FREIGHT_PRICING_UTIL.set_exception('Search_Multi_ShipMethods',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
2994: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2995: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Search_Multi_ShipMethods');
2996:
3213:
3214: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
3215: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Get_Vehicle_Item_Org','start');
3216:
3217: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3218:
3219:
3220: x_vehicle_item_id:=NULL;
3221: x_vehicle_item_org:=NULL;
3228:
3229: EXCEPTION
3230:
3231: WHEN others THEN
3232: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3233: FTE_FREIGHT_PRICING_UTIL.set_exception('Get_Vehicle_Item_Org',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
3234: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
3235: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Get_Vehicle_Item_Org');
3236:
3260:
3261: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
3262: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Seq_Tender_Sort','start');
3263:
3264: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3265:
3266:
3267: l_single_currency:=NULL;
3268: l_time_uom:=NULL;
3337: p_sort_type=>'SEQ_TENDER',
3338: x_sorted_index=>l_sorted_index,
3339: x_return_status=>l_return_status);
3340:
3341: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
3342: THEN
3343: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
3344: THEN
3345: raise FTE_FREIGHT_PRICING_UTIL.g_sort_fail;
3339: x_return_status=>l_return_status);
3340:
3341: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
3342: THEN
3343: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
3344: THEN
3345: raise FTE_FREIGHT_PRICING_UTIL.g_sort_fail;
3346: END IF;
3347: END IF;
3366:
3367: EXCEPTION
3368:
3369: WHEN FTE_FREIGHT_PRICING_UTIL.g_tl_conv_currency_fail THEN
3370: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3371: FTE_FREIGHT_PRICING_UTIL.set_exception('Seq_Tender_Sort',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_tl_conv_currency_fail');
3372: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Seq_Tender_Sort');
3373:
3374:
3372: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Seq_Tender_Sort');
3373:
3374:
3375: WHEN FTE_FREIGHT_PRICING_UTIL.g_sort_fail THEN
3376: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3377: FTE_FREIGHT_PRICING_UTIL.set_exception('Seq_Tender_Sort',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_sort_fail');
3378: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Seq_Tender_Sort');
3379:
3380: WHEN others THEN
3377: FTE_FREIGHT_PRICING_UTIL.set_exception('Seq_Tender_Sort',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_sort_fail');
3378: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Seq_Tender_Sort');
3379:
3380: WHEN others THEN
3381: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3382: FTE_FREIGHT_PRICING_UTIL.set_exception('Seq_Tender_Sort',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
3383: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
3384: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Seq_Tender_Sort');
3385:
3411:
3412: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
3413: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Remove_Duplicate_Lanes','start');
3414:
3415: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3416:
3417:
3418: --Sort based on on schedule,lane,vehicle,rank reference
3419: --This will result in a list where the entries having the same
3440: p_sort_type=>'ELIM_DUPLICATES',
3441: x_sorted_index=>l_sorted_index,
3442: x_return_status=>l_return_status);
3443:
3444: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
3445: THEN
3446: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
3447: THEN
3448: raise FTE_FREIGHT_PRICING_UTIL.g_sort_fail;
3442: x_return_status=>l_return_status);
3443:
3444: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
3445: THEN
3446: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
3447: THEN
3448: raise FTE_FREIGHT_PRICING_UTIL.g_sort_fail;
3449: END IF;
3450: END IF;
3474: x_result=> l_result,
3475: x_return_status=>l_return_status);
3476:
3477:
3478: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
3479: THEN
3480: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
3481: THEN
3482: raise FTE_FREIGHT_PRICING_UTIL.g_quicksort_compare_fail;
3476:
3477:
3478: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
3479: THEN
3480: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
3481: THEN
3482: raise FTE_FREIGHT_PRICING_UTIL.g_quicksort_compare_fail;
3483: END IF;
3484: END IF;
3532:
3533: EXCEPTION
3534:
3535: WHEN FTE_FREIGHT_PRICING_UTIL.g_quicksort_compare_fail THEN
3536: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3537: FTE_FREIGHT_PRICING_UTIL.set_exception('Remove_Duplicate_Lanes',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_quicksort_compare_fail');
3538: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Remove_Duplicate_Lanes');
3539:
3540:
3538: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Remove_Duplicate_Lanes');
3539:
3540:
3541: WHEN FTE_FREIGHT_PRICING_UTIL.g_sort_fail THEN
3542: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3543: FTE_FREIGHT_PRICING_UTIL.set_exception('Remove_Duplicate_Lanes',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_sort_fail');
3544: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Remove_Duplicate_Lanes');
3545:
3546: WHEN others THEN
3543: FTE_FREIGHT_PRICING_UTIL.set_exception('Remove_Duplicate_Lanes',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_sort_fail');
3544: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Remove_Duplicate_Lanes');
3545:
3546: WHEN others THEN
3547: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3548: FTE_FREIGHT_PRICING_UTIL.set_exception('Seq_Tender_Sort',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
3549: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
3550: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Seq_Tender_Sort');
3551:
3590:
3591: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
3592: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Get_MDC_Delivery_Type','start');
3593:
3594: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3595:
3596:
3597:
3598: x_delivery_type:=DELIVERY_TYPE_STANDARD;
3631:
3632: EXCEPTION
3633:
3634: WHEN others THEN
3635: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3636: FTE_FREIGHT_PRICING_UTIL.set_exception('Get_MDC_Delivery_Type',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
3637: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
3638: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Get_MDC_Delivery_Type');
3639:
3727:
3728: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
3729: x_return_status => l_return_status );
3730:
3731: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3732: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3733: x_return_status := l_return_status;
3734: RETURN;
3735: END IF;
3728: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
3729: x_return_status => l_return_status );
3730:
3731: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3732: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3733: x_return_status := l_return_status;
3734: RETURN;
3735: END IF;
3736: ELSE
3741:
3742: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
3743: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Search_Rate_Sort','start');
3744:
3745: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3746:
3747:
3748: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Input ranks');
3749: Display_Rank_Tab(p_rank_tab=>p_ss_rate_sort_tab,
3760: x_ss_rate_sort_tab=>l_lane_rank_tab,
3761: x_ref=>l_lane_rank_ref,
3762: x_return_status=>l_return_status);
3763:
3764: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
3765: THEN
3766: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
3767: THEN
3768: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Search_Multi_ShipMethods FAILED');
3762: x_return_status=>l_return_status);
3763:
3764: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
3765: THEN
3766: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
3767: THEN
3768: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Search_Multi_ShipMethods FAILED');
3769: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
3770: ELSE
3791: x_ss_rate_sort_tab=>l_elim_rank_tab,
3792: x_input_ref=>l_elim_rank_ref,
3793: x_return_status=>l_return_status);
3794:
3795: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
3796: THEN
3797: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
3798: THEN
3799: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'g_elim_dup_rank_fail');
3793: x_return_status=>l_return_status);
3794:
3795: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
3796: THEN
3797: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
3798: THEN
3799: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'g_elim_dup_rank_fail');
3800: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
3801: END IF;
3891: p_trip_id=>p_ss_rate_sort_atr_rec.trip_id,
3892: x_delivery_type=>l_delivery_type,
3893: x_return_status=>l_return_status);
3894:
3895: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
3896: THEN
3897: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
3898: THEN
3899: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Get_MDC_Delivery_Type FAILED');
3893: x_return_status=>l_return_status);
3894:
3895: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
3896: THEN
3897: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
3898: THEN
3899: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Get_MDC_Delivery_Type FAILED');
3900: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
3901: END IF;
3942: x_msg_data =>l_msg_data,
3943: x_return_status =>l_return_status) ;
3944:
3945: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Compare_Trip_Rates status:'||l_return_status);
3946: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
3947: THEN
3948: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
3949: THEN
3950: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
3944:
3945: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Compare_Trip_Rates status:'||l_return_status);
3946: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
3947: THEN
3948: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
3949: THEN
3950: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
3951: THEN
3952:
3946: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
3947: THEN
3948: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
3949: THEN
3950: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
3951: THEN
3952:
3953: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Compare_Trip_Rates FAILED');
3954: --Convert E to W as WB did in 10+
3999: x_return_status =>l_return_status) ;
4000:
4001: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'shipment_price_compare status:'||l_return_status);
4002:
4003: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
4004: THEN
4005: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
4006: THEN
4007: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
4001: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'shipment_price_compare status:'||l_return_status);
4002:
4003: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
4004: THEN
4005: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
4006: THEN
4007: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
4008: THEN
4009: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'shipment_price_compare FAILED');
4003: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
4004: THEN
4005: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
4006: THEN
4007: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
4008: THEN
4009: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'shipment_price_compare FAILED');
4010: --Convert E to W as WB did in 10+
4011: --ServicePriceCompareVOImpl.java 115.29.11510.1
4068: x_vehicle_item_org=>l_rate_rank_tab(k).vehicle_org_id,
4069: x_return_status=>l_return_status);
4070:
4071:
4072: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
4073: THEN
4074: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
4075: THEN
4076: raise FTE_FREIGHT_PRICING_UTIL.g_get_veh_item_org_fail;
4070:
4071:
4072: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
4073: THEN
4074: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
4075: THEN
4076: raise FTE_FREIGHT_PRICING_UTIL.g_get_veh_item_org_fail;
4077: END IF;
4078: END IF;
4166: x_ss_rate_sort_tab=>l_sort_rank_tab,
4167: x_input_ref=>l_sort_rank_ref,
4168: x_return_status=>l_return_status);
4169:
4170: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
4171: THEN
4172: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
4173: THEN
4174: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'g_seq_tender_sort_fail');
4168: x_return_status=>l_return_status);
4169:
4170: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
4171: THEN
4172: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
4173: THEN
4174: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'g_seq_tender_sort_fail');
4175: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
4176: END IF;
4190: x_ss_rate_sort_tab=>x_ss_rate_sort_tab,
4191: x_input_ref=>l_elim_rank_ref,
4192: x_return_status=>l_return_status);
4193:
4194: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
4195: THEN
4196: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
4197: THEN
4198: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'g_elim_dup_rank_fail');
4192: x_return_status=>l_return_status);
4193:
4194: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
4195: THEN
4196: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
4197: THEN
4198: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'g_elim_dup_rank_fail');
4199: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
4200: END IF;
4218: END IF;
4219:
4220: IF (l_warning_count > 0)
4221: THEN
4222: x_return_status:=WSH_UTIL_CORE.G_RET_STS_WARNING;
4223: END IF;
4224:
4225: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Search_Rate_Sort return status:'||x_return_status);
4226:
4235:
4236: EXCEPTION
4237:
4238: WHEN others THEN
4239: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4240: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Search_Rate_Sort','g_others');
4241: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4242: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Search_Rate_Sort');
4243: IF(p_init_prc_log='Y')