[Home] [Help]
72: p_req_line_rec IN req_line_info_rec_type,
73: p_trip_rec IN FTE_TL_CACHE.TL_trip_data_input_rec_type,
74: p_stop_tab IN FTE_TL_CACHE.TL_trip_stop_input_tab_type,
75: p_carrier_pref IN FTE_TL_CACHE.TL_carrier_pref_rec_type,
76: x_pricing_attr_tab IN OUT NOCOPY fte_freight_pricing.pricing_attribute_tab_type,
77: x_return_status OUT NOCOPY VARCHAR2);
78:
79:
80: PROCEDURE create_line_qualifiers (
115: l_line_type NUMBER;
116: l_line_index NUMBER;
117: l_ipl_flag VARCHAR2(1);
118:
119: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
120: l_method_name VARCHAR2(50) := 'check_qp_ipl';
121:
122: BEGIN
123: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
120: l_method_name VARCHAR2(50) := 'check_qp_ipl';
121:
122: BEGIN
123: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
124: fte_freight_pricing_util.reset_dbg_vars;
125: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
126:
127: -- l_non_dummy_row_count:=0;
128: -- bug 3610889
121:
122: BEGIN
123: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
124: fte_freight_pricing_util.reset_dbg_vars;
125: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
126:
127: -- l_non_dummy_row_count:=0;
128: -- bug 3610889
129: l_non_dummy_row_count:= p_implicit_non_dummy_cnt;
163:
164: END IF;
165:
166: ELSE
167: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Index not found:'||i);
168:
169: END IF;
170:
171:
171:
172: i:=p_qp_output_line_rows.NEXT(i);
173: END LOOP;
174:
175: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,' Number of dummy lines:'||l_dummy_row_count
176: ||' Number of non dummy lines:'||l_non_dummy_row_count||' Dummy IPLs:'||l_dummy_ipl_count||
177: ' Non Dummy IPLs :'||l_non_dummy_ipl_count);
178: IF (l_non_dummy_ipl_count >= l_non_dummy_row_count)
179: THEN
176: ||' Number of non dummy lines:'||l_non_dummy_row_count||' Dummy IPLs:'||l_dummy_ipl_count||
177: ' Non Dummy IPLs :'||l_non_dummy_ipl_count);
178: IF (l_non_dummy_ipl_count >= l_non_dummy_row_count)
179: THEN
180: raise fte_freight_pricing_util.g_not_on_pricelist;
181: END IF;
182:
183: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
184:
179: THEN
180: raise fte_freight_pricing_util.g_not_on_pricelist;
181: END IF;
182:
183: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
184:
185: EXCEPTION
186: WHEN fte_freight_pricing_util.g_not_on_pricelist THEN
187: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
182:
183: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
184:
185: EXCEPTION
186: WHEN fte_freight_pricing_util.g_not_on_pricelist THEN
187: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
188: -- can use tokens here
189: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_not_on_pricelist');
190: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,'Item quantity not found on pricelist ');
185: EXCEPTION
186: WHEN fte_freight_pricing_util.g_not_on_pricelist THEN
187: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
188: -- can use tokens here
189: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_not_on_pricelist');
190: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,'Item quantity not found on pricelist ');
191: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
192:
193: WHEN OTHERS THEN
186: WHEN fte_freight_pricing_util.g_not_on_pricelist THEN
187: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
188: -- can use tokens here
189: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_not_on_pricelist');
190: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,'Item quantity not found on pricelist ');
191: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
192:
193: WHEN OTHERS THEN
194: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
187: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
188: -- can use tokens here
189: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_not_on_pricelist');
190: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,'Item quantity not found on pricelist ');
191: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
192:
193: WHEN OTHERS THEN
194: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
195: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
191: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
192:
193: WHEN OTHERS THEN
194: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
195: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
196: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
197: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
198:
199: END check_qp_ipl;
192:
193: WHEN OTHERS THEN
194: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
195: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
196: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
197: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
198:
199: END check_qp_ipl;
200:
193: WHEN OTHERS THEN
194: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
195: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
196: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
197: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
198:
199: END check_qp_ipl;
200:
201:
233: x_stop_charges_tab OUT NOCOPY FTE_TL_CACHE.TL_trip_stop_output_tab_type,
234: x_return_status OUT NOCOPY VARCHAR2)
235: IS
236:
237: l_pricing_control_rec fte_freight_pricing.pricing_control_input_rec_type;
238: l_pricing_engine_input_rec fte_freight_pricing.pricing_engine_input_rec_type;
239: l_curr_line_idx NUMBER := 0;
240: l_req_line_info_rec req_line_info_rec_type;
241: l_qp_output_line_rows QP_PREQ_GRP.LINE_TBL_TYPE;
234: x_return_status OUT NOCOPY VARCHAR2)
235: IS
236:
237: l_pricing_control_rec fte_freight_pricing.pricing_control_input_rec_type;
238: l_pricing_engine_input_rec fte_freight_pricing.pricing_engine_input_rec_type;
239: l_curr_line_idx NUMBER := 0;
240: l_req_line_info_rec req_line_info_rec_type;
241: l_qp_output_line_rows QP_PREQ_GRP.LINE_TBL_TYPE;
242: l_qp_output_detail_rows QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
244:
245:
246: l_return_status VARCHAR2(1);
247:
248: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
249: l_method_name VARCHAR2(50) := 'tl_core';
250: BEGIN
251:
252: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
249: l_method_name VARCHAR2(50) := 'tl_core';
250: BEGIN
251:
252: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
253: fte_freight_pricing_util.reset_dbg_vars;
254: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
255:
256: -- create request lines
257: -- distance, time, ..
250: BEGIN
251:
252: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
253: fte_freight_pricing_util.reset_dbg_vars;
254: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
255:
256: -- create request lines
257: -- distance, time, ..
258: -- for each request line - build qualifiers
268: FTE_QP_ENGINE.clear_globals(x_return_status => l_return_status);
269:
270: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
271: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
272: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After clear_globals ');
273: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_clear_globals_fl');
274: raise FND_API.G_EXC_ERROR;
275: END IF;
276: END IF;
269:
270: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
271: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
272: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After clear_globals ');
273: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_clear_globals_fl');
274: raise FND_API.G_EXC_ERROR;
275: END IF;
276: END IF;
277:
279: -- these dates are set to the trip departure dates. For price list selection, only the
280: -- trip departure date is used (not arrival).
281: --SUSUREND 11-Nov-2003
282:
283: fte_freight_pricing.g_effectivity_dates.date_from:=p_trip_rec.planned_departure_date;
284: fte_freight_pricing.g_effectivity_dates.date_to:=p_trip_rec.planned_departure_date;
285:
286: -- bug 3610889 : added new parameter p_implicit_non_dummy_cnt
287: create_engine_inputs (
280: -- trip departure date is used (not arrival).
281: --SUSUREND 11-Nov-2003
282:
283: fte_freight_pricing.g_effectivity_dates.date_from:=p_trip_rec.planned_departure_date;
284: fte_freight_pricing.g_effectivity_dates.date_to:=p_trip_rec.planned_departure_date;
285:
286: -- bug 3610889 : added new parameter p_implicit_non_dummy_cnt
287: create_engine_inputs (
288: p_trip_rec => p_trip_rec,
292: x_return_status => l_return_status );
293:
294: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
295: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
296: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
297: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_eng_inp_failed');
298: raise FND_API.G_EXC_ERROR;
299: END IF;
300: END IF;
293:
294: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
295: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
296: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
297: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_eng_inp_failed');
298: raise FND_API.G_EXC_ERROR;
299: END IF;
300: END IF;
301:
298: raise FND_API.G_EXC_ERROR;
299: END IF;
300: END IF;
301:
302: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'l_implicit_non_dummy_cnt = '||l_implicit_non_dummy_cnt);
303: -- fte_qp_engine.print_qp_input;
304:
305: -- call qp engine
306:
303: -- fte_qp_engine.print_qp_input;
304:
305: -- call qp engine
306:
307: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'g_req_line_info_tab.COUNT = '||g_req_line_info_tab.COUNT);
308:
309: print_req_line_tab;
310:
311: fte_qp_engine.call_qp_api (
314: x_return_status => l_return_status);
315:
316: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
317: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
318: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After call_qp_api ');
319: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_call_qp_api_failed');
320: raise FND_API.G_EXC_ERROR;
321: END IF;
322: END IF;
315:
316: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
317: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
318: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After call_qp_api ');
319: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_call_qp_api_failed');
320: raise FND_API.G_EXC_ERROR;
321: END IF;
322: END IF;
323:
325: fte_qp_engine.check_tl_qp_output_errors (x_return_status => l_return_status);
326:
327: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
328: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
329: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After check_qp_output_errors ');
330: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_chk_qp_output_failed');
331: raise FND_API.G_EXC_ERROR;
332: END IF;
333: END IF;
326:
327: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
328: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
329: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After check_qp_output_errors ');
330: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_chk_qp_output_failed');
331: raise FND_API.G_EXC_ERROR;
332: END IF;
333: END IF;
334:
338: x_return_status => l_return_status );
339:
340: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
341: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
342: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After check_qp_ipl ');
343: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_check_qp_ipl_failed');
344: raise FND_API.G_EXC_ERROR;
345: END IF;
346: END IF;
339:
340: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
341: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
342: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After check_qp_ipl ');
343: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_check_qp_ipl_failed');
344: raise FND_API.G_EXC_ERROR;
345: END IF;
346: END IF;
347:
362: x_return_status => l_return_status);
363:
364: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
365: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
366: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After retrieve_qp_output ');
367: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_ret_qp_out_failed');
368: raise FND_API.G_EXC_ERROR;
369: END IF;
370: END IF;
363:
364: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
365: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
366: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After retrieve_qp_output ');
367: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_ret_qp_out_failed');
368: raise FND_API.G_EXC_ERROR;
369: END IF;
370: END IF;
371:
373: p_stop_charges_tab => x_stop_charges_tab);
374:
375:
376:
377: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
378:
379: EXCEPTION
380: WHEN FND_API.G_EXC_ERROR THEN
381: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
378:
379: EXCEPTION
380: WHEN FND_API.G_EXC_ERROR THEN
381: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
382: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
383:
384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
385: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
386: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
382: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
383:
384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
385: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
386: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
387:
388: WHEN OTHERS THEN
389: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
390: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
386: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
387:
388: WHEN OTHERS THEN
389: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
390: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
391: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
392: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
393: END tl_core;
394:
387:
388: WHEN OTHERS THEN
389: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
390: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
391: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
392: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
393: END tl_core;
394:
395: PROCEDURE create_engine_inputs (
388: WHEN OTHERS THEN
389: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
390: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
391: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
392: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
393: END tl_core;
394:
395: PROCEDURE create_engine_inputs (
396: p_trip_rec IN FTE_TL_CACHE.TL_trip_data_input_rec_type,
401: x_return_status OUT NOCOPY VARCHAR2)
402: IS
403:
404: l_uom_ea VARCHAR2(30);
405: l_pricing_control_rec fte_freight_pricing.pricing_control_input_rec_type;
406: l_pricing_engine_input_rec fte_freight_pricing.pricing_engine_input_rec_type;
407: l_curr_line_idx NUMBER := 0;
408: l_req_line_info_rec req_line_info_rec_type;
409: i NUMBER := 0;
402: IS
403:
404: l_uom_ea VARCHAR2(30);
405: l_pricing_control_rec fte_freight_pricing.pricing_control_input_rec_type;
406: l_pricing_engine_input_rec fte_freight_pricing.pricing_engine_input_rec_type;
407: l_curr_line_idx NUMBER := 0;
408: l_req_line_info_rec req_line_info_rec_type;
409: i NUMBER := 0;
410: l_return_status VARCHAR2(1);
411:
412: l_tmp_dist NUMBER;
413:
414:
415: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
416: l_method_name VARCHAR2(50) := 'create_engine_inputs';
417:
418: BEGIN
419:
426: -- create stop lines
427: -- create control rec
428:
429: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
430: fte_freight_pricing_util.reset_dbg_vars;
431: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
432:
433: x_implicit_non_dummy_cnt := 0;
434:
427: -- create control rec
428:
429: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
430: fte_freight_pricing_util.reset_dbg_vars;
431: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
432:
433: x_implicit_non_dummy_cnt := 0;
434:
435: IF (p_trip_index IS NOT NULL)
444: FETCH get_uom_for_each INTO l_uom_ea;
445: CLOSE get_uom_for_each;
446:
447: IF l_uom_ea is null THEN
448: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After get_uom_for_each ');
449: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_get_uom_for_each_failed');
450: raise FND_API.G_EXC_ERROR;
451: END IF;
452:
445: CLOSE get_uom_for_each;
446:
447: IF l_uom_ea is null THEN
448: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After get_uom_for_each ');
449: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_get_uom_for_each_failed');
450: raise FND_API.G_EXC_ERROR;
451: END IF;
452:
453: -- VVP: 09/18/03
487: l_req_line_info_rec.pricelist_id := p_trip_rec.price_list_id;
488: l_req_line_info_rec.carrier_id := p_trip_rec.carrier_id;
489:
490: g_req_line_info_tab(l_curr_line_idx) := l_req_line_info_rec;
491: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
492: 'l_curr_line_idx = '||l_curr_line_idx);
493:
494: create_input_line (
495: p_req_line_rec => l_req_line_info_rec,
499: x_return_status => l_return_status);
500:
501: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
502: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
503: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
504: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
505: raise FND_API.G_EXC_ERROR;
506: END IF;
507: END IF;
500:
501: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
502: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
503: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
504: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
505: raise FND_API.G_EXC_ERROR;
506: END IF;
507: END IF;
508:
541: THEN
542:
543: l_curr_line_idx := l_curr_line_idx + 1;
544:
545: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
546: 'l_curr_line_idx = '||l_curr_line_idx);
547: fte_freight_pricing_util.print_msg(l_log_level,
548: 'p_trip_rec.unloaded_distance = '||p_trip_rec.unloaded_distance);
549: fte_freight_pricing_util.print_msg(l_log_level,
543: l_curr_line_idx := l_curr_line_idx + 1;
544:
545: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
546: 'l_curr_line_idx = '||l_curr_line_idx);
547: fte_freight_pricing_util.print_msg(l_log_level,
548: 'p_trip_rec.unloaded_distance = '||p_trip_rec.unloaded_distance);
549: fte_freight_pricing_util.print_msg(l_log_level,
550: 'p_trip_rec.continuous_move = '||p_trip_rec.continuous_move);
551: fte_freight_pricing_util.print_msg(l_log_level,
545: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
546: 'l_curr_line_idx = '||l_curr_line_idx);
547: fte_freight_pricing_util.print_msg(l_log_level,
548: 'p_trip_rec.unloaded_distance = '||p_trip_rec.unloaded_distance);
549: fte_freight_pricing_util.print_msg(l_log_level,
550: 'p_trip_rec.continuous_move = '||p_trip_rec.continuous_move);
551: fte_freight_pricing_util.print_msg(l_log_level,
552: 'p_carrier_pref.cm_rate_variant = '||p_carrier_pref.cm_rate_variant);
553: fte_freight_pricing_util.print_msg(l_log_level,
547: fte_freight_pricing_util.print_msg(l_log_level,
548: 'p_trip_rec.unloaded_distance = '||p_trip_rec.unloaded_distance);
549: fte_freight_pricing_util.print_msg(l_log_level,
550: 'p_trip_rec.continuous_move = '||p_trip_rec.continuous_move);
551: fte_freight_pricing_util.print_msg(l_log_level,
552: 'p_carrier_pref.cm_rate_variant = '||p_carrier_pref.cm_rate_variant);
553: fte_freight_pricing_util.print_msg(l_log_level,
554: 'p_trip_rec.dead_head = '||p_trip_rec.dead_head);
555: fte_freight_pricing_util.print_msg(l_log_level,
549: fte_freight_pricing_util.print_msg(l_log_level,
550: 'p_trip_rec.continuous_move = '||p_trip_rec.continuous_move);
551: fte_freight_pricing_util.print_msg(l_log_level,
552: 'p_carrier_pref.cm_rate_variant = '||p_carrier_pref.cm_rate_variant);
553: fte_freight_pricing_util.print_msg(l_log_level,
554: 'p_trip_rec.dead_head = '||p_trip_rec.dead_head);
555: fte_freight_pricing_util.print_msg(l_log_level,
556: 'p_carrier_pref.cm_free_dh_mileage = '||p_carrier_pref.cm_free_dh_mileage);
557:
551: fte_freight_pricing_util.print_msg(l_log_level,
552: 'p_carrier_pref.cm_rate_variant = '||p_carrier_pref.cm_rate_variant);
553: fte_freight_pricing_util.print_msg(l_log_level,
554: 'p_trip_rec.dead_head = '||p_trip_rec.dead_head);
555: fte_freight_pricing_util.print_msg(l_log_level,
556: 'p_carrier_pref.cm_free_dh_mileage = '||p_carrier_pref.cm_free_dh_mileage);
557:
558: IF (p_trip_rec.distance_method = 'DIRECT_ROUTE') THEN
559: l_tmp_dist := p_trip_rec.total_direct_distance;
597: x_return_status => l_return_status);
598:
599: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
600: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
601: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
602: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
603: raise FND_API.G_EXC_ERROR;
604: END IF;
605: END IF;
598:
599: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
600: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
601: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
602: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
603: raise FND_API.G_EXC_ERROR;
604: END IF;
605: END IF;
606:
637: l_req_line_info_rec.pricelist_id := p_trip_rec.price_list_id;
638: l_req_line_info_rec.carrier_id := p_trip_rec.carrier_id;
639:
640: g_req_line_info_tab(l_curr_line_idx) := l_req_line_info_rec;
641: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
642: 'l_curr_line_idx = '||l_curr_line_idx);
643:
644: create_input_line (
645: p_req_line_rec => l_req_line_info_rec,
649: x_return_status => l_return_status);
650:
651: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
652: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
653: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
654: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
655: raise FND_API.G_EXC_ERROR;
656: END IF;
657: END IF;
650:
651: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
652: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
653: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
654: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
655: raise FND_API.G_EXC_ERROR;
656: END IF;
657: END IF;
658:
695: l_req_line_info_rec.pricelist_id := p_trip_rec.price_list_id;
696: l_req_line_info_rec.carrier_id := p_trip_rec.carrier_id;
697:
698: g_req_line_info_tab(l_curr_line_idx) := l_req_line_info_rec;
699: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
700: 'l_curr_line_idx = '||l_curr_line_idx);
701:
702: create_input_line (
703: p_req_line_rec => l_req_line_info_rec,
707: x_return_status => l_return_status);
708:
709: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
710: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
711: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
712: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
713: raise FND_API.G_EXC_ERROR;
714: END IF;
715: END IF;
708:
709: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
710: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
711: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
712: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
713: raise FND_API.G_EXC_ERROR;
714: END IF;
715: END IF;
716: ELSE
730: AND p_carrier_pref.cm_rate_variant = 'RATE')
731: THEN
732: x_implicit_non_dummy_cnt := x_implicit_non_dummy_cnt + 1;
733: END IF;
734: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
735: 'x_implicit_non_dummy_cnt = '||x_implicit_non_dummy_cnt);
736:
737: END IF;
738:
766: l_req_line_info_rec.pricelist_id := p_trip_rec.price_list_id;
767: l_req_line_info_rec.carrier_id := p_trip_rec.carrier_id;
768:
769: g_req_line_info_tab(l_curr_line_idx) := l_req_line_info_rec;
770: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
771: 'l_curr_line_idx = '||l_curr_line_idx);
772:
773: create_input_line (
774: p_req_line_rec => l_req_line_info_rec,
778: x_return_status => l_return_status);
779:
780: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
781: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
782: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
783: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
784: raise FND_API.G_EXC_ERROR;
785: END IF;
786: END IF;
779:
780: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
781: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
782: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
783: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
784: raise FND_API.G_EXC_ERROR;
785: END IF;
786: END IF;
787:
805: l_req_line_info_rec.pricelist_id := p_trip_rec.price_list_id;
806: l_req_line_info_rec.carrier_id := p_trip_rec.carrier_id;
807:
808: g_req_line_info_tab(l_curr_line_idx) := l_req_line_info_rec;
809: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
810: 'l_curr_line_idx = '||l_curr_line_idx);
811:
812: create_input_line (
813: p_req_line_rec => l_req_line_info_rec,
817: x_return_status => l_return_status);
818:
819: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
820: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
821: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
822: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
823: raise FND_API.G_EXC_ERROR;
824: END IF;
825: END IF;
818:
819: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
820: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
821: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
822: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
823: raise FND_API.G_EXC_ERROR;
824: END IF;
825: END IF;
826: END IF;
841: l_req_line_info_rec.pricelist_id := p_trip_rec.price_list_id;
842: l_req_line_info_rec.carrier_id := p_trip_rec.carrier_id;
843:
844: g_req_line_info_tab(l_curr_line_idx) := l_req_line_info_rec;
845: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
846: 'l_curr_line_idx = '||l_curr_line_idx);
847:
848: create_input_line (
849: p_req_line_rec => l_req_line_info_rec,
853: x_return_status => l_return_status);
854:
855: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
856: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
857: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
858: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
859: raise FND_API.G_EXC_ERROR;
860: END IF;
861: END IF;
854:
855: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
856: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
857: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
858: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
859: raise FND_API.G_EXC_ERROR;
860: END IF;
861: END IF;
862:
876: l_req_line_info_rec.pricelist_id := p_trip_rec.price_list_id;
877: l_req_line_info_rec.carrier_id := p_trip_rec.carrier_id;
878:
879: g_req_line_info_tab(l_curr_line_idx) := l_req_line_info_rec;
880: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
881: 'l_curr_line_idx = '||l_curr_line_idx);
882:
883: create_input_line (
884: p_req_line_rec => l_req_line_info_rec,
888: x_return_status => l_return_status);
889:
890: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
891: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
892: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
893: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
894: raise FND_API.G_EXC_ERROR;
895: END IF;
896: END IF;
889:
890: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
891: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
892: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
893: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
894: raise FND_API.G_EXC_ERROR;
895: END IF;
896: END IF;
897:
899: create_control_rec ( x_return_status => l_return_status);
900:
901: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
902: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
903: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
904: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_ctrl_rec_failed');
905: raise FND_API.G_EXC_ERROR;
906: END IF;
907: END IF;
900:
901: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
902: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
903: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
904: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_ctrl_rec_failed');
905: raise FND_API.G_EXC_ERROR;
906: END IF;
907: END IF;
908:
913: -- i := p_stop_tab.FIRST;
914: i := p_trip_rec.stop_reference;
915: LOOP
916:
917: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
918: 'stop_ref='||p_trip_rec.stop_reference);
919: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
920: 'i='||i);
921: --IF ( (p_stop_tab(i).trip_id <> p_trip_rec.trip_id)
915: LOOP
916:
917: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
918: 'stop_ref='||p_trip_rec.stop_reference);
919: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
920: 'i='||i);
921: --IF ( (p_stop_tab(i).trip_id <> p_trip_rec.trip_id)
922: IF (i >= (p_trip_rec.stop_reference + p_trip_rec.number_of_stops ) )
923: THEN
920: 'i='||i);
921: --IF ( (p_stop_tab(i).trip_id <> p_trip_rec.trip_id)
922: IF (i >= (p_trip_rec.stop_reference + p_trip_rec.number_of_stops ) )
923: THEN
924: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'Exit stop loop');
925: EXIT;
926: END IF;
927:
928: l_curr_line_idx := l_curr_line_idx + 1;
940: l_req_line_info_rec.carrier_id := p_trip_rec.carrier_id;
941:
942: g_req_line_info_tab(l_curr_line_idx) := l_req_line_info_rec;
943:
944: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
945: 'l_curr_line_idx = '||l_curr_line_idx);
946: create_input_line (
947: p_req_line_rec => l_req_line_info_rec,
948: p_trip_rec => p_trip_rec,
951: x_return_status => l_return_status);
952:
953: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
954: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
955: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
956: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
957: raise FND_API.G_EXC_ERROR;
958: END IF;
959: END IF;
952:
953: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
954: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
955: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
956: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
957: raise FND_API.G_EXC_ERROR;
958: END IF;
959: END IF;
960:
971: LOOP
972:
973: IF (i >= (p_trip_rec.stop_reference + p_trip_rec.number_of_stops ) )
974: THEN
975: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'Exit stop loop');
976: EXIT;
977: END IF;
978:
979: IF (p_stop_tab(i).fac_pricelist_id IS NOT NULL
996: l_req_line_info_rec.pricelist_id := p_stop_tab(i).fac_pricelist_id;
997: l_req_line_info_rec.carrier_id := NULL;
998:
999: g_req_line_info_tab(l_curr_line_idx) := l_req_line_info_rec;
1000: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
1001: 'l_curr_line_idx = '||l_curr_line_idx);
1002:
1003: create_input_line (
1004: p_req_line_rec => l_req_line_info_rec,
1008: x_return_status => l_return_status);
1009:
1010: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1011: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1012: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
1013: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
1014: raise FND_API.G_EXC_ERROR;
1015: END IF;
1016: END IF;
1009:
1010: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1011: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1012: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
1013: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_inp_line_failed');
1014: raise FND_API.G_EXC_ERROR;
1015: END IF;
1016: END IF;
1017:
1026: -- create qp control record
1027: -- create_control_rec ( x_return_status => l_return_status);
1028:
1029:
1030: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
1031:
1032: EXCEPTION
1033: WHEN FND_API.G_EXC_ERROR THEN
1034: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1031:
1032: EXCEPTION
1033: WHEN FND_API.G_EXC_ERROR THEN
1034: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1035: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1036:
1037: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1038: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1039: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1035: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1036:
1037: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1038: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1039: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1040:
1041: WHEN OTHERS THEN
1042: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1043: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
1039: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1040:
1041: WHEN OTHERS THEN
1042: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1043: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
1044: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1045: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1046:
1047: END create_engine_inputs;
1040:
1041: WHEN OTHERS THEN
1042: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1043: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
1044: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1045: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1046:
1047: END create_engine_inputs;
1048:
1041: WHEN OTHERS THEN
1042: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1043: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
1044: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1045: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1046:
1047: END create_engine_inputs;
1048:
1049:
1060: x_return_status OUT NOCOPY VARCHAR2)
1061:
1062: IS
1063:
1064: l_pricing_control_rec fte_freight_pricing.pricing_control_input_rec_type;
1065: l_pricing_engine_input_rec fte_freight_pricing.pricing_engine_input_rec_type;
1066: l_return_status VARCHAR2(1);
1067: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
1068: l_method_name VARCHAR2(50) := 'create_input_line';
1061:
1062: IS
1063:
1064: l_pricing_control_rec fte_freight_pricing.pricing_control_input_rec_type;
1065: l_pricing_engine_input_rec fte_freight_pricing.pricing_engine_input_rec_type;
1066: l_return_status VARCHAR2(1);
1067: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
1068: l_method_name VARCHAR2(50) := 'create_input_line';
1069:
1063:
1064: l_pricing_control_rec fte_freight_pricing.pricing_control_input_rec_type;
1065: l_pricing_engine_input_rec fte_freight_pricing.pricing_engine_input_rec_type;
1066: l_return_status VARCHAR2(1);
1067: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
1068: l_method_name VARCHAR2(50) := 'create_input_line';
1069:
1070: BEGIN
1071:
1069:
1070: BEGIN
1071:
1072: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1073: fte_freight_pricing_util.reset_dbg_vars;
1074: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
1075:
1076: l_pricing_control_rec.pricing_event_num := fte_freight_pricing.G_LINE_EVENT_NUM;
1077: l_pricing_control_rec.currency_code := p_req_line_rec.currency;
1070: BEGIN
1071:
1072: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1073: fte_freight_pricing_util.reset_dbg_vars;
1074: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
1075:
1076: l_pricing_control_rec.pricing_event_num := fte_freight_pricing.G_LINE_EVENT_NUM;
1077: l_pricing_control_rec.currency_code := p_req_line_rec.currency;
1078: l_pricing_control_rec.lane_id := p_req_line_rec.lane_id;
1072: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1073: fte_freight_pricing_util.reset_dbg_vars;
1074: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
1075:
1076: l_pricing_control_rec.pricing_event_num := fte_freight_pricing.G_LINE_EVENT_NUM;
1077: l_pricing_control_rec.currency_code := p_req_line_rec.currency;
1078: l_pricing_control_rec.lane_id := p_req_line_rec.lane_id;
1079: l_pricing_control_rec.price_list_id := p_req_line_rec.pricelist_id;
1080: l_pricing_control_rec.party_id := p_req_line_rec.carrier_id;
1089: x_return_status => l_return_status );
1090:
1091: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1092: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1093: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
1094: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_line_rec_failed');
1095: raise FND_API.G_EXC_ERROR;
1096: END IF;
1097: END IF;
1090:
1091: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1092: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1093: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
1094: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_line_rec_failed');
1095: raise FND_API.G_EXC_ERROR;
1096: END IF;
1097: END IF;
1098:
1104: x_return_status => l_return_status);
1105:
1106: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1107: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1108: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
1109: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_line_attr_failed');
1110: raise FND_API.G_EXC_ERROR;
1111: END IF;
1112: END IF;
1105:
1106: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1107: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1108: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
1109: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_line_attr_failed');
1110: raise FND_API.G_EXC_ERROR;
1111: END IF;
1112: END IF;
1113:
1119: x_return_status => l_return_status);
1120:
1121: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1122: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1123: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
1124: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_line_qual_failed');
1125: raise FND_API.G_EXC_ERROR;
1126: END IF;
1127: END IF;
1120:
1121: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1122: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1123: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
1124: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_line_qual_failed');
1125: raise FND_API.G_EXC_ERROR;
1126: END IF;
1127: END IF;
1128:
1125: raise FND_API.G_EXC_ERROR;
1126: END IF;
1127: END IF;
1128:
1129: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
1130:
1131: EXCEPTION
1132: WHEN FND_API.G_EXC_ERROR THEN
1133: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1130:
1131: EXCEPTION
1132: WHEN FND_API.G_EXC_ERROR THEN
1133: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1134: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1135:
1136: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1137: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1138: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1134: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1135:
1136: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1137: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1138: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1139:
1140: WHEN OTHERS THEN
1141: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1142: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
1138: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1139:
1140: WHEN OTHERS THEN
1141: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1142: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
1143: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1144: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1145:
1146: END create_input_line;
1139:
1140: WHEN OTHERS THEN
1141: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1142: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
1143: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1144: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1145:
1146: END create_input_line;
1147:
1140: WHEN OTHERS THEN
1141: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1142: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
1143: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1144: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1145:
1146: END create_input_line;
1147:
1148: --
1156: p_stop_tab IN FTE_TL_CACHE.TL_trip_stop_input_tab_type,
1157: p_carrier_pref IN FTE_TL_CACHE.TL_carrier_pref_rec_type,
1158: x_return_status OUT NOCOPY VARCHAR2)
1159: IS
1160: l_pricing_attr_rec fte_freight_pricing.pricing_attribute_rec_type;
1161: l_pricing_attr_tab fte_freight_pricing.pricing_attribute_tab_type;
1162: l_return_status VARCHAR2(1);
1163:
1164: l_attr_idx NUMBER :=0;
1157: p_carrier_pref IN FTE_TL_CACHE.TL_carrier_pref_rec_type,
1158: x_return_status OUT NOCOPY VARCHAR2)
1159: IS
1160: l_pricing_attr_rec fte_freight_pricing.pricing_attribute_rec_type;
1161: l_pricing_attr_tab fte_freight_pricing.pricing_attribute_tab_type;
1162: l_return_status VARCHAR2(1);
1163:
1164: l_attr_idx NUMBER :=0;
1165: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
1161: l_pricing_attr_tab fte_freight_pricing.pricing_attribute_tab_type;
1162: l_return_status VARCHAR2(1);
1163:
1164: l_attr_idx NUMBER :=0;
1165: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
1166: l_method_name VARCHAR2(50) := 'create_line_attributes';
1167: BEGIN
1168: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1169: fte_freight_pricing_util.reset_dbg_vars;
1165: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
1166: l_method_name VARCHAR2(50) := 'create_line_attributes';
1167: BEGIN
1168: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1169: fte_freight_pricing_util.reset_dbg_vars;
1170: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
1171:
1172:
1173: -- TODO : check if source value is not null / valid before creating the attribute
1166: l_method_name VARCHAR2(50) := 'create_line_attributes';
1167: BEGIN
1168: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1169: fte_freight_pricing_util.reset_dbg_vars;
1170: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
1171:
1172:
1173: -- TODO : check if source value is not null / valid before creating the attribute
1174:
1357: x_return_status => l_return_status );
1358:
1359: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1360: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1361: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
1362: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_chrg_line_attr_failed');
1363: raise FND_API.G_EXC_ERROR;
1364: END IF;
1365: END IF;
1358:
1359: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1360: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1361: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
1362: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_chrg_line_attr_failed');
1363: raise FND_API.G_EXC_ERROR;
1364: END IF;
1365: END IF;
1366:
1403: x_return_status => l_return_status );
1404:
1405: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1406: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1407: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
1408: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_prep_qp_line_attr_failed');
1409: raise FND_API.G_EXC_ERROR;
1410: END IF;
1411: END IF;
1404:
1405: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1406: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1407: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
1408: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_prep_qp_line_attr_failed');
1409: raise FND_API.G_EXC_ERROR;
1410: END IF;
1411: END IF;
1412:
1409: raise FND_API.G_EXC_ERROR;
1410: END IF;
1411: END IF;
1412:
1413: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
1414:
1415: EXCEPTION
1416: WHEN FND_API.G_EXC_ERROR THEN
1417: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1414:
1415: EXCEPTION
1416: WHEN FND_API.G_EXC_ERROR THEN
1417: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1418: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1419:
1420: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1421: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1422: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1418: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1419:
1420: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1421: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1422: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1423:
1424: WHEN OTHERS THEN
1425: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1426: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
1422: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1423:
1424: WHEN OTHERS THEN
1425: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1426: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
1427: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1428: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1429:
1430: END create_line_attributes;
1423:
1424: WHEN OTHERS THEN
1425: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1426: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
1427: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1428: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1429:
1430: END create_line_attributes;
1431:
1424: WHEN OTHERS THEN
1425: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1426: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
1427: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1428: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1429:
1430: END create_line_attributes;
1431:
1432: --
1439: p_req_line_rec IN req_line_info_rec_type,
1440: p_trip_rec IN FTE_TL_CACHE.TL_trip_data_input_rec_type,
1441: p_stop_tab IN FTE_TL_CACHE.TL_trip_stop_input_tab_type,
1442: p_carrier_pref IN FTE_TL_CACHE.TL_carrier_pref_rec_type,
1443: x_pricing_attr_tab IN OUT NOCOPY fte_freight_pricing.pricing_attribute_tab_type,
1444: x_return_status OUT NOCOPY VARCHAR2)
1445: IS
1446: l_pricing_attr_rec fte_freight_pricing.pricing_attribute_rec_type;
1447: l_return_status VARCHAR2(1);
1442: p_carrier_pref IN FTE_TL_CACHE.TL_carrier_pref_rec_type,
1443: x_pricing_attr_tab IN OUT NOCOPY fte_freight_pricing.pricing_attribute_tab_type,
1444: x_return_status OUT NOCOPY VARCHAR2)
1445: IS
1446: l_pricing_attr_rec fte_freight_pricing.pricing_attribute_rec_type;
1447: l_return_status VARCHAR2(1);
1448: l_attr_idx NUMBER :=0;
1449: l_out_of_rt_dist NUMBER :=0;
1450: l_fac_handling_wt NUMBER :=0;
1449: l_out_of_rt_dist NUMBER :=0;
1450: l_fac_handling_wt NUMBER :=0;
1451: l_fac_handling_vol NUMBER :=0;
1452: l_stop_rec FTE_TL_CACHE.tl_trip_stop_input_rec_type;
1453: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
1454: l_method_name VARCHAR2(50) := 'create_charge_line_attributes';
1455:
1456: BEGIN
1457: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1454: l_method_name VARCHAR2(50) := 'create_charge_line_attributes';
1455:
1456: BEGIN
1457: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1458: fte_freight_pricing_util.reset_dbg_vars;
1459: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
1460:
1461: -- note : validate attribute source values before using them
1462:
1455:
1456: BEGIN
1457: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1458: fte_freight_pricing_util.reset_dbg_vars;
1459: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
1460:
1461: -- note : validate attribute source values before using them
1462:
1463: l_attr_idx := x_pricing_attr_tab.COUNT;
1486: -- counted towards stop off charge. Free stops and other breaks apply only
1487: -- to intermediate stops
1488: -- l_pricing_attr_rec.attribute_value := to_char(p_trip_rec.number_of_stops);
1489: l_pricing_attr_rec.attribute_value := to_char(p_trip_rec.number_of_stops-2);
1490: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'num stops for stop off charge='||to_char(p_trip_rec.number_of_stops-2));
1491:
1492: x_pricing_attr_tab(l_attr_idx) := l_pricing_attr_rec;
1493:
1494: END IF;
1509: IF ( p_trip_rec.total_direct_distance IS NOT NULL
1510: AND p_trip_rec.total_direct_distance > 0
1511: AND p_carrier_pref.max_out_of_route IS NOT NULL) THEN
1512:
1513: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'total_direct_distance='||p_trip_rec.total_direct_distance);
1514: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'total_trip_distance='||p_trip_rec.total_trip_distance);
1515: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'max_out_of_route='||p_carrier_pref.max_out_of_route);
1516:
1517: l_out_of_rt_dist := p_trip_rec.total_trip_distance
1510: AND p_trip_rec.total_direct_distance > 0
1511: AND p_carrier_pref.max_out_of_route IS NOT NULL) THEN
1512:
1513: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'total_direct_distance='||p_trip_rec.total_direct_distance);
1514: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'total_trip_distance='||p_trip_rec.total_trip_distance);
1515: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'max_out_of_route='||p_carrier_pref.max_out_of_route);
1516:
1517: l_out_of_rt_dist := p_trip_rec.total_trip_distance
1518: - ( p_trip_rec.total_direct_distance
1511: AND p_carrier_pref.max_out_of_route IS NOT NULL) THEN
1512:
1513: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'total_direct_distance='||p_trip_rec.total_direct_distance);
1514: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'total_trip_distance='||p_trip_rec.total_trip_distance);
1515: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'max_out_of_route='||p_carrier_pref.max_out_of_route);
1516:
1517: l_out_of_rt_dist := p_trip_rec.total_trip_distance
1518: - ( p_trip_rec.total_direct_distance
1519: * (1 + p_carrier_pref.max_out_of_route/100) );
1575: END IF;
1576:
1577: ELSIF (p_req_line_rec.line_type = G_STOP_CHARGE_LINE) THEN
1578:
1579: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
1580: 'line_index = '||p_req_line_rec.line_index);
1581: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
1582: 'stop_index = '||p_req_line_rec.stop_index);
1583: IF ( p_stop_tab.COUNT > 0 AND p_stop_tab.EXISTS(p_req_line_rec.stop_index) ) THEN
1577: ELSIF (p_req_line_rec.line_type = G_STOP_CHARGE_LINE) THEN
1578:
1579: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
1580: 'line_index = '||p_req_line_rec.line_index);
1581: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
1582: 'stop_index = '||p_req_line_rec.stop_index);
1583: IF ( p_stop_tab.COUNT > 0 AND p_stop_tab.EXISTS(p_req_line_rec.stop_index) ) THEN
1584: l_stop_rec := p_stop_tab(p_req_line_rec.stop_index);
1585:
1582: 'stop_index = '||p_req_line_rec.stop_index);
1583: IF ( p_stop_tab.COUNT > 0 AND p_stop_tab.EXISTS(p_req_line_rec.stop_index) ) THEN
1584: l_stop_rec := p_stop_tab(p_req_line_rec.stop_index);
1585:
1586: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
1587: 'l_stop_rec.stop_id = '||l_stop_rec.stop_id);
1588:
1589: l_attr_idx := l_attr_idx + 1;
1590: l_pricing_attr_rec.attribute_index := l_attr_idx;
1957: END IF; -- p_stop_tab.count
1958:
1959: END IF;
1960:
1961: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
1962:
1963: EXCEPTION
1964: WHEN FND_API.G_EXC_ERROR THEN
1965: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1962:
1963: EXCEPTION
1964: WHEN FND_API.G_EXC_ERROR THEN
1965: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1966: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1967:
1968: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1969: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1970: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1966: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1967:
1968: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1969: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1970: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1971:
1972: WHEN OTHERS THEN
1973: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1974: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
1970: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1971:
1972: WHEN OTHERS THEN
1973: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1974: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
1975: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1976: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1977:
1978: END create_charge_line_attributes;
1971:
1972: WHEN OTHERS THEN
1973: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1974: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
1975: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1976: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1977:
1978: END create_charge_line_attributes;
1979:
1972: WHEN OTHERS THEN
1973: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1974: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
1975: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1976: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
1977:
1978: END create_charge_line_attributes;
1979:
1980: --
1991: IS
1992: l_qual_rec fte_qp_engine.qualifier_rec_type;
1993: l_return_status VARCHAR2(1);
1994: l_qual_idx NUMBER := 0;
1995: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
1996: l_method_name VARCHAR2(50) := 'create_line_qualifiers';
1997: BEGIN
1998:
1999: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1996: l_method_name VARCHAR2(50) := 'create_line_qualifiers';
1997: BEGIN
1998:
1999: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2000: fte_freight_pricing_util.reset_dbg_vars;
2001: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
2002:
2003:
2004: IF (p_req_line_rec.line_type <> G_FACILITY_CHARGE_LINE ) THEN
1997: BEGIN
1998:
1999: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2000: fte_freight_pricing_util.reset_dbg_vars;
2001: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
2002:
2003:
2004: IF (p_req_line_rec.line_type <> G_FACILITY_CHARGE_LINE ) THEN
2005:
2017: x_return_status => l_return_status);
2018:
2019: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2020: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2021: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_qual_record ');
2022: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_qual_rec_failed');
2023: raise FND_API.G_EXC_ERROR;
2024: END IF;
2025: END IF;
2018:
2019: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2020: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2021: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_qual_record ');
2022: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_qual_rec_failed');
2023: raise FND_API.G_EXC_ERROR;
2024: END IF;
2025: END IF;
2026:
2047: x_return_status => l_return_status);
2048:
2049: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2050: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2051: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_qual_record ');
2052: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_qual_rec_failed');
2053: raise FND_API.G_EXC_ERROR;
2054: END IF;
2055: END IF;
2048:
2049: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2050: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2051: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_qual_record ');
2052: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_qual_rec_failed');
2053: raise FND_API.G_EXC_ERROR;
2054: END IF;
2055: END IF;
2056:
2066: x_return_status => l_return_status);
2067:
2068: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2069: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2070: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_qual_record ');
2071: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_qual_rec_failed');
2072: raise FND_API.G_EXC_ERROR;
2073: END IF;
2074: END IF;
2067:
2068: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2069: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2070: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_qual_record ');
2071: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_qual_rec_failed');
2072: raise FND_API.G_EXC_ERROR;
2073: END IF;
2074: END IF;
2075:
2089: x_return_status => l_return_status);
2090:
2091: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2092: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2093: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_qual_record ');
2094: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_qual_rec_failed');
2095: raise FND_API.G_EXC_ERROR;
2096: END IF;
2097: END IF;
2090:
2091: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2092: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2093: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_qual_record ');
2094: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_qual_rec_failed');
2095: raise FND_API.G_EXC_ERROR;
2096: END IF;
2097: END IF;
2098:
2097: END IF;
2098:
2099: END IF;
2100:
2101: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
2102:
2103: EXCEPTION
2104: WHEN FND_API.G_EXC_ERROR THEN
2105: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2102:
2103: EXCEPTION
2104: WHEN FND_API.G_EXC_ERROR THEN
2105: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2106: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
2107:
2108: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2109: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2110: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
2106: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
2107:
2108: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2109: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2110: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
2111:
2112: WHEN OTHERS THEN
2113: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2114: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
2110: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
2111:
2112: WHEN OTHERS THEN
2113: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2114: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
2115: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2116: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
2117:
2118:
2111:
2112: WHEN OTHERS THEN
2113: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2114: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
2115: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2116: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
2117:
2118:
2119: END create_line_qualifiers;
2112: WHEN OTHERS THEN
2113: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2114: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
2115: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2116: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
2117:
2118:
2119: END create_line_qualifiers;
2120:
2120:
2121: PROCEDURE create_control_rec ( x_return_status OUT NOCOPY VARCHAR2)
2122: IS
2123: l_return_status VARCHAR2(1);
2124: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
2125: l_method_name VARCHAR2(50) := 'create_control_rec';
2126: BEGIN
2127: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2128: fte_freight_pricing_util.reset_dbg_vars;
2124: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
2125: l_method_name VARCHAR2(50) := 'create_control_rec';
2126: BEGIN
2127: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2128: fte_freight_pricing_util.reset_dbg_vars;
2129: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
2130:
2131: fte_qp_engine.create_control_record (p_event_num => fte_qp_engine.G_LINE_EVENT_NUM,
2132: x_return_status => l_return_status);
2125: l_method_name VARCHAR2(50) := 'create_control_rec';
2126: BEGIN
2127: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2128: fte_freight_pricing_util.reset_dbg_vars;
2129: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
2130:
2131: fte_qp_engine.create_control_record (p_event_num => fte_qp_engine.G_LINE_EVENT_NUM,
2132: x_return_status => l_return_status);
2133:
2132: x_return_status => l_return_status);
2133:
2134: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2135: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2136: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_qual_record ');
2137: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_control_rec_failed');
2138: raise FND_API.G_EXC_ERROR;
2139: END IF;
2140: END IF;
2133:
2134: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2135: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2136: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_qual_record ');
2137: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_control_rec_failed');
2138: raise FND_API.G_EXC_ERROR;
2139: END IF;
2140: END IF;
2141:
2140: END IF;
2141:
2142: x_return_status := l_return_status;
2143:
2144: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
2145:
2146: EXCEPTION
2147: WHEN FND_API.G_EXC_ERROR THEN
2148: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2145:
2146: EXCEPTION
2147: WHEN FND_API.G_EXC_ERROR THEN
2148: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2149: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
2150:
2151: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2152: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2153: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
2149: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
2150:
2151: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2152: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2153: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
2154:
2155: WHEN OTHERS THEN
2156: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2157: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
2153: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
2154:
2155: WHEN OTHERS THEN
2156: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2157: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
2158: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2159: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
2160:
2161: END create_control_rec;
2154:
2155: WHEN OTHERS THEN
2156: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2157: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
2158: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2159: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
2160:
2161: END create_control_rec;
2162:
2155: WHEN OTHERS THEN
2156: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2157: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
2158: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2159: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
2160:
2161: END create_control_rec;
2162:
2163: PROCEDURE init_stop_rec (x_stop_rec IN OUT NOCOPY FTE_TL_CACHE.TL_trip_stop_output_rec_type )
2161: END create_control_rec;
2162:
2163: PROCEDURE init_stop_rec (x_stop_rec IN OUT NOCOPY FTE_TL_CACHE.TL_trip_stop_output_rec_type )
2164: IS
2165: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
2166: l_method_name VARCHAR2(50) := 'init_stop_rec';
2167: BEGIN
2168: fte_freight_pricing_util.reset_dbg_vars;
2169: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
2164: IS
2165: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
2166: l_method_name VARCHAR2(50) := 'init_stop_rec';
2167: BEGIN
2168: fte_freight_pricing_util.reset_dbg_vars;
2169: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
2170: x_stop_rec.stop_id := 0;
2171: x_stop_rec.trip_id := 0;
2172: x_stop_rec.weekday_layover_chrg := 0;
2165: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
2166: l_method_name VARCHAR2(50) := 'init_stop_rec';
2167: BEGIN
2168: fte_freight_pricing_util.reset_dbg_vars;
2169: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
2170: x_stop_rec.stop_id := 0;
2171: x_stop_rec.trip_id := 0;
2172: x_stop_rec.weekday_layover_chrg := 0;
2173: x_stop_rec.weekend_layover_chrg := 0;
2191: x_stop_rec.fac_ast_unloading_chrg_basis := null;
2192: x_stop_rec.fac_handling_chrg := 0;
2193: x_stop_rec.fac_handling_chrg_basis := null;
2194: x_stop_rec.fac_currency := null;
2195: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
2196:
2197: EXCEPTION
2198: WHEN OTHERS THEN
2199: --x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2196:
2197: EXCEPTION
2198: WHEN OTHERS THEN
2199: --x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2200: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
2201: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2202: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
2203:
2204: END init_stop_rec;
2197: EXCEPTION
2198: WHEN OTHERS THEN
2199: --x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2200: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
2201: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2202: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
2203:
2204: END init_stop_rec;
2205:
2198: WHEN OTHERS THEN
2199: --x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2200: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
2201: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2202: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
2203:
2204: END init_stop_rec;
2205:
2206: --
2241: l_qp_out_det_rec QP_PREQ_GRP.LINE_DETAIL_REC_TYPE;
2242: l_stop_rec FTE_TL_CACHE.TL_trip_stop_output_rec_type;
2243: l_stop_id NUMBER;
2244: l_req_line_info_rec req_line_info_rec_type;
2245: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
2246: l_method_name VARCHAR2(50) := 'retrieve_qp_output';
2247:
2248: BEGIN
2249: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2246: l_method_name VARCHAR2(50) := 'retrieve_qp_output';
2247:
2248: BEGIN
2249: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2250: fte_freight_pricing_util.reset_dbg_vars;
2251: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
2252:
2253: -- Loop through the line table
2254: -- look for base rates returned (incl. continuous move rates if applicable)
2247:
2248: BEGIN
2249: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2250: fte_freight_pricing_util.reset_dbg_vars;
2251: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
2252:
2253: -- Loop through the line table
2254: -- look for base rates returned (incl. continuous move rates if applicable)
2255: -- Loop through the detail table
2261: -- uom conversion?
2262:
2263: ------------- BASE PRICES -----------------------------------
2264:
2265: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2266: 'g_req_line_info_tab.COUNT = '||g_req_line_info_tab.COUNT);
2267: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2268: 'p_qp_output_line_rows.COUNT = '||p_qp_output_line_rows.COUNT);
2269:
2263: ------------- BASE PRICES -----------------------------------
2264:
2265: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2266: 'g_req_line_info_tab.COUNT = '||g_req_line_info_tab.COUNT);
2267: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2268: 'p_qp_output_line_rows.COUNT = '||p_qp_output_line_rows.COUNT);
2269:
2270: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2271: 'Now looping on p_qp_output_line_rows ');
2266: 'g_req_line_info_tab.COUNT = '||g_req_line_info_tab.COUNT);
2267: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2268: 'p_qp_output_line_rows.COUNT = '||p_qp_output_line_rows.COUNT);
2269:
2270: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2271: 'Now looping on p_qp_output_line_rows ');
2272:
2273: i := p_qp_output_line_rows.FIRST;
2274: IF (i IS NOT NULL) THEN
2280: -- depending upon the type (purpose) of the line, filter out unwanted details
2281: -- analyze the charge sub type code, and extract the charge.
2282:
2283: line_idx := p_qp_output_line_rows(i).line_index;
2284: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2285: 'line_idx = '||line_idx);
2286:
2287: --
2288: -- NOTE : We use adjusted_unit_price instead on unit_price on most base rates
2389: x_trip_charges_rec.cm_discount_percent := 0;
2390: x_trip_charges_rec.fuel_chrg := 0;
2391:
2392: -- Generate dummy entries into x_stop_charges_tab --
2393: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2394: 'Added dummy records to x_stop_charges_rec');
2395: IF (p_stop_tab.COUNT >0) THEN
2396: l_stop_index := p_trip_rec.stop_reference;
2397: LOOP
2410: l_stop_index := p_stop_tab.NEXT(l_stop_index);
2411: END LOOP;
2412: END IF;
2413:
2414: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2415: 'x_stop_charges_tab.COUNT='||x_stop_charges_tab.COUNT);
2416:
2417:
2418: ----------- ACCESSORIAL CHARGES,DISCOUNTS AND BASE MIN CHARGES -----------------------
2418: ----------- ACCESSORIAL CHARGES,DISCOUNTS AND BASE MIN CHARGES -----------------------
2419:
2420: -- Query line details --
2421:
2422: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2423: 'Now looping on p_qp_output_detail_rows ');
2424:
2425: i := p_qp_output_detail_rows.FIRST;
2426: IF (i IS NOT NULL) THEN
2433:
2434: l_qp_out_det_rec := p_qp_output_detail_rows(i);
2435: l_req_line_info_rec := g_req_line_info_tab(l_qp_out_det_rec.line_index);
2436:
2437: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2438: 'i = '||i);
2439: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2440: 'l_qp_out_det_rec.line_index='||l_qp_out_det_rec.line_index);
2441:
2435: l_req_line_info_rec := g_req_line_info_tab(l_qp_out_det_rec.line_index);
2436:
2437: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2438: 'i = '||i);
2439: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2440: 'l_qp_out_det_rec.line_index='||l_qp_out_det_rec.line_index);
2441:
2442: -------------------- MIN BASE CHARGES -------------------
2443:
2449: -- do not exist in the same call
2450:
2451: IF (l_qp_out_det_rec.charge_subtype_code = fte_rtg_globals.G_C_MIN_DISTANCE_CH
2452: AND nvl(l_qp_out_det_rec.adjustment_amount,0) >0 ) THEN
2453: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2454: 'MIN_CHARGE: Minimum charge applied to distance base rates');
2455: END IF;
2456:
2457: END IF;
2459: IF (l_req_line_info_rec.line_type = G_CONT_DIST_BASE_LINE
2460: AND l_qp_out_det_rec.charge_subtype_code = fte_rtg_globals.G_C_MIN_DISTANCE_CH
2461: AND nvl(l_qp_out_det_rec.adjustment_amount,0) >0 ) THEN
2462:
2463: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2464: 'MIN_CHARGE: Minimum charge applied to distance base rates (continuous move)');
2465:
2466: END IF;
2467:
2468: IF (l_req_line_info_rec.line_type = G_UNITS_BASE_LINE
2469: AND l_qp_out_det_rec.charge_subtype_code = fte_rtg_globals.G_C_MIN_UNIT_CH
2470: AND nvl(l_qp_out_det_rec.adjustment_amount,0) > 0) THEN
2471:
2472: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2473: 'MIN_CHARGE: Minimum charge applied to units base rates ');
2474:
2475: END IF;
2476:
2477: IF (l_req_line_info_rec.line_type = G_TIME_BASE_LINE
2478: AND l_qp_out_det_rec.charge_subtype_code = fte_rtg_globals.G_C_MIN_TIME_CH
2479: AND nvl(l_qp_out_det_rec.adjustment_amount,0) > 0) THEN
2480:
2481: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2482: 'MIN_CHARGE: Minimum charge applied to time base rates ');
2483:
2484: END IF;
2485:
2541: END IF;
2542:
2543: -- Fuel Surcharge : bug: 3353264 (enhancement)
2544: IF (l_qp_out_det_rec.charge_subtype_code = fte_rtg_globals.G_C_FUEL_CH) THEN
2545: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2546: 'G_C_FUEL_CH : operand_value='||l_qp_out_det_rec.operand_value);
2547: IF (l_qp_out_det_rec.operand_value >0) THEN
2548: x_trip_charges_rec.fuel_chrg :=
2549: ( (x_trip_charges_rec.base_dist_load_chrg
2591:
2592: l_stop_index := g_req_line_info_tab(p_qp_output_detail_rows(i).line_index).stop_index;
2593: l_stop_id := p_stop_tab(l_stop_index).stop_id;
2594:
2595: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2596: 'l_stop_index='||l_stop_index||' l_stop_id='||l_stop_id);
2597:
2598: /*
2599: -- check if this stop_id is already in the stop output table
2846: -- Look for Weekday and Weekend Layover Charges
2847:
2848: IF (l_qp_out_det_rec.charge_subtype_code = fte_rtg_globals.G_C_WEEKDAY_LAYOVER_CH ) THEN
2849:
2850: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2851: 'G_C_WEEKDAY_LAYOVER_CH : adjustment_amount='||l_qp_out_det_rec.adjustment_amount);
2852: IF (l_qp_out_det_rec.adjustment_amount is not null
2853: AND l_qp_out_det_rec.line_quantity is not null) THEN
2854: -- l_stop_rec.weekday_layover_chrg :=
2858: END IF;
2859:
2860: ELSIF (l_qp_out_det_rec.charge_subtype_code = fte_rtg_globals.G_C_WEEKEND_LAYOVER_CH ) THEN
2861:
2862: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2863: 'G_C_WEEKEND_LAYOVER_CH : adjustment_amount='||l_qp_out_det_rec.adjustment_amount);
2864:
2865: l_num_of_weekend_layover := p_stop_tab(l_stop_index).weekend_layovers;
2866: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2862: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2863: 'G_C_WEEKEND_LAYOVER_CH : adjustment_amount='||l_qp_out_det_rec.adjustment_amount);
2864:
2865: l_num_of_weekend_layover := p_stop_tab(l_stop_index).weekend_layovers;
2866: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
2867: 'l_num_of_weekend_layover='||l_num_of_weekend_layover);
2868:
2869: l_stop_rec.weekend_layover_chrg :=
2870: l_qp_out_det_rec.adjustment_amount * l_num_of_weekend_layover;
3096: i := p_qp_output_detail_rows.NEXT(i);
3097: END LOOP;
3098: END IF;
3099:
3100: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
3101:
3102: EXCEPTION
3103: WHEN FND_API.G_EXC_ERROR THEN
3104: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3101:
3102: EXCEPTION
3103: WHEN FND_API.G_EXC_ERROR THEN
3104: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3105: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
3106:
3107: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3108: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3109: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
3105: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
3106:
3107: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3108: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3109: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
3110:
3111: WHEN OTHERS THEN
3112: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3113: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
3109: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
3110:
3111: WHEN OTHERS THEN
3112: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3113: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
3114: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
3115: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
3116:
3117: END retrieve_qp_output;
3110:
3111: WHEN OTHERS THEN
3112: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3113: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
3114: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
3115: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
3116:
3117: END retrieve_qp_output;
3118:
3111: WHEN OTHERS THEN
3112: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3113: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
3114: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
3115: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
3116:
3117: END retrieve_qp_output;
3118:
3119: PROCEDURE print_req_line_tab
3118:
3119: PROCEDURE print_req_line_tab
3120: IS
3121: i NUMBER;
3122: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
3123: l_method_name VARCHAR2(50) := 'print_req_line_tab';
3124: BEGIN
3125: fte_freight_pricing_util.reset_dbg_vars;
3126: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
3121: i NUMBER;
3122: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
3123: l_method_name VARCHAR2(50) := 'print_req_line_tab';
3124: BEGIN
3125: fte_freight_pricing_util.reset_dbg_vars;
3126: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
3127:
3128: i := g_req_line_info_tab.FIRST;
3129: IF ( g_req_line_info_tab.COUNT >0) THEN
3122: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
3123: l_method_name VARCHAR2(50) := 'print_req_line_tab';
3124: BEGIN
3125: fte_freight_pricing_util.reset_dbg_vars;
3126: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
3127:
3128: i := g_req_line_info_tab.FIRST;
3129: IF ( g_req_line_info_tab.COUNT >0) THEN
3130: LOOP
3127:
3128: i := g_req_line_info_tab.FIRST;
3129: IF ( g_req_line_info_tab.COUNT >0) THEN
3130: LOOP
3131: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3132: '------------------- g_req_line_info_tab-----------------------');
3133: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3134: 'line_index :'||g_req_line_info_tab(i).line_index);
3135: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3129: IF ( g_req_line_info_tab.COUNT >0) THEN
3130: LOOP
3131: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3132: '------------------- g_req_line_info_tab-----------------------');
3133: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3134: 'line_index :'||g_req_line_info_tab(i).line_index);
3135: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3136: 'line_type :'||g_req_line_info_tab(i).line_type);
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: '------------------- g_req_line_info_tab-----------------------');
3133: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3134: 'line_index :'||g_req_line_info_tab(i).line_index);
3135: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3136: 'line_type :'||g_req_line_info_tab(i).line_type);
3137: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3138: 'trip_index :'||g_req_line_info_tab(i).trip_index);
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: 'line_index :'||g_req_line_info_tab(i).line_index);
3135: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3136: 'line_type :'||g_req_line_info_tab(i).line_type);
3137: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3138: 'trip_index :'||g_req_line_info_tab(i).trip_index);
3139: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3140: 'stop_index :'||g_req_line_info_tab(i).stop_index);
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: 'line_type :'||g_req_line_info_tab(i).line_type);
3137: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3138: 'trip_index :'||g_req_line_info_tab(i).trip_index);
3139: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3140: 'stop_index :'||g_req_line_info_tab(i).stop_index);
3141: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3142: 'line_qty :'||g_req_line_info_tab(i).line_qty);
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: 'trip_index :'||g_req_line_info_tab(i).trip_index);
3139: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3140: 'stop_index :'||g_req_line_info_tab(i).stop_index);
3141: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3142: 'line_qty :'||g_req_line_info_tab(i).line_qty);
3143: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3144: 'line_uom :'||g_req_line_info_tab(i).line_uom);
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: 'stop_index :'||g_req_line_info_tab(i).stop_index);
3141: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3142: 'line_qty :'||g_req_line_info_tab(i).line_qty);
3143: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3144: 'line_uom :'||g_req_line_info_tab(i).line_uom);
3145: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3146: 'currency :'||g_req_line_info_tab(i).currency);
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: 'line_qty :'||g_req_line_info_tab(i).line_qty);
3143: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3144: 'line_uom :'||g_req_line_info_tab(i).line_uom);
3145: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3146: 'currency :'||g_req_line_info_tab(i).currency);
3147: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3148: 'lane_id :'||g_req_line_info_tab(i).lane_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: 'line_uom :'||g_req_line_info_tab(i).line_uom);
3145: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3146: 'currency :'||g_req_line_info_tab(i).currency);
3147: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3148: 'lane_id :'||g_req_line_info_tab(i).lane_id);
3149: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3150: 'pricelist_id :'||g_req_line_info_tab(i).pricelist_id);
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: 'currency :'||g_req_line_info_tab(i).currency);
3147: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3148: 'lane_id :'||g_req_line_info_tab(i).lane_id);
3149: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3150: 'pricelist_id :'||g_req_line_info_tab(i).pricelist_id);
3151: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3152: 'carrier_id :'||g_req_line_info_tab(i).carrier_id);
3153: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3147: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3148: 'lane_id :'||g_req_line_info_tab(i).lane_id);
3149: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3150: 'pricelist_id :'||g_req_line_info_tab(i).pricelist_id);
3151: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3152: 'carrier_id :'||g_req_line_info_tab(i).carrier_id);
3153: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3154: '----------------------------------------------------------------');
3155: EXIT WHEN (i >= g_req_line_info_tab.LAST );
3149: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3150: 'pricelist_id :'||g_req_line_info_tab(i).pricelist_id);
3151: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3152: 'carrier_id :'||g_req_line_info_tab(i).carrier_id);
3153: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3154: '----------------------------------------------------------------');
3155: EXIT WHEN (i >= g_req_line_info_tab.LAST );
3156: i := g_req_line_info_tab.NEXT(i);
3157: END LOOP;
3156: i := g_req_line_info_tab.NEXT(i);
3157: END LOOP;
3158: END IF;
3159:
3160: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
3161: EXCEPTION
3162: WHEN OTHERS THEN
3163: null;
3164: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
3160: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
3161: EXCEPTION
3162: WHEN OTHERS THEN
3163: null;
3164: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
3165: END print_req_line_tab;
3166:
3167: PROCEDURE print_output(
3168: p_trip_charges_rec IN FTE_TL_CACHE.TL_trip_output_rec_type,
3167: PROCEDURE print_output(
3168: p_trip_charges_rec IN FTE_TL_CACHE.TL_trip_output_rec_type,
3169: p_stop_charges_tab IN FTE_TL_CACHE.TL_trip_stop_output_tab_type
3170: ) IS
3171: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
3172: l_method_name VARCHAR2(50) := 'print_output';
3173: i NUMBER;
3174: BEGIN
3175: fte_freight_pricing_util.reset_dbg_vars;
3171: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
3172: l_method_name VARCHAR2(50) := 'print_output';
3173: i NUMBER;
3174: BEGIN
3175: fte_freight_pricing_util.reset_dbg_vars;
3176: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
3177:
3178: -- print trip rec
3179: -- print stop tab
3172: l_method_name VARCHAR2(50) := 'print_output';
3173: i NUMBER;
3174: BEGIN
3175: fte_freight_pricing_util.reset_dbg_vars;
3176: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
3177:
3178: -- print trip rec
3179: -- print stop tab
3180: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3176: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
3177:
3178: -- print trip rec
3179: -- print stop tab
3180: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3181: '----------------------- Trip Output----------------------------');
3182: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3183: 'trip_id :'||p_trip_charges_rec.trip_id );
3184: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3178: -- print trip rec
3179: -- print stop tab
3180: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3181: '----------------------- Trip Output----------------------------');
3182: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3183: 'trip_id :'||p_trip_charges_rec.trip_id );
3184: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3185: 'base_dist_load_chrg :'||p_trip_charges_rec.base_dist_load_chrg );
3186: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3180: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3181: '----------------------- Trip Output----------------------------');
3182: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3183: 'trip_id :'||p_trip_charges_rec.trip_id );
3184: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3185: 'base_dist_load_chrg :'||p_trip_charges_rec.base_dist_load_chrg );
3186: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3187: 'base_dist_load_unit_chrg :'||p_trip_charges_rec.base_dist_load_unit_chrg );
3188: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3182: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3183: 'trip_id :'||p_trip_charges_rec.trip_id );
3184: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3185: 'base_dist_load_chrg :'||p_trip_charges_rec.base_dist_load_chrg );
3186: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3187: 'base_dist_load_unit_chrg :'||p_trip_charges_rec.base_dist_load_unit_chrg );
3188: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3189: 'base_dist_unload_chrg :'||p_trip_charges_rec.base_dist_unload_chrg );
3190: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3184: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3185: 'base_dist_load_chrg :'||p_trip_charges_rec.base_dist_load_chrg );
3186: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3187: 'base_dist_load_unit_chrg :'||p_trip_charges_rec.base_dist_load_unit_chrg );
3188: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3189: 'base_dist_unload_chrg :'||p_trip_charges_rec.base_dist_unload_chrg );
3190: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3191: 'base_dist_unload_unit_chrg :'||p_trip_charges_rec.base_dist_unload_unit_chrg );
3192: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3186: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3187: 'base_dist_load_unit_chrg :'||p_trip_charges_rec.base_dist_load_unit_chrg );
3188: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3189: 'base_dist_unload_chrg :'||p_trip_charges_rec.base_dist_unload_chrg );
3190: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3191: 'base_dist_unload_unit_chrg :'||p_trip_charges_rec.base_dist_unload_unit_chrg );
3192: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3193: 'base_unit_chrg :'||p_trip_charges_rec.base_unit_chrg );
3194: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3188: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3189: 'base_dist_unload_chrg :'||p_trip_charges_rec.base_dist_unload_chrg );
3190: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3191: 'base_dist_unload_unit_chrg :'||p_trip_charges_rec.base_dist_unload_unit_chrg );
3192: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3193: 'base_unit_chrg :'||p_trip_charges_rec.base_unit_chrg );
3194: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3195: 'base_unit_unit_chrg :'||p_trip_charges_rec.base_unit_unit_chrg );
3196: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3190: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3191: 'base_dist_unload_unit_chrg :'||p_trip_charges_rec.base_dist_unload_unit_chrg );
3192: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3193: 'base_unit_chrg :'||p_trip_charges_rec.base_unit_chrg );
3194: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3195: 'base_unit_unit_chrg :'||p_trip_charges_rec.base_unit_unit_chrg );
3196: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3197: 'base_time_chrg :'||p_trip_charges_rec.base_time_chrg );
3198: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3192: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3193: 'base_unit_chrg :'||p_trip_charges_rec.base_unit_chrg );
3194: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3195: 'base_unit_unit_chrg :'||p_trip_charges_rec.base_unit_unit_chrg );
3196: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3197: 'base_time_chrg :'||p_trip_charges_rec.base_time_chrg );
3198: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3199: 'base_time_unit_chrg :'||p_trip_charges_rec.base_time_unit_chrg );
3200: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3194: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3195: 'base_unit_unit_chrg :'||p_trip_charges_rec.base_unit_unit_chrg );
3196: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3197: 'base_time_chrg :'||p_trip_charges_rec.base_time_chrg );
3198: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3199: 'base_time_unit_chrg :'||p_trip_charges_rec.base_time_unit_chrg );
3200: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3201: 'base_flat_chrg :'||p_trip_charges_rec.base_flat_chrg );
3202: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3196: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3197: 'base_time_chrg :'||p_trip_charges_rec.base_time_chrg );
3198: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3199: 'base_time_unit_chrg :'||p_trip_charges_rec.base_time_unit_chrg );
3200: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3201: 'base_flat_chrg :'||p_trip_charges_rec.base_flat_chrg );
3202: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3203: 'stop_off_chrg :'||p_trip_charges_rec.stop_off_chrg );
3204: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3198: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3199: 'base_time_unit_chrg :'||p_trip_charges_rec.base_time_unit_chrg );
3200: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3201: 'base_flat_chrg :'||p_trip_charges_rec.base_flat_chrg );
3202: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3203: 'stop_off_chrg :'||p_trip_charges_rec.stop_off_chrg );
3204: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3205: 'out_of_route_chrg :'||p_trip_charges_rec.out_of_route_chrg );
3206: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3200: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3201: 'base_flat_chrg :'||p_trip_charges_rec.base_flat_chrg );
3202: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3203: 'stop_off_chrg :'||p_trip_charges_rec.stop_off_chrg );
3204: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3205: 'out_of_route_chrg :'||p_trip_charges_rec.out_of_route_chrg );
3206: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3207: 'document_chrg :'||p_trip_charges_rec.document_chrg );
3208: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3202: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3203: 'stop_off_chrg :'||p_trip_charges_rec.stop_off_chrg );
3204: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3205: 'out_of_route_chrg :'||p_trip_charges_rec.out_of_route_chrg );
3206: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3207: 'document_chrg :'||p_trip_charges_rec.document_chrg );
3208: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3209: 'handling_chrg :'||p_trip_charges_rec.handling_chrg );
3210: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3204: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3205: 'out_of_route_chrg :'||p_trip_charges_rec.out_of_route_chrg );
3206: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3207: 'document_chrg :'||p_trip_charges_rec.document_chrg );
3208: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3209: 'handling_chrg :'||p_trip_charges_rec.handling_chrg );
3210: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3211: 'handling_chrg_basis :'||p_trip_charges_rec.handling_chrg_basis );
3212: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3206: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3207: 'document_chrg :'||p_trip_charges_rec.document_chrg );
3208: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3209: 'handling_chrg :'||p_trip_charges_rec.handling_chrg );
3210: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3211: 'handling_chrg_basis :'||p_trip_charges_rec.handling_chrg_basis );
3212: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3213: 'cm_discount_percent :'||p_trip_charges_rec.cm_discount_percent );
3214: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3208: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3209: 'handling_chrg :'||p_trip_charges_rec.handling_chrg );
3210: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3211: 'handling_chrg_basis :'||p_trip_charges_rec.handling_chrg_basis );
3212: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3213: 'cm_discount_percent :'||p_trip_charges_rec.cm_discount_percent );
3214: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3215: 'cm_discount_value :'||p_trip_charges_rec.cm_discount_value );
3216: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3210: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3211: 'handling_chrg_basis :'||p_trip_charges_rec.handling_chrg_basis );
3212: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3213: 'cm_discount_percent :'||p_trip_charges_rec.cm_discount_percent );
3214: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3215: 'cm_discount_value :'||p_trip_charges_rec.cm_discount_value );
3216: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3217: 'currency :'||p_trip_charges_rec.currency );
3218: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3212: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3213: 'cm_discount_percent :'||p_trip_charges_rec.cm_discount_percent );
3214: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3215: 'cm_discount_value :'||p_trip_charges_rec.cm_discount_value );
3216: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3217: 'currency :'||p_trip_charges_rec.currency );
3218: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3219: 'fuel_chrg :'||p_trip_charges_rec.fuel_chrg );
3220: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3214: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3215: 'cm_discount_value :'||p_trip_charges_rec.cm_discount_value );
3216: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3217: 'currency :'||p_trip_charges_rec.currency );
3218: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3219: 'fuel_chrg :'||p_trip_charges_rec.fuel_chrg );
3220: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3221: '----------------------------------------------------------------');
3222:
3216: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3217: 'currency :'||p_trip_charges_rec.currency );
3218: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3219: 'fuel_chrg :'||p_trip_charges_rec.fuel_chrg );
3220: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3221: '----------------------------------------------------------------');
3222:
3223:
3224: i := p_stop_charges_tab.FIRST;
3224: i := p_stop_charges_tab.FIRST;
3225: IF ( p_stop_charges_tab.COUNT >0) THEN
3226: LOOP
3227:
3228: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3229: '----------------------- Stop Output----------------------------');
3230: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3231: 'stop_id :'||p_stop_charges_tab(i).stop_id);
3232: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3226: LOOP
3227:
3228: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3229: '----------------------- Stop Output----------------------------');
3230: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3231: 'stop_id :'||p_stop_charges_tab(i).stop_id);
3232: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3233: 'trip_id :'||p_stop_charges_tab(i).trip_id);
3234: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3228: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3229: '----------------------- Stop Output----------------------------');
3230: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3231: 'stop_id :'||p_stop_charges_tab(i).stop_id);
3232: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3233: 'trip_id :'||p_stop_charges_tab(i).trip_id);
3234: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3235: 'weekday_layover_chrg :'||p_stop_charges_tab(i).weekday_layover_chrg);
3236: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3230: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3231: 'stop_id :'||p_stop_charges_tab(i).stop_id);
3232: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3233: 'trip_id :'||p_stop_charges_tab(i).trip_id);
3234: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3235: 'weekday_layover_chrg :'||p_stop_charges_tab(i).weekday_layover_chrg);
3236: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3237: 'weekend_layover_chrg :'||p_stop_charges_tab(i).weekend_layover_chrg);
3238: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3232: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3233: 'trip_id :'||p_stop_charges_tab(i).trip_id);
3234: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3235: 'weekday_layover_chrg :'||p_stop_charges_tab(i).weekday_layover_chrg);
3236: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3237: 'weekend_layover_chrg :'||p_stop_charges_tab(i).weekend_layover_chrg);
3238: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3239: 'loading_chrg :'||p_stop_charges_tab(i).loading_chrg);
3240: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3234: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3235: 'weekday_layover_chrg :'||p_stop_charges_tab(i).weekday_layover_chrg);
3236: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3237: 'weekend_layover_chrg :'||p_stop_charges_tab(i).weekend_layover_chrg);
3238: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3239: 'loading_chrg :'||p_stop_charges_tab(i).loading_chrg);
3240: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3241: 'loading_chrg_basis :'||p_stop_charges_tab(i).loading_chrg_basis);
3242: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3236: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3237: 'weekend_layover_chrg :'||p_stop_charges_tab(i).weekend_layover_chrg);
3238: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3239: 'loading_chrg :'||p_stop_charges_tab(i).loading_chrg);
3240: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3241: 'loading_chrg_basis :'||p_stop_charges_tab(i).loading_chrg_basis);
3242: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3243: 'ast_loading_chrg :'||p_stop_charges_tab(i).ast_loading_chrg);
3244: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3238: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3239: 'loading_chrg :'||p_stop_charges_tab(i).loading_chrg);
3240: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3241: 'loading_chrg_basis :'||p_stop_charges_tab(i).loading_chrg_basis);
3242: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3243: 'ast_loading_chrg :'||p_stop_charges_tab(i).ast_loading_chrg);
3244: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3245: 'ast_loading_chrg_basis :'||p_stop_charges_tab(i).ast_loading_chrg_basis);
3246: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3240: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3241: 'loading_chrg_basis :'||p_stop_charges_tab(i).loading_chrg_basis);
3242: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3243: 'ast_loading_chrg :'||p_stop_charges_tab(i).ast_loading_chrg);
3244: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3245: 'ast_loading_chrg_basis :'||p_stop_charges_tab(i).ast_loading_chrg_basis);
3246: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3247: 'unloading_chrg :'||p_stop_charges_tab(i).unloading_chrg);
3248: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3242: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3243: 'ast_loading_chrg :'||p_stop_charges_tab(i).ast_loading_chrg);
3244: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3245: 'ast_loading_chrg_basis :'||p_stop_charges_tab(i).ast_loading_chrg_basis);
3246: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3247: 'unloading_chrg :'||p_stop_charges_tab(i).unloading_chrg);
3248: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3249: 'unloading_chrg_basis :'||p_stop_charges_tab(i).unloading_chrg_basis);
3250: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3244: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3245: 'ast_loading_chrg_basis :'||p_stop_charges_tab(i).ast_loading_chrg_basis);
3246: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3247: 'unloading_chrg :'||p_stop_charges_tab(i).unloading_chrg);
3248: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3249: 'unloading_chrg_basis :'||p_stop_charges_tab(i).unloading_chrg_basis);
3250: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3251: 'ast_unloading_chrg :'||p_stop_charges_tab(i).ast_unloading_chrg);
3252: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3246: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3247: 'unloading_chrg :'||p_stop_charges_tab(i).unloading_chrg);
3248: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3249: 'unloading_chrg_basis :'||p_stop_charges_tab(i).unloading_chrg_basis);
3250: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3251: 'ast_unloading_chrg :'||p_stop_charges_tab(i).ast_unloading_chrg);
3252: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3253: 'ast_unloading_chrg_basis :'||p_stop_charges_tab(i).ast_unloading_chrg_basis);
3254: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3248: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3249: 'unloading_chrg_basis :'||p_stop_charges_tab(i).unloading_chrg_basis);
3250: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3251: 'ast_unloading_chrg :'||p_stop_charges_tab(i).ast_unloading_chrg);
3252: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3253: 'ast_unloading_chrg_basis :'||p_stop_charges_tab(i).ast_unloading_chrg_basis);
3254: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3255: 'origin_surchrg :'||p_stop_charges_tab(i).origin_surchrg);
3256: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3250: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3251: 'ast_unloading_chrg :'||p_stop_charges_tab(i).ast_unloading_chrg);
3252: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3253: 'ast_unloading_chrg_basis :'||p_stop_charges_tab(i).ast_unloading_chrg_basis);
3254: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3255: 'origin_surchrg :'||p_stop_charges_tab(i).origin_surchrg);
3256: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3257: 'destination_surchrg :'||p_stop_charges_tab(i).destination_surchrg);
3258: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3252: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3253: 'ast_unloading_chrg_basis :'||p_stop_charges_tab(i).ast_unloading_chrg_basis);
3254: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3255: 'origin_surchrg :'||p_stop_charges_tab(i).origin_surchrg);
3256: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3257: 'destination_surchrg :'||p_stop_charges_tab(i).destination_surchrg);
3258: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3259: 'fac_loading_chrg :'||p_stop_charges_tab(i).fac_loading_chrg);
3260: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3254: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3255: 'origin_surchrg :'||p_stop_charges_tab(i).origin_surchrg);
3256: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3257: 'destination_surchrg :'||p_stop_charges_tab(i).destination_surchrg);
3258: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3259: 'fac_loading_chrg :'||p_stop_charges_tab(i).fac_loading_chrg);
3260: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3261: 'fac_loading_chrg_basis :'||p_stop_charges_tab(i).fac_loading_chrg_basis);
3262: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3256: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3257: 'destination_surchrg :'||p_stop_charges_tab(i).destination_surchrg);
3258: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3259: 'fac_loading_chrg :'||p_stop_charges_tab(i).fac_loading_chrg);
3260: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3261: 'fac_loading_chrg_basis :'||p_stop_charges_tab(i).fac_loading_chrg_basis);
3262: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3263: 'fac_ast_loading_chrg :'||p_stop_charges_tab(i).fac_ast_loading_chrg);
3264: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3258: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3259: 'fac_loading_chrg :'||p_stop_charges_tab(i).fac_loading_chrg);
3260: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3261: 'fac_loading_chrg_basis :'||p_stop_charges_tab(i).fac_loading_chrg_basis);
3262: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3263: 'fac_ast_loading_chrg :'||p_stop_charges_tab(i).fac_ast_loading_chrg);
3264: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3265: 'fac_ast_loading_chrg_basis :'||p_stop_charges_tab(i).fac_ast_loading_chrg_basis);
3266: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3260: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3261: 'fac_loading_chrg_basis :'||p_stop_charges_tab(i).fac_loading_chrg_basis);
3262: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3263: 'fac_ast_loading_chrg :'||p_stop_charges_tab(i).fac_ast_loading_chrg);
3264: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3265: 'fac_ast_loading_chrg_basis :'||p_stop_charges_tab(i).fac_ast_loading_chrg_basis);
3266: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3267: 'fac_unloading_chrg :'||p_stop_charges_tab(i).fac_unloading_chrg);
3268: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3262: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3263: 'fac_ast_loading_chrg :'||p_stop_charges_tab(i).fac_ast_loading_chrg);
3264: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3265: 'fac_ast_loading_chrg_basis :'||p_stop_charges_tab(i).fac_ast_loading_chrg_basis);
3266: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3267: 'fac_unloading_chrg :'||p_stop_charges_tab(i).fac_unloading_chrg);
3268: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3269: 'fac_unloading_chrg_basis :'||p_stop_charges_tab(i).fac_unloading_chrg_basis);
3270: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3264: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3265: 'fac_ast_loading_chrg_basis :'||p_stop_charges_tab(i).fac_ast_loading_chrg_basis);
3266: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3267: 'fac_unloading_chrg :'||p_stop_charges_tab(i).fac_unloading_chrg);
3268: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3269: 'fac_unloading_chrg_basis :'||p_stop_charges_tab(i).fac_unloading_chrg_basis);
3270: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3271: 'fac_ast_unloading_chrg :'||p_stop_charges_tab(i).fac_ast_unloading_chrg);
3272: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3266: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3267: 'fac_unloading_chrg :'||p_stop_charges_tab(i).fac_unloading_chrg);
3268: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3269: 'fac_unloading_chrg_basis :'||p_stop_charges_tab(i).fac_unloading_chrg_basis);
3270: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3271: 'fac_ast_unloading_chrg :'||p_stop_charges_tab(i).fac_ast_unloading_chrg);
3272: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3273: 'fac_ast_unloading_chrg_basis :'||p_stop_charges_tab(i).fac_ast_unloading_chrg_basis);
3274: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3268: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3269: 'fac_unloading_chrg_basis :'||p_stop_charges_tab(i).fac_unloading_chrg_basis);
3270: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3271: 'fac_ast_unloading_chrg :'||p_stop_charges_tab(i).fac_ast_unloading_chrg);
3272: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3273: 'fac_ast_unloading_chrg_basis :'||p_stop_charges_tab(i).fac_ast_unloading_chrg_basis);
3274: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3275: 'fac_handling_chrg :'||p_stop_charges_tab(i).fac_handling_chrg);
3276: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3270: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3271: 'fac_ast_unloading_chrg :'||p_stop_charges_tab(i).fac_ast_unloading_chrg);
3272: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3273: 'fac_ast_unloading_chrg_basis :'||p_stop_charges_tab(i).fac_ast_unloading_chrg_basis);
3274: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3275: 'fac_handling_chrg :'||p_stop_charges_tab(i).fac_handling_chrg);
3276: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3277: 'fac_handling_chrg_basis :'||p_stop_charges_tab(i).fac_handling_chrg_basis);
3278: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3272: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3273: 'fac_ast_unloading_chrg_basis :'||p_stop_charges_tab(i).fac_ast_unloading_chrg_basis);
3274: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3275: 'fac_handling_chrg :'||p_stop_charges_tab(i).fac_handling_chrg);
3276: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3277: 'fac_handling_chrg_basis :'||p_stop_charges_tab(i).fac_handling_chrg_basis);
3278: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3279: 'fac_currency :'||p_stop_charges_tab(i).fac_currency);
3280: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3274: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3275: 'fac_handling_chrg :'||p_stop_charges_tab(i).fac_handling_chrg);
3276: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3277: 'fac_handling_chrg_basis :'||p_stop_charges_tab(i).fac_handling_chrg_basis);
3278: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3279: 'fac_currency :'||p_stop_charges_tab(i).fac_currency);
3280: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3281: '----------------------------------------------------------------');
3282:
3276: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3277: 'fac_handling_chrg_basis :'||p_stop_charges_tab(i).fac_handling_chrg_basis);
3278: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3279: 'fac_currency :'||p_stop_charges_tab(i).fac_currency);
3280: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3281: '----------------------------------------------------------------');
3282:
3283: EXIT WHEN (i >= p_stop_charges_tab.LAST );
3284: i := p_stop_charges_tab.NEXT(i);
3284: i := p_stop_charges_tab.NEXT(i);
3285: END LOOP;
3286: END IF;
3287:
3288: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
3289: END print_output;
3290:
3291:
3292:
3295: p_end_trip_index IN NUMBER,
3296: p_trip_charges_tab IN FTE_TL_CACHE.TL_TRIP_OUTPUT_TAB_TYPE,
3297: p_stop_charges_tab IN FTE_TL_CACHE.TL_trip_stop_output_tab_type
3298: ) IS
3299: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
3300: l_method_name VARCHAR2(50) := 'print_output_multiple';
3301: i NUMBER;
3302: j NUMBER;
3303: BEGIN
3300: l_method_name VARCHAR2(50) := 'print_output_multiple';
3301: i NUMBER;
3302: j NUMBER;
3303: BEGIN
3304: fte_freight_pricing_util.reset_dbg_vars;
3305: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
3306:
3307:
3308:
3301: i NUMBER;
3302: j NUMBER;
3303: BEGIN
3304: fte_freight_pricing_util.reset_dbg_vars;
3305: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
3306:
3307:
3308:
3309: i := p_start_trip_index;
3313: -- print_output(p_trip_charges_rec=>p_trip_charges_tab(i),
3314: -- p_stop_charges_tab=>p_stop_charges_tab);
3315:
3316:
3317: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3318: '----------------------- Trip Output----------------------------');
3319: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3320: 'trip_id :'||p_trip_charges_tab(i).trip_id );
3321: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3315:
3316:
3317: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3318: '----------------------- Trip Output----------------------------');
3319: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3320: 'trip_id :'||p_trip_charges_tab(i).trip_id );
3321: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3322: 'base_dist_load_chrg :'||p_trip_charges_tab(i).base_dist_load_chrg );
3323: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3317: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3318: '----------------------- Trip Output----------------------------');
3319: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3320: 'trip_id :'||p_trip_charges_tab(i).trip_id );
3321: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3322: 'base_dist_load_chrg :'||p_trip_charges_tab(i).base_dist_load_chrg );
3323: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3324: 'base_dist_load_unit_chrg :'||p_trip_charges_tab(i).base_dist_load_unit_chrg );
3325: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3319: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3320: 'trip_id :'||p_trip_charges_tab(i).trip_id );
3321: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3322: 'base_dist_load_chrg :'||p_trip_charges_tab(i).base_dist_load_chrg );
3323: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3324: 'base_dist_load_unit_chrg :'||p_trip_charges_tab(i).base_dist_load_unit_chrg );
3325: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3326: 'base_dist_unload_chrg :'||p_trip_charges_tab(i).base_dist_unload_chrg );
3327: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3321: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3322: 'base_dist_load_chrg :'||p_trip_charges_tab(i).base_dist_load_chrg );
3323: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3324: 'base_dist_load_unit_chrg :'||p_trip_charges_tab(i).base_dist_load_unit_chrg );
3325: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3326: 'base_dist_unload_chrg :'||p_trip_charges_tab(i).base_dist_unload_chrg );
3327: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3328: 'base_dist_unload_unit_chrg :'||p_trip_charges_tab(i).base_dist_unload_unit_chrg );
3329: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3323: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3324: 'base_dist_load_unit_chrg :'||p_trip_charges_tab(i).base_dist_load_unit_chrg );
3325: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3326: 'base_dist_unload_chrg :'||p_trip_charges_tab(i).base_dist_unload_chrg );
3327: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3328: 'base_dist_unload_unit_chrg :'||p_trip_charges_tab(i).base_dist_unload_unit_chrg );
3329: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3330: 'base_unit_chrg :'||p_trip_charges_tab(i).base_unit_chrg );
3331: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3325: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3326: 'base_dist_unload_chrg :'||p_trip_charges_tab(i).base_dist_unload_chrg );
3327: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3328: 'base_dist_unload_unit_chrg :'||p_trip_charges_tab(i).base_dist_unload_unit_chrg );
3329: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3330: 'base_unit_chrg :'||p_trip_charges_tab(i).base_unit_chrg );
3331: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3332: 'base_unit_unit_chrg :'||p_trip_charges_tab(i).base_unit_unit_chrg );
3333: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3327: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3328: 'base_dist_unload_unit_chrg :'||p_trip_charges_tab(i).base_dist_unload_unit_chrg );
3329: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3330: 'base_unit_chrg :'||p_trip_charges_tab(i).base_unit_chrg );
3331: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3332: 'base_unit_unit_chrg :'||p_trip_charges_tab(i).base_unit_unit_chrg );
3333: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3334: 'base_time_chrg :'||p_trip_charges_tab(i).base_time_chrg );
3335: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3329: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3330: 'base_unit_chrg :'||p_trip_charges_tab(i).base_unit_chrg );
3331: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3332: 'base_unit_unit_chrg :'||p_trip_charges_tab(i).base_unit_unit_chrg );
3333: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3334: 'base_time_chrg :'||p_trip_charges_tab(i).base_time_chrg );
3335: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3336: 'base_time_unit_chrg :'||p_trip_charges_tab(i).base_time_unit_chrg );
3337: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3331: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3332: 'base_unit_unit_chrg :'||p_trip_charges_tab(i).base_unit_unit_chrg );
3333: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3334: 'base_time_chrg :'||p_trip_charges_tab(i).base_time_chrg );
3335: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3336: 'base_time_unit_chrg :'||p_trip_charges_tab(i).base_time_unit_chrg );
3337: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3338: 'base_flat_chrg :'||p_trip_charges_tab(i).base_flat_chrg );
3339: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3333: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3334: 'base_time_chrg :'||p_trip_charges_tab(i).base_time_chrg );
3335: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3336: 'base_time_unit_chrg :'||p_trip_charges_tab(i).base_time_unit_chrg );
3337: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3338: 'base_flat_chrg :'||p_trip_charges_tab(i).base_flat_chrg );
3339: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3340: 'stop_off_chrg :'||p_trip_charges_tab(i).stop_off_chrg );
3341: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3335: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3336: 'base_time_unit_chrg :'||p_trip_charges_tab(i).base_time_unit_chrg );
3337: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3338: 'base_flat_chrg :'||p_trip_charges_tab(i).base_flat_chrg );
3339: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3340: 'stop_off_chrg :'||p_trip_charges_tab(i).stop_off_chrg );
3341: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3342: 'out_of_route_chrg :'||p_trip_charges_tab(i).out_of_route_chrg );
3343: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3337: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3338: 'base_flat_chrg :'||p_trip_charges_tab(i).base_flat_chrg );
3339: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3340: 'stop_off_chrg :'||p_trip_charges_tab(i).stop_off_chrg );
3341: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3342: 'out_of_route_chrg :'||p_trip_charges_tab(i).out_of_route_chrg );
3343: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3344: 'document_chrg :'||p_trip_charges_tab(i).document_chrg );
3345: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3339: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3340: 'stop_off_chrg :'||p_trip_charges_tab(i).stop_off_chrg );
3341: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3342: 'out_of_route_chrg :'||p_trip_charges_tab(i).out_of_route_chrg );
3343: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3344: 'document_chrg :'||p_trip_charges_tab(i).document_chrg );
3345: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3346: 'handling_chrg :'||p_trip_charges_tab(i).handling_chrg );
3347: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3341: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3342: 'out_of_route_chrg :'||p_trip_charges_tab(i).out_of_route_chrg );
3343: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3344: 'document_chrg :'||p_trip_charges_tab(i).document_chrg );
3345: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3346: 'handling_chrg :'||p_trip_charges_tab(i).handling_chrg );
3347: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3348: 'handling_chrg_basis :'||p_trip_charges_tab(i).handling_chrg_basis );
3349: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3343: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3344: 'document_chrg :'||p_trip_charges_tab(i).document_chrg );
3345: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3346: 'handling_chrg :'||p_trip_charges_tab(i).handling_chrg );
3347: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3348: 'handling_chrg_basis :'||p_trip_charges_tab(i).handling_chrg_basis );
3349: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3350: 'cm_discount_percent :'||p_trip_charges_tab(i).cm_discount_percent );
3351: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3345: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3346: 'handling_chrg :'||p_trip_charges_tab(i).handling_chrg );
3347: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3348: 'handling_chrg_basis :'||p_trip_charges_tab(i).handling_chrg_basis );
3349: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3350: 'cm_discount_percent :'||p_trip_charges_tab(i).cm_discount_percent );
3351: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3352: 'cm_discount_value :'||p_trip_charges_tab(i).cm_discount_value );
3353: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3347: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3348: 'handling_chrg_basis :'||p_trip_charges_tab(i).handling_chrg_basis );
3349: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3350: 'cm_discount_percent :'||p_trip_charges_tab(i).cm_discount_percent );
3351: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3352: 'cm_discount_value :'||p_trip_charges_tab(i).cm_discount_value );
3353: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3354: 'currency :'||p_trip_charges_tab(i).currency );
3355: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3349: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3350: 'cm_discount_percent :'||p_trip_charges_tab(i).cm_discount_percent );
3351: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3352: 'cm_discount_value :'||p_trip_charges_tab(i).cm_discount_value );
3353: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3354: 'currency :'||p_trip_charges_tab(i).currency );
3355: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3356: 'fuel_chrg :'||p_trip_charges_tab(i).fuel_chrg );
3357: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3351: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3352: 'cm_discount_value :'||p_trip_charges_tab(i).cm_discount_value );
3353: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3354: 'currency :'||p_trip_charges_tab(i).currency );
3355: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3356: 'fuel_chrg :'||p_trip_charges_tab(i).fuel_chrg );
3357: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3358: '----------------------------------------------------------------');
3359:
3353: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3354: 'currency :'||p_trip_charges_tab(i).currency );
3355: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3356: 'fuel_chrg :'||p_trip_charges_tab(i).fuel_chrg );
3357: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3358: '----------------------------------------------------------------');
3359:
3360:
3361: j := p_trip_charges_tab(i).stop_charge_reference;
3362: WHILE((FTE_TL_CACHE.g_tl_trip_rows(i).number_of_stops > 0) AND
3363: (j<(FTE_TL_CACHE.g_tl_trip_rows(i).number_of_stops+p_trip_charges_tab(i).stop_charge_reference)))
3364: LOOP
3365:
3366: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3367: '----------------------- Stop Output----------------------------');
3368: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3369: 'stop_id :'||p_stop_charges_tab(j).stop_id);
3370: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3364: LOOP
3365:
3366: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3367: '----------------------- Stop Output----------------------------');
3368: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3369: 'stop_id :'||p_stop_charges_tab(j).stop_id);
3370: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3371: 'trip_id :'||p_stop_charges_tab(j).trip_id);
3372: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3366: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3367: '----------------------- Stop Output----------------------------');
3368: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3369: 'stop_id :'||p_stop_charges_tab(j).stop_id);
3370: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3371: 'trip_id :'||p_stop_charges_tab(j).trip_id);
3372: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3373: 'weekday_layover_chrg :'||p_stop_charges_tab(j).weekday_layover_chrg);
3374: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3368: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3369: 'stop_id :'||p_stop_charges_tab(j).stop_id);
3370: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3371: 'trip_id :'||p_stop_charges_tab(j).trip_id);
3372: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3373: 'weekday_layover_chrg :'||p_stop_charges_tab(j).weekday_layover_chrg);
3374: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3375: 'weekend_layover_chrg :'||p_stop_charges_tab(j).weekend_layover_chrg);
3376: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3370: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3371: 'trip_id :'||p_stop_charges_tab(j).trip_id);
3372: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3373: 'weekday_layover_chrg :'||p_stop_charges_tab(j).weekday_layover_chrg);
3374: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3375: 'weekend_layover_chrg :'||p_stop_charges_tab(j).weekend_layover_chrg);
3376: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3377: 'loading_chrg :'||p_stop_charges_tab(j).loading_chrg);
3378: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3372: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3373: 'weekday_layover_chrg :'||p_stop_charges_tab(j).weekday_layover_chrg);
3374: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3375: 'weekend_layover_chrg :'||p_stop_charges_tab(j).weekend_layover_chrg);
3376: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3377: 'loading_chrg :'||p_stop_charges_tab(j).loading_chrg);
3378: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3379: 'loading_chrg_basis :'||p_stop_charges_tab(j).loading_chrg_basis);
3380: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3374: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3375: 'weekend_layover_chrg :'||p_stop_charges_tab(j).weekend_layover_chrg);
3376: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3377: 'loading_chrg :'||p_stop_charges_tab(j).loading_chrg);
3378: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3379: 'loading_chrg_basis :'||p_stop_charges_tab(j).loading_chrg_basis);
3380: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3381: 'ast_loading_chrg :'||p_stop_charges_tab(j).ast_loading_chrg);
3382: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3376: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3377: 'loading_chrg :'||p_stop_charges_tab(j).loading_chrg);
3378: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3379: 'loading_chrg_basis :'||p_stop_charges_tab(j).loading_chrg_basis);
3380: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3381: 'ast_loading_chrg :'||p_stop_charges_tab(j).ast_loading_chrg);
3382: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3383: 'ast_loading_chrg_basis :'||p_stop_charges_tab(j).ast_loading_chrg_basis);
3384: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3378: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3379: 'loading_chrg_basis :'||p_stop_charges_tab(j).loading_chrg_basis);
3380: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3381: 'ast_loading_chrg :'||p_stop_charges_tab(j).ast_loading_chrg);
3382: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3383: 'ast_loading_chrg_basis :'||p_stop_charges_tab(j).ast_loading_chrg_basis);
3384: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3385: 'unloading_chrg :'||p_stop_charges_tab(j).unloading_chrg);
3386: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3380: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3381: 'ast_loading_chrg :'||p_stop_charges_tab(j).ast_loading_chrg);
3382: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3383: 'ast_loading_chrg_basis :'||p_stop_charges_tab(j).ast_loading_chrg_basis);
3384: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3385: 'unloading_chrg :'||p_stop_charges_tab(j).unloading_chrg);
3386: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3387: 'unloading_chrg_basis :'||p_stop_charges_tab(j).unloading_chrg_basis);
3388: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3382: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3383: 'ast_loading_chrg_basis :'||p_stop_charges_tab(j).ast_loading_chrg_basis);
3384: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3385: 'unloading_chrg :'||p_stop_charges_tab(j).unloading_chrg);
3386: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3387: 'unloading_chrg_basis :'||p_stop_charges_tab(j).unloading_chrg_basis);
3388: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3389: 'ast_unloading_chrg :'||p_stop_charges_tab(j).ast_unloading_chrg);
3390: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3384: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3385: 'unloading_chrg :'||p_stop_charges_tab(j).unloading_chrg);
3386: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3387: 'unloading_chrg_basis :'||p_stop_charges_tab(j).unloading_chrg_basis);
3388: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3389: 'ast_unloading_chrg :'||p_stop_charges_tab(j).ast_unloading_chrg);
3390: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3391: 'ast_unloading_chrg_basis :'||p_stop_charges_tab(j).ast_unloading_chrg_basis);
3392: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3386: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3387: 'unloading_chrg_basis :'||p_stop_charges_tab(j).unloading_chrg_basis);
3388: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3389: 'ast_unloading_chrg :'||p_stop_charges_tab(j).ast_unloading_chrg);
3390: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3391: 'ast_unloading_chrg_basis :'||p_stop_charges_tab(j).ast_unloading_chrg_basis);
3392: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3393: 'origin_surchrg :'||p_stop_charges_tab(j).origin_surchrg);
3394: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3388: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3389: 'ast_unloading_chrg :'||p_stop_charges_tab(j).ast_unloading_chrg);
3390: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3391: 'ast_unloading_chrg_basis :'||p_stop_charges_tab(j).ast_unloading_chrg_basis);
3392: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3393: 'origin_surchrg :'||p_stop_charges_tab(j).origin_surchrg);
3394: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3395: 'destination_surchrg :'||p_stop_charges_tab(j).destination_surchrg);
3396: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3390: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3391: 'ast_unloading_chrg_basis :'||p_stop_charges_tab(j).ast_unloading_chrg_basis);
3392: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3393: 'origin_surchrg :'||p_stop_charges_tab(j).origin_surchrg);
3394: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3395: 'destination_surchrg :'||p_stop_charges_tab(j).destination_surchrg);
3396: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3397: 'fac_loading_chrg :'||p_stop_charges_tab(j).fac_loading_chrg);
3398: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3392: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3393: 'origin_surchrg :'||p_stop_charges_tab(j).origin_surchrg);
3394: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3395: 'destination_surchrg :'||p_stop_charges_tab(j).destination_surchrg);
3396: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3397: 'fac_loading_chrg :'||p_stop_charges_tab(j).fac_loading_chrg);
3398: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3399: 'fac_loading_chrg_basis :'||p_stop_charges_tab(j).fac_loading_chrg_basis);
3400: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3394: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3395: 'destination_surchrg :'||p_stop_charges_tab(j).destination_surchrg);
3396: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3397: 'fac_loading_chrg :'||p_stop_charges_tab(j).fac_loading_chrg);
3398: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3399: 'fac_loading_chrg_basis :'||p_stop_charges_tab(j).fac_loading_chrg_basis);
3400: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3401: 'fac_ast_loading_chrg :'||p_stop_charges_tab(j).fac_ast_loading_chrg);
3402: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3396: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3397: 'fac_loading_chrg :'||p_stop_charges_tab(j).fac_loading_chrg);
3398: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3399: 'fac_loading_chrg_basis :'||p_stop_charges_tab(j).fac_loading_chrg_basis);
3400: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3401: 'fac_ast_loading_chrg :'||p_stop_charges_tab(j).fac_ast_loading_chrg);
3402: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3403: 'fac_ast_loading_chrg_basis :'||p_stop_charges_tab(j).fac_ast_loading_chrg_basis);
3404: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3398: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3399: 'fac_loading_chrg_basis :'||p_stop_charges_tab(j).fac_loading_chrg_basis);
3400: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3401: 'fac_ast_loading_chrg :'||p_stop_charges_tab(j).fac_ast_loading_chrg);
3402: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3403: 'fac_ast_loading_chrg_basis :'||p_stop_charges_tab(j).fac_ast_loading_chrg_basis);
3404: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3405: 'fac_unloading_chrg :'||p_stop_charges_tab(j).fac_unloading_chrg);
3406: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3400: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3401: 'fac_ast_loading_chrg :'||p_stop_charges_tab(j).fac_ast_loading_chrg);
3402: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3403: 'fac_ast_loading_chrg_basis :'||p_stop_charges_tab(j).fac_ast_loading_chrg_basis);
3404: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3405: 'fac_unloading_chrg :'||p_stop_charges_tab(j).fac_unloading_chrg);
3406: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3407: 'fac_unloading_chrg_basis :'||p_stop_charges_tab(j).fac_unloading_chrg_basis);
3408: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3402: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3403: 'fac_ast_loading_chrg_basis :'||p_stop_charges_tab(j).fac_ast_loading_chrg_basis);
3404: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3405: 'fac_unloading_chrg :'||p_stop_charges_tab(j).fac_unloading_chrg);
3406: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3407: 'fac_unloading_chrg_basis :'||p_stop_charges_tab(j).fac_unloading_chrg_basis);
3408: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3409: 'fac_ast_unloading_chrg :'||p_stop_charges_tab(j).fac_ast_unloading_chrg);
3410: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3404: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3405: 'fac_unloading_chrg :'||p_stop_charges_tab(j).fac_unloading_chrg);
3406: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3407: 'fac_unloading_chrg_basis :'||p_stop_charges_tab(j).fac_unloading_chrg_basis);
3408: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3409: 'fac_ast_unloading_chrg :'||p_stop_charges_tab(j).fac_ast_unloading_chrg);
3410: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3411: 'fac_ast_unloading_chrg_basis :'||p_stop_charges_tab(j).fac_ast_unloading_chrg_basis);
3412: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3406: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3407: 'fac_unloading_chrg_basis :'||p_stop_charges_tab(j).fac_unloading_chrg_basis);
3408: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3409: 'fac_ast_unloading_chrg :'||p_stop_charges_tab(j).fac_ast_unloading_chrg);
3410: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3411: 'fac_ast_unloading_chrg_basis :'||p_stop_charges_tab(j).fac_ast_unloading_chrg_basis);
3412: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3413: 'fac_handling_chrg :'||p_stop_charges_tab(j).fac_handling_chrg);
3414: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3408: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3409: 'fac_ast_unloading_chrg :'||p_stop_charges_tab(j).fac_ast_unloading_chrg);
3410: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3411: 'fac_ast_unloading_chrg_basis :'||p_stop_charges_tab(j).fac_ast_unloading_chrg_basis);
3412: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3413: 'fac_handling_chrg :'||p_stop_charges_tab(j).fac_handling_chrg);
3414: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3415: 'fac_handling_chrg_basis :'||p_stop_charges_tab(j).fac_handling_chrg_basis);
3416: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3410: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3411: 'fac_ast_unloading_chrg_basis :'||p_stop_charges_tab(j).fac_ast_unloading_chrg_basis);
3412: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3413: 'fac_handling_chrg :'||p_stop_charges_tab(j).fac_handling_chrg);
3414: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3415: 'fac_handling_chrg_basis :'||p_stop_charges_tab(j).fac_handling_chrg_basis);
3416: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3417: 'fac_currency :'||p_stop_charges_tab(j).fac_currency);
3418: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3412: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3413: 'fac_handling_chrg :'||p_stop_charges_tab(j).fac_handling_chrg);
3414: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3415: 'fac_handling_chrg_basis :'||p_stop_charges_tab(j).fac_handling_chrg_basis);
3416: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3417: 'fac_currency :'||p_stop_charges_tab(j).fac_currency);
3418: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3419: '----------------------------------------------------------------');
3420:
3414: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3415: 'fac_handling_chrg_basis :'||p_stop_charges_tab(j).fac_handling_chrg_basis);
3416: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3417: 'fac_currency :'||p_stop_charges_tab(j).fac_currency);
3418: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3419: '----------------------------------------------------------------');
3420:
3421:
3422: j := p_stop_charges_tab.NEXT(j);
3427:
3428:
3429: i:=i+1;
3430: END LOOP;
3431: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
3432: END print_output_multiple;
3433:
3434:
3435:
3538: l_trip_rec FTE_TL_CACHE.TL_trip_output_rec_type;
3539: l_stop_rec FTE_TL_CACHE.TL_trip_stop_output_rec_type;
3540: l_stop_id NUMBER;
3541: l_req_line_info_rec req_line_info_rec_type;
3542: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
3543: l_method_name VARCHAR2(50) := 'retrieve_qp_output_multiple';
3544:
3545: BEGIN
3546: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3543: l_method_name VARCHAR2(50) := 'retrieve_qp_output_multiple';
3544:
3545: BEGIN
3546: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3547: fte_freight_pricing_util.reset_dbg_vars;
3548: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
3549:
3550:
3551: --Initialize to 0
3544:
3545: BEGIN
3546: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3547: fte_freight_pricing_util.reset_dbg_vars;
3548: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
3549:
3550:
3551: --Initialize to 0
3552: i:=p_start_trip_index;
3585: -- uom conversion?
3586:
3587: ------------- BASE PRICES -----------------------------------
3588:
3589: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3590: 'g_req_line_info_tab.COUNT = '||g_req_line_info_tab.COUNT);
3591: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3592: 'p_qp_output_line_rows.COUNT = '||p_qp_output_line_rows.COUNT);
3593:
3587: ------------- BASE PRICES -----------------------------------
3588:
3589: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3590: 'g_req_line_info_tab.COUNT = '||g_req_line_info_tab.COUNT);
3591: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3592: 'p_qp_output_line_rows.COUNT = '||p_qp_output_line_rows.COUNT);
3593:
3594: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3595: 'Now looping on p_qp_output_line_rows ');
3590: 'g_req_line_info_tab.COUNT = '||g_req_line_info_tab.COUNT);
3591: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3592: 'p_qp_output_line_rows.COUNT = '||p_qp_output_line_rows.COUNT);
3593:
3594: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3595: 'Now looping on p_qp_output_line_rows ');
3596:
3597: i := p_qp_output_line_rows.FIRST;
3598: IF (i IS NOT NULL) THEN
3604: -- depending upon the type (purpose) of the line, filter out unwanted details
3605: -- analyze the charge sub type code, and extract the charge.
3606:
3607: line_idx := p_qp_output_line_rows(i).line_index;
3608: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3609: 'line_idx = '||line_idx);
3610:
3611: l_trip_index:=g_req_line_info_tab(line_idx).trip_index;
3612: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3608: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3609: 'line_idx = '||line_idx);
3610:
3611: l_trip_index:=g_req_line_info_tab(line_idx).trip_index;
3612: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3613: 'trip_index = '||l_trip_index);
3614:
3615:
3616:
3665: * p_qp_output_line_rows(i).adjusted_unit_price;
3666: l_unit_unit_base_price_tab(l_trip_index) := p_qp_output_line_rows(i).adjusted_unit_price;
3667:
3668:
3669: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3670: 'trip_index = '||l_trip_index||'base price '||l_unit_base_price_tab(l_trip_index)||
3671: ' lin_idx:'||line_idx||' output line idx:'||i||' Quantity:'||p_qp_output_line_rows(i).line_quantity||' Adj unit price'||p_qp_output_line_rows(i).adjusted_unit_price );
3672:
3673: END IF;
3717:
3718: x_trip_charges_tab(i).base_unit_chrg := l_unit_base_price_tab(i);
3719: x_trip_charges_tab(i).base_unit_unit_chrg := l_unit_unit_base_price_tab(i);
3720:
3721: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3722: 'trip unit charge trip_index = '||i||' charge:'||x_trip_charges_tab(i).base_unit_chrg );
3723:
3724:
3725: x_trip_charges_tab(i).base_time_chrg := l_time_price_tab(i);
3738: i:=i+1;
3739: END LOOP;
3740:
3741: -- Generate dummy entries into x_stop_charges_tab --
3742: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3743: 'Added dummy records to x_stop_charges_rec');
3744:
3745: j:=p_start_trip_index;
3746: WHILE (j<=p_end_trip_index)
3766: j:=j+1;
3767: END LOOP;
3768:
3769:
3770: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3771: 'x_stop_charges_tab.COUNT='||x_stop_charges_tab.COUNT);
3772:
3773:
3774: ----------- ACCESSORIAL CHARGES,DISCOUNTS AND BASE MIN CHARGES -----------------------
3774: ----------- ACCESSORIAL CHARGES,DISCOUNTS AND BASE MIN CHARGES -----------------------
3775:
3776: -- Query line details --
3777:
3778: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3779: 'Now looping on p_qp_output_detail_rows ');
3780:
3781: i := p_qp_output_detail_rows.FIRST;
3782: IF (i IS NOT NULL) THEN
3789:
3790: l_qp_out_det_rec := p_qp_output_detail_rows(i);
3791: l_req_line_info_rec := g_req_line_info_tab(l_qp_out_det_rec.line_index);
3792:
3793: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3794: 'i = '||i);
3795: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3796: 'l_qp_out_det_rec.line_index='||l_qp_out_det_rec.line_index);
3797:
3791: l_req_line_info_rec := g_req_line_info_tab(l_qp_out_det_rec.line_index);
3792:
3793: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3794: 'i = '||i);
3795: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3796: 'l_qp_out_det_rec.line_index='||l_qp_out_det_rec.line_index);
3797:
3798: l_trip_index:=l_req_line_info_rec.trip_index;
3799:
3809: -- do not exist in the same call
3810:
3811: IF (l_qp_out_det_rec.charge_subtype_code = fte_rtg_globals.G_C_MIN_DISTANCE_CH
3812: AND nvl(l_qp_out_det_rec.adjustment_amount,0) >0 ) THEN
3813: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3814: 'MIN_CHARGE: Minimum charge applied to distance base rates');
3815: END IF;
3816:
3817: END IF;
3819: IF (l_req_line_info_rec.line_type = G_CONT_DIST_BASE_LINE
3820: AND l_qp_out_det_rec.charge_subtype_code = fte_rtg_globals.G_C_MIN_DISTANCE_CH
3821: AND nvl(l_qp_out_det_rec.adjustment_amount,0) >0 ) THEN
3822:
3823: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3824: 'MIN_CHARGE: Minimum charge applied to distance base rates (continuous move)');
3825:
3826: END IF;
3827:
3828: IF (l_req_line_info_rec.line_type = G_UNITS_BASE_LINE
3829: AND l_qp_out_det_rec.charge_subtype_code = fte_rtg_globals.G_C_MIN_UNIT_CH
3830: AND nvl(l_qp_out_det_rec.adjustment_amount,0) > 0) THEN
3831:
3832: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3833: 'MIN_CHARGE: Minimum charge applied to units base rates ');
3834:
3835: END IF;
3836:
3837: IF (l_req_line_info_rec.line_type = G_TIME_BASE_LINE
3838: AND l_qp_out_det_rec.charge_subtype_code = fte_rtg_globals.G_C_MIN_TIME_CH
3839: AND nvl(l_qp_out_det_rec.adjustment_amount,0) > 0) THEN
3840:
3841: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3842: 'MIN_CHARGE: Minimum charge applied to time base rates ');
3843:
3844: END IF;
3845:
3901: END IF;
3902:
3903: -- Fuel Surcharge : bug: 3353264 (enhancement)
3904: IF (l_qp_out_det_rec.charge_subtype_code = fte_rtg_globals.G_C_FUEL_CH) THEN
3905: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3906: 'G_C_FUEL_CH : operand_value='||l_qp_out_det_rec.operand_value);
3907: IF (l_qp_out_det_rec.operand_value >0) THEN
3908: x_trip_charges_tab(l_trip_index).fuel_chrg :=
3909: ( (x_trip_charges_tab(l_trip_index).base_dist_load_chrg
3951:
3952: l_stop_index := g_req_line_info_tab(p_qp_output_detail_rows(i).line_index).stop_index;
3953: l_stop_id := p_stop_tab(l_stop_index).stop_id;
3954:
3955: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
3956: 'l_stop_index='||l_stop_index||' l_stop_id='||l_stop_id);
3957: /*
3958: -- check if this stop_id is already in the stop output table
3959: -- *** Assumes that x_stop_charges_tab is indexed by stop_id
4205: -- Look for Weekday and Weekend Layover Charges
4206:
4207: IF (l_qp_out_det_rec.charge_subtype_code = fte_rtg_globals.G_C_WEEKDAY_LAYOVER_CH ) THEN
4208:
4209: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
4210: 'G_C_WEEKDAY_LAYOVER_CH : adjustment_amount='||l_qp_out_det_rec.adjustment_amount);
4211: IF (l_qp_out_det_rec.adjustment_amount is not null
4212: AND l_qp_out_det_rec.line_quantity is not null) THEN
4213: -- l_stop_rec.weekday_layover_chrg :=
4217: END IF;
4218:
4219: ELSIF (l_qp_out_det_rec.charge_subtype_code = fte_rtg_globals.G_C_WEEKEND_LAYOVER_CH ) THEN
4220:
4221: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
4222: 'G_C_WEEKEND_LAYOVER_CH : adjustment_amount='||l_qp_out_det_rec.adjustment_amount);
4223:
4224: l_num_of_weekend_layover := p_stop_tab(l_stop_index).weekend_layovers;
4225: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
4221: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
4222: 'G_C_WEEKEND_LAYOVER_CH : adjustment_amount='||l_qp_out_det_rec.adjustment_amount);
4223:
4224: l_num_of_weekend_layover := p_stop_tab(l_stop_index).weekend_layovers;
4225: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,
4226: 'l_num_of_weekend_layover='||l_num_of_weekend_layover);
4227:
4228: l_stop_rec.weekend_layover_chrg :=
4229: l_qp_out_det_rec.adjustment_amount * l_num_of_weekend_layover;
4457: i := p_qp_output_detail_rows.NEXT(i);
4458: END LOOP;
4459: END IF;
4460:
4461: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4462:
4463: EXCEPTION
4464: WHEN FND_API.G_EXC_ERROR THEN
4465: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4462:
4463: EXCEPTION
4464: WHEN FND_API.G_EXC_ERROR THEN
4465: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4466: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
4467:
4468: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4469: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4470: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
4466: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
4467:
4468: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4469: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4470: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
4471:
4472: WHEN OTHERS THEN
4473: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4474: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
4470: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
4471:
4472: WHEN OTHERS THEN
4473: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4474: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
4475: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4476: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
4477:
4478:
4471:
4472: WHEN OTHERS THEN
4473: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4474: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
4475: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4476: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
4477:
4478:
4479: END retrieve_qp_output_multiple;
4472: WHEN OTHERS THEN
4473: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4474: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
4475: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4476: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
4477:
4478:
4479: END retrieve_qp_output_multiple;
4480:
4505: l_dummy_ipl_count_tab DBMS_UTILITY.NUMBER_ARRAY;
4506: l_non_dummy_ipl_count_tab DBMS_UTILITY.NUMBER_ARRAY;
4507:
4508:
4509: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
4510: l_method_name VARCHAR2(50) := 'check_qp_ipl';
4511:
4512: BEGIN
4513: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4510: l_method_name VARCHAR2(50) := 'check_qp_ipl';
4511:
4512: BEGIN
4513: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4514: fte_freight_pricing_util.reset_dbg_vars;
4515: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
4516:
4517: -- l_non_dummy_row_count:=0;
4518: -- bug 3610889
4511:
4512: BEGIN
4513: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4514: fte_freight_pricing_util.reset_dbg_vars;
4515: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
4516:
4517: -- l_non_dummy_row_count:=0;
4518: -- bug 3610889
4519: i:=p_start_index;
4561:
4562: END IF;
4563:
4564: ELSE
4565: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Index not found:'||i);
4566:
4567: END IF;
4568:
4569:
4573: i:=p_start_index;
4574: WHILE (i <= p_end_index)
4575: LOOP
4576:
4577: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,' Number of dummy lines:'||l_dummy_row_count_tab(i)
4578: ||' Number of non dummy lines:'||l_non_dummy_row_count_tab(i)||' Dummy IPLs:'||l_dummy_ipl_count_tab(i)||
4579: ' Non Dummy IPLs :'||l_non_dummy_ipl_count_tab(i));
4580: IF (l_non_dummy_ipl_count_tab(i) >= l_non_dummy_row_count_tab(i))
4581: THEN
4580: IF (l_non_dummy_ipl_count_tab(i) >= l_non_dummy_row_count_tab(i))
4581: THEN
4582: x_exceptions(i).check_qp_ipl_fail:='Y';
4583: x_exceptions(i).not_on_pl_flag:='Y';
4584: --raise fte_freight_pricing_util.g_not_on_pricelist;
4585: END IF;
4586:
4587: i:=i+1;
4588:
4589: END LOOP;
4590:
4591:
4592:
4593: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4594:
4595: EXCEPTION
4596: WHEN fte_freight_pricing_util.g_not_on_pricelist THEN
4597: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4592:
4593: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4594:
4595: EXCEPTION
4596: WHEN fte_freight_pricing_util.g_not_on_pricelist THEN
4597: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4598: -- can use tokens here
4599: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_not_on_pricelist');
4600: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,'Item quantity not found on pricelist ');
4595: EXCEPTION
4596: WHEN fte_freight_pricing_util.g_not_on_pricelist THEN
4597: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4598: -- can use tokens here
4599: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_not_on_pricelist');
4600: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,'Item quantity not found on pricelist ');
4601: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4602:
4603: WHEN OTHERS THEN
4596: WHEN fte_freight_pricing_util.g_not_on_pricelist THEN
4597: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4598: -- can use tokens here
4599: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_not_on_pricelist');
4600: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,'Item quantity not found on pricelist ');
4601: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4602:
4603: WHEN OTHERS THEN
4604: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4597: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4598: -- can use tokens here
4599: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_not_on_pricelist');
4600: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,'Item quantity not found on pricelist ');
4601: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4602:
4603: WHEN OTHERS THEN
4604: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4605: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
4601: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4602:
4603: WHEN OTHERS THEN
4604: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4605: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
4606: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4607: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
4608:
4609:
4602:
4603: WHEN OTHERS THEN
4604: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4605: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
4606: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4607: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
4608:
4609:
4610: END check_qp_ipl_multiple;
4603: WHEN OTHERS THEN
4604: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4605: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
4606: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4607: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
4608:
4609:
4610: END check_qp_ipl_multiple;
4611:
4628: l_error_flag_tab DBMS_UTILITY.NUMBER_ARRAY;
4629: l_line_cnt_tab DBMS_UTILITY.NUMBER_ARRAY;
4630:
4631:
4632: l_log_level NUMBER := fte_freight_pricing_util.G_LOG;
4633: l_method_name VARCHAR2(50) := 'check_tl_qp_op_err_multiple';
4634: BEGIN
4635: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4636: fte_freight_pricing_util.reset_dbg_vars;
4632: l_log_level NUMBER := fte_freight_pricing_util.G_LOG;
4633: l_method_name VARCHAR2(50) := 'check_tl_qp_op_err_multiple';
4634: BEGIN
4635: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4636: fte_freight_pricing_util.reset_dbg_vars;
4637: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
4638:
4639: --init tab variables
4640: i:=p_start_index;
4633: l_method_name VARCHAR2(50) := 'check_tl_qp_op_err_multiple';
4634: BEGIN
4635: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4636: fte_freight_pricing_util.reset_dbg_vars;
4637: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
4638:
4639: --init tab variables
4640: i:=p_start_index;
4641: WHILE(i <=p_end_index)
4671: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST ,
4672: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV ,
4673: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP ,
4674: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR )) THEN
4675: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,' LineIndex = '||i||' Status Code = '||FTE_QP_ENGINE.g_O_line_tbl(i).status_code||' Text = '||FTE_QP_ENGINE.g_O_line_tbl(i).status_text);
4676: IF (FTE_QP_ENGINE.g_O_line_tbl(i).status_code = 'IPL') THEN
4677:
4678:
4679: l_ipl_cnt_tab(l_trip_index):=l_ipl_cnt_tab(l_trip_index)+1;
4679: l_ipl_cnt_tab(l_trip_index):=l_ipl_cnt_tab(l_trip_index)+1;
4680:
4681:
4682: FTE_QP_ENGINE.g_O_line_tbl(i).unit_price := 0;
4683: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,
4684: 'Following item quantity not found on pricelist :');
4685: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,
4686: ' Quantity = '||FTE_QP_ENGINE.g_I_line_quantity(i)||' '||FTE_QP_ENGINE.g_I_line_uom_code(i));
4687: ELSE
4681:
4682: FTE_QP_ENGINE.g_O_line_tbl(i).unit_price := 0;
4683: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,
4684: 'Following item quantity not found on pricelist :');
4685: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,
4686: ' Quantity = '||FTE_QP_ENGINE.g_I_line_quantity(i)||' '||FTE_QP_ENGINE.g_I_line_uom_code(i));
4687: ELSE
4688: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,'Settng error flag Case 1 LineIndex = '||i||' trip index:'||l_trip_index);
4689: l_error_flag_tab(l_trip_index):=1;
4684: 'Following item quantity not found on pricelist :');
4685: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,
4686: ' Quantity = '||FTE_QP_ENGINE.g_I_line_quantity(i)||' '||FTE_QP_ENGINE.g_I_line_uom_code(i));
4687: ELSE
4688: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,'Settng error flag Case 1 LineIndex = '||i||' trip index:'||l_trip_index);
4689: l_error_flag_tab(l_trip_index):=1;
4690:
4691: END IF;
4692: END IF;
4691: END IF;
4692: END IF;
4693: IF (FTE_QP_ENGINE.g_O_line_tbl(i).unit_price IS NULL) THEN
4694:
4695: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,'Settng error flag Case 2 LineIndex = '||i||' trip index:'||l_trip_index);
4696:
4697: l_error_flag_tab(l_trip_index):=1;
4698:
4699: fte_freight_pricing_util.print_msg(l_log_level,'Unit price is null');
4695: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,'Settng error flag Case 2 LineIndex = '||i||' trip index:'||l_trip_index);
4696:
4697: l_error_flag_tab(l_trip_index):=1;
4698:
4699: fte_freight_pricing_util.print_msg(l_log_level,'Unit price is null');
4700: -- ELSIF (FTE_QP_ENGINE.g_O_line_tbl(i).unit_price <= 0) THEN
4701: ELSIF (FTE_QP_ENGINE.g_O_line_tbl(i).unit_price < 0) THEN -- TL
4702: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,'Settng error flag Case 3 LineIndex = '||i||' trip index:'||l_trip_index);
4703: l_error_flag_tab(l_trip_index):=1;
4698:
4699: fte_freight_pricing_util.print_msg(l_log_level,'Unit price is null');
4700: -- ELSIF (FTE_QP_ENGINE.g_O_line_tbl(i).unit_price <= 0) THEN
4701: ELSIF (FTE_QP_ENGINE.g_O_line_tbl(i).unit_price < 0) THEN -- TL
4702: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,'Settng error flag Case 3 LineIndex = '||i||' trip index:'||l_trip_index);
4703: l_error_flag_tab(l_trip_index):=1;
4704: -- fte_freight_pricing_util.print_msg(l_log_level,'Unit price non-positive');
4705: fte_freight_pricing_util.print_msg(l_log_level,'Unit price negative');
4706: END IF;
4700: -- ELSIF (FTE_QP_ENGINE.g_O_line_tbl(i).unit_price <= 0) THEN
4701: ELSIF (FTE_QP_ENGINE.g_O_line_tbl(i).unit_price < 0) THEN -- TL
4702: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,'Settng error flag Case 3 LineIndex = '||i||' trip index:'||l_trip_index);
4703: l_error_flag_tab(l_trip_index):=1;
4704: -- fte_freight_pricing_util.print_msg(l_log_level,'Unit price non-positive');
4705: fte_freight_pricing_util.print_msg(l_log_level,'Unit price negative');
4706: END IF;
4707: EXIT WHEN i >= FTE_QP_ENGINE.g_O_line_tbl.LAST;
4708: i := FTE_QP_ENGINE.g_O_line_tbl.NEXT(i);
4701: ELSIF (FTE_QP_ENGINE.g_O_line_tbl(i).unit_price < 0) THEN -- TL
4702: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,'Settng error flag Case 3 LineIndex = '||i||' trip index:'||l_trip_index);
4703: l_error_flag_tab(l_trip_index):=1;
4704: -- fte_freight_pricing_util.print_msg(l_log_level,'Unit price non-positive');
4705: fte_freight_pricing_util.print_msg(l_log_level,'Unit price negative');
4706: END IF;
4707: EXIT WHEN i >= FTE_QP_ENGINE.g_O_line_tbl.LAST;
4708: i := FTE_QP_ENGINE.g_O_line_tbl.NEXT(i);
4709: END LOOP;
4717: THEN
4718:
4719: l_trip_index:=p_req_line_info_tab(FTE_QP_ENGINE.g_O_line_detail_tbl(i).line_index).trip_index;
4720: l_error_flag_tab(l_trip_index) := 1;
4721: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,'Settng error flag Case 4 LineIndex = '||i||' trip index:'||l_trip_index);
4722: fte_freight_pricing_util.print_msg(l_log_level,'Adjustment amount is null');
4723: END IF;
4724: EXIT WHEN i >= FTE_QP_ENGINE.g_O_line_detail_tbl.LAST;
4725: i := FTE_QP_ENGINE.g_O_line_detail_tbl.NEXT(i);
4718:
4719: l_trip_index:=p_req_line_info_tab(FTE_QP_ENGINE.g_O_line_detail_tbl(i).line_index).trip_index;
4720: l_error_flag_tab(l_trip_index) := 1;
4721: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,'Settng error flag Case 4 LineIndex = '||i||' trip index:'||l_trip_index);
4722: fte_freight_pricing_util.print_msg(l_log_level,'Adjustment amount is null');
4723: END IF;
4724: EXIT WHEN i >= FTE_QP_ENGINE.g_O_line_detail_tbl.LAST;
4725: i := FTE_QP_ENGINE.g_O_line_detail_tbl.NEXT(i);
4726: END LOOP;
4733: LOOP
4734:
4735: IF (l_ipl_cnt_tab(i) >= l_line_cnt_tab(i)) THEN
4736: -- probably big failure - not good
4737: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,'Settng error flag Case 5 trip Index = '||i);
4738: fte_freight_pricing_util.print_msg(l_log_level,'l_ipl_cnt >= l_line_cnt for trip_index:'||i);
4739: x_exceptions(i).check_tlqp_ouputfail:='Y';
4740: x_exceptions(i).not_on_pl_flag:='Y';
4741:
4734:
4735: IF (l_ipl_cnt_tab(i) >= l_line_cnt_tab(i)) THEN
4736: -- probably big failure - not good
4737: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,'Settng error flag Case 5 trip Index = '||i);
4738: fte_freight_pricing_util.print_msg(l_log_level,'l_ipl_cnt >= l_line_cnt for trip_index:'||i);
4739: x_exceptions(i).check_tlqp_ouputfail:='Y';
4740: x_exceptions(i).not_on_pl_flag:='Y';
4741:
4742: --raise fte_freight_pricing_util.g_not_on_pricelist;
4738: fte_freight_pricing_util.print_msg(l_log_level,'l_ipl_cnt >= l_line_cnt for trip_index:'||i);
4739: x_exceptions(i).check_tlqp_ouputfail:='Y';
4740: x_exceptions(i).not_on_pl_flag:='Y';
4741:
4742: --raise fte_freight_pricing_util.g_not_on_pricelist;
4743: ELSIF (l_ipl_cnt_tab(i) > 0) THEN
4744: -- probably ok
4745: fte_freight_pricing_util.print_msg(l_log_level,'WARNING: SOME LINES HAD IPL !!! for trip_index:'||i);
4746: END IF;
4741:
4742: --raise fte_freight_pricing_util.g_not_on_pricelist;
4743: ELSIF (l_ipl_cnt_tab(i) > 0) THEN
4744: -- probably ok
4745: fte_freight_pricing_util.print_msg(l_log_level,'WARNING: SOME LINES HAD IPL !!! for trip_index:'||i);
4746: END IF;
4747:
4748: IF (l_error_flag_tab(i)=1)
4749: THEN
4746: END IF;
4747:
4748: IF (l_error_flag_tab(i)=1)
4749: THEN
4750: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,'Settng error flag Case 6 trip Index = '||i);
4751: x_exceptions(i).check_tlqp_ouputfail:='Y';
4752: x_exceptions(i).price_req_failed:='Y';
4753: --x_exceptions(i).exception_name:=fte_freight_pricing_util.g_qp_price_request_failed;
4754: END IF;
4749: THEN
4750: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_LOG,'Settng error flag Case 6 trip Index = '||i);
4751: x_exceptions(i).check_tlqp_ouputfail:='Y';
4752: x_exceptions(i).price_req_failed:='Y';
4753: --x_exceptions(i).exception_name:=fte_freight_pricing_util.g_qp_price_request_failed;
4754: END IF;
4755:
4756: i:=i+1;
4757: END LOOP;
4759:
4760:
4761:
4762:
4763: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4764: EXCEPTION
4765: WHEN fte_freight_pricing_util.g_not_on_pricelist THEN
4766: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4767: -- can use tokens here
4761:
4762:
4763: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4764: EXCEPTION
4765: WHEN fte_freight_pricing_util.g_not_on_pricelist THEN
4766: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4767: -- can use tokens here
4768: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_not_on_pricelist');
4769: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,'Following item quantity not found on pricelist :');
4764: EXCEPTION
4765: WHEN fte_freight_pricing_util.g_not_on_pricelist THEN
4766: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4767: -- can use tokens here
4768: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_not_on_pricelist');
4769: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,'Following item quantity not found on pricelist :');
4770: l_category := FTE_QP_ENGINE.g_I_line_extras_tbl(i).category_id;
4771: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,' Quantity = '||FTE_QP_ENGINE.g_I_line_quantity(i)||' '||FTE_QP_ENGINE.g_I_line_uom_code(i));
4772: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,' CategoryId = '||nvl(l_category,'Consolidated'));
4765: WHEN fte_freight_pricing_util.g_not_on_pricelist THEN
4766: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4767: -- can use tokens here
4768: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_not_on_pricelist');
4769: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,'Following item quantity not found on pricelist :');
4770: l_category := FTE_QP_ENGINE.g_I_line_extras_tbl(i).category_id;
4771: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,' Quantity = '||FTE_QP_ENGINE.g_I_line_quantity(i)||' '||FTE_QP_ENGINE.g_I_line_uom_code(i));
4772: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,' CategoryId = '||nvl(l_category,'Consolidated'));
4773: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4767: -- can use tokens here
4768: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_not_on_pricelist');
4769: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,'Following item quantity not found on pricelist :');
4770: l_category := FTE_QP_ENGINE.g_I_line_extras_tbl(i).category_id;
4771: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,' Quantity = '||FTE_QP_ENGINE.g_I_line_quantity(i)||' '||FTE_QP_ENGINE.g_I_line_uom_code(i));
4772: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,' CategoryId = '||nvl(l_category,'Consolidated'));
4773: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4774: WHEN fte_freight_pricing_util.g_qp_price_request_failed THEN
4775: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4768: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_not_on_pricelist');
4769: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,'Following item quantity not found on pricelist :');
4770: l_category := FTE_QP_ENGINE.g_I_line_extras_tbl(i).category_id;
4771: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,' Quantity = '||FTE_QP_ENGINE.g_I_line_quantity(i)||' '||FTE_QP_ENGINE.g_I_line_uom_code(i));
4772: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,' CategoryId = '||nvl(l_category,'Consolidated'));
4773: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4774: WHEN fte_freight_pricing_util.g_qp_price_request_failed THEN
4775: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4776: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_qp_price_request_failed');
4769: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,'Following item quantity not found on pricelist :');
4770: l_category := FTE_QP_ENGINE.g_I_line_extras_tbl(i).category_id;
4771: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,' Quantity = '||FTE_QP_ENGINE.g_I_line_quantity(i)||' '||FTE_QP_ENGINE.g_I_line_uom_code(i));
4772: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,' CategoryId = '||nvl(l_category,'Consolidated'));
4773: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4774: WHEN fte_freight_pricing_util.g_qp_price_request_failed THEN
4775: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4776: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_qp_price_request_failed');
4777: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4770: l_category := FTE_QP_ENGINE.g_I_line_extras_tbl(i).category_id;
4771: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,' Quantity = '||FTE_QP_ENGINE.g_I_line_quantity(i)||' '||FTE_QP_ENGINE.g_I_line_uom_code(i));
4772: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,' CategoryId = '||nvl(l_category,'Consolidated'));
4773: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4774: WHEN fte_freight_pricing_util.g_qp_price_request_failed THEN
4775: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4776: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_qp_price_request_failed');
4777: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4778: WHEN others THEN
4772: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,' CategoryId = '||nvl(l_category,'Consolidated'));
4773: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4774: WHEN fte_freight_pricing_util.g_qp_price_request_failed THEN
4775: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4776: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_qp_price_request_failed');
4777: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4778: WHEN others THEN
4779: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4780: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
4773: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4774: WHEN fte_freight_pricing_util.g_qp_price_request_failed THEN
4775: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4776: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_qp_price_request_failed');
4777: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4778: WHEN others THEN
4779: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4780: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
4781: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4776: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_qp_price_request_failed');
4777: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4778: WHEN others THEN
4779: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4780: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
4781: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4782: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4783:
4784: END check_tl_qp_op_err_multiple;
4777: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4778: WHEN others THEN
4779: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4780: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
4781: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4782: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4783:
4784: END check_tl_qp_op_err_multiple;
4785:
4778: WHEN others THEN
4779: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4780: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
4781: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4782: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4783:
4784: END check_tl_qp_op_err_multiple;
4785:
4786:
4799: i NUMBER;
4800: l_original_trip_index NUMBER;
4801: l_carrier_hash DBMS_UTILITY.NUMBER_ARRAY;
4802:
4803: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
4804: l_method_name VARCHAR2(50) := 'Identify_Same_Rate_Inputs';
4805:
4806: BEGIN
4807: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4804: l_method_name VARCHAR2(50) := 'Identify_Same_Rate_Inputs';
4805:
4806: BEGIN
4807: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4808: fte_freight_pricing_util.reset_dbg_vars;
4809: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
4810:
4811: x_same_rate_map.delete;
4812: l_carrier_hash.delete;
4805:
4806: BEGIN
4807: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4808: fte_freight_pricing_util.reset_dbg_vars;
4809: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
4810:
4811: x_same_rate_map.delete;
4812: l_carrier_hash.delete;
4813: i:=p_start_trip_index;
4826: AND (p_trip_tab(l_original_trip_index).price_list_id = p_trip_tab(i).price_list_id)
4827: AND (p_trip_tab(l_original_trip_index).trip_id = p_trip_tab(i).trip_id))
4828: THEN
4829: x_same_rate_map(i):=l_original_trip_index;
4830: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'trip Index :'||i||' same as trip Index:'||l_original_trip_index);
4831:
4832: END IF;
4833:
4834: END IF;
4837: END LOOP;
4838:
4839:
4840:
4841: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4842:
4843: EXCEPTION
4844:
4845: WHEN OTHERS THEN
4843: EXCEPTION
4844:
4845: WHEN OTHERS THEN
4846: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4847: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
4848: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4849: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
4850: END Identify_Same_Rate_Inputs;
4851:
4844:
4845: WHEN OTHERS THEN
4846: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4847: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
4848: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4849: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
4850: END Identify_Same_Rate_Inputs;
4851:
4852:
4845: WHEN OTHERS THEN
4846: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4847: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
4848: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4849: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
4850: END Identify_Same_Rate_Inputs;
4851:
4852:
4853: PROCEDURE Copy_Same_Rates(
4865: j NUMBER;
4866: k NUMBER;
4867: l_original_index NUMBER;
4868: l_stop_charge_reference NUMBER;
4869: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
4870: l_method_name VARCHAR2(50) := 'Copy_Same_Rates';
4871:
4872: BEGIN
4873: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4870: l_method_name VARCHAR2(50) := 'Copy_Same_Rates';
4871:
4872: BEGIN
4873: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4874: fte_freight_pricing_util.reset_dbg_vars;
4875: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
4876:
4877: i:=p_same_rate_map.FIRST;
4878: WHILE(i IS NOT NULL)
4871:
4872: BEGIN
4873: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4874: fte_freight_pricing_util.reset_dbg_vars;
4875: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
4876:
4877: i:=p_same_rate_map.FIRST;
4878: WHILE(i IS NOT NULL)
4879: LOOP
4902:
4903:
4904:
4905:
4906: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
4907:
4908: EXCEPTION
4909:
4910: WHEN OTHERS THEN
4908: EXCEPTION
4909:
4910: WHEN OTHERS THEN
4911: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4912: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
4913: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4914: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
4915:
4916: END Copy_Same_Rates;
4909:
4910: WHEN OTHERS THEN
4911: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4912: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
4913: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4914: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
4915:
4916: END Copy_Same_Rates;
4917:
4910: WHEN OTHERS THEN
4911: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4912: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
4913: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4914: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
4915:
4916: END Copy_Same_Rates;
4917:
4918:
4928: x_exceptions_tab OUT NOCOPY FTE_TL_CORE.tl_exceptions_tab_type,
4929: x_return_status OUT NOCOPY VARCHAR2) IS
4930:
4931:
4932: l_pricing_control_rec fte_freight_pricing.pricing_control_input_rec_type;
4933: l_pricing_engine_input_rec fte_freight_pricing.pricing_engine_input_rec_type;
4934: l_curr_line_idx NUMBER := 0;
4935: l_req_line_info_rec req_line_info_rec_type;
4936: l_qp_output_line_rows QP_PREQ_GRP.LINE_TBL_TYPE;
4929: x_return_status OUT NOCOPY VARCHAR2) IS
4930:
4931:
4932: l_pricing_control_rec fte_freight_pricing.pricing_control_input_rec_type;
4933: l_pricing_engine_input_rec fte_freight_pricing.pricing_engine_input_rec_type;
4934: l_curr_line_idx NUMBER := 0;
4935: l_req_line_info_rec req_line_info_rec_type;
4936: l_qp_output_line_rows QP_PREQ_GRP.LINE_TBL_TYPE;
4937: l_qp_output_detail_rows QP_PREQ_GRP.LINE_DETAIL_TBL_TYPE;
4942: l_trip_rec FTE_TL_CACHE.TL_trip_data_input_rec_type;
4943: i NUMBER;
4944: l_return_status VARCHAR2(1);
4945:
4946: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
4947: l_method_name VARCHAR2(50) := 'TL_Core_Multiple';
4948:
4949: BEGIN
4950:
4948:
4949: BEGIN
4950:
4951: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4952: fte_freight_pricing_util.reset_dbg_vars;
4953: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
4954:
4955: -- create request lines
4956: -- distance, time, ..
4949: BEGIN
4950:
4951: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4952: fte_freight_pricing_util.reset_dbg_vars;
4953: fte_freight_pricing_util.set_method(l_log_level,l_method_name);
4954:
4955: -- create request lines
4956: -- distance, time, ..
4957: -- for each request line - build qualifiers
4967: FTE_QP_ENGINE.clear_globals(x_return_status => l_return_status);
4968:
4969: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4970: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4971: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After clear_globals ');
4972: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_clear_globals_fl');
4973: raise FND_API.G_EXC_ERROR;
4974: END IF;
4975: END IF;
4968:
4969: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4970: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4971: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After clear_globals ');
4972: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_clear_globals_fl');
4973: raise FND_API.G_EXC_ERROR;
4974: END IF;
4975: END IF;
4976:
5010: -- these dates are set to the trip departure dates. For price list selection, only the
5011: -- trip departure date is used (not arrival).
5012:
5013:
5014: fte_freight_pricing.g_effectivity_dates.date_from:=p_trip_tab(i).planned_departure_date;
5015: fte_freight_pricing.g_effectivity_dates.date_to:=p_trip_tab(i).planned_departure_date;
5016:
5017:
5018: -- bug 3610889 : added new parameter p_implicit_non_dummy_cnt
5011: -- trip departure date is used (not arrival).
5012:
5013:
5014: fte_freight_pricing.g_effectivity_dates.date_from:=p_trip_tab(i).planned_departure_date;
5015: fte_freight_pricing.g_effectivity_dates.date_to:=p_trip_tab(i).planned_departure_date;
5016:
5017:
5018: -- bug 3610889 : added new parameter p_implicit_non_dummy_cnt
5019: --pass in the trip_index so that a reference to it is stored
5027: x_return_status => l_return_status );
5028:
5029: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5030: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5031: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
5032: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_eng_inp_failed');
5033: raise FND_API.G_EXC_ERROR;
5034: END IF;
5035: END IF;
5028:
5029: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5030: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5031: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After create_engine_inputs ');
5032: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_cr_eng_inp_failed');
5033: raise FND_API.G_EXC_ERROR;
5034: END IF;
5035: END IF;
5036:
5033: raise FND_API.G_EXC_ERROR;
5034: END IF;
5035: END IF;
5036:
5037: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'l_implicit_non_dummy_cnt = '||x_exceptions_tab(i).implicit_non_dummy_cnt);
5038:
5039:
5040: ELSE
5041: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'Not creating QP inputs for trip index i:'||i||' same rate as index'||l_same_rate_map(i));
5037: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'l_implicit_non_dummy_cnt = '||x_exceptions_tab(i).implicit_non_dummy_cnt);
5038:
5039:
5040: ELSE
5041: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'Not creating QP inputs for trip index i:'||i||' same rate as index'||l_same_rate_map(i));
5042: END IF;
5043: i:=i+1;
5044: END LOOP;
5045:
5048: -- fte_qp_engine.print_qp_input;
5049:
5050: -- call qp engine
5051:
5052: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'g_req_line_info_tab.COUNT = '||g_req_line_info_tab.COUNT);
5053:
5054: print_req_line_tab;
5055:
5056: fte_qp_engine.call_qp_api (
5059: x_return_status => l_return_status);
5060:
5061: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5062: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5063: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After call_qp_api ');
5064: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_call_qp_api_failed');
5065: raise FND_API.G_EXC_ERROR;
5066: END IF;
5067: END IF;
5060:
5061: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5062: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5063: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After call_qp_api ');
5064: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_call_qp_api_failed');
5065: raise FND_API.G_EXC_ERROR;
5066: END IF;
5067: END IF;
5068:
5079: x_return_status=>l_return_status);
5080:
5081: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5082: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5083: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After check_tl_qp_output_errors ');
5084: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_chk_qp_output_failed');
5085: raise FND_API.G_EXC_ERROR;
5086: END IF;
5087: END IF;
5080:
5081: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5082: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5083: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After check_tl_qp_output_errors ');
5084: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_chk_qp_output_failed');
5085: raise FND_API.G_EXC_ERROR;
5086: END IF;
5087: END IF;
5088:
5098: x_return_status=> l_return_status );
5099:
5100: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5101: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5102: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After check_qp_ipl_mulitple ');
5103: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_check_qp_ipl_failed');
5104: raise FND_API.G_EXC_ERROR;
5105: END IF;
5106: END IF;
5099:
5100: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5101: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5102: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After check_qp_ipl_mulitple ');
5103: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_check_qp_ipl_failed');
5104: raise FND_API.G_EXC_ERROR;
5105: END IF;
5106: END IF;
5107:
5125: x_return_status => l_return_status);
5126:
5127: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5128: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5129: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After retrieve_qp_output_multiple ');
5130: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_ret_qp_out_failed');
5131: raise FND_API.G_EXC_ERROR;
5132: END IF;
5133: END IF;
5126:
5127: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5128: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5129: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'After retrieve_qp_output_multiple ');
5130: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_tl_ret_qp_out_failed');
5131: raise FND_API.G_EXC_ERROR;
5132: END IF;
5133: END IF;
5134:
5148: p_end_trip_index => p_end_trip_index,
5149: p_trip_charges_tab => x_trip_charges_tab,
5150: p_stop_charges_tab => x_stop_charges_tab);
5151:
5152: fte_freight_pricing_util.unset_method(l_log_level,l_method_name);
5153:
5154: EXCEPTION
5155: WHEN FND_API.G_EXC_ERROR THEN
5156: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5153:
5154: EXCEPTION
5155: WHEN FND_API.G_EXC_ERROR THEN
5156: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5157: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
5158:
5159: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5160: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5161: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
5157: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
5158:
5159: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5160: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5161: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
5162:
5163: WHEN OTHERS THEN
5164: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5165: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
5161: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
5162:
5163: WHEN OTHERS THEN
5164: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5165: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
5166: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
5167: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
5168: END TL_Core_Multiple;
5169:
5162:
5163: WHEN OTHERS THEN
5164: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5165: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
5166: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
5167: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
5168: END TL_Core_Multiple;
5169:
5170:
5163: WHEN OTHERS THEN
5164: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5165: fte_freight_pricing_util.set_exception(l_method_name,l_log_level,'g_others');
5166: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
5167: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_method_name);
5168: END TL_Core_Multiple;
5169:
5170:
5171: