[Home] [Help]
62: i NUMBER;
63:
64: l_return_status VARCHAR2(1);
65:
66: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
67:
68: l_warning_count NUMBER:=0;
69:
70: BEGIN
68: l_warning_count NUMBER:=0;
69:
70: BEGIN
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:
69:
70: BEGIN
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:
124: END LOOP;
125:
126:
127:
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;
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:
145:
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:
145:
146:
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:
145:
146:
147:
166: l_temp NUMBER;
167:
168: l_return_status VARCHAR2(1);
169:
170: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
171:
172: l_warning_count NUMBER:=0;
173:
174: BEGIN
172: l_warning_count NUMBER:=0;
173:
174: BEGIN
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:
173:
174: BEGIN
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;
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;
206: END IF;
207:
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;
232: END IF;
233:
256: x_partition_index:=j;
257:
258:
259:
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;
266:
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:
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:
276:
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:
276:
277: WHEN others THEN
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:
283:
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:
283:
284:
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:
283:
284:
285:
301:
302:
303: l_return_status VARCHAR2(1);
304:
305: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
306:
307: l_warning_count NUMBER:=0;
308:
309: BEGIN
307: l_warning_count NUMBER:=0;
308:
309: BEGIN
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:
308:
309: BEGIN
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)
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;
335: END IF;
336:
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;
351: END IF;
352:
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;
368: END IF;
369:
371:
372: END IF;
373:
374:
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;
381:
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:
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:
391: WHEN FTE_FREIGHT_PRICING_UTIL.g_quicksort_partition_fail THEN
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:
391: WHEN FTE_FREIGHT_PRICING_UTIL.g_quicksort_partition_fail THEN
392: 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:
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:
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:
397: WHEN others THEN
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:
397: WHEN others THEN
398: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
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:
403:
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:
403:
404:
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:
403:
404:
405: END Quick_Sort;
415: l_return_status VARCHAR2(1);
416:
417: i NUMBER;
418:
419: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
420:
421: l_warning_count NUMBER:=0;
422: BEGIN
423:
420:
421: l_warning_count NUMBER:=0;
422: BEGIN
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:
421: l_warning_count NUMBER:=0;
422: BEGIN
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:
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;
458: END IF;
459:
460:
461:
462: END IF;
463:
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;
470:
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:
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:
480: WHEN others THEN
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:
480: WHEN others THEN
481: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
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:
486:
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:
486:
487: END Sort;
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:
486:
487: END Sort;
488:
555: k NUMBER;
556:
557: l_return_status VARCHAR2(1);
558: l_warn_flag VARCHAR2(1) := 'N';
559: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_LOG;
560:
561: PRAGMA AUTONOMOUS_TRANSACTION;
562:
563: BEGIN
571:
572: IF(p_init_prc_log='Y')
573: THEN
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;
583: ELSE
584: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Initialize Logging successful ');
585: END IF;
586: END IF;
587:
588: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
584: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Initialize Logging successful ');
585: END IF;
586: END IF;
587:
588: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
589: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Compare_Trip_Rates','start');
590:
591: -- generate comp request id
592: -- loop over the lane/schedules
585: END IF;
586: END IF;
587:
588: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
589: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Compare_Trip_Rates','start');
590:
591: -- generate comp request id
592: -- loop over the lane/schedules
593: -- collect all LTL/PARCEL lanes together
602: FETCH c_get_req_id INTO l_request_id;
603: CLOSE c_get_req_id;
604: x_request_id := l_request_id;
605:
606: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>2 l_request_id='||l_request_id);
607:
608: L := 0; S := 0; j :=0;
609: IF (p_lane_sched_id_tab.COUNT > 0) THEN
610: FOR i IN p_lane_sched_id_tab.FIRST .. p_lane_sched_id_tab.LAST
608: L := 0; S := 0; j :=0;
609: IF (p_lane_sched_id_tab.COUNT > 0) THEN
610: FOR i IN p_lane_sched_id_tab.FIRST .. p_lane_sched_id_tab.LAST
611: LOOP
612: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,' '||i||' '||p_mode_tab(i)||' '||p_lane_sched_tab(i)||' '||p_lane_sched_id_tab(i));
613: IF (p_mode_tab(i) <> 'TRUCK' ) THEN
614: IF (p_lane_sched_tab(i) = 'L') THEN
615: L := L + 1;
616: l_lane_id_tab(L) := p_lane_sched_id_tab(i);
652:
653:
654:
655:
656: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_lane_id_tab.COUNT'||l_lane_id_tab.COUNT);
657: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_sched_id_tab.COUNT'||l_sched_id_tab.COUNT);
658: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_lane_rows.COUNT'||l_lane_rows.COUNT);
659: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_schedule_rows.COUNT'||l_schedule_rows.COUNT);
660: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_tl_xref.COUNT'||l_tl_xref.COUNT);
653:
654:
655:
656: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_lane_id_tab.COUNT'||l_lane_id_tab.COUNT);
657: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_sched_id_tab.COUNT'||l_sched_id_tab.COUNT);
658: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_lane_rows.COUNT'||l_lane_rows.COUNT);
659: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_schedule_rows.COUNT'||l_schedule_rows.COUNT);
660: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_tl_xref.COUNT'||l_tl_xref.COUNT);
661: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>3');
654:
655:
656: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_lane_id_tab.COUNT'||l_lane_id_tab.COUNT);
657: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_sched_id_tab.COUNT'||l_sched_id_tab.COUNT);
658: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_lane_rows.COUNT'||l_lane_rows.COUNT);
659: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_schedule_rows.COUNT'||l_schedule_rows.COUNT);
660: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_tl_xref.COUNT'||l_tl_xref.COUNT);
661: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>3');
662:
655:
656: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_lane_id_tab.COUNT'||l_lane_id_tab.COUNT);
657: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_sched_id_tab.COUNT'||l_sched_id_tab.COUNT);
658: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_lane_rows.COUNT'||l_lane_rows.COUNT);
659: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_schedule_rows.COUNT'||l_schedule_rows.COUNT);
660: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_tl_xref.COUNT'||l_tl_xref.COUNT);
661: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>3');
662:
663:
656: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_lane_id_tab.COUNT'||l_lane_id_tab.COUNT);
657: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_sched_id_tab.COUNT'||l_sched_id_tab.COUNT);
658: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_lane_rows.COUNT'||l_lane_rows.COUNT);
659: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_schedule_rows.COUNT'||l_schedule_rows.COUNT);
660: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_tl_xref.COUNT'||l_tl_xref.COUNT);
661: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>3');
662:
663:
664: --FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'x_sum_rate_tab.COUNT='||x_sum_rate_tab.COUNT);
657: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_sched_id_tab.COUNT'||l_sched_id_tab.COUNT);
658: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_lane_rows.COUNT'||l_lane_rows.COUNT);
659: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_schedule_rows.COUNT'||l_schedule_rows.COUNT);
660: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_tl_xref.COUNT'||l_tl_xref.COUNT);
661: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>3');
662:
663:
664: --FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'x_sum_rate_tab.COUNT='||x_sum_rate_tab.COUNT);
665: --FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'x_sum_rate_curr_tab.COUNT='||x_sum_rate_curr_tab.COUNT);
660: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_tl_xref.COUNT'||l_tl_xref.COUNT);
661: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>3');
662:
663:
664: --FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'x_sum_rate_tab.COUNT='||x_sum_rate_tab.COUNT);
665: --FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'x_sum_rate_curr_tab.COUNT='||x_sum_rate_curr_tab.COUNT);
666: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>4');
667: -- Call LTL/PARCEL API
668:
661: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>3');
662:
663:
664: --FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'x_sum_rate_tab.COUNT='||x_sum_rate_tab.COUNT);
665: --FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'x_sum_rate_curr_tab.COUNT='||x_sum_rate_curr_tab.COUNT);
666: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>4');
667: -- Call LTL/PARCEL API
668:
669: L :=0; S:=0; j:=0;
662:
663:
664: --FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'x_sum_rate_tab.COUNT='||x_sum_rate_tab.COUNT);
665: --FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'x_sum_rate_curr_tab.COUNT='||x_sum_rate_curr_tab.COUNT);
666: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>4');
667: -- Call LTL/PARCEL API
668:
669: L :=0; S:=0; j:=0;
670:
669: L :=0; S:=0; j:=0;
670:
671: IF (l_lane_id_tab.COUNT >0 OR l_sched_id_tab.COUNT >0) THEN
672:
673: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>5');
674: FTE_FREIGHT_PRICING.shipment_price_compare_pvt (
675: p_delivery_id => NULL,
676: p_trip_id => p_trip_id,
677: p_lane_id_tab => l_lane_id_tab,
670:
671: IF (l_lane_id_tab.COUNT >0 OR l_sched_id_tab.COUNT >0) THEN
672:
673: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>5');
674: FTE_FREIGHT_PRICING.shipment_price_compare_pvt (
675: p_delivery_id => NULL,
676: p_trip_id => p_trip_id,
677: p_lane_id_tab => l_lane_id_tab,
678: p_sched_id_tab => l_sched_id_tab,
691: -- For now only unexpected errors returned cause this procedure to fail
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
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';
703: END IF;
704: END IF;
701: ELSE
702: l_warn_flag := 'Y';
703: END IF;
704: END IF;
705: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_lane_price_tab.COUNT='||l_lane_price_tab.COUNT);
706: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_sched_price_tab.COUNT='||l_sched_price_tab.COUNT);
707:
708:
709: END IF;
702: l_warn_flag := 'Y';
703: END IF;
704: END IF;
705: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_lane_price_tab.COUNT='||l_lane_price_tab.COUNT);
706: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_sched_price_tab.COUNT='||l_sched_price_tab.COUNT);
707:
708:
709: END IF;
710:
707:
708:
709: END IF;
710:
711: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>>');
712: -- Call TL API
713:
714:
715:
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';
738: END IF;
739: END IF;
741:
742:
743:
744:
745: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>6');
746: FTE_TL_RATING.TL_TRIP_PRICE_COMPARE(
747: p_wsh_trip_id => p_trip_id,
748: p_lane_rows => l_exploded_lane_rows,
749: p_schedule_rows => l_exploded_schedule_rows,
757: -- For now only unexpected errors returned cause this procedure to fail
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
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';
769: END IF;
770: END IF;
768: l_warn_flag := 'Y';
769: END IF;
770: END IF;
771:
772: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_lane_sched_sum_rows.COUNT='||l_lane_sched_sum_rows.COUNT);
773:
774: END IF;
775:
776: --populate output from both TL and non-TL
780: THEN
781: l_output_count:=l_output_count+ l_exploded_ref_rows.COUNT-l_lane_rows.COUNT;
782: END IF;
783:
784: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Op count:'||l_output_count);
785:
786: -- initialize output nested tables
787: IF (p_lane_sched_id_tab.COUNT > 0 )
788: THEN
786: -- initialize output nested tables
787: IF (p_lane_sched_id_tab.COUNT > 0 )
788: THEN
789:
790: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Init op tables');
791:
792: x_sum_rate_tab := FTE_ID_TAB_TYPE(0);
793: x_sum_rate_curr_tab := FTE_CODE_TAB_TYPE('NULL');
794: -- init all elements the tables with 0 and 'NULL' resp.
808: x_vehicle_type_tab.EXTEND(l_output_count-1,1);
809: x_mode_tab.EXTEND(l_output_count-1,1);
810: x_service_type_tab.EXTEND(l_output_count-1,1);
811:
812: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Init op tables End');
813:
814: END IF;
815:
816: L :=l_lane_price_tab.FIRST;
821: l_ref:=l_exploded_ref_rows.FIRST;
822:
823: WHILE(k<=l_output_count)
824: LOOP
825: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Op index:'||k);
826:
827: IF (p_mode_tab(i) <> 'TRUCK' )
828: THEN
829: IF (p_lane_sched_tab(i) = 'L')
828: THEN
829: IF (p_lane_sched_tab(i) = 'L')
830: THEN
831:
832: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Non TL Lane:');
833:
834: IF ((l_lane_price_tab.EXISTS(L)) AND (l_lane_curr_tab.EXISTS(L)))
835: THEN
836: x_sum_rate_tab(k) := l_lane_price_tab(L);
846:
847: L := L + 1;
848: k:=k+1;
849:
850: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Non TL Lane ENd:');
851:
852: ELSIF (p_lane_sched_tab(i) = 'S')
853: THEN
854:
851:
852: ELSIF (p_lane_sched_tab(i) = 'S')
853: THEN
854:
855: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Non TL Schedule:');
856:
857: IF((l_sched_price_tab.EXISTS(S)) AND (l_sched_curr_tab.EXISTS(S)))
858: THEN
859:
870:
871: S := S + 1;
872: k:=k+1;
873:
874: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Non TL Schedule End:');
875:
876: END IF;
877:
878: ELSIF (p_mode_tab(i) = 'TRUCK' )
877:
878: ELSIF (p_mode_tab(i) = 'TRUCK' )
879: THEN
880:
881: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL :');
882: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_ref'||l_ref);
883: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'j'||j);
884: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_exploded_ref_rows count'||l_exploded_ref_rows.COUNT);
885:
878: ELSIF (p_mode_tab(i) = 'TRUCK' )
879: THEN
880:
881: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL :');
882: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_ref'||l_ref);
883: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'j'||j);
884: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_exploded_ref_rows count'||l_exploded_ref_rows.COUNT);
885:
886: WHILE(l_exploded_ref_rows.EXISTS(l_ref) AND l_exploded_ref_rows(l_ref)=j)
879: THEN
880:
881: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL :');
882: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_ref'||l_ref);
883: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'j'||j);
884: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_exploded_ref_rows count'||l_exploded_ref_rows.COUNT);
885:
886: WHILE(l_exploded_ref_rows.EXISTS(l_ref) AND l_exploded_ref_rows(l_ref)=j)
887: LOOP
880:
881: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL :');
882: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_ref'||l_ref);
883: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'j'||j);
884: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_exploded_ref_rows count'||l_exploded_ref_rows.COUNT);
885:
886: WHILE(l_exploded_ref_rows.EXISTS(l_ref) AND l_exploded_ref_rows(l_ref)=j)
887: LOOP
888: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_exploded_ref_rows(l_ref)'||l_exploded_ref_rows(l_ref));
884: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_exploded_ref_rows count'||l_exploded_ref_rows.COUNT);
885:
886: WHILE(l_exploded_ref_rows.EXISTS(l_ref) AND l_exploded_ref_rows(l_ref)=j)
887: LOOP
888: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_exploded_ref_rows(l_ref)'||l_exploded_ref_rows(l_ref));
889:
890: --FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_lane_sched_sum_rows(l_ref)'||l_lane_sched_sum_rows(l_ref));
891:
892:
886: WHILE(l_exploded_ref_rows.EXISTS(l_ref) AND l_exploded_ref_rows(l_ref)=j)
887: LOOP
888: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_exploded_ref_rows(l_ref)'||l_exploded_ref_rows(l_ref));
889:
890: --FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_lane_sched_sum_rows(l_ref)'||l_lane_sched_sum_rows(l_ref));
891:
892:
893: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 1:');
894: x_sum_rate_tab(k):=-1;
889:
890: --FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_lane_sched_sum_rows(l_ref)'||l_lane_sched_sum_rows(l_ref));
891:
892:
893: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 1:');
894: x_sum_rate_tab(k):=-1;
895: IF (l_lane_sched_sum_rows.EXISTS(l_ref))
896: THEN
897: x_sum_rate_tab(k) := nvl(l_lane_sched_sum_rows(l_ref),-1);
896: THEN
897: x_sum_rate_tab(k) := nvl(l_lane_sched_sum_rows(l_ref),-1);
898: END IF;
899:
900: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 2:');
901:
902: x_sum_rate_curr_tab(k):='NULL';
903: IF (l_lane_sched_curr_rows.EXISTS(l_ref))
904: THEN
904: THEN
905: x_sum_rate_curr_tab(k) := nvl(l_lane_sched_curr_rows(l_ref),'NULL');
906: END IF;
907:
908: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 3:');
909:
910: x_lane_sched_id_tab(k):=p_lane_sched_id_tab(i);
911: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 4:');
912: x_lane_sched_tab(k):=p_lane_sched_tab(i);
907:
908: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 3:');
909:
910: x_lane_sched_id_tab(k):=p_lane_sched_id_tab(i);
911: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 4:');
912: x_lane_sched_tab(k):=p_lane_sched_tab(i);
913: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 5:');
914: IF (l_exploded_vehicle_rows.EXISTS(l_ref))
915: THEN
909:
910: x_lane_sched_id_tab(k):=p_lane_sched_id_tab(i);
911: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 4:');
912: x_lane_sched_tab(k):=p_lane_sched_tab(i);
913: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 5:');
914: IF (l_exploded_vehicle_rows.EXISTS(l_ref))
915: THEN
916: x_vehicle_type_tab(k):=l_exploded_vehicle_rows(l_ref);
917: END IF;
914: IF (l_exploded_vehicle_rows.EXISTS(l_ref))
915: THEN
916: x_vehicle_type_tab(k):=l_exploded_vehicle_rows(l_ref);
917: END IF;
918: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 6:');
919: x_mode_tab(k):=p_mode_tab(i);
920: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 7:');
921: x_service_type_tab(k):=p_service_type_tab(i);
922: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 8:');
916: x_vehicle_type_tab(k):=l_exploded_vehicle_rows(l_ref);
917: END IF;
918: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 6:');
919: x_mode_tab(k):=p_mode_tab(i);
920: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 7:');
921: x_service_type_tab(k):=p_service_type_tab(i);
922: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 8:');
923:
924: --FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
918: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 6:');
919: x_mode_tab(k):=p_mode_tab(i);
920: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 7:');
921: x_service_type_tab(k):=p_service_type_tab(i);
922: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 8:');
923:
924: --FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
925: --' '||l_ref||'-'||i||'-'||l_lane_sched_sum_rows(l_ref)||'-'||l_lane_sched_curr_rows(l_ref));
926:
920: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 7:');
921: x_service_type_tab(k):=p_service_type_tab(i);
922: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL 8:');
923:
924: --FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
925: --' '||l_ref||'-'||i||'-'||l_lane_sched_sum_rows(l_ref)||'-'||l_lane_sched_curr_rows(l_ref));
926:
927:
928: k:=k+1;
931: END LOOP;
932:
933: j := j + 1;
934:
935: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'TL End:');
936:
937: END IF;
938:
939:
940: i:=i+1;
941: END LOOP;
942:
943:
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;
942:
943:
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;
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;
953:
954: IF (x_sum_rate_tab.COUNT > 0) THEN
955: FOR i IN x_sum_rate_tab.FIRST .. x_sum_rate_tab.LAST
953:
954: IF (x_sum_rate_tab.COUNT > 0) THEN
955: FOR i IN x_sum_rate_tab.FIRST .. x_sum_rate_tab.LAST
956: LOOP
957: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
958: ' '||x_lane_sched_id_tab(i)||' '||x_lane_sched_tab(i)||' '||x_mode_tab(i)||' '||x_service_type_tab(i)||' '
959: ||x_vehicle_type_tab(i)||' '||x_sum_rate_tab(i)||' '||x_sum_rate_curr_tab(i) );
960: END LOOP;
961: END IF;
959: ||x_vehicle_type_tab(i)||' '||x_sum_rate_tab(i)||' '||x_sum_rate_curr_tab(i) );
960: END LOOP;
961: END IF;
962:
963: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>9.1');
964: FND_MSG_PUB.Count_And_Get
965: (
966: p_count => x_msg_count,
967: p_data => x_msg_data,
967: p_data => x_msg_data,
968: p_encoded => FND_API.G_FALSE
969: );
970:
971: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>9.2');
972: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Compare_Trip_Rates');
973: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>9.3');
974:
975: IF(p_init_prc_log='Y')
968: p_encoded => FND_API.G_FALSE
969: );
970:
971: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>9.2');
972: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Compare_Trip_Rates');
973: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>9.3');
974:
975: IF(p_init_prc_log='Y')
976: THEN
969: );
970:
971: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>9.2');
972: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Compare_Trip_Rates');
973: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>9.3');
974:
975: IF(p_init_prc_log='Y')
976: THEN
977: FTE_FREIGHT_PRICING_UTIL.close_logs;
973: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>9.3');
974:
975: IF(p_init_prc_log='Y')
976: THEN
977: FTE_FREIGHT_PRICING_UTIL.close_logs;
978: END IF;
979:
980:
981:
978: END IF;
979:
980:
981:
982: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>9.4');
983:
984: COMMIT; -- Commit Autonomous transaction
985:
986: /*
985:
986: /*
987: IF FND_API.to_Boolean( p_commit )
988: THEN
989: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>9.5');
990: COMMIT; -- Commit Autonomous transaction
991: ELSE
992: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>9.6');
993: ROLLBACK; --TO COMPARE_TRIP_RATES;
988: THEN
989: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>9.5');
990: COMMIT; -- Commit Autonomous transaction
991: ELSE
992: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>9.6');
993: ROLLBACK; --TO COMPARE_TRIP_RATES;
994:
995: END IF;
996: */
994:
995: END IF;
996: */
997:
998: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>9.7');
999: EXCEPTION
1000:
1001: WHEN FTE_FREIGHT_PRICING_UTIL.g_unexp_err THEN
1002: ROLLBACK;-- TO COMPARE_TRIP_RATES;
997:
998: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>9.7');
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');
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
1008: FTE_FREIGHT_PRICING_UTIL.close_logs;
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
1008: FTE_FREIGHT_PRICING_UTIL.close_logs;
1009: END IF;
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
1008: FTE_FREIGHT_PRICING_UTIL.close_logs;
1009: END IF;
1010:
1011:
1012: WHEN others THEN
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')
1019: THEN
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')
1019: THEN
1020: FTE_FREIGHT_PRICING_UTIL.close_logs;
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')
1019: THEN
1020: FTE_FREIGHT_PRICING_UTIL.close_logs;
1021: END IF;
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')
1019: THEN
1020: FTE_FREIGHT_PRICING_UTIL.close_logs;
1021: END IF;
1022:
1023:
1024: END Compare_Trip_Rates;
1070: IS
1071:
1072: l_api_version CONSTANT NUMBER := 1.0;
1073: l_api_name CONSTANT VARCHAR2(30) := 'RATE_TRIP_INT';
1074: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_LOG;
1075: l_return_status VARCHAR2(1);
1076: l_return_status_1 VARCHAR2(1);
1077:
1078: l_dummy_fc_tab FTE_FREIGHT_PRICING.Freight_Cost_Temp_Tab_Type;
1074: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_LOG;
1075: l_return_status VARCHAR2(1);
1076: l_return_status_1 VARCHAR2(1);
1077:
1078: l_dummy_fc_tab FTE_FREIGHT_PRICING.Freight_Cost_Temp_Tab_Type;
1079:
1080: l_msg_count NUMBER;
1081: l_msg_data VARCHAR2(32767);
1082:
1113: 'p_rate_mode'|| p_rate_mode,
1114: WSH_DEBUG_SV.C_PROC_LEVEL);
1115: END IF;
1116:
1117: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
1118: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name,'start');
1119: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'trip_id='||p_trip_info_rec.trip_id);
1120: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_event='||p_event);
1121: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_rate_mode='||p_rate_mode);
1114: WSH_DEBUG_SV.C_PROC_LEVEL);
1115: END IF;
1116:
1117: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
1118: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name,'start');
1119: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'trip_id='||p_trip_info_rec.trip_id);
1120: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_event='||p_event);
1121: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_rate_mode='||p_rate_mode);
1122: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'mode_of_trans='||p_trip_info_rec.mode_of_transport);
1115: END IF;
1116:
1117: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
1118: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name,'start');
1119: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'trip_id='||p_trip_info_rec.trip_id);
1120: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_event='||p_event);
1121: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_rate_mode='||p_rate_mode);
1122: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'mode_of_trans='||p_trip_info_rec.mode_of_transport);
1123:
1116:
1117: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
1118: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name,'start');
1119: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'trip_id='||p_trip_info_rec.trip_id);
1120: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_event='||p_event);
1121: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_rate_mode='||p_rate_mode);
1122: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'mode_of_trans='||p_trip_info_rec.mode_of_transport);
1123:
1124: IF ( p_rate_mode = 'TP-REL') THEN
1117: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
1118: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name,'start');
1119: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'trip_id='||p_trip_info_rec.trip_id);
1120: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_event='||p_event);
1121: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_rate_mode='||p_rate_mode);
1122: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'mode_of_trans='||p_trip_info_rec.mode_of_transport);
1123:
1124: IF ( p_rate_mode = 'TP-REL') THEN
1125: -- irrespective of event, the same apis can be called to rate tp released trips
1118: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name,'start');
1119: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'trip_id='||p_trip_info_rec.trip_id);
1120: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_event='||p_event);
1121: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_rate_mode='||p_rate_mode);
1122: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'mode_of_trans='||p_trip_info_rec.mode_of_transport);
1123:
1124: IF ( p_rate_mode = 'TP-REL') THEN
1125: -- irrespective of event, the same apis can be called to rate tp released trips
1126: -- when they are rated the first time
1129: -- redirect based upon mode of transport
1130: -- lane_id is assumed to be present
1131:
1132: IF (p_trip_info_rec.mode_of_transport='TRUCK') THEN
1133: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'calling tl_rate_trip ');
1134: -- call TL rating
1135:
1136: -- TO DO: No reprice flag checking
1137:
1156: ELSE -- non TL
1157: -- call shipment_price_consolidate
1158: -- No reprice flag checking
1159:
1160: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'calling shipment_price_consolidate ');
1161: FTE_FREIGHT_PRICING.shipment_price_consolidate (
1162: p_segment_id => p_trip_info_rec.trip_id,
1163: p_check_reprice_flag => 'N',
1164: x_return_status => l_return_status);
1157: -- call shipment_price_consolidate
1158: -- No reprice flag checking
1159:
1160: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'calling shipment_price_consolidate ');
1161: FTE_FREIGHT_PRICING.shipment_price_consolidate (
1162: p_segment_id => p_trip_info_rec.trip_id,
1163: p_check_reprice_flag => 'N',
1164: x_return_status => l_return_status);
1165:
1192: IF (p_trip_info_rec.lane_id IS NOT NULL) THEN
1193:
1194: IF (p_trip_info_rec.mode_of_transport='TRUCK') THEN
1195: -- call TL rate trip with reprice checking
1196: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'calling tl_rate_trip ');
1197:
1198: FTE_TL_RATING.tl_rate_trip (
1199: p_trip_id => p_trip_info_rec.trip_id,
1200: p_output_type => 'M',
1217:
1218: ELSE
1219: -- call shipment_price_consolidate with reprice checking
1220:
1221: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'calling shipment_price_consolidate ');
1222: FTE_FREIGHT_PRICING.shipment_price_consolidate (
1223: p_segment_id => p_trip_info_rec.trip_id,
1224: p_check_reprice_flag => 'Y',
1225: x_return_status => l_return_status);
1218: ELSE
1219: -- call shipment_price_consolidate with reprice checking
1220:
1221: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'calling shipment_price_consolidate ');
1222: FTE_FREIGHT_PRICING.shipment_price_consolidate (
1223: p_segment_id => p_trip_info_rec.trip_id,
1224: p_check_reprice_flag => 'Y',
1225: x_return_status => l_return_status);
1226:
1242: ELSE
1243: -- lane_id is null
1244: -- route this request through LCSS
1245:
1246: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'calling Rate_Delivery ');
1247: FTE_FREIGHT_RATING_DLVY_GRP.Rate_Delivery (
1248: p_api_version => 1,
1249: p_init_msg_list => FND_API.G_FALSE,
1250: p_delivery_id => null,
1275:
1276: IF (p_trip_info_rec.mode_of_transport='TRUCK') THEN
1277: -- call TL rating
1278:
1279: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'calling tl_rate_trip ');
1280: -- No reprice flag checking
1281:
1282: FTE_TL_RATING.tl_rate_trip (
1283: p_trip_id => p_trip_info_rec.trip_id,
1301: ELSE -- non TL
1302: -- call shipment_price_consolidate
1303: -- No reprice flag checking
1304:
1305: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'calling shipment_price_consolidate ');
1306: FTE_FREIGHT_PRICING.shipment_price_consolidate (
1307: p_segment_id => p_trip_info_rec.trip_id,
1308: p_check_reprice_flag => 'N',
1309: x_return_status => l_return_status);
1302: -- call shipment_price_consolidate
1303: -- No reprice flag checking
1304:
1305: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'calling shipment_price_consolidate ');
1306: FTE_FREIGHT_PRICING.shipment_price_consolidate (
1307: p_segment_id => p_trip_info_rec.trip_id,
1308: p_check_reprice_flag => 'N',
1309: x_return_status => l_return_status);
1310:
1327: IF l_debug_on THEN
1328: WSH_DEBUG_SV.pop(l_module_name);
1329: END IF;
1330: --
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;
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);
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
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);
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;
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);
1355: --
1356: END Rate_Trip_Int;
1357:
1358:
1399:
1400:
1401: l_api_version CONSTANT NUMBER := 1.0;
1402: l_api_name CONSTANT VARCHAR2(30) := 'RATE_TRIP';
1403: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_LOG;
1404: l_return_status VARCHAR2(1);
1405: l_return_status_1 VARCHAR2(1);
1406:
1407: l_trip_info_rec trip_info_rec;
1481: WSH_DEBUG_SV.C_PROC_LEVEL);
1482: 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;
1507: THEN
1508: x_return_status := l_return_status_1;
1509: END IF;
1510: ELSE
1511: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Initialize Logging successful ');
1512: END IF;
1513: END IF;
1514:
1515: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
1511: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Initialize Logging successful ');
1512: END IF;
1513: END IF;
1514:
1515: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
1516: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name,'start');
1517:
1518: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_action_params->');
1519: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' trip_id_list.COUNT='||p_action_params.trip_id_list.COUNT);
1512: END IF;
1513: END IF;
1514:
1515: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
1516: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name,'start');
1517:
1518: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_action_params->');
1519: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' trip_id_list.COUNT='||p_action_params.trip_id_list.COUNT);
1520: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' event='||p_action_params.event);
1514:
1515: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
1516: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name,'start');
1517:
1518: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_action_params->');
1519: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' trip_id_list.COUNT='||p_action_params.trip_id_list.COUNT);
1520: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' event='||p_action_params.event);
1521: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' caller='||p_action_params.caller);
1522: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' action='||p_action_params.action);
1515: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
1516: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name,'start');
1517:
1518: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_action_params->');
1519: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' trip_id_list.COUNT='||p_action_params.trip_id_list.COUNT);
1520: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' event='||p_action_params.event);
1521: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' caller='||p_action_params.caller);
1522: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' action='||p_action_params.action);
1523: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_commit='||p_commit);
1516: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name,'start');
1517:
1518: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_action_params->');
1519: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' trip_id_list.COUNT='||p_action_params.trip_id_list.COUNT);
1520: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' event='||p_action_params.event);
1521: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' caller='||p_action_params.caller);
1522: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' action='||p_action_params.action);
1523: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_commit='||p_commit);
1524:
1517:
1518: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_action_params->');
1519: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' trip_id_list.COUNT='||p_action_params.trip_id_list.COUNT);
1520: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' event='||p_action_params.event);
1521: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' caller='||p_action_params.caller);
1522: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' action='||p_action_params.action);
1523: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_commit='||p_commit);
1524:
1525: IF (p_action_params.trip_id_list.COUNT = 0
1518: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_action_params->');
1519: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' trip_id_list.COUNT='||p_action_params.trip_id_list.COUNT);
1520: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' event='||p_action_params.event);
1521: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' caller='||p_action_params.caller);
1522: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' action='||p_action_params.action);
1523: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_commit='||p_commit);
1524:
1525: IF (p_action_params.trip_id_list.COUNT = 0
1526: OR p_action_params.event IS NULL
1519: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' trip_id_list.COUNT='||p_action_params.trip_id_list.COUNT);
1520: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' event='||p_action_params.event);
1521: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' caller='||p_action_params.caller);
1522: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' action='||p_action_params.action);
1523: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_commit='||p_commit);
1524:
1525: IF (p_action_params.trip_id_list.COUNT = 0
1526: OR p_action_params.event IS NULL
1527: OR p_action_params.caller IS NULL
1570: WSH_DEBUG_SV.logmsg(
1571: l_module_name, 'l_tp_rel_rate_event = '||l_tp_rel_rate_event,
1572: WSH_DEBUG_SV.C_PROC_LEVEL);
1573: END IF;
1574: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'l_tp_rel_rate_event = '||l_tp_rel_rate_event);
1575:
1576: -- if calling event is TP-RELEASE, rating needs to be done only if
1577: -- global parameter is set to TP-RELEASE
1578:
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,
1588: p_api_return_status => l_return_status,
1611: -- Now loop over all trips in the input
1612:
1613: i := p_action_params.trip_id_list.FIRST;
1614: LOOP
1615: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'>>>trip_id='||p_action_params.trip_id_list(i));
1616:
1617: -- Get trip information from db
1618: OPEN c_trip_info(p_action_params.trip_id_list(i));
1619: FETCH c_trip_info INTO l_trip_info_rec;
1650: -- Check if this trip is part of a continuous move
1651: -- If it was already rated in an earlier iteration, don't rate
1652:
1653: IF (l_trip_info_rec.move_id IS NOT NULL) THEN
1654: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'move_id='||l_trip_info_rec.move_id);
1655: IF l_debug_on THEN
1656: WSH_DEBUG_SV.logmsg( l_module_name, 'move_id = '||l_trip_info_rec.move_id,
1657: WSH_DEBUG_SV.C_PROC_LEVEL);
1658: END IF;
1656: WSH_DEBUG_SV.logmsg( l_module_name, 'move_id = '||l_trip_info_rec.move_id,
1657: WSH_DEBUG_SV.C_PROC_LEVEL);
1658: END IF;
1659: IF l_rated_move_ids.EXISTS(l_trip_info_rec.move_id) THEN
1660: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'move already rated - next pass');
1661: IF l_debug_on THEN
1662: WSH_DEBUG_SV.logmsg( l_module_name, 'move already rated - next pass',
1663: WSH_DEBUG_SV.C_PROC_LEVEL);
1664: END IF;
1754: -- So lane_id cannot be null
1755: l_rate_mode := 'REGULAR';
1756: ELSE
1757: l_rate_mode := 'NONE';
1758: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level, 'rate_mode='||l_rate_mode);
1759: -- We can't rate this trip anytime
1760: -- raise warning : rating not required for this trip
1761: -- exit
1762: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,
1758: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level, 'rate_mode='||l_rate_mode);
1759: -- We can't rate this trip anytime
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: (
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);
1954:
1955: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1956: IF p_init_prc_log = 'Y' THEN
1957: FTE_FREIGHT_PRICING_UTIL.close_logs;
1951:
1952:
1953: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'x_return_status='||x_return_status);
1954:
1955: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1956: IF p_init_prc_log = 'Y' THEN
1957: FTE_FREIGHT_PRICING_UTIL.close_logs;
1958: END IF;
1959:
1953: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'x_return_status='||x_return_status);
1954:
1955: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1956: IF p_init_prc_log = 'Y' THEN
1957: FTE_FREIGHT_PRICING_UTIL.close_logs;
1958: END IF;
1959:
1960: EXCEPTION
1961: WHEN g_finished_success THEN
1975: WSH_DEBUG_SV.pop(l_module_name);
1976: END IF;
1977: --
1978: --
1979: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'x_return_status='||x_return_status);
1980:
1981: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1982: IF p_init_prc_log = 'Y' THEN
1983: FTE_FREIGHT_PRICING_UTIL.close_logs;
1977: --
1978: --
1979: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'x_return_status='||x_return_status);
1980:
1981: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1982: IF p_init_prc_log = 'Y' THEN
1983: FTE_FREIGHT_PRICING_UTIL.close_logs;
1984: END IF;
1985: --
1979: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'x_return_status='||x_return_status);
1980:
1981: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1982: IF p_init_prc_log = 'Y' THEN
1983: FTE_FREIGHT_PRICING_UTIL.close_logs;
1984: END IF;
1985: --
1986: WHEN FND_API.G_EXC_ERROR THEN
1987: ROLLBACK TO RATE_TRIP;
1994: );
1995: IF l_debug_on THEN
1996: WSH_DEBUG_SV.pop(l_module_name);
1997: END IF;
1998: FTE_FREIGHT_PRICING_UTIL.set_exit_exception(l_module_name,'FND_API.G_EXC_ERROR');
1999: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2000: IF p_init_prc_log = 'Y' THEN
2001: FTE_FREIGHT_PRICING_UTIL.close_logs;
2002: END IF;
1995: IF l_debug_on THEN
1996: WSH_DEBUG_SV.pop(l_module_name);
1997: END IF;
1998: FTE_FREIGHT_PRICING_UTIL.set_exit_exception(l_module_name,'FND_API.G_EXC_ERROR');
1999: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2000: IF p_init_prc_log = 'Y' THEN
2001: FTE_FREIGHT_PRICING_UTIL.close_logs;
2002: END IF;
2003: --
1997: END IF;
1998: FTE_FREIGHT_PRICING_UTIL.set_exit_exception(l_module_name,'FND_API.G_EXC_ERROR');
1999: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2000: IF p_init_prc_log = 'Y' THEN
2001: FTE_FREIGHT_PRICING_UTIL.close_logs;
2002: END IF;
2003: --
2004: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2005: ROLLBACK TO RATE_TRIP;
2012: );
2013: IF l_debug_on THEN
2014: WSH_DEBUG_SV.pop(l_module_name);
2015: END IF;
2016: FTE_FREIGHT_PRICING_UTIL.set_exit_exception(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR');
2017: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2018: IF p_init_prc_log = 'Y' THEN
2019: FTE_FREIGHT_PRICING_UTIL.close_logs;
2020: END IF;
2013: IF l_debug_on THEN
2014: WSH_DEBUG_SV.pop(l_module_name);
2015: END IF;
2016: FTE_FREIGHT_PRICING_UTIL.set_exit_exception(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR');
2017: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2018: IF p_init_prc_log = 'Y' THEN
2019: FTE_FREIGHT_PRICING_UTIL.close_logs;
2020: END IF;
2021: --
2015: END IF;
2016: FTE_FREIGHT_PRICING_UTIL.set_exit_exception(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR');
2017: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2018: IF p_init_prc_log = 'Y' THEN
2019: FTE_FREIGHT_PRICING_UTIL.close_logs;
2020: END IF;
2021: --
2022: WHEN OTHERS THEN
2023: ROLLBACK TO RATE_TRIP;
2031: );
2032: IF l_debug_on THEN
2033: WSH_DEBUG_SV.pop(l_module_name);
2034: END IF;
2035: FTE_FREIGHT_PRICING_UTIL.set_exit_exception(l_module_name,'OTHERS');
2036: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2037: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2038: IF p_init_prc_log = 'Y' THEN
2039: FTE_FREIGHT_PRICING_UTIL.close_logs;
2032: IF l_debug_on THEN
2033: WSH_DEBUG_SV.pop(l_module_name);
2034: END IF;
2035: FTE_FREIGHT_PRICING_UTIL.set_exit_exception(l_module_name,'OTHERS');
2036: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2037: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2038: IF p_init_prc_log = 'Y' THEN
2039: FTE_FREIGHT_PRICING_UTIL.close_logs;
2040: END IF;
2033: WSH_DEBUG_SV.pop(l_module_name);
2034: END IF;
2035: FTE_FREIGHT_PRICING_UTIL.set_exit_exception(l_module_name,'OTHERS');
2036: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2037: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2038: IF p_init_prc_log = 'Y' THEN
2039: FTE_FREIGHT_PRICING_UTIL.close_logs;
2040: END IF;
2041:
2035: FTE_FREIGHT_PRICING_UTIL.set_exit_exception(l_module_name,'OTHERS');
2036: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2037: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2038: IF p_init_prc_log = 'Y' THEN
2039: FTE_FREIGHT_PRICING_UTIL.close_logs;
2040: END IF;
2041:
2042: END Rate_Trip;
2043:
2059: l_temp BOOLEAN;
2060: l_params action_param_rec;
2061: l_trip_id NUMBER;
2062:
2063: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_LOG;
2064: l_api_name CONSTANT VARCHAR2(30) := 'Rate_Trip_conc';
2065:
2066: CURSOR c_get_trip_id(c_trip_name VARCHAR2) IS
2067: SELECT trip_id
2068: FROM wsh_trips
2069: WHERE name = c_trip_name;
2070:
2071: BEGIN
2072: FTE_FREIGHT_PRICING_UTIL.initialize_logging(p_debug_mode => 'CONC',
2073: x_return_status => l_return_status );
2074:
2075: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
2076: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name,'start');
2071: BEGIN
2072: FTE_FREIGHT_PRICING_UTIL.initialize_logging(p_debug_mode => 'CONC',
2073: x_return_status => l_return_status );
2074:
2075: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
2076: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name,'start');
2077:
2078: IF p_trip_id is null AND p_trip_name is null THEN
2079: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'both trip id and trip name are null');
2072: FTE_FREIGHT_PRICING_UTIL.initialize_logging(p_debug_mode => 'CONC',
2073: x_return_status => l_return_status );
2074:
2075: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
2076: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name,'start');
2077:
2078: IF p_trip_id is null AND p_trip_name is null THEN
2079: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'both trip id and trip name are null');
2080: raise FND_API.G_EXC_ERROR;
2075: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
2076: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name,'start');
2077:
2078: IF p_trip_id is null AND p_trip_name is null THEN
2079: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'both trip id and trip name are null');
2080: raise FND_API.G_EXC_ERROR;
2081: END IF;
2082:
2083: l_trip_id := null;
2087: OPEN c_get_trip_id(p_trip_name);
2088: FETCH c_get_trip_id INTO l_trip_id;
2089: CLOSE c_get_trip_id;
2090: IF l_trip_id is null THEN
2091: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'cannot get trip id from trip name');
2092: raise FND_API.G_EXC_ERROR;
2093: END IF;
2094: END IF;
2095:
2120: retcode := '2';
2121: END IF;
2122:
2123: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_status,'');
2124: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2125: FTE_FREIGHT_PRICING_UTIL.close_logs;
2126: EXCEPTION
2127: WHEN FND_API.G_EXC_ERROR THEN
2128: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR','');
2121: END IF;
2122:
2123: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS(l_status,'');
2124: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2125: FTE_FREIGHT_PRICING_UTIL.close_logs;
2126: EXCEPTION
2127: WHEN FND_API.G_EXC_ERROR THEN
2128: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR','');
2129: errbuf := 'Trip Rerating is completed with error';
2127: WHEN FND_API.G_EXC_ERROR THEN
2128: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR','');
2129: errbuf := 'Trip Rerating is completed with error';
2130: retcode := '2';
2131: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2132: FTE_FREIGHT_PRICING_UTIL.close_logs;
2133: WHEN OTHERS THEN
2134: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR','');
2135: errbuf := 'Trip Rerating is completed with an Unexpected error';
2128: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR','');
2129: errbuf := 'Trip Rerating is completed with error';
2130: retcode := '2';
2131: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2132: FTE_FREIGHT_PRICING_UTIL.close_logs;
2133: WHEN OTHERS THEN
2134: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR','');
2135: errbuf := 'Trip Rerating is completed with an Unexpected error';
2136: retcode := '2';
2133: WHEN OTHERS THEN
2134: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR','');
2135: errbuf := 'Trip Rerating is completed with an Unexpected error';
2136: retcode := '2';
2137: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2138: FTE_FREIGHT_PRICING_UTIL.close_logs;
2139:
2140: END Rate_Trip_conc;
2141:
2134: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR','');
2135: errbuf := 'Trip Rerating is completed with an Unexpected error';
2136: retcode := '2';
2137: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2138: FTE_FREIGHT_PRICING_UTIL.close_logs;
2139:
2140: END Rate_Trip_conc;
2141:
2142: -- +======================================================================+
2196: l_mode VARCHAR2(30);
2197: l_return_status VARCHAR2(1);
2198: l_rowid VARCHAR2(30);
2199: l_init_msg_list VARCHAR2(30) :=FND_API.G_FALSE;
2200: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
2201:
2202: l_warning_count NUMBER:=0;
2203: BEGIN
2204:
2204:
2205:
2206: IF(p_init_prc_log='Y')
2207: THEN
2208: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => l_init_msg_list,
2209: x_return_status => l_return_status );
2210:
2211: END IF;
2212:
2211: END IF;
2212:
2213:
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:
2212:
2213:
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;
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
2223: ||' p_schedule_id=>'||p_schedule_id||' p_service_type_code='||p_service_type_code
2224: ||'p_comparison_request_id=>'||p_comparison_request_id);
2225:
2225:
2226: IF (NOT ((p_lane_id IS NULL AND p_schedule_id IS NOT NULL)
2227: OR (p_lane_id IS NOT NULL AND p_schedule_id IS NULL)))
2228: THEN
2229: raise FTE_FREIGHT_PRICING_UTIL.g_tl_move_rec_lane_sched_null;
2230:
2231: END IF;
2232:
2233: IF (p_lane_id IS NOT NULL) THEN
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
2262: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
2263: 'Moved TL rates successfully');
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
2262: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
2263: 'Moved TL rates successfully');
2264: END IF;
2265:
2266: ELSE
2264: END IF;
2265:
2266: ELSE
2267:
2268: FTE_FREIGHT_PRICING.Move_fc_temp_to_main (
2269: p_init_msg_list => fnd_api.g_false,
2270: p_init_prc_log => 'N',
2271: p_request_id => p_comparison_request_id,
2272: p_trip_id => p_trip_id,
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;
2284:
2285:
2286:
2287: END IF;
2288:
2289:
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
2299: FTE_FREIGHT_PRICING_UTIL.close_logs;
2300: END IF;
2301:
2302:
2303: EXCEPTION
2301:
2302:
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');
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:
2312: WHEN FTE_FREIGHT_PRICING_UTIL.g_tl_move_rec_to_main_fail THEN
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:
2312: WHEN FTE_FREIGHT_PRICING_UTIL.g_tl_move_rec_to_main_fail THEN
2313: ROLLBACK TO Move_Records_To_Main_2;
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:
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;
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:
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');
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
2319: FTE_FREIGHT_PRICING_UTIL.close_logs;
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
2319: FTE_FREIGHT_PRICING_UTIL.close_logs;
2320: END IF;
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
2319: FTE_FREIGHT_PRICING_UTIL.close_logs;
2320: END IF;
2321:
2322:
2323: WHEN others THEN
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')
2330: THEN
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')
2330: THEN
2331: FTE_FREIGHT_PRICING_UTIL.close_logs;
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')
2330: THEN
2331: FTE_FREIGHT_PRICING_UTIL.close_logs;
2332: END IF;
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')
2330: THEN
2331: FTE_FREIGHT_PRICING_UTIL.close_logs;
2332: END IF;
2333:
2334:
2335: END Move_Records_To_Main;
2344: l_return_status VARCHAR2(1);
2345:
2346: l_init_msg_list VARCHAR2(30) :=FND_API.G_FALSE;
2347: l_mode VARCHAR2(30);
2348: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
2349:
2350: l_warning_count NUMBER:=0;
2351:
2352: CURSOR c_trip_mode(c_trip_id NUMBER)
2360:
2361: IF (p_init_prc_log='Y')
2362: THEN
2363:
2364: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => l_init_msg_list,
2365: x_return_status => l_return_status );
2366: END IF;
2367:
2368: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
2364: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => l_init_msg_list,
2365: x_return_status => l_return_status );
2366: END IF;
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:
2365: x_return_status => l_return_status );
2366: END IF;
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;
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;
2392:
2393:
2393:
2394:
2395: ELSE
2396:
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
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:
2407: END IF;
2405: END IF;
2406:
2407: END IF;
2408:
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;
2415:
2416: IF (p_init_prc_log='Y')
2417: THEN
2418:
2419: FTE_FREIGHT_PRICING_UTIL.close_logs;
2420: END IF;
2421:
2422: EXCEPTION
2423:
2420: END IF;
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')
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
2430:
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
2430:
2431: FTE_FREIGHT_PRICING_UTIL.close_logs;
2427: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Delete_Main_Records');
2428: IF (p_init_prc_log='Y')
2429: THEN
2430:
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;
2430:
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')
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
2440:
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
2440:
2441: FTE_FREIGHT_PRICING_UTIL.close_logs;
2437: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Delete_Main_Records');
2438: IF (p_init_prc_log='Y')
2439: THEN
2440:
2441: FTE_FREIGHT_PRICING_UTIL.close_logs;
2442: END IF;
2443:
2444:
2445: WHEN others THEN
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')
2451: THEN
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')
2451: THEN
2452:
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')
2451: THEN
2452:
2453: FTE_FREIGHT_PRICING_UTIL.close_logs;
2449: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Delete_Main_Records');
2450: IF (p_init_prc_log='Y')
2451: THEN
2452:
2453: FTE_FREIGHT_PRICING_UTIL.close_logs;
2454: END IF;
2455:
2456:
2457: END Delete_Main_Records;
2463: x_rank_rec IN OUT NOCOPY FTE_CARRIER_RANK_LIST_PVT.carrier_rank_list_rec,
2464: x_return_status OUT NOCOPY VARCHAR2)
2465: IS
2466:
2467: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
2468:
2469: BEGIN
2470:
2471: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
2467: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
2468:
2469: BEGIN
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:
2468:
2469: BEGIN
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:
2502: --x_rank_rec.schedule_to:=p_sched_rec.schedule_to;
2503:
2504: END IF;
2505:
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;
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:
2515:
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:
2515:
2516: END Copy_LaneSched_To_Rank;
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:
2515:
2516: END Copy_LaneSched_To_Rank;
2517:
2523: x_match_result OUT NOCOPY VARCHAR2,--'Y' or 'N'
2524: x_return_status OUT NOCOPY VARCHAR2)
2525: IS
2526:
2527: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
2528:
2529:
2530: BEGIN
2531:
2528:
2529:
2530: BEGIN
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:
2529:
2530: BEGIN
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:
2536:
2537:
2538: x_match_result:='Y';
2539:
2540: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Rank rec:Lane id:'||p_rank_rec.lane_id||
2541: ' Carrier:'||p_rank_rec.carrier_id||' Service level:'||p_rank_rec.service_level||' Mode:'||p_rank_rec.mode_of_transport);
2542:
2543:
2544: IF(p_lane_rec IS NOT NULL)
2543:
2544: IF(p_lane_rec IS NOT NULL)
2545: THEN
2546:
2547: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Lane rec:Lane id:'||p_lane_rec.lane_id||
2548: ' Carrier:'||p_lane_rec.carrier_id||' Service level:'||p_lane_rec.service_code||' Mode:'||p_lane_rec.mode_of_transport_code);
2549:
2550: IF(p_rank_rec.carrier_id IS NOT NULL)
2551: THEN
2577:
2578:
2579: ELSE
2580:
2581: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Schedule rec:Schedule ID'||p_schedule_rec.schedule_id||' Lane id:'||p_schedule_rec.lane_id||
2582: ' Carrier:'||p_schedule_rec.carrier_id||' Service level:'||p_schedule_rec.service_code||' Mode:'||p_schedule_rec.mode_of_transport_code);
2583:
2584:
2585: IF(p_rank_rec.carrier_id IS NOT NULL)
2618:
2619:
2620:
2621:
2622: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Match result:'||x_match_result);
2623:
2624: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'LaneSched_Matches_Rank');
2625:
2626: EXCEPTION
2620:
2621:
2622: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Match result:'||x_match_result);
2623:
2624: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'LaneSched_Matches_Rank');
2625:
2626: EXCEPTION
2627:
2628: WHEN others THEN
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:
2634:
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:
2634:
2635: END LaneSched_Matches_Rank;
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:
2634:
2635: END LaneSched_Matches_Rank;
2636:
2652: l_lane_rec fte_lane_rec;
2653: l_msg_data VARCHAR2(32767);
2654: l_warning_count NUMBER:=0;
2655: l_return_status VARCHAR2(1);
2656: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
2657:
2658: BEGIN
2659:
2660:
2657:
2658: BEGIN
2659:
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:
2658: BEGIN
2659:
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();
2726: i:=p_ss_rate_sort_tab.NEXT(i);
2727: END LOOP;
2728:
2729:
2730: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Calling FTE_LANE_SEARCH.Search_Lanes:'||TO_CHAR(SYSDATE, 'MM-DD-YYYY HH24:MI:SS'));
2731:
2732: FTE_LANE_SEARCH.Search_Lanes(
2733: p_search_criteria=>l_search_criteria_tab,
2734: p_num_results=>999,
2737: x_schedule_results=>l_schedules_tab,
2738: x_return_message=>l_msg_data,
2739: x_return_status=>l_return_status);
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
2738: x_return_message=>l_msg_data,
2739: x_return_status=>l_return_status);
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
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;
2751:
2752: END IF;
2751:
2752: END IF;
2753: END IF;
2754:
2755: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-1');
2756: k:=1;
2757: j:=p_ss_rate_sort_tab.FIRST;
2758: i:=l_lanes_tab.FIRST;
2759: WHILE((j IS NOT NULL) OR (i IS NOT NULL))
2759: WHILE((j IS NOT NULL) OR (i IS NOT NULL))
2760: LOOP
2761: IF ( (i IS NOT NULL) AND l_lanes_tab.EXISTS(i))
2762: THEN
2763: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Lane id:'||l_lanes_tab(i).lane_id||'transit time:'||l_lanes_tab(i).transit_time||' UOM:'||l_lanes_tab(i).transit_time_uom);
2764: ELSE
2765: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'No lane tab for i:'||i);
2766: END IF;
2767: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-2 i:'||i||' j:'||j);
2761: IF ( (i IS NOT NULL) AND l_lanes_tab.EXISTS(i))
2762: THEN
2763: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Lane id:'||l_lanes_tab(i).lane_id||'transit time:'||l_lanes_tab(i).transit_time||' UOM:'||l_lanes_tab(i).transit_time_uom);
2764: ELSE
2765: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'No lane tab for i:'||i);
2766: END IF;
2767: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-2 i:'||i||' j:'||j);
2768: IF((j IS NOT NULL) AND (i IS NOT NULL) AND (p_ss_rate_sort_tab.EXISTS(j)) AND (p_ss_rate_sort_tab(j).lane_id IS NULL))
2769: THEN
2763: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Lane id:'||l_lanes_tab(i).lane_id||'transit time:'||l_lanes_tab(i).transit_time||' UOM:'||l_lanes_tab(i).transit_time_uom);
2764: ELSE
2765: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'No lane tab for i:'||i);
2766: END IF;
2767: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-2 i:'||i||' j:'||j);
2768: IF((j IS NOT NULL) AND (i IS NOT NULL) AND (p_ss_rate_sort_tab.EXISTS(j)) AND (p_ss_rate_sort_tab(j).lane_id IS NULL))
2769: THEN
2770: --This rank was used for lane search
2771: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-3 i:'||i||' j:'||j);
2767: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-2 i:'||i||' j:'||j);
2768: IF((j IS NOT NULL) AND (i IS NOT NULL) AND (p_ss_rate_sort_tab.EXISTS(j)) AND (p_ss_rate_sort_tab(j).lane_id IS NULL))
2769: THEN
2770: --This rank was used for lane search
2771: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-3 i:'||i||' j:'||j);
2772: l_match_result:='N';
2773: WHILE((l_match_result='N') AND (j IS NOT NULL))
2774: LOOP
2775:
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;
2790: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-4 i:'||i||' j:'||j);
2791: IF(l_match_result='N')
2786: THEN
2787: raise FTE_FREIGHT_PRICING_UTIL.g_lane_matches_rank_fail;
2788: END IF;
2789: END IF;
2790: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-4 i:'||i||' j:'||j);
2791: IF(l_match_result='N')
2792: THEN
2793: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-5 i:'||i||' j:'||j);
2794: j:=p_ss_rate_sort_tab.NEXT(j);
2789: END IF;
2790: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-4 i:'||i||' j:'||j);
2791: IF(l_match_result='N')
2792: THEN
2793: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-5 i:'||i||' j:'||j);
2794: j:=p_ss_rate_sort_tab.NEXT(j);
2795:
2796: END IF;
2797:
2795:
2796: END IF;
2797:
2798: END LOOP;
2799: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-6 i:'||i||' j:'||j);
2800: IF (l_match_result='N')
2801: THEN
2802: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Lane did not match with any rank');
2803:
2798: END LOOP;
2799: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-6 i:'||i||' j:'||j);
2800: IF (l_match_result='N')
2801: THEN
2802: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Lane did not match with any rank');
2803:
2804: ELSE
2805: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-7 i:'||i||' j:'||j);
2806: x_ss_rate_sort_tab(k):=p_ss_rate_sort_tab(j);
2801: THEN
2802: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Lane did not match with any rank');
2803:
2804: ELSE
2805: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-7 i:'||i||' j:'||j);
2806: x_ss_rate_sort_tab(k):=p_ss_rate_sort_tab(j);
2807:
2808: Copy_LaneSched_To_Rank(
2809: p_lane_rec =>l_lanes_tab(i),
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;
2821: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-8 i:'||i||' j:'||j);
2822:
2817: THEN
2818: raise FTE_FREIGHT_PRICING_UTIL.g_copy_lane_rank_fail;
2819: END IF;
2820: END IF;
2821: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-8 i:'||i||' j:'||j);
2822:
2823: x_ref(k):=j;
2824: k:=k+1;
2825: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-9 i:'||i||' j:'||j);
2821: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-8 i:'||i||' j:'||j);
2822:
2823: x_ref(k):=j;
2824: k:=k+1;
2825: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-9 i:'||i||' j:'||j);
2826:
2827: END IF;
2828: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-10 i:'||i||' j:'||j);
2829: IF (i IS NOT NULL)
2824: k:=k+1;
2825: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-9 i:'||i||' j:'||j);
2826:
2827: END IF;
2828: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-10 i:'||i||' j:'||j);
2829: IF (i IS NOT NULL)
2830: THEN
2831: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-11 i:'||i||' j:'||j);
2832: i:=l_lanes_tab.NEXT(i);
2827: END IF;
2828: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-10 i:'||i||' j:'||j);
2829: IF (i IS NOT NULL)
2830: THEN
2831: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-11 i:'||i||' j:'||j);
2832: i:=l_lanes_tab.NEXT(i);
2833: ELSIF(j IS NOT NULL)
2834: THEN
2835: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-12 i:'||i||' j:'||j);
2831: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-11 i:'||i||' j:'||j);
2832: i:=l_lanes_tab.NEXT(i);
2833: ELSIF(j IS NOT NULL)
2834: THEN
2835: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-12 i:'||i||' j:'||j);
2836: j:=p_ss_rate_sort_tab.NEXT(j);
2837: END IF;
2838:
2839:
2839:
2840:
2841: ELSIF ((j IS NOT NULL) AND (p_ss_rate_sort_tab.EXISTS(j)) AND (p_ss_rate_sort_tab(j).lane_id IS NOT NULL))
2842: THEN
2843: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-13 i:'||i||' j:'||j);
2844: --This rank was not used for lane search
2845: --Copy to output
2846:
2847: x_ss_rate_sort_tab(k):=p_ss_rate_sort_tab(j);
2854: j:=p_ss_rate_sort_tab.NEXT(j);
2855:
2856: END IF;
2857:
2858: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-14 i:'||i||' j:'||j);
2859:
2860: END LOOP;
2861:
2862:
2860: END LOOP;
2861:
2862:
2863:
2864: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-15 i:'||i||' j:'||j);
2865:
2866: j:=p_ss_rate_sort_tab.FIRST;
2867: i:=l_schedules_tab.FIRST;
2868: WHILE((j IS NOT NULL) OR (i IS NOT NULL))
2866: j:=p_ss_rate_sort_tab.FIRST;
2867: i:=l_schedules_tab.FIRST;
2868: WHILE((j IS NOT NULL) OR (i IS NOT NULL))
2869: LOOP
2870: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-16 i:'||i||' j:'||j);
2871: IF((j IS NOT NULL) AND (i IS NOT NULL) AND (p_ss_rate_sort_tab.EXISTS(j)) AND (p_ss_rate_sort_tab(j).schedule_id IS NULL))
2872: THEN
2873: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-17 i:'||i||' j:'||j);
2874: --This rank was used for lane search
2869: LOOP
2870: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-16 i:'||i||' j:'||j);
2871: IF((j IS NOT NULL) AND (i IS NOT NULL) AND (p_ss_rate_sort_tab.EXISTS(j)) AND (p_ss_rate_sort_tab(j).schedule_id IS NULL))
2872: THEN
2873: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-17 i:'||i||' j:'||j);
2874: --This rank was used for lane search
2875:
2876: l_match_result:='N';
2877: WHILE((l_match_result='N') AND (j IS NOT NULL))
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;
2893:
2894: IF(l_match_result='N')
2900: END LOOP;
2901:
2902: IF (l_match_result='N')
2903: THEN
2904: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Lane did not match with any rank');
2905:
2906: ELSE
2907: x_ss_rate_sort_tab(k):=p_ss_rate_sort_tab(j);
2908:
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;
2922:
2923:
2941: THEN
2942: --This rank was not used for lane search
2943: --Copy to output
2944:
2945: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-18 i:'||i||' j:'||j);
2946: x_ss_rate_sort_tab(k):=p_ss_rate_sort_tab(j);
2947: x_ref(k):=j;
2948: k:=k+1;
2949: j:=p_ss_rate_sort_tab.NEXT(j);
2954:
2955:
2956:
2957: END IF;
2958: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-19 i:'||i||' j:'||j);
2959: END LOOP;
2960:
2961: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-20 i:'||i||' j:'||j);
2962:
2957: END IF;
2958: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-19 i:'||i||' j:'||j);
2959: END LOOP;
2960:
2961: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-20 i:'||i||' j:'||j);
2962:
2963: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Search_Multi_ShipMethods');
2964:
2965: IF (l_warning_count > 0)
2959: END LOOP;
2960:
2961: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'DBG-20 i:'||i||' j:'||j);
2962:
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;
2969:
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:
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:
2979:
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:
2979:
2980: WHEN FTE_FREIGHT_PRICING_UTIL.g_lane_matches_rank_fail THEN
2976: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Search_Multi_ShipMethods');
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:
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:
2986: WHEN FTE_FREIGHT_PRICING_UTIL.g_copy_lane_rank_fail THEN
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:
2986: WHEN FTE_FREIGHT_PRICING_UTIL.g_copy_lane_rank_fail THEN
2987: 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:
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:
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
2992: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
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
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');
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:
2997:
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:
2997:
2998: END Search_Multi_ShipMethods;
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:
2997:
2998: END Search_Multi_ShipMethods;
2999:
3000:
3001: PROCEDURE Display_Attr_Rec(p_attr_rec IN FTE_SS_ATTR_REC)
3002: IS
3003:
3004: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
3005:
3006: BEGIN
3007:
3008:
3005:
3006: BEGIN
3007:
3008:
3009: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
3010: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Display_Attr_Rec','start');
3011:
3012:
3013: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3006: BEGIN
3007:
3008:
3009: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
3010: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Display_Attr_Rec','start');
3011:
3012:
3013: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3014: ' ');
3009: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
3010: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Display_Attr_Rec','start');
3011:
3012:
3013: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3014: ' ');
3015: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3016: 'START ATTR REC');
3017: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3011:
3012:
3013: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3014: ' ');
3015: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3016: 'START ATTR REC');
3017: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3018: ' DELIVERY_ID :'||p_attr_rec.delivery_id);
3019: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3013: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3014: ' ');
3015: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3016: 'START ATTR REC');
3017: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3018: ' DELIVERY_ID :'||p_attr_rec.delivery_id);
3019: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3020: ' DELIVERY_LEG_ID :'||p_attr_rec.delivery_leg_id);
3021: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3015: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3016: 'START ATTR REC');
3017: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3018: ' DELIVERY_ID :'||p_attr_rec.delivery_id);
3019: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3020: ' DELIVERY_LEG_ID :'||p_attr_rec.delivery_leg_id);
3021: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3022: ' TRIP_ID :'||p_attr_rec.trip_id);
3023: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3017: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3018: ' DELIVERY_ID :'||p_attr_rec.delivery_id);
3019: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3020: ' DELIVERY_LEG_ID :'||p_attr_rec.delivery_leg_id);
3021: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3022: ' TRIP_ID :'||p_attr_rec.trip_id);
3023: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3024: ' ARR_DATE_TO :'||p_attr_rec.arr_date_to);
3025: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3019: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3020: ' DELIVERY_LEG_ID :'||p_attr_rec.delivery_leg_id);
3021: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3022: ' TRIP_ID :'||p_attr_rec.trip_id);
3023: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3024: ' ARR_DATE_TO :'||p_attr_rec.arr_date_to);
3025: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3026: ' ARR_DATE_FROM :'||p_attr_rec.arr_date_from);
3027: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3021: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3022: ' TRIP_ID :'||p_attr_rec.trip_id);
3023: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3024: ' ARR_DATE_TO :'||p_attr_rec.arr_date_to);
3025: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3026: ' ARR_DATE_FROM :'||p_attr_rec.arr_date_from);
3027: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3028: ' DEP_DATE_TO :'||p_attr_rec.dep_date_to);
3029: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3023: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3024: ' ARR_DATE_TO :'||p_attr_rec.arr_date_to);
3025: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3026: ' ARR_DATE_FROM :'||p_attr_rec.arr_date_from);
3027: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3028: ' DEP_DATE_TO :'||p_attr_rec.dep_date_to);
3029: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3030: ' DEP_DATE_FROM :'||p_attr_rec.dep_date_from);
3031: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3025: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3026: ' ARR_DATE_FROM :'||p_attr_rec.arr_date_from);
3027: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3028: ' DEP_DATE_TO :'||p_attr_rec.dep_date_to);
3029: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3030: ' DEP_DATE_FROM :'||p_attr_rec.dep_date_from);
3031: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3032: ' ORIGIN_LOCATION_ID :'||p_attr_rec.origin_location_id);
3033: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3027: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3028: ' DEP_DATE_TO :'||p_attr_rec.dep_date_to);
3029: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3030: ' DEP_DATE_FROM :'||p_attr_rec.dep_date_from);
3031: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3032: ' ORIGIN_LOCATION_ID :'||p_attr_rec.origin_location_id);
3033: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3034: ' DESTI_LOCATION_ID :'||p_attr_rec.destination_location_id);
3035: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3029: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3030: ' DEP_DATE_FROM :'||p_attr_rec.dep_date_from);
3031: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3032: ' ORIGIN_LOCATION_ID :'||p_attr_rec.origin_location_id);
3033: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3034: ' DESTI_LOCATION_ID :'||p_attr_rec.destination_location_id);
3035: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3036: ' PICK_UP_STOP_ID :'||p_attr_rec.pick_up_stop_id);
3037: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3031: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3032: ' ORIGIN_LOCATION_ID :'||p_attr_rec.origin_location_id);
3033: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3034: ' DESTI_LOCATION_ID :'||p_attr_rec.destination_location_id);
3035: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3036: ' PICK_UP_STOP_ID :'||p_attr_rec.pick_up_stop_id);
3037: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3038: ' DROP_OFF_STOP_ID :'||p_attr_rec.drop_off_stop_id);
3039: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3033: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3034: ' DESTI_LOCATION_ID :'||p_attr_rec.destination_location_id);
3035: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3036: ' PICK_UP_STOP_ID :'||p_attr_rec.pick_up_stop_id);
3037: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3038: ' DROP_OFF_STOP_ID :'||p_attr_rec.drop_off_stop_id);
3039: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3040: ' PICK_UP_STOP_LOC_ID:'||p_attr_rec.pick_up_stop_location_id);
3041: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3035: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3036: ' PICK_UP_STOP_ID :'||p_attr_rec.pick_up_stop_id);
3037: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3038: ' DROP_OFF_STOP_ID :'||p_attr_rec.drop_off_stop_id);
3039: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3040: ' PICK_UP_STOP_LOC_ID:'||p_attr_rec.pick_up_stop_location_id);
3041: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3042: ' DROP_OFF_STOP_LC_ID:'||p_attr_rec.drop_off_stop_location_id);
3043: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3037: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3038: ' DROP_OFF_STOP_ID :'||p_attr_rec.drop_off_stop_id);
3039: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3040: ' PICK_UP_STOP_LOC_ID:'||p_attr_rec.pick_up_stop_location_id);
3041: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3042: ' DROP_OFF_STOP_LC_ID:'||p_attr_rec.drop_off_stop_location_id);
3043: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3044: ' LANE_ID :'||p_attr_rec.lane_id);
3045: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3039: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3040: ' PICK_UP_STOP_LOC_ID:'||p_attr_rec.pick_up_stop_location_id);
3041: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3042: ' DROP_OFF_STOP_LC_ID:'||p_attr_rec.drop_off_stop_location_id);
3043: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3044: ' LANE_ID :'||p_attr_rec.lane_id);
3045: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3046: ' SCHEDULE_ID :'||p_attr_rec.schedule_id);
3047: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3041: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3042: ' DROP_OFF_STOP_LC_ID:'||p_attr_rec.drop_off_stop_location_id);
3043: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3044: ' LANE_ID :'||p_attr_rec.lane_id);
3045: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3046: ' SCHEDULE_ID :'||p_attr_rec.schedule_id);
3047: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3048: ' CARRIER_ID :'||p_attr_rec.carrier_id);
3049: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3043: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3044: ' LANE_ID :'||p_attr_rec.lane_id);
3045: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3046: ' SCHEDULE_ID :'||p_attr_rec.schedule_id);
3047: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3048: ' CARRIER_ID :'||p_attr_rec.carrier_id);
3049: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3050: ' MODE_OF_TRANSPORT :'||p_attr_rec.mode_of_transport);
3051: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3045: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3046: ' SCHEDULE_ID :'||p_attr_rec.schedule_id);
3047: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3048: ' CARRIER_ID :'||p_attr_rec.carrier_id);
3049: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3050: ' MODE_OF_TRANSPORT :'||p_attr_rec.mode_of_transport);
3051: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3052: ' SERVICE_LEVEL :'||p_attr_rec.service_level);
3053: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3047: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3048: ' CARRIER_ID :'||p_attr_rec.carrier_id);
3049: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3050: ' MODE_OF_TRANSPORT :'||p_attr_rec.mode_of_transport);
3051: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3052: ' SERVICE_LEVEL :'||p_attr_rec.service_level);
3053: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3054: ' VEHICLE_ITEM_ID :'||p_attr_rec.vehicle_item_id);
3055: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3049: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3050: ' MODE_OF_TRANSPORT :'||p_attr_rec.mode_of_transport);
3051: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3052: ' SERVICE_LEVEL :'||p_attr_rec.service_level);
3053: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3054: ' VEHICLE_ITEM_ID :'||p_attr_rec.vehicle_item_id);
3055: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3056: ' VEHICLE_ORG_ID :'||p_attr_rec.vehicle_org_id);
3057: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3051: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3052: ' SERVICE_LEVEL :'||p_attr_rec.service_level);
3053: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3054: ' VEHICLE_ITEM_ID :'||p_attr_rec.vehicle_item_id);
3055: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3056: ' VEHICLE_ORG_ID :'||p_attr_rec.vehicle_org_id);
3057: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3058: ' RULE_ID :'||p_attr_rec.rule_id);
3059: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3053: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3054: ' VEHICLE_ITEM_ID :'||p_attr_rec.vehicle_item_id);
3055: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3056: ' VEHICLE_ORG_ID :'||p_attr_rec.vehicle_org_id);
3057: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3058: ' RULE_ID :'||p_attr_rec.rule_id);
3059: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3060: ' RANK_ID :'||p_attr_rec.rank_id);
3061: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3055: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3056: ' VEHICLE_ORG_ID :'||p_attr_rec.vehicle_org_id);
3057: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3058: ' RULE_ID :'||p_attr_rec.rule_id);
3059: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3060: ' RANK_ID :'||p_attr_rec.rank_id);
3061: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3062: ' APPEND_LIST_FLAG :'||p_attr_rec.append_list_flag);
3063: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3057: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3058: ' RULE_ID :'||p_attr_rec.rule_id);
3059: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3060: ' RANK_ID :'||p_attr_rec.rank_id);
3061: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3062: ' APPEND_LIST_FLAG :'||p_attr_rec.append_list_flag);
3063: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3064: 'END ATTR REC');
3065: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3059: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3060: ' RANK_ID :'||p_attr_rec.rank_id);
3061: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3062: ' APPEND_LIST_FLAG :'||p_attr_rec.append_list_flag);
3063: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3064: 'END ATTR REC');
3065: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3066: ' ');
3067:
3061: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3062: ' APPEND_LIST_FLAG :'||p_attr_rec.append_list_flag);
3063: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3064: 'END ATTR REC');
3065: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3066: ' ');
3067:
3068: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Display_Attr_Rec');
3069:
3064: 'END ATTR REC');
3065: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3066: ' ');
3067:
3068: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Display_Attr_Rec');
3069:
3070: END Display_Attr_Rec;
3071:
3072:
3072:
3073:
3074: PROCEDURE Display_Rank_Rec(p_rank_rec IN FTE_CARRIER_RANK_LIST_PVT.carrier_rank_list_rec)
3075: IS
3076: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
3077:
3078: BEGIN
3079:
3080:
3077:
3078: BEGIN
3079:
3080:
3081: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
3082: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Display_Rank_Rec','start');
3083:
3084:
3085: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3078: BEGIN
3079:
3080:
3081: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
3082: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Display_Rank_Rec','start');
3083:
3084:
3085: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3086: ' ');
3081: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
3082: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Display_Rank_Rec','start');
3083:
3084:
3085: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3086: ' ');
3087: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3088: 'START RANK REC');
3089: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3083:
3084:
3085: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3086: ' ');
3087: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3088: 'START RANK REC');
3089: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3090: ' RANK_ID :'||p_rank_rec.rank_id);
3091: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3085: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3086: ' ');
3087: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3088: 'START RANK REC');
3089: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3090: ' RANK_ID :'||p_rank_rec.rank_id);
3091: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3092: ' TRIP_ID :'||p_rank_rec.trip_id);
3093: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3087: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3088: 'START RANK REC');
3089: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3090: ' RANK_ID :'||p_rank_rec.rank_id);
3091: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3092: ' TRIP_ID :'||p_rank_rec.trip_id);
3093: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3094: ' RANK_SEQUENCE :'||p_rank_rec.rank_sequence);
3095: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3089: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3090: ' RANK_ID :'||p_rank_rec.rank_id);
3091: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3092: ' TRIP_ID :'||p_rank_rec.trip_id);
3093: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3094: ' RANK_SEQUENCE :'||p_rank_rec.rank_sequence);
3095: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3096: ' CARRIER_ID :'||p_rank_rec.carrier_id);
3097: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3091: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3092: ' TRIP_ID :'||p_rank_rec.trip_id);
3093: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3094: ' RANK_SEQUENCE :'||p_rank_rec.rank_sequence);
3095: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3096: ' CARRIER_ID :'||p_rank_rec.carrier_id);
3097: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3098: ' SERVICE_LEVEL :'||p_rank_rec.service_level);
3099: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3093: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3094: ' RANK_SEQUENCE :'||p_rank_rec.rank_sequence);
3095: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3096: ' CARRIER_ID :'||p_rank_rec.carrier_id);
3097: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3098: ' SERVICE_LEVEL :'||p_rank_rec.service_level);
3099: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3100: ' MODE_OF_TRANSPORT :'||p_rank_rec.mode_of_transport);
3101: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3095: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3096: ' CARRIER_ID :'||p_rank_rec.carrier_id);
3097: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3098: ' SERVICE_LEVEL :'||p_rank_rec.service_level);
3099: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3100: ' MODE_OF_TRANSPORT :'||p_rank_rec.mode_of_transport);
3101: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3102: ' LANE_ID :'||p_rank_rec.lane_id);
3103: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3097: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3098: ' SERVICE_LEVEL :'||p_rank_rec.service_level);
3099: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3100: ' MODE_OF_TRANSPORT :'||p_rank_rec.mode_of_transport);
3101: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3102: ' LANE_ID :'||p_rank_rec.lane_id);
3103: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3104: ' SOURCE :'||p_rank_rec.source);
3105: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3099: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3100: ' MODE_OF_TRANSPORT :'||p_rank_rec.mode_of_transport);
3101: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3102: ' LANE_ID :'||p_rank_rec.lane_id);
3103: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3104: ' SOURCE :'||p_rank_rec.source);
3105: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3106: ' ENABLED :'||p_rank_rec.enabled);
3107: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3101: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3102: ' LANE_ID :'||p_rank_rec.lane_id);
3103: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3104: ' SOURCE :'||p_rank_rec.source);
3105: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3106: ' ENABLED :'||p_rank_rec.enabled);
3107: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3108: ' ESTIMATED_RATE :'||p_rank_rec.estimated_rate);
3109: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3103: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3104: ' SOURCE :'||p_rank_rec.source);
3105: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3106: ' ENABLED :'||p_rank_rec.enabled);
3107: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3108: ' ESTIMATED_RATE :'||p_rank_rec.estimated_rate);
3109: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3110: ' CURRENCY_CODE :'||p_rank_rec.currency_code);
3111: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3105: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3106: ' ENABLED :'||p_rank_rec.enabled);
3107: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3108: ' ESTIMATED_RATE :'||p_rank_rec.estimated_rate);
3109: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3110: ' CURRENCY_CODE :'||p_rank_rec.currency_code);
3111: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3112: ' VEHICLE_ITEM_ID :'||p_rank_rec.vehicle_item_id);
3113: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3107: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3108: ' ESTIMATED_RATE :'||p_rank_rec.estimated_rate);
3109: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3110: ' CURRENCY_CODE :'||p_rank_rec.currency_code);
3111: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3112: ' VEHICLE_ITEM_ID :'||p_rank_rec.vehicle_item_id);
3113: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3114: ' ESTIMATED_TRANSIT_T:'||p_rank_rec.estimated_transit_time);
3115: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3109: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3110: ' CURRENCY_CODE :'||p_rank_rec.currency_code);
3111: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3112: ' VEHICLE_ITEM_ID :'||p_rank_rec.vehicle_item_id);
3113: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3114: ' ESTIMATED_TRANSIT_T:'||p_rank_rec.estimated_transit_time);
3115: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3116: ' TRANSIT_TIME_UOM :'||p_rank_rec.transit_time_uom);
3117: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3111: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3112: ' VEHICLE_ITEM_ID :'||p_rank_rec.vehicle_item_id);
3113: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3114: ' ESTIMATED_TRANSIT_T:'||p_rank_rec.estimated_transit_time);
3115: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3116: ' TRANSIT_TIME_UOM :'||p_rank_rec.transit_time_uom);
3117: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3118: ' VERSION :'||p_rank_rec.version);
3119: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3113: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3114: ' ESTIMATED_TRANSIT_T:'||p_rank_rec.estimated_transit_time);
3115: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3116: ' TRANSIT_TIME_UOM :'||p_rank_rec.transit_time_uom);
3117: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3118: ' VERSION :'||p_rank_rec.version);
3119: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3120: ' CONSIGNEE_CR_AC_NO :'||p_rank_rec.consignee_carrier_ac_no);
3121: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3115: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3116: ' TRANSIT_TIME_UOM :'||p_rank_rec.transit_time_uom);
3117: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3118: ' VERSION :'||p_rank_rec.version);
3119: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3120: ' CONSIGNEE_CR_AC_NO :'||p_rank_rec.consignee_carrier_ac_no);
3121: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3122: ' FREIGHT_TERMS_CODE :'||p_rank_rec.freight_terms_code);
3123: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3117: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3118: ' VERSION :'||p_rank_rec.version);
3119: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3120: ' CONSIGNEE_CR_AC_NO :'||p_rank_rec.consignee_carrier_ac_no);
3121: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3122: ' FREIGHT_TERMS_CODE :'||p_rank_rec.freight_terms_code);
3123: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3124: ' INITSMCONFIG :'||p_rank_rec.initsmconfig);
3125: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3119: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3120: ' CONSIGNEE_CR_AC_NO :'||p_rank_rec.consignee_carrier_ac_no);
3121: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3122: ' FREIGHT_TERMS_CODE :'||p_rank_rec.freight_terms_code);
3123: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3124: ' INITSMCONFIG :'||p_rank_rec.initsmconfig);
3125: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3126: ' CREATION_DATE :'||p_rank_rec.creation_date);
3127: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3121: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3122: ' FREIGHT_TERMS_CODE :'||p_rank_rec.freight_terms_code);
3123: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3124: ' INITSMCONFIG :'||p_rank_rec.initsmconfig);
3125: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3126: ' CREATION_DATE :'||p_rank_rec.creation_date);
3127: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3128: ' CREATED_BY :'||p_rank_rec.created_by);
3129: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3123: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3124: ' INITSMCONFIG :'||p_rank_rec.initsmconfig);
3125: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3126: ' CREATION_DATE :'||p_rank_rec.creation_date);
3127: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3128: ' CREATED_BY :'||p_rank_rec.created_by);
3129: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3130: ' LAST_UPDATE_DATE :'||p_rank_rec.last_update_date);
3131: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3125: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3126: ' CREATION_DATE :'||p_rank_rec.creation_date);
3127: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3128: ' CREATED_BY :'||p_rank_rec.created_by);
3129: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3130: ' LAST_UPDATE_DATE :'||p_rank_rec.last_update_date);
3131: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3132: ' LAST_UPDATE_BY :'||p_rank_rec.last_updated_by);
3133: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3127: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3128: ' CREATED_BY :'||p_rank_rec.created_by);
3129: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3130: ' LAST_UPDATE_DATE :'||p_rank_rec.last_update_date);
3131: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3132: ' LAST_UPDATE_BY :'||p_rank_rec.last_updated_by);
3133: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3134: ' LAST_UPDATE_LOGIN :'||p_rank_rec.last_update_login);
3135: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3129: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3130: ' LAST_UPDATE_DATE :'||p_rank_rec.last_update_date);
3131: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3132: ' LAST_UPDATE_BY :'||p_rank_rec.last_updated_by);
3133: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3134: ' LAST_UPDATE_LOGIN :'||p_rank_rec.last_update_login);
3135: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3136: ' IS_CURRENT :'||p_rank_rec.is_current);
3137: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3131: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3132: ' LAST_UPDATE_BY :'||p_rank_rec.last_updated_by);
3133: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3134: ' LAST_UPDATE_LOGIN :'||p_rank_rec.last_update_login);
3135: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3136: ' IS_CURRENT :'||p_rank_rec.is_current);
3137: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3138: ' SINGLE_CURR_RATE :'||p_rank_rec.single_curr_rate);
3139: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3133: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3134: ' LAST_UPDATE_LOGIN :'||p_rank_rec.last_update_login);
3135: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3136: ' IS_CURRENT :'||p_rank_rec.is_current);
3137: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3138: ' SINGLE_CURR_RATE :'||p_rank_rec.single_curr_rate);
3139: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3140: ' SORT :'||p_rank_rec.sort);
3141: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3135: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3136: ' IS_CURRENT :'||p_rank_rec.is_current);
3137: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3138: ' SINGLE_CURR_RATE :'||p_rank_rec.single_curr_rate);
3139: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3140: ' SORT :'||p_rank_rec.sort);
3141: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3142: ' SCHEDULE_FROM :'||p_rank_rec.schedule_from);
3143: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3137: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3138: ' SINGLE_CURR_RATE :'||p_rank_rec.single_curr_rate);
3139: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3140: ' SORT :'||p_rank_rec.sort);
3141: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3142: ' SCHEDULE_FROM :'||p_rank_rec.schedule_from);
3143: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3144: ' SCHEDULE_TO :'||p_rank_rec.schedule_to);
3145: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3139: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3140: ' SORT :'||p_rank_rec.sort);
3141: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3142: ' SCHEDULE_FROM :'||p_rank_rec.schedule_from);
3143: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3144: ' SCHEDULE_TO :'||p_rank_rec.schedule_to);
3145: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3146: ' SCHEDULE_ID :'||p_rank_rec.schedule_id);
3147: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3141: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3142: ' SCHEDULE_FROM :'||p_rank_rec.schedule_from);
3143: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3144: ' SCHEDULE_TO :'||p_rank_rec.schedule_to);
3145: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3146: ' SCHEDULE_ID :'||p_rank_rec.schedule_id);
3147: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3148: ' VEHICLE_ORG_ID :'||p_rank_rec.vehicle_org_id);
3149: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3143: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3144: ' SCHEDULE_TO :'||p_rank_rec.schedule_to);
3145: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3146: ' SCHEDULE_ID :'||p_rank_rec.schedule_id);
3147: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3148: ' VEHICLE_ORG_ID :'||p_rank_rec.vehicle_org_id);
3149: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3150: 'END RANK REC');
3151: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3145: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3146: ' SCHEDULE_ID :'||p_rank_rec.schedule_id);
3147: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3148: ' VEHICLE_ORG_ID :'||p_rank_rec.vehicle_org_id);
3149: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3150: 'END RANK REC');
3151: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3152: ' ');
3153:
3147: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3148: ' VEHICLE_ORG_ID :'||p_rank_rec.vehicle_org_id);
3149: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3150: 'END RANK REC');
3151: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3152: ' ');
3153:
3154: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Display_Rank_Rec');
3155:
3150: 'END RANK REC');
3151: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
3152: ' ');
3153:
3154: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Display_Rank_Rec');
3155:
3156: END Display_Rank_Rec;
3157:
3158: PROCEDURE Display_Rank_Tab(
3158: PROCEDURE Display_Rank_Tab(
3159: p_rank_tab IN FTE_CARRIER_RANK_LIST_PVT.carrier_rank_list_tbl_type,
3160: p_input_ref IN dbms_utility.number_array)
3161: IS
3162: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
3163: i NUMBER;
3164: BEGIN
3165:
3166: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
3162: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
3163: i NUMBER;
3164: BEGIN
3165:
3166: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
3167: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Display_Rank_Tab','start');
3168:
3169: IF (p_rank_tab IS NOT NULL)
3170: THEN
3163: i NUMBER;
3164: BEGIN
3165:
3166: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
3167: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Display_Rank_Tab','start');
3168:
3169: IF (p_rank_tab IS NOT NULL)
3170: THEN
3171: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Number of Rank recs:'||p_rank_tab.COUNT );
3167: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Display_Rank_Tab','start');
3168:
3169: IF (p_rank_tab IS NOT NULL)
3170: THEN
3171: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Number of Rank recs:'||p_rank_tab.COUNT );
3172:
3173: i:=p_rank_tab.FIRST;
3174: WHILE ( i IS NOT NULL)
3175: LOOP
3173: i:=p_rank_tab.FIRST;
3174: WHILE ( i IS NOT NULL)
3175: LOOP
3176:
3177: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Rank rec:'||i );
3178:
3179: IF(p_input_ref IS NOT NULL AND p_input_ref.EXISTS(i))
3180: THEN
3181: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Input ref:'|| p_input_ref(i));
3177: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Rank rec:'||i );
3178:
3179: IF(p_input_ref IS NOT NULL AND p_input_ref.EXISTS(i))
3180: THEN
3181: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Input ref:'|| p_input_ref(i));
3182: END IF;
3183:
3184: Display_Rank_Rec(p_rank_tab(i));
3185: i:=p_rank_tab.NEXT(i);
3187:
3188: END IF;
3189:
3190:
3191: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Display_Rank_Tab');
3192:
3193: END Display_Rank_Tab;
3194:
3195: PROCEDURE Get_Vehicle_Item_Org(
3206: FROM FTE_VEHICLE_TYPES v
3207: WHERE v.vehicle_type_id=c_vehicle_type;
3208:
3209:
3210: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
3211:
3212: BEGIN
3213:
3214: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
3210: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
3211:
3212: BEGIN
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:
3211:
3212: BEGIN
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:
3223: OPEN c_get_veh_item_org(p_vehicle_type);
3224: FETCH c_get_veh_item_org INTO x_vehicle_item_id,x_vehicle_item_org;
3225: CLOSE c_get_veh_item_org;
3226:
3227: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Get_Vehicle_Item_Org');
3228:
3229: EXCEPTION
3230:
3231: WHEN others THEN
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:
3237:
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:
3237:
3238: END Get_Vehicle_Item_Org;
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:
3237:
3238: END Get_Vehicle_Item_Org;
3239:
3252: l_transit_time NUMBER;
3253: l_values_tab Sort_Value_Tab_Type;
3254: l_values_rec Sort_Value_Rec_Type;
3255: l_sorted_index dbms_utility.number_array;
3256: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
3257: l_return_status VARCHAR2(1);
3258: BEGIN
3259:
3260:
3257: l_return_status VARCHAR2(1);
3258: BEGIN
3259:
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:
3258: BEGIN
3259:
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:
3280: THEN
3281: l_time_uom:=p_ss_rate_sort_tab(i).transit_time_uom;
3282: END IF;
3283:
3284: l_transit_time:=FTE_FREIGHT_PRICING_UTIL.convert_uom(
3285: p_ss_rate_sort_tab(i).transit_time_uom,
3286: l_time_uom,
3287: p_ss_rate_sort_tab(i).estimated_transit_time,
3288: 0);
3286: l_time_uom,
3287: p_ss_rate_sort_tab(i).estimated_transit_time,
3288: 0);
3289:
3290: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'index:'||i||'Transit time:'||l_transit_time);
3291:
3292:
3293: END IF;
3294:
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;
3348:
3349:
3355: x_ss_rate_sort_tab(i):=p_ss_rate_sort_tab(l_sorted_index(i));
3356: x_input_ref(i):=p_input_ref(l_sorted_index(i));
3357: ELSE
3358:
3359: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Sorted value index:'||i||' Does not exist in input at:'||l_sorted_index(i));
3360: END IF;
3361:
3362: i:=l_sorted_index.NEXT(i);
3363: END LOOP;
3361:
3362: i:=l_sorted_index.NEXT(i);
3363: END LOOP;
3364:
3365: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Seq_Tender_Sort');
3366:
3367: EXCEPTION
3368:
3369: WHEN FTE_FREIGHT_PRICING_UTIL.g_tl_conv_currency_fail THEN
3365: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Seq_Tender_Sort');
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:
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:
3375: WHEN FTE_FREIGHT_PRICING_UTIL.g_sort_fail THEN
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:
3375: WHEN FTE_FREIGHT_PRICING_UTIL.g_sort_fail THEN
3376: 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:
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:
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
3381: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
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
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');
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:
3386:
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:
3386:
3387: END Seq_Tender_Sort;
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:
3386:
3387: END Seq_Tender_Sort;
3388:
3398: l_prev_index NUMBER;
3399: l_values_tab Sort_Value_Tab_Type;
3400: l_values_rec Sort_Value_Rec_Type;
3401: l_sorted_index dbms_utility.number_array;
3402: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
3403:
3404: l_eliminated_index dbms_utility.number_array;
3405:
3406: l_index NUMBER;
3408: l_return_status VARCHAR2(1);
3409: BEGIN
3410:
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:
3409: BEGIN
3410:
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:
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;
3451:
3452: --Mark duplicates for removal
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;
3485:
3486:
3527: END LOOP;
3528:
3529:
3530:
3531: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Remove_Duplicate_Lanes');
3532:
3533: EXCEPTION
3534:
3535: WHEN FTE_FREIGHT_PRICING_UTIL.g_quicksort_compare_fail THEN
3531: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Remove_Duplicate_Lanes');
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:
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:
3541: WHEN FTE_FREIGHT_PRICING_UTIL.g_sort_fail THEN
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:
3541: WHEN FTE_FREIGHT_PRICING_UTIL.g_sort_fail THEN
3542: 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:
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:
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
3547: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
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
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');
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:
3552:
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:
3552:
3553:
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:
3552:
3553:
3554:
3581:
3582: l_delivery_type VARCHAR2(30);
3583: l_parent_dleg_id NUMBER;
3584:
3585: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
3586:
3587: l_return_status VARCHAR2(1);
3588: BEGIN
3589:
3587: l_return_status VARCHAR2(1);
3588: BEGIN
3589:
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:
3588: BEGIN
3589:
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:
3626:
3627:
3628: END IF;
3629:
3630: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Get_MDC_Delivery_Type');
3631:
3632: EXCEPTION
3633:
3634: WHEN others THEN
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:
3640:
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:
3640:
3641: END Get_MDC_Delivery_Type;
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:
3640:
3641: END Get_MDC_Delivery_Type;
3642:
3686: l_sum_rate_curr_tab FTE_CODE_TAB_TYPE;
3687: l_request_id NUMBER;
3688: l_return_status VARCHAR2(1);
3689: l_rating_API_fail VARCHAR2(1);
3690: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
3691:
3692: l_api_version CONSTANT NUMBER := 1.0;
3693: l_api_name CONSTANT VARCHAR2(30) := 'Search_Rate_Sort';
3694: l_msg_count NUMBER;
3724:
3725: IF(p_init_prc_log='Y')
3726: THEN
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;
3736: ELSE
3737: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Initialize Logging successful ');
3738: END IF;
3739: END IF;
3740:
3741:
3738: END IF;
3739: END IF;
3740:
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:
3739: END IF;
3740:
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:
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,
3750: p_input_ref=>l_lane_rank_ref);
3751:
3752: Display_Attr_Rec(p_attr_rec=>p_ss_rate_sort_atr_rec);
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
3771: l_warning_count:=l_warning_count+1;
3772: END IF;
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
3771: l_warning_count:=l_warning_count+1;
3772: END IF;
3773: END IF;
3772: END IF;
3773: END IF;
3774:
3775:
3776: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Ranks after lane search');
3777: Display_Rank_Tab(p_rank_tab=>l_lane_rank_tab,
3778: p_input_ref=>l_lane_rank_ref);
3779:
3780:
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;
3802: END IF;
3803:
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;
3802: END IF;
3803:
3804:
3801: END IF;
3802: END IF;
3803:
3804:
3805: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Ranks after Eliminating duplicates');
3806: Display_Rank_Tab(p_rank_tab=>l_elim_rank_tab,
3807: p_input_ref=>l_elim_rank_ref);
3808:
3809:
3857:
3858: IF (l_elim_rank_tab(i).vehicle_item_id IS NOT NULL)
3859: THEN
3860:
3861: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Calling vehicle API inventory item:'||l_elim_rank_tab(i).vehicle_item_id);
3862: l_vehicle_type_tab(j):=FTE_VEHICLE_PKG.GET_VEHICLE_TYPE_ID(
3863: p_inventory_item_id=> l_elim_rank_tab(i).vehicle_item_id);
3864:
3865: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Vehicle API returned:'||l_vehicle_type_tab(j));
3861: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Calling vehicle API inventory item:'||l_elim_rank_tab(i).vehicle_item_id);
3862: l_vehicle_type_tab(j):=FTE_VEHICLE_PKG.GET_VEHICLE_TYPE_ID(
3863: p_inventory_item_id=> l_elim_rank_tab(i).vehicle_item_id);
3864:
3865: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Vehicle API returned:'||l_vehicle_type_tab(j));
3866:
3867: IF(l_vehicle_type_tab(j)=-1)
3868: THEN
3869:
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;
3902: END IF;
3903:
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;
3902: END IF;
3903:
3904: IF(l_delivery_type=DELIVERY_TYPE_CHILD)
3902: END IF;
3903:
3904: IF(l_delivery_type=DELIVERY_TYPE_CHILD)
3905: THEN
3906: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Attempt to rate a child delivery..error');
3907: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
3908:
3909: END IF;
3910:
3903:
3904: IF(l_delivery_type=DELIVERY_TYPE_CHILD)
3905: THEN
3906: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Attempt to rate a child delivery..error');
3907: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
3908:
3909: END IF;
3910:
3911:
3941: x_msg_count =>l_msg_count,
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
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+
3955: --ServicePriceCompareVOImpl.java 115.29.11510.1
3956: --raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
3957: l_warning_count:=l_warning_count+1;
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+
3955: --ServicePriceCompareVOImpl.java 115.29.11510.1
3956: --raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
3957: l_warning_count:=l_warning_count+1;
3958: l_rating_API_fail:='Y';
3959: ELSE
3960: --If there is an unexpeted error it is propogated
3957: l_warning_count:=l_warning_count+1;
3958: l_rating_API_fail:='Y';
3959: ELSE
3960: --If there is an unexpeted error it is propogated
3961: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
3962:
3963: END IF;
3964: ELSE
3965: l_warning_count:=l_warning_count+1;
3973: THEN
3974: --Delivery/Leg Centric
3975:
3976:
3977: FTE_FREIGHT_PRICING.shipment_price_compare (
3978: p_init_msg_list =>fnd_api.g_false,
3979: p_init_prc_log =>'N',
3980: p_delivery_id =>p_ss_rate_sort_atr_rec.delivery_id,
3981: p_trip_id =>p_ss_rate_sort_atr_rec.trip_id,
3997: x_sum_rate_curr_tab =>l_sum_rate_curr_tab,
3998: x_request_id =>x_rating_request_id,
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
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
4012: --raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
4013: l_warning_count:=l_warning_count+1;
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
4012: --raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
4013: l_warning_count:=l_warning_count+1;
4014: l_rating_API_fail:='Y';
4015: ELSE
4016: --If there is an unexpeted error it is propogated
4013: l_warning_count:=l_warning_count+1;
4014: l_rating_API_fail:='Y';
4015: ELSE
4016: --If there is an unexpeted error it is propogated
4017: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
4018:
4019: END IF;
4020:
4021: ELSE
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;
4079:
4080: END IF;
4078: END IF;
4079:
4080: END IF;
4081:
4082: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-1');
4083:
4084: IF ((l_sum_rate_tab(i) IS NOT NULL) AND (l_sum_rate_curr_tab(i) IS NOT NULL)
4085: AND (l_sum_rate_tab(i)> 0) AND (l_sum_rate_curr_tab(i)<>'NULL'))
4086: THEN
4084: IF ((l_sum_rate_tab(i) IS NOT NULL) AND (l_sum_rate_curr_tab(i) IS NOT NULL)
4085: AND (l_sum_rate_tab(i)> 0) AND (l_sum_rate_curr_tab(i)<>'NULL'))
4086: THEN
4087:
4088: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-2');
4089: l_rate_rank_tab(k).estimated_rate:=l_sum_rate_tab(i);
4090: l_rate_rank_tab(k).currency_code:=l_sum_rate_curr_tab(i);
4091:
4092:
4089: l_rate_rank_tab(k).estimated_rate:=l_sum_rate_tab(i);
4090: l_rate_rank_tab(k).currency_code:=l_sum_rate_curr_tab(i);
4091:
4092:
4093: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-3');
4094: IF (l_single_currency IS NULL)
4095: THEN
4096: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-4');
4097: l_single_currency:=l_rate_rank_tab(k).currency_code;
4092:
4093: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-3');
4094: IF (l_single_currency IS NULL)
4095: THEN
4096: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-4');
4097: l_single_currency:=l_rate_rank_tab(k).currency_code;
4098: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-5');
4099: END IF;
4100:
4094: IF (l_single_currency IS NULL)
4095: THEN
4096: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-4');
4097: l_single_currency:=l_rate_rank_tab(k).currency_code;
4098: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-5');
4099: END IF;
4100:
4101: IF(l_single_currency = l_rate_rank_tab(k).currency_code)
4102: THEN
4099: END IF;
4100:
4101: IF(l_single_currency = l_rate_rank_tab(k).currency_code)
4102: THEN
4103: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-6');
4104: l_single_curr_rate:=l_rate_rank_tab(k).estimated_rate;
4105:
4106: ELSE
4107: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-7');
4103: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-6');
4104: l_single_curr_rate:=l_rate_rank_tab(k).estimated_rate;
4105:
4106: ELSE
4107: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-7');
4108: l_single_curr_rate:=NULL;
4109: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-7.1');
4110: l_single_curr_rate:=GL_CURRENCY_API.convert_amount(
4111: l_rate_rank_tab(k).currency_code,
4105:
4106: ELSE
4107: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-7');
4108: l_single_curr_rate:=NULL;
4109: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-7.1');
4110: l_single_curr_rate:=GL_CURRENCY_API.convert_amount(
4111: l_rate_rank_tab(k).currency_code,
4112: l_single_currency,
4113: SYSDATE,
4113: SYSDATE,
4114: 'Corporate',
4115: l_rate_rank_tab(k).estimated_rate
4116: );
4117: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-7.2');
4118:
4119: IF (l_single_curr_rate IS NULL)
4120: THEN
4121: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'g_tl_conv_currency_fail');
4117: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-7.2');
4118:
4119: IF (l_single_curr_rate IS NULL)
4120: THEN
4121: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'g_tl_conv_currency_fail');
4122: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
4123:
4124: END IF;
4125:
4118:
4119: IF (l_single_curr_rate IS NULL)
4120: THEN
4121: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'g_tl_conv_currency_fail');
4122: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
4123:
4124: END IF;
4125:
4126: END IF;
4123:
4124: END IF;
4125:
4126: END IF;
4127: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-8');
4128: l_rate_rank_tab(k).single_curr_rate:=l_single_curr_rate;
4129: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-9');
4130:
4131: END IF;
4125:
4126: END IF;
4127: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-8');
4128: l_rate_rank_tab(k).single_curr_rate:=l_single_curr_rate;
4129: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBG-9');
4130:
4131: END IF;
4132: --Mantain reference to original rank input
4133: l_rate_rank_ref(k):=l_elim_rank_ref(j);
4154: l_elim_rank_ref.DELETE;
4155:
4156:
4157:
4158: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Ranks after Rating');
4159: Display_Rank_Tab(p_rank_tab=>l_rate_rank_tab,
4160: p_input_ref=>l_rate_rank_ref);
4161:
4162:
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;
4177: END IF;
4178:
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;
4177: END IF;
4178:
4179: l_rate_rank_tab.DELETE;
4178:
4179: l_rate_rank_tab.DELETE;
4180: l_rate_rank_ref.DELETE;
4181:
4182: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Ranks after Sorting');
4183: Display_Rank_Tab(p_rank_tab=>l_sort_rank_tab,
4184: p_input_ref=>l_sort_rank_ref);
4185:
4186:
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;
4201: END IF;
4202:
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;
4201: END IF;
4202:
4203:
4204: l_sort_rank_tab.DELETE;
4205: l_sort_rank_ref.DELETE;
4206:
4207:
4208: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Ranks after Eliminating duplicates');
4209: Display_Rank_Tab(p_rank_tab=>x_ss_rate_sort_tab,
4210: p_input_ref=>l_elim_rank_ref);
4211:
4212: ELSE
4210: p_input_ref=>l_elim_rank_ref);
4211:
4212: ELSE
4213: --Lane search returned no results
4214: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'No lanes from lane search');
4215: x_rating_request_id:=NULL;
4216: x_ss_rate_sort_tab:=p_ss_rate_sort_tab;
4217:
4218: END IF;
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:
4227: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Search_Rate_Sort');
4228:
4229: IF(p_init_prc_log='Y')
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:
4227: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Search_Rate_Sort');
4228:
4229: IF(p_init_prc_log='Y')
4230: THEN
4231: FTE_FREIGHT_PRICING_UTIL.close_logs;
4227: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Search_Rate_Sort');
4228:
4229: IF(p_init_prc_log='Y')
4230: THEN
4231: FTE_FREIGHT_PRICING_UTIL.close_logs;
4232: END IF;
4233:
4234:
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')
4244: THEN
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')
4244: THEN
4245: FTE_FREIGHT_PRICING_UTIL.close_logs;
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')
4244: THEN
4245: FTE_FREIGHT_PRICING_UTIL.close_logs;
4246: END IF;
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')
4244: THEN
4245: FTE_FREIGHT_PRICING_UTIL.close_logs;
4246: END IF;
4247:
4248:
4249: END Search_Rate_Sort;