67:
68: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_DATE';
69:
70: BEGIN
71: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
72:
73: x_status := -1;
74:
75: IF (p_date IS NOT NULL) THEN
80: BEGIN
81: p_date := TO_DATE(p_date, FTE_BULKLOAD_PKG.G_DATE_FORMAT3);
82: EXCEPTION
83: WHEN OTHERS THEN
84: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_INCORRECT_DATE',
85: p_tokens => STRINGARRAY('DATE'),
86: p_values => STRINGARRAY(p_date));
87: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
88: p_msg => x_error_msg,
83: WHEN OTHERS THEN
84: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_INCORRECT_DATE',
85: p_tokens => STRINGARRAY('DATE'),
86: p_values => STRINGARRAY(p_date));
87: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
88: p_msg => x_error_msg,
89: p_category => 'D',
90: p_line_number => p_line_number);
91: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
87: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
88: p_msg => x_error_msg,
89: p_category => 'D',
90: p_line_number => p_line_number);
91: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
92: x_status := 1;
93: RETURN;
94: END;
95: END;
94: END;
95: END;
96:
97: IF (p_date IS NULL) THEN
98: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_INCORRECT_DATE',
99: p_tokens => STRINGARRAY('DATE'),
100: p_values => STRINGARRAY(p_date));
101: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
102: p_msg => x_error_msg,
97: IF (p_date IS NULL) THEN
98: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_INCORRECT_DATE',
99: p_tokens => STRINGARRAY('DATE'),
100: p_values => STRINGARRAY(p_date));
101: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
102: p_msg => x_error_msg,
103: p_category => 'D',
104: p_line_number => p_line_number);
105: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
101: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
102: p_msg => x_error_msg,
103: p_category => 'D',
104: p_line_number => p_line_number);
105: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
106: x_status := 1;
107: RETURN;
108: END IF;
109: END IF;
106: x_status := 1;
107: RETURN;
108: END IF;
109: END IF;
110: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
111: EXCEPTION
112: WHEN OTHERS THEN
113: x_error_msg := sqlerrm;
114: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
110: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
111: EXCEPTION
112: WHEN OTHERS THEN
113: x_error_msg := sqlerrm;
114: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
115: p_msg => sqlerrm,
116: p_category => 'O',
117: p_line_number => p_line_number);
118: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
114: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
115: p_msg => sqlerrm,
116: p_category => 'O',
117: p_line_number => p_line_number);
118: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
119: x_status := 1;
120: RETURN;
121: END VALIDATE_DATE;
122:
156: l_count NUMBER;
157: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.ADD_ATTRIBUTE';
158:
159: BEGIN
160: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
161:
162: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', p_pricing_attribute);
164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value from', p_attr_value_from);
159: BEGIN
160: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
161:
162: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', p_pricing_attribute);
164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value from', p_attr_value_from);
165: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value to', p_attr_value_to);
166: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line Number', p_line_number);
167: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', p_context);
160: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
161:
162: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', p_pricing_attribute);
164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value from', p_attr_value_from);
165: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value to', p_attr_value_to);
166: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line Number', p_line_number);
167: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', p_context);
168: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', p_comp_operator);
161:
162: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', p_pricing_attribute);
164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value from', p_attr_value_from);
165: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value to', p_attr_value_to);
166: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line Number', p_line_number);
167: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', p_context);
168: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', p_comp_operator);
169: END IF;
162: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', p_pricing_attribute);
164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value from', p_attr_value_from);
165: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value to', p_attr_value_to);
166: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line Number', p_line_number);
167: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', p_context);
168: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', p_comp_operator);
169: END IF;
170: x_status := -1;
163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', p_pricing_attribute);
164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value from', p_attr_value_from);
165: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value to', p_attr_value_to);
166: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line Number', p_line_number);
167: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', p_context);
168: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', p_comp_operator);
169: END IF;
170: x_status := -1;
171:
164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value from', p_attr_value_from);
165: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value to', p_attr_value_to);
166: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line Number', p_line_number);
167: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', p_context);
168: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', p_comp_operator);
169: END IF;
170: x_status := -1;
171:
172: l_pricing_attr_datatype := 'C';
235: p_qp_pricing_attrib_tbl(l_count).PRODUCT_ATTR_VALUE := 'ALL';
236: p_qp_pricing_attrib_tbl(l_count).PRODUCT_ATTRIBUTE_DATATYPE := 'C';
237: p_qp_pricing_attrib_tbl(l_count).PRICING_ATTRIBUTE_CONTEXT := p_context;
238:
239: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
240: EXCEPTION
241: WHEN OTHERS THEN
242: x_error_msg := sqlerrm;
243: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
239: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
240: EXCEPTION
241: WHEN OTHERS THEN
242: x_error_msg := sqlerrm;
243: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
244: p_msg => sqlerrm,
245: p_category => 'O',
246: p_line_number => p_line_number);
247: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
243: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
244: p_msg => sqlerrm,
245: p_category => 'O',
246: p_line_number => p_line_number);
247: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
248: x_status := 1;
249: RETURN;
250: END ADD_ATTRIBUTE;
251:
271: l_currency_code VARCHAR2(45);
272: l_carrier_currency VARCHAR2(45);
273: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_CURRENCY';
274: BEGIN
275: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
276:
277: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
278: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', p_currency);
279: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
274: BEGIN
275: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
276:
277: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
278: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', p_currency);
279: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
280: END IF;
281: x_status := -1;
282:
275: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
276:
277: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
278: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', p_currency);
279: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
280: END IF;
281: x_status := -1;
282:
283: l_currency_code := FTE_UTIL_PKG.GET_FND_CURRENCY(p_currency, x_status, x_error_msg);
279: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
280: END IF;
281: x_status := -1;
282:
283: l_currency_code := FTE_UTIL_PKG.GET_FND_CURRENCY(p_currency, x_status, x_error_msg);
284:
285: IF (x_status <> -1 OR l_currency_code IS NULL) THEN
286: x_error_msg := FTE_UTIL_PKG.GET_MSG ('FTE_CURRENCY_NOT_FOUND'); -- new message
287: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
282:
283: l_currency_code := FTE_UTIL_PKG.GET_FND_CURRENCY(p_currency, x_status, x_error_msg);
284:
285: IF (x_status <> -1 OR l_currency_code IS NULL) THEN
286: x_error_msg := FTE_UTIL_PKG.GET_MSG ('FTE_CURRENCY_NOT_FOUND'); -- new message
287: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
288: p_msg => x_error_msg,
289: p_category => 'D',
290: p_line_number => p_line_number);
283: l_currency_code := FTE_UTIL_PKG.GET_FND_CURRENCY(p_currency, x_status, x_error_msg);
284:
285: IF (x_status <> -1 OR l_currency_code IS NULL) THEN
286: x_error_msg := FTE_UTIL_PKG.GET_MSG ('FTE_CURRENCY_NOT_FOUND'); -- new message
287: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
288: p_msg => x_error_msg,
289: p_category => 'D',
290: p_line_number => p_line_number);
291:
288: p_msg => x_error_msg,
289: p_category => 'D',
290: p_line_number => p_line_number);
291:
292: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
293: RETURN;
294: END IF;
295:
296: IF (p_carrier_id is not NULL) THEN
300: WHERE carrier_id = p_carrier_id;
301:
302: EXCEPTION
303: WHEN NO_DATA_FOUND THEN
304: x_error_msg := Fte_Util_Pkg.Get_Msg(P_Name => 'FTE_SEL_INVALID_CARRIER');
305: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
306: p_msg => x_error_msg,
307: p_category => 'D',
308: p_line_number => p_line_number);
301:
302: EXCEPTION
303: WHEN NO_DATA_FOUND THEN
304: x_error_msg := Fte_Util_Pkg.Get_Msg(P_Name => 'FTE_SEL_INVALID_CARRIER');
305: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
306: p_msg => x_error_msg,
307: p_category => 'D',
308: p_line_number => p_line_number);
309: x_status := 2;
306: p_msg => x_error_msg,
307: p_category => 'D',
308: p_line_number => p_line_number);
309: x_status := 2;
310: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
311: RETURN;
312: END;
313:
314: IF ((l_carrier_currency <> p_currency AND l_carrier_currency <> l_currency_code) OR l_carrier_currency IS NULL) THEN
311: RETURN;
312: END;
313:
314: IF ((l_carrier_currency <> p_currency AND l_carrier_currency <> l_currency_code) OR l_carrier_currency IS NULL) THEN
315: x_error_msg := Fte_Util_Pkg.Get_Msg(P_Name => 'FTE_INVALID_CARRIER_CURRENCY');
316: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
317: p_msg => x_error_msg,
318: p_category => 'D',
319: p_line_number => p_line_number);
312: END;
313:
314: IF ((l_carrier_currency <> p_currency AND l_carrier_currency <> l_currency_code) OR l_carrier_currency IS NULL) THEN
315: x_error_msg := Fte_Util_Pkg.Get_Msg(P_Name => 'FTE_INVALID_CARRIER_CURRENCY');
316: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
317: p_msg => x_error_msg,
318: p_category => 'D',
319: p_line_number => p_line_number);
320: x_status := 2;
317: p_msg => x_error_msg,
318: p_category => 'D',
319: p_line_number => p_line_number);
320: x_status := 2;
321: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
322: RETURN;
323: END IF;
324: END IF;
325: --cache
322: RETURN;
323: END IF;
324: END IF;
325: --cache
326: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
327: RETURN;
328: EXCEPTION
329: WHEN OTHERS THEN
330: x_error_msg := sqlerrm;
327: RETURN;
328: EXCEPTION
329: WHEN OTHERS THEN
330: x_error_msg := sqlerrm;
331: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
332: p_msg => sqlerrm,
333: p_category => 'O',
334: p_line_number => p_line_number);
335: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
331: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
332: p_msg => sqlerrm,
333: p_category => 'O',
334: p_line_number => p_line_number);
335: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
336: x_status := 1;
337: RETURN;
338: END VALIDATE_CURRENCY;
339:
384: l_result VARCHAR2(7);
385:
386: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.GET_FREQ_CODE';
387: BEGIN
388: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
389:
390: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
391: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency', p_frequency);
392: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
387: BEGIN
388: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
389:
390: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
391: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency', p_frequency);
392: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
393: END IF;
394: x_status := -1;
395:
388: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
389:
390: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
391: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency', p_frequency);
392: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
393: END IF;
394: x_status := -1;
395:
396: IF (INSTR(l_freq, 'SUN') > 0) THEN
419:
420: IF (INSTR(l_freq, 'SAT') > 0) THEN
421: l_result := l_result || '7';
422: END IF;
423: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
424: RETURN l_result;
425: EXCEPTION
426: WHEN OTHERS THEN
427: x_error_msg := sqlerrm;
424: RETURN l_result;
425: EXCEPTION
426: WHEN OTHERS THEN
427: x_error_msg := sqlerrm;
428: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
429: p_msg => x_error_msg,
430: p_category => 'O',
431: p_line_number => p_line_number);
432: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
428: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
429: p_msg => x_error_msg,
430: p_category => 'O',
431: p_line_number => p_line_number);
432: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
433: x_status := 1;
434: RETURN NULL;
435: END GET_FREQ_CODE;
436:
460: l_ind NUMBER;
461: l_day NUMBER;
462: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.CALCULATE_FREQ_ARRIVAL';
463: BEGIN
464: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
465:
466: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
467: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency', p_frequency);
468: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Indicator', p_ind);
463: BEGIN
464: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
465:
466: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
467: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency', p_frequency);
468: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Indicator', p_ind);
469: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
470: END IF;
471: x_status := -1;
464: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
465:
466: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
467: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency', p_frequency);
468: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Indicator', p_ind);
469: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
470: END IF;
471: x_status := -1;
472:
465:
466: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
467: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency', p_frequency);
468: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Indicator', p_ind);
469: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
470: END IF;
471: x_status := -1;
472:
473: IF (p_ind <> 0) THEN
481: ELSE
482: l_arrival := l_arrival || (MOD((l_day + l_ind), 7));
483: END IF;
484: END LOOP;
485: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
486: RETURN l_arrival;
487: EXCEPTION
488: WHEN OTHERS THEN
489: x_error_msg := sqlerrm;
486: RETURN l_arrival;
487: EXCEPTION
488: WHEN OTHERS THEN
489: x_error_msg := sqlerrm;
490: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
491: p_msg => x_error_msg,
492: p_category => 'O',
493: p_line_number => p_line_number);
494: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
490: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
491: p_msg => x_error_msg,
492: p_category => 'O',
493: p_line_number => p_line_number);
494: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
495: x_status := 1;
496: RETURN NULL;
497: END CALCULATE_FREQ_ARRIVAL;
498:
521: l_rate_type VARCHAR2(100);
522: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_RATE_TYPE';
523:
524: BEGIN
525: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
526:
527: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
528: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate type', p_rate_type);
529: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
524: BEGIN
525: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
526:
527: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
528: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate type', p_rate_type);
529: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
530: END IF;
531: x_status := -1;
532: l_rate_type := UPPER(p_rate_type);
525: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
526:
527: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
528: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate type', p_rate_type);
529: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
530: END IF;
531: x_status := -1;
532: l_rate_type := UPPER(p_rate_type);
533:
539: --block unit always has breaks.
540: l_rate_type := 'BREAKUNIT_PRICE';
541: ELSIF (p_rate_type NOT IN ('LUMPSUM')) THEN
542: x_status := 2;
543: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_RATE_TYPE_INVALID',
544: p_tokens => STRINGARRAY('TYPE'),
545: p_values => STRINGARRAY(p_rate_type));
546:
547: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
543: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_RATE_TYPE_INVALID',
544: p_tokens => STRINGARRAY('TYPE'),
545: p_values => STRINGARRAY(p_rate_type));
546:
547: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
548: p_msg => x_error_msg,
549: p_category => 'D',
550: p_line_number => p_line_number);
551:
550: p_line_number => p_line_number);
551:
552: END IF;
553:
554: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
555: return l_rate_type;
556: EXCEPTION
557: WHEN OTHERS THEN
558: x_error_msg := sqlerrm;
555: return l_rate_type;
556: EXCEPTION
557: WHEN OTHERS THEN
558: x_error_msg := sqlerrm;
559: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
560: p_msg => x_error_msg,
561: p_category => 'O',
562: p_line_number => p_line_number);
563: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
559: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
560: p_msg => x_error_msg,
561: p_category => 'O',
562: p_line_number => p_line_number);
563: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
564: x_status := 1;
565: RETURN NULL;
566: END Validate_Rate_Type;
567:
592:
593: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_SUBTYPE';
594:
595: BEGIN
596: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
597:
598: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
599: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', p_subtype);
600: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
595: BEGIN
596: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
597:
598: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
599: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', p_subtype);
600: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
601: END IF;
602: x_status := -1;
603:
596: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
597:
598: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
599: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', p_subtype);
600: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
601: END IF;
602: x_status := -1;
603:
604: SELECT name INTO l_subtype
605: FROM wsh_freight_cost_types
606: WHERE freight_cost_type_code = 'FTECHARGE'
607: AND name = upper(p_subtype);
608:
609: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
610:
611: RETURN l_subtype;
612: EXCEPTION
613: WHEN NO_DATA_FOUND THEN
610:
611: RETURN l_subtype;
612: EXCEPTION
613: WHEN NO_DATA_FOUND THEN
614: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
615: RETURN NULL;
616: WHEN OTHERS THEN
617: x_error_msg := sqlerrm;
618: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
614: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
615: RETURN NULL;
616: WHEN OTHERS THEN
617: x_error_msg := sqlerrm;
618: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
619: p_msg => x_error_msg,
620: p_category => 'O',
621: p_line_number => p_line_number);
622: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
618: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
619: p_msg => x_error_msg,
620: p_category => 'O',
621: p_line_number => p_line_number);
622: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
623: x_status := 1;
624: RETURN NULL;
625: END Validate_Subtype;
626:
657: l_carrier_name VARCHAR2(100);
658: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_SERVICE_LEVEL';
659:
660: BEGIN
661: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
662:
663: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
664: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
665: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier Name', p_carrier_name);
660: BEGIN
661: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
662:
663: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
664: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
665: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier Name', p_carrier_name);
666: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service Level', p_service_level);
667: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
668: END IF;
661: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
662:
663: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
664: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
665: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier Name', p_carrier_name);
666: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service Level', p_service_level);
667: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
668: END IF;
669: x_status := -1;
662:
663: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
664: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
665: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier Name', p_carrier_name);
666: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service Level', p_service_level);
667: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
668: END IF;
669: x_status := -1;
670:
663: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
664: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
665: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier Name', p_carrier_name);
666: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service Level', p_service_level);
667: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
668: END IF;
669: x_status := -1;
670:
671: IF (p_service_level IS NULL) THEN
668: END IF;
669: x_status := -1;
670:
671: IF (p_service_level IS NULL) THEN
672: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_NO_SERVICE');
673: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
674: p_msg => x_error_msg,
675: p_category => 'A',
676: p_line_number => p_line_number);
669: x_status := -1;
670:
671: IF (p_service_level IS NULL) THEN
672: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_NO_SERVICE');
673: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
674: p_msg => x_error_msg,
675: p_category => 'A',
676: p_line_number => p_line_number);
677: x_status := 1;
674: p_msg => x_error_msg,
675: p_category => 'A',
676: p_line_number => p_line_number);
677: x_status := 1;
678: FTE_UTIL_PKG.Exit_Debug(l_module_name);
679: RETURN NULL;
680: END IF;
681:
682: l_service_code := FTE_UTIL_PKG.GET_LOOKUP_CODE('WSH_SERVICE_LEVELS', p_service_level);
678: FTE_UTIL_PKG.Exit_Debug(l_module_name);
679: RETURN NULL;
680: END IF;
681:
682: l_service_code := FTE_UTIL_PKG.GET_LOOKUP_CODE('WSH_SERVICE_LEVELS', p_service_level);
683:
684: IF (l_service_code IS NULL) THEN
685: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_SERVICE_UNKNOWN',
686: P_Tokens => STRINGARRAY('SERVICE_TYPE'),
681:
682: l_service_code := FTE_UTIL_PKG.GET_LOOKUP_CODE('WSH_SERVICE_LEVELS', p_service_level);
683:
684: IF (l_service_code IS NULL) THEN
685: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_SERVICE_UNKNOWN',
686: P_Tokens => STRINGARRAY('SERVICE_TYPE'),
687: P_values => STRINGARRAY(p_service_level));
688: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
689: p_msg => x_error_msg,
684: IF (l_service_code IS NULL) THEN
685: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_SERVICE_UNKNOWN',
686: P_Tokens => STRINGARRAY('SERVICE_TYPE'),
687: P_values => STRINGARRAY(p_service_level));
688: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
689: p_msg => x_error_msg,
690: p_category => 'B',
691: p_line_number => p_line_number);
692: x_status := 1;
689: p_msg => x_error_msg,
690: p_category => 'B',
691: p_line_number => p_line_number);
692: x_status := 1;
693: FTE_UTIL_PKG.Exit_Debug(l_module_name);
694: RETURN NULL;
695: END IF;
696:
697: IF (p_carrier_id IS NOT NULL) THEN
696:
697: IF (p_carrier_id IS NOT NULL) THEN
698: l_carrier_id := p_carrier_id;
699: ELSIF (p_carrier_name IS NOT NULL) THEN
700: l_carrier_id := FTE_UTIL_PKG.Get_Carrier_Id(p_carrier_name => p_carrier_name);
701:
702: IF (x_status <> -1) THEN
703: FTE_UTIL_PKG.Exit_Debug(l_module_name);
704: RETURN NULL;
699: ELSIF (p_carrier_name IS NOT NULL) THEN
700: l_carrier_id := FTE_UTIL_PKG.Get_Carrier_Id(p_carrier_name => p_carrier_name);
701:
702: IF (x_status <> -1) THEN
703: FTE_UTIL_PKG.Exit_Debug(l_module_name);
704: RETURN NULL;
705: END IF;
706: ELSE
707: FTE_UTIL_PKG.Exit_Debug(l_module_name);
703: FTE_UTIL_PKG.Exit_Debug(l_module_name);
704: RETURN NULL;
705: END IF;
706: ELSE
707: FTE_UTIL_PKG.Exit_Debug(l_module_name);
708: RETURN l_service_code;
709: END IF;
710:
711: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
708: RETURN l_service_code;
709: END IF;
710:
711: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
712: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service Code', l_service_code);
713: END IF;
714:
715: --Verify that the carrier has the correct service level
716: BEGIN
722: AND rownum = 1;
723: EXCEPTION
724: WHEN NO_DATA_FOUND THEN
725: IF (p_carrier_name IS NULL) THEN
726: l_carrier_name := FTE_UTIL_PKG.GET_CARRIER_NAME(p_carrier_id);
727: ELSE
728: l_carrier_name := p_carrier_name;
729: END IF;
730:
727: ELSE
728: l_carrier_name := p_carrier_name;
729: END IF;
730:
731: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CARRIER_SERVICE_INVALID',
732: p_tokens => STRINGARRAY('SERVICE_LEVEL', 'CARRIER_NAME'),
733: p_values => STRINGARRAY(p_service_level, l_carrier_name));
734:
735: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
731: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CARRIER_SERVICE_INVALID',
732: p_tokens => STRINGARRAY('SERVICE_LEVEL', 'CARRIER_NAME'),
733: p_values => STRINGARRAY(p_service_level, l_carrier_name));
734:
735: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
736: p_msg => x_error_msg,
737: p_category => 'D',
738: p_line_number => p_line_number);
739:
737: p_category => 'D',
738: p_line_number => p_line_number);
739:
740: x_status := 2;
741: FTE_UTIL_PKG.Exit_Debug(l_module_name);
742: return null;
743: END;
744:
745: FTE_UTIL_PKG.Exit_Debug(l_module_name);
741: FTE_UTIL_PKG.Exit_Debug(l_module_name);
742: return null;
743: END;
744:
745: FTE_UTIL_PKG.Exit_Debug(l_module_name);
746: RETURN l_service_code;
747:
748: EXCEPTION
749: WHEN OTHERS THEN
747:
748: EXCEPTION
749: WHEN OTHERS THEN
750: x_error_msg := sqlerrm;
751: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
752: p_msg => x_error_msg,
753: p_category => 'O',
754: p_line_number => p_line_number);
755: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
751: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
752: p_msg => x_error_msg,
753: p_category => 'O',
754: p_line_number => p_line_number);
755: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
756: x_status := 2;
757: RETURN NULL;
758: END Validate_Service_Level;
759:
804: AND parameter_name = p_name
805: AND lane_function = p_lane_function;
806:
807: BEGIN
808: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
809:
810: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
811: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
812: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Function', p_lane_function);
807: BEGIN
808: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
809:
810: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
811: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
812: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Function', p_lane_function);
813: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', p_subtype);
814: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', p_name);
815: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
808: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
809:
810: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
811: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
812: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Function', p_lane_function);
813: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', p_subtype);
814: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', p_name);
815: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
816: IF (p_deficit_wt) THEN
809:
810: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
811: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
812: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Function', p_lane_function);
813: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', p_subtype);
814: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', p_name);
815: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
816: IF (p_deficit_wt) THEN
817: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'TRUE');
810: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
811: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
812: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Function', p_lane_function);
813: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', p_subtype);
814: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', p_name);
815: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
816: IF (p_deficit_wt) THEN
817: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'TRUE');
818: ELSE
811: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
812: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Function', p_lane_function);
813: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', p_subtype);
814: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', p_name);
815: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
816: IF (p_deficit_wt) THEN
817: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'TRUE');
818: ELSE
819: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'FALSE');
813: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', p_subtype);
814: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', p_name);
815: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
816: IF (p_deficit_wt) THEN
817: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'TRUE');
818: ELSE
819: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'FALSE');
820: END IF;
821: END IF;
815: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
816: IF (p_deficit_wt) THEN
817: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'TRUE');
818: ELSE
819: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'FALSE');
820: END IF;
821: END IF;
822: x_status := -1;
823:
834: IF (p_type = 'PARAMETER' AND p_lane_function = 'LTL' AND p_subtype = 'DEFICIT_WT' AND p_name = 'WT_BERAK_POINT') THEN
835: p_deficit_wt := true;
836: END IF;
837:
838: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
839: RETURN l_result;
840: EXCEPTION
841: WHEN OTHERS THEN
842: IF (GET_PARAMETER_ID1%ISOPEN) THEN
845: IF (GET_PARAMETER_ID2%ISOPEN) THEN
846: CLOSE GET_PARAMETER_ID2;
847: END IF;
848: x_error_msg := sqlerrm;
849: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
850: p_msg => x_error_msg,
851: p_category => 'O',
852: p_line_number => p_line_number);
853: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
849: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
850: p_msg => x_error_msg,
851: p_category => 'O',
852: p_line_number => p_line_number);
853: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
854: x_status := 2;
855: RETURN NULL;
856: END VALIDATE_NAME;
857:
878: x_error_msg OUT NOCOPY VARCHAR2) IS
879: l_basis VARCHAR2(100);
880: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_LANE_BASIS';
881: BEGIN
882: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
883:
884: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
885: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane ID', p_lane_id);
886: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
881: BEGIN
882: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
883:
884: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
885: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane ID', p_lane_id);
886: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
887: END IF;
888: x_status := -1;
889:
882: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
883:
884: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
885: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane ID', p_lane_id);
886: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
887: END IF;
888: x_status := -1;
889:
890: SELECT basis
896: p_lane_tbl(p_lane_tbl.COUNT).basis_flag := false;
897: ELSIF (l_basis = 'CONTAINER_ALL') THEN
898: p_lane_tbl(p_lane_tbl.COUNT).container_all_flag := true;
899: END IF;
900: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
901:
902: EXCEPTION
903: WHEN OTHERS THEN
904: x_error_msg := sqlerrm;
901:
902: EXCEPTION
903: WHEN OTHERS THEN
904: x_error_msg := sqlerrm;
905: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
906: p_msg => x_error_msg,
907: p_category => 'O',
908: p_line_number => p_line_number);
909: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
905: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
906: p_msg => x_error_msg,
907: p_category => 'O',
908: p_line_number => p_line_number);
909: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
910: x_status := 2;
911: RETURN;
912: END VERIFY_LANE_BASIS;
913:
957: AND nvl(s.enabled_flag,'N') = 'Y';
958:
959: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_CARRIER_SERVICE';
960: BEGIN
961: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
962:
963: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
964: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane ID', p_lane_id);
965: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
960: BEGIN
961: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
962:
963: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
964: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane ID', p_lane_id);
965: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
966: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service code', p_service_code);
967: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode', p_mode);
968: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
961: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
962:
963: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
964: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane ID', p_lane_id);
965: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
966: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service code', p_service_code);
967: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode', p_mode);
968: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
969: END IF;
962:
963: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
964: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane ID', p_lane_id);
965: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
966: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service code', p_service_code);
967: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode', p_mode);
968: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
969: END IF;
970: x_status := -1;
963: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
964: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane ID', p_lane_id);
965: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
966: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service code', p_service_code);
967: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode', p_mode);
968: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
969: END IF;
970: x_status := -1;
971:
964: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane ID', p_lane_id);
965: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
966: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service code', p_service_code);
967: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode', p_mode);
968: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
969: END IF;
970: x_status := -1;
971:
972: IF (p_lane_id IS NULL) THEN
981: CLOSE GET_CARRIER_SERVICE2;
982: END IF;
983:
984: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
985: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Result', l_result);
986: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Num Fetch', l_numfetch);
987: END IF;
988:
989:
982: END IF;
983:
984: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
985: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Result', l_result);
986: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Num Fetch', l_numfetch);
987: END IF;
988:
989:
990: IF (l_numfetch = 0 OR l_result IS NULL) THEN
987: END IF;
988:
989:
990: IF (l_numfetch = 0 OR l_result IS NULL) THEN
991: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
992: RETURN false;
993: ELSE
994: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
995: RETURN true;
990: IF (l_numfetch = 0 OR l_result IS NULL) THEN
991: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
992: RETURN false;
993: ELSE
994: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
995: RETURN true;
996: END IF;
997: EXCEPTION
998: WHEN OTHERS THEN
1003: CLOSE GET_CARRIER_SERVICE2;
1004: END IF;
1005:
1006: x_error_msg := sqlerrm;
1007: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1008: p_msg => x_error_msg,
1009: p_category => 'O',
1010: p_line_number => p_line_number);
1011: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1007: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1008: p_msg => x_error_msg,
1009: p_category => 'O',
1010: p_line_number => p_line_number);
1011: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1012: x_status := 2;
1013: RETURN FALSE;
1014: END VALIDATE_CARRIER_SERVICE;
1015:
1041: l_temp VARCHAR2(50) := '%';
1042: l_result NUMBER;
1043: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.IS_VALID_PRICELIST';
1044: BEGIN
1045: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1046:
1047: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1048: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service count', p_service_count);
1049: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Price prefix', p_price_prefix);
1044: BEGIN
1045: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1046:
1047: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1048: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service count', p_service_count);
1049: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Price prefix', p_price_prefix);
1050: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
1051: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1052: END IF;
1045: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1046:
1047: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1048: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service count', p_service_count);
1049: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Price prefix', p_price_prefix);
1050: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
1051: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1052: END IF;
1053: x_status := -1;
1046:
1047: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1048: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service count', p_service_count);
1049: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Price prefix', p_price_prefix);
1050: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
1051: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1052: END IF;
1053: x_status := -1;
1054:
1047: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1048: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service count', p_service_count);
1049: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Price prefix', p_price_prefix);
1050: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
1051: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1052: END IF;
1053: x_status := -1;
1054:
1055: FOR i IN 1..p_service_count LOOP
1059: p_carrier_id => p_carrier_id,
1060: p_attribute1 => l_temp);
1061:
1062: IF (l_result = -1) THEN
1063: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_PRICELIST_INVALID',
1064: p_tokens => STRINGARRAY('NAME'),
1065: p_values => STRINGARRAY(p_price_prefix || p_array(i)));
1066:
1067: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1063: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_PRICELIST_INVALID',
1064: p_tokens => STRINGARRAY('NAME'),
1065: p_values => STRINGARRAY(p_price_prefix || p_array(i)));
1066:
1067: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1068: p_msg => x_error_msg,
1069: p_category => 'D',
1070: p_line_number => p_line_number);
1071:
1069: p_category => 'D',
1070: p_line_number => p_line_number);
1071:
1072: x_status := 2;
1073: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1074: RETURN FALSE;
1075: END IF;
1076: END IF;
1077: END LOOP;
1075: END IF;
1076: END IF;
1077: END LOOP;
1078:
1079: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1080: RETURN TRUE;
1081: EXCEPTION
1082: WHEN OTHERS THEN
1083: x_error_msg := sqlerrm;
1080: RETURN TRUE;
1081: EXCEPTION
1082: WHEN OTHERS THEN
1083: x_error_msg := sqlerrm;
1084: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1085: p_msg => x_error_msg,
1086: p_category => 'O',
1087: p_line_number => p_line_number);
1088: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1084: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1085: p_msg => x_error_msg,
1086: p_category => 'O',
1087: p_line_number => p_line_number);
1088: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1089: x_status := 2;
1090: RETURN FALSE;
1091: END IS_VALID_PRICELIST;
1092:
1168: l_module_name CONSTANT VARCHAR2(100) := 'FTE.PLSQL.' || G_PKG_NAME || '.VALIDATE_COLUMNS';
1169: l_column STRINGARRAY := STRINGARRAY();
1170: l_found BOOLEAN := false;
1171: BEGIN
1172: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1173:
1174: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1175: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
1176: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1171: BEGIN
1172: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1173:
1174: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1175: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
1176: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1177: END IF;
1178: x_status := -1;
1179:
1172: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1173:
1174: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1175: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
1176: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1177: END IF;
1178: x_status := -1;
1179:
1180: l_column := GET_COLUMN(p_type);
1180: l_column := GET_COLUMN(p_type);
1181:
1182: IF (l_column is NULL) THEN
1183: x_status := 3;
1184: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_COLUMN_TYPE_INVALID');
1185: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1186: p_msg => x_error_msg,
1187: p_category => 'D',
1188: p_line_number => p_line_number);
1181:
1182: IF (l_column is NULL) THEN
1183: x_status := 3;
1184: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_COLUMN_TYPE_INVALID');
1185: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1186: p_msg => x_error_msg,
1187: p_category => 'D',
1188: p_line_number => p_line_number);
1189:
1186: p_msg => x_error_msg,
1187: p_category => 'D',
1188: p_line_number => p_line_number);
1189:
1190: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1191: RETURN;
1192: END IF;
1193:
1194: FOR i IN 1..l_column.COUNT LOOP
1193:
1194: FOR i IN 1..l_column.COUNT LOOP
1195: IF (NOT p_keys.EXISTS(l_column(i))) THEN
1196: x_status := 2;
1197: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_MISSING_COLUMN',
1198: p_tokens => STRINGARRAY('COLUMN', 'SECTION'),
1199: p_values => STRINGARRAY(l_column(i), p_type));
1200: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1201: p_msg => x_error_msg,
1196: x_status := 2;
1197: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_MISSING_COLUMN',
1198: p_tokens => STRINGARRAY('COLUMN', 'SECTION'),
1199: p_values => STRINGARRAY(l_column(i), p_type));
1200: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1201: p_msg => x_error_msg,
1202: p_category => 'D',
1203: p_line_number => p_line_number);
1204:
1207: END IF;
1208: END LOOP;
1209:
1210: IF (x_status <> -1) THEN
1211: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1212: RETURN;
1213: END IF;
1214:
1215: FOR i IN 1..FTE_BULKLOAD_PKG.g_block_header_index.COUNT LOOP
1214:
1215: FOR i IN 1..FTE_BULKLOAD_PKG.g_block_header_index.COUNT LOOP
1216: IF (FTE_BULKLOAD_PKG.g_block_header_index(i) IS NOT NULL) THEN
1217: x_status := 2;
1218: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_INVALID_COLUMN',
1219: P_Tokens => STRINGARRAY('COLUMN', 'SECTION'),
1220: p_values => STRINGARRAY(l_column(i), p_type));
1221:
1222: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1218: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_INVALID_COLUMN',
1219: P_Tokens => STRINGARRAY('COLUMN', 'SECTION'),
1220: p_values => STRINGARRAY(l_column(i), p_type));
1221:
1222: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1223: p_msg => x_error_msg,
1224: p_category => 'D',
1225: p_line_number => p_line_number);
1226: END IF;
1225: p_line_number => p_line_number);
1226: END IF;
1227: END LOOP;
1228:
1229: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1230: EXCEPTION
1231: WHEN OTHERS THEN
1232: x_error_msg := sqlerrm;
1233: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1229: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1230: EXCEPTION
1231: WHEN OTHERS THEN
1232: x_error_msg := sqlerrm;
1233: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1234: p_msg => x_error_msg,
1235: p_category => 'O',
1236: p_line_number => p_line_number);
1237: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1233: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1234: p_msg => x_error_msg,
1235: p_category => 'O',
1236: p_line_number => p_line_number);
1237: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1238: x_status := 1;
1239: RETURN;
1240: END VALIDATE_COLUMNS;
1241:
1259: x_status OUT NOCOPY NUMBER,
1260: x_error_msg OUT NOCOPY VARCHAR2) IS
1261: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_CARRIER';
1262: BEGIN
1263: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1264:
1265: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1266: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier Name', p_carrier_name);
1267: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1262: BEGIN
1263: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1264:
1265: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1266: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier Name', p_carrier_name);
1267: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1268: END IF;
1269: x_status := -1;
1270:
1263: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1264:
1265: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1266: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier Name', p_carrier_name);
1267: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1268: END IF;
1269: x_status := -1;
1270:
1271: p_carrier_id := -1;
1269: x_status := -1;
1270:
1271: p_carrier_id := -1;
1272: IF (p_carrier_name IS NOT NULL) THEN
1273: p_carrier_id := FTE_UTIL_PKG.GET_CARRIER_ID(p_carrier_name);
1274:
1275: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1276: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
1277: END IF;
1272: IF (p_carrier_name IS NOT NULL) THEN
1273: p_carrier_id := FTE_UTIL_PKG.GET_CARRIER_ID(p_carrier_name);
1274:
1275: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1276: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
1277: END IF;
1278: IF (p_carrier_id = -1) THEN
1279: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_CARRIER_INVALID',
1280: p_tokens => STRINGARRAY('CARRIER_NAME'),
1275: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1276: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
1277: END IF;
1278: IF (p_carrier_id = -1) THEN
1279: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_CARRIER_INVALID',
1280: p_tokens => STRINGARRAY('CARRIER_NAME'),
1281: p_values => STRINGARRAY(p_carrier_name));
1282:
1283: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1279: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_CARRIER_INVALID',
1280: p_tokens => STRINGARRAY('CARRIER_NAME'),
1281: p_values => STRINGARRAY(p_carrier_name));
1282:
1283: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1284: p_msg => x_error_msg,
1285: p_category => 'C',
1286: p_line_number => p_line_number);
1287: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1283: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1284: p_msg => x_error_msg,
1285: p_category => 'C',
1286: p_line_number => p_line_number);
1287: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1288: x_status := 1;
1289:
1290: RETURN;
1291: END IF;
1289:
1290: RETURN;
1291: END IF;
1292: ELSE
1293: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_CARRIER_MISSING');
1294: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1295: p_msg => x_error_msg,
1296: p_category => 'A',
1297: p_line_number => p_line_number);
1290: RETURN;
1291: END IF;
1292: ELSE
1293: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_CARRIER_MISSING');
1294: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1295: p_msg => x_error_msg,
1296: p_category => 'A',
1297: p_line_number => p_line_number);
1298: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1294: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1295: p_msg => x_error_msg,
1296: p_category => 'A',
1297: p_line_number => p_line_number);
1298: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1299: x_status := 1;
1300: RETURN;
1301: END IF;
1302: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1298: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1299: x_status := 1;
1300: RETURN;
1301: END IF;
1302: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1303: EXCEPTION
1304: WHEN OTHERS THEN
1305: x_error_msg := sqlerrm;
1306: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1302: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1303: EXCEPTION
1304: WHEN OTHERS THEN
1305: x_error_msg := sqlerrm;
1306: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1307: p_msg => x_error_msg,
1308: p_category => 'O',
1309: p_line_number => p_line_number);
1310: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1306: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1307: p_msg => x_error_msg,
1308: p_category => 'O',
1309: p_line_number => p_line_number);
1310: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1311: x_status := 1;
1312: RETURN;
1313: END VALIDATE_CARRIER;
1314:
1334: x_status OUT NOCOPY NUMBER,
1335: x_error_msg OUT NOCOPY VARCHAR2) IS
1336: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_LANE_NUMBER';
1337: BEGIN
1338: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1339:
1340: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1341: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Number', p_lane_number);
1342: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
1337: BEGIN
1338: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1339:
1340: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1341: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Number', p_lane_number);
1342: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
1343: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1344: END IF;
1345: x_status := -1;
1338: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1339:
1340: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1341: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Number', p_lane_number);
1342: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
1343: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1344: END IF;
1345: x_status := -1;
1346:
1339:
1340: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1341: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Number', p_lane_number);
1342: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
1343: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1344: END IF;
1345: x_status := -1;
1346:
1347: IF (p_lane_number IS NULL) THEN
1344: END IF;
1345: x_status := -1;
1346:
1347: IF (p_lane_number IS NULL) THEN
1348: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LANE_NUMBER_MISSING');
1349: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1350: p_msg => x_error_msg,
1351: p_category => 'A',
1352: p_line_number => p_line_number);
1345: x_status := -1;
1346:
1347: IF (p_lane_number IS NULL) THEN
1348: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LANE_NUMBER_MISSING');
1349: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1350: p_msg => x_error_msg,
1351: p_category => 'A',
1352: p_line_number => p_line_number);
1353: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1349: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1350: p_msg => x_error_msg,
1351: p_category => 'A',
1352: p_line_number => p_line_number);
1353: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1354: x_status := 1;
1355: RETURN;
1356: ELSIF (p_carrier_id <> -1) THEN
1357: -- Search for Lane Number in fte_lanes table
1357: -- Search for Lane Number in fte_lanes table
1358: -- Vijay: added clause to check if laneId is already populated
1359: p_lane_id := FTE_LANE_PKG.GET_LANE_ID(p_lane_number, p_carrier_id);
1360: IF (p_lane_id = -1) THEN
1361: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LANE_NUMBER_INVALID',
1362: p_tokens => STRINGARRAY('SERVICE_NUMBER'),
1363: p_values => STRINGARRAY(p_lane_number));
1364: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1365: p_msg => x_error_msg,
1360: IF (p_lane_id = -1) THEN
1361: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LANE_NUMBER_INVALID',
1362: p_tokens => STRINGARRAY('SERVICE_NUMBER'),
1363: p_values => STRINGARRAY(p_lane_number));
1364: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1365: p_msg => x_error_msg,
1366: p_category => 'C',
1367: p_line_number => p_line_number);
1368: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1364: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1365: p_msg => x_error_msg,
1366: p_category => 'C',
1367: p_line_number => p_line_number);
1368: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1369: x_status := 1;
1370: RETURN;
1371: END IF;
1372: END IF;
1369: x_status := 1;
1370: RETURN;
1371: END IF;
1372: END IF;
1373: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1374: EXCEPTION
1375: WHEN OTHERS THEN
1376: x_error_msg := sqlerrm;
1377: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1373: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1374: EXCEPTION
1375: WHEN OTHERS THEN
1376: x_error_msg := sqlerrm;
1377: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1378: p_msg => x_error_msg,
1379: p_category => 'O',
1380: p_line_number => p_line_number);
1381: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1377: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1378: p_msg => x_error_msg,
1379: p_category => 'O',
1380: p_line_number => p_line_number);
1381: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1382: x_status := 1;
1383: RETURN;
1384: END VALIDATE_LANE_NUMBER;
1385:
1403: x_status OUT NOCOPY NUMBER,
1404: x_error_msg OUT NOCOPY VARCHAR2) IS
1405: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_ACTION';
1406: BEGIN
1407: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1408:
1409: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1410: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
1411: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
1406: BEGIN
1407: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1408:
1409: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1410: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
1411: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
1412: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1413: END IF;
1414: x_status := -1;
1407: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1408:
1409: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1410: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
1411: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
1412: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1413: END IF;
1414: x_status := -1;
1415:
1408:
1409: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1410: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
1411: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
1412: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1413: END IF;
1414: x_status := -1;
1415:
1416: IF (p_action IS NULL) THEN
1413: END IF;
1414: x_status := -1;
1415:
1416: IF (p_action IS NULL) THEN
1417: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_MISSING');
1418: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1419: p_msg => x_error_msg,
1420: p_category => 'A',
1421: p_line_number => p_line_number);
1414: x_status := -1;
1415:
1416: IF (p_action IS NULL) THEN
1417: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_MISSING');
1418: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1419: p_msg => x_error_msg,
1420: p_category => 'A',
1421: p_line_number => p_line_number);
1422: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1418: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1419: p_msg => x_error_msg,
1420: p_category => 'A',
1421: p_line_number => p_line_number);
1422: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1423: x_status := 1;
1424: RETURN;
1425: ELSE
1426: p_action := UPPER(p_action);
1424: RETURN;
1425: ELSE
1426: p_action := UPPER(p_action);
1427: IF (p_type = 'ZONE' AND p_action <> 'ADD') THEN
1428: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_INVALID_ZONE',
1429: p_tokens => STRINGARRAY('ACTION'),
1430: p_values => STRINGARRAY(p_action));
1431: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1432: p_msg => x_error_msg,
1427: IF (p_type = 'ZONE' AND p_action <> 'ADD') THEN
1428: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_INVALID_ZONE',
1429: p_tokens => STRINGARRAY('ACTION'),
1430: p_values => STRINGARRAY(p_action));
1431: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1432: p_msg => x_error_msg,
1433: p_category => 'D',
1434: p_line_number => p_line_number);
1435: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1431: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1432: p_msg => x_error_msg,
1433: p_category => 'D',
1434: p_line_number => p_line_number);
1435: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1436: x_status := 1;
1437: RETURN;
1438: END IF;
1439:
1437: RETURN;
1438: END IF;
1439:
1440: IF (p_type = 'REGION' AND p_action <> 'ADD') THEN
1441: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_INVALID_REGION',
1442: p_tokens => STRINGARRAY('ACTION'),
1443: p_values => STRINGARRAY(p_action));
1444: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1445: p_msg => x_error_msg,
1440: IF (p_type = 'REGION' AND p_action <> 'ADD') THEN
1441: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_INVALID_REGION',
1442: p_tokens => STRINGARRAY('ACTION'),
1443: p_values => STRINGARRAY(p_action));
1444: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1445: p_msg => x_error_msg,
1446: p_category => 'D',
1447: p_line_number => p_line_number);
1448: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1444: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1445: p_msg => x_error_msg,
1446: p_category => 'D',
1447: p_line_number => p_line_number);
1448: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1449: x_status := 1;
1450: RETURN;
1451: END IF;
1452:
1450: RETURN;
1451: END IF;
1452:
1453: IF (p_type = 'TL_SERVICES' AND p_action = 'SYNC') THEN
1454: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_INVALID');
1455: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1456: p_msg => x_error_msg,
1457: p_category => 'D',
1458: p_line_number => p_line_number);
1451: END IF;
1452:
1453: IF (p_type = 'TL_SERVICES' AND p_action = 'SYNC') THEN
1454: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_INVALID');
1455: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1456: p_msg => x_error_msg,
1457: p_category => 'D',
1458: p_line_number => p_line_number);
1459: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1455: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1456: p_msg => x_error_msg,
1457: p_category => 'D',
1458: p_line_number => p_line_number);
1459: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1460: x_status := 1;
1461: RETURN;
1462: END IF;
1463:
1462: END IF;
1463:
1464: IF (p_type IN ('SERVICE_RATING_SETUP', 'TL_SERVICES', 'LANE_SERVICE')
1465: AND p_action NOT IN ('SYNC', 'DELETE', 'ADD', 'UPDATE')) THEN
1466: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_INVALID');
1467: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1468: p_msg => x_error_msg,
1469: p_category => 'D',
1470: p_line_number => p_line_number);
1463:
1464: IF (p_type IN ('SERVICE_RATING_SETUP', 'TL_SERVICES', 'LANE_SERVICE')
1465: AND p_action NOT IN ('SYNC', 'DELETE', 'ADD', 'UPDATE')) THEN
1466: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_INVALID');
1467: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1468: p_msg => x_error_msg,
1469: p_category => 'D',
1470: p_line_number => p_line_number);
1471: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1467: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1468: p_msg => x_error_msg,
1469: p_category => 'D',
1470: p_line_number => p_line_number);
1471: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1472: x_status := 1;
1473: RETURN;
1474: END IF;
1475:
1473: RETURN;
1474: END IF;
1475:
1476: IF (p_type = 'SCHEDULE' AND p_action NOT IN ('SYNC', 'DELETE', 'ADD')) THEN
1477: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_INVALID');
1478: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1479: p_msg => x_error_msg,
1480: p_category => 'D',
1481: p_line_number => p_line_number);
1474: END IF;
1475:
1476: IF (p_type = 'SCHEDULE' AND p_action NOT IN ('SYNC', 'DELETE', 'ADD')) THEN
1477: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_INVALID');
1478: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1479: p_msg => x_error_msg,
1480: p_category => 'D',
1481: p_line_number => p_line_number);
1482: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1478: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1479: p_msg => x_error_msg,
1480: p_category => 'D',
1481: p_line_number => p_line_number);
1482: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1483: x_status := 1;
1484: RETURN;
1485: END IF;
1486:
1484: RETURN;
1485: END IF;
1486:
1487: IF (p_type = 'LANE_COMMODITY_TYPE' AND p_action NOT IN ('ADD', 'DELETE')) THEN
1488: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_COMM_TYPES_INV_ACT');
1489: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1490: p_msg => x_error_msg,
1491: p_category => 'D',
1492: p_line_number => p_line_number);
1485: END IF;
1486:
1487: IF (p_type = 'LANE_COMMODITY_TYPE' AND p_action NOT IN ('ADD', 'DELETE')) THEN
1488: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_COMM_TYPES_INV_ACT');
1489: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1490: p_msg => x_error_msg,
1491: p_category => 'D',
1492: p_line_number => p_line_number);
1493: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1489: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1490: p_msg => x_error_msg,
1491: p_category => 'D',
1492: p_line_number => p_line_number);
1493: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1494: x_status := 1;
1495: RETURN;
1496: END IF;
1497:
1495: RETURN;
1496: END IF;
1497:
1498: IF (p_type = 'LANE_SERVICE_LEVEL' AND p_action NOT IN ('ADD', 'DELETE')) THEN
1499: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_SERV_TYPES_INV_ACT');
1500: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1501: p_msg => x_error_msg,
1502: p_category => 'D',
1503: p_line_number => p_line_number);
1496: END IF;
1497:
1498: IF (p_type = 'LANE_SERVICE_LEVEL' AND p_action NOT IN ('ADD', 'DELETE')) THEN
1499: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_SERV_TYPES_INV_ACT');
1500: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1501: p_msg => x_error_msg,
1502: p_category => 'D',
1503: p_line_number => p_line_number);
1504: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1500: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1501: p_msg => x_error_msg,
1502: p_category => 'D',
1503: p_line_number => p_line_number);
1504: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1505: x_status := 1;
1506: RETURN;
1507: END IF;
1508:
1506: RETURN;
1507: END IF;
1508:
1509: IF (p_type = 'LANE_RATE_CHART' AND p_action NOT IN ('ADD', 'DELETE')) THEN
1510: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_FIELD_RATE_CHART_INV_ACT');
1511: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1512: p_msg => x_error_msg,
1513: p_category => 'D',
1514: p_line_number => p_line_number);
1507: END IF;
1508:
1509: IF (p_type = 'LANE_RATE_CHART' AND p_action NOT IN ('ADD', 'DELETE')) THEN
1510: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_FIELD_RATE_CHART_INV_ACT');
1511: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1512: p_msg => x_error_msg,
1513: p_category => 'D',
1514: p_line_number => p_line_number);
1515: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1511: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1512: p_msg => x_error_msg,
1513: p_category => 'D',
1514: p_line_number => p_line_number);
1515: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1516: x_status := 1;
1517: RETURN;
1518: END IF;
1519:
1517: RETURN;
1518: END IF;
1519:
1520: IF (p_type = 'RATE_CHART' AND p_action NOT IN ('ADD', 'UPDATE', 'DELETE', 'APPEND')) THEN
1521: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_INVALID');
1522: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1523: p_msg => x_error_msg,
1524: p_category => 'D',
1525: p_line_number => p_line_number);
1518: END IF;
1519:
1520: IF (p_type = 'RATE_CHART' AND p_action NOT IN ('ADD', 'UPDATE', 'DELETE', 'APPEND')) THEN
1521: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_INVALID');
1522: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1523: p_msg => x_error_msg,
1524: p_category => 'D',
1525: p_line_number => p_line_number);
1526: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1522: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1523: p_msg => x_error_msg,
1524: p_category => 'D',
1525: p_line_number => p_line_number);
1526: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1527: x_status := 1;
1528: RETURN;
1529: END IF;
1530:
1528: RETURN;
1529: END IF;
1530:
1531: IF (p_type IN ('RATE_LINE', 'TL_SURCHARGES') AND p_action NOT IN ('ADD', 'UPDATE', 'DELETE')) THEN
1532: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_INVALID');
1533: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1534: p_msg => x_error_msg,
1535: p_category => 'D',
1536: p_line_number => p_line_number);
1529: END IF;
1530:
1531: IF (p_type IN ('RATE_LINE', 'TL_SURCHARGES') AND p_action NOT IN ('ADD', 'UPDATE', 'DELETE')) THEN
1532: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_INVALID');
1533: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1534: p_msg => x_error_msg,
1535: p_category => 'D',
1536: p_line_number => p_line_number);
1537: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1533: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1534: p_msg => x_error_msg,
1535: p_category => 'D',
1536: p_line_number => p_line_number);
1537: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1538: x_status := 1;
1539: RETURN;
1540: END IF;
1541:
1539: RETURN;
1540: END IF;
1541:
1542: IF (p_type IN ('RATING_ATTRIBUTE', 'RATE_BREAK') AND p_action NOT IN ('ADD', 'UPDATE')) THEN
1543: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_INVALID');
1544: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1545: p_msg => x_error_msg,
1546: p_category => 'D',
1547: p_line_number => p_line_number);
1540: END IF;
1541:
1542: IF (p_type IN ('RATING_ATTRIBUTE', 'RATE_BREAK') AND p_action NOT IN ('ADD', 'UPDATE')) THEN
1543: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_INVALID');
1544: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1545: p_msg => x_error_msg,
1546: p_category => 'D',
1547: p_line_number => p_line_number);
1548: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1544: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1545: p_msg => x_error_msg,
1546: p_category => 'D',
1547: p_line_number => p_line_number);
1548: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1549: x_status := 1;
1550: RETURN;
1551: END IF;
1552:
1550: RETURN;
1551: END IF;
1552:
1553: IF (p_type IN ('ADJUSTED_RATE_CHART', 'QUALIFIER') AND p_action <> 'ADD') THEN
1554: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_INVALID');
1555: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1556: p_msg => x_error_msg,
1557: p_category => 'D',
1558: p_line_number => p_line_number);
1551: END IF;
1552:
1553: IF (p_type IN ('ADJUSTED_RATE_CHART', 'QUALIFIER') AND p_action <> 'ADD') THEN
1554: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_ACTION_INVALID');
1555: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1556: p_msg => x_error_msg,
1557: p_category => 'D',
1558: p_line_number => p_line_number);
1559: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1555: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1556: p_msg => x_error_msg,
1557: p_category => 'D',
1558: p_line_number => p_line_number);
1559: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1560: x_status := 1;
1561: RETURN;
1562: END IF;
1563: END IF;
1560: x_status := 1;
1561: RETURN;
1562: END IF;
1563: END IF;
1564: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1565: EXCEPTION
1566: WHEN OTHERS THEN
1567: x_error_msg := sqlerrm;
1568: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1564: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1565: EXCEPTION
1566: WHEN OTHERS THEN
1567: x_error_msg := sqlerrm;
1568: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1569: p_msg => x_error_msg,
1570: p_category => 'O',
1571: p_line_number => p_line_number);
1572: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1568: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1569: p_msg => x_error_msg,
1570: p_category => 'O',
1571: p_line_number => p_line_number);
1572: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1573: x_status := 1;
1574: RETURN;
1575: END VALIDATE_ACTION;
1576:
1596: x_status OUT NOCOPY NUMBER,
1597: x_error_msg OUT NOCOPY VARCHAR2) IS
1598: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_UOM';
1599: BEGIN
1600: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1601:
1602: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1603: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM', p_uom);
1604: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Class', p_class);
1599: BEGIN
1600: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1601:
1602: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1603: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM', p_uom);
1604: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Class', p_class);
1605: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1606: END IF;
1607: x_status := -1;
1600: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1601:
1602: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1603: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM', p_uom);
1604: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Class', p_class);
1605: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1606: END IF;
1607: x_status := -1;
1608:
1601:
1602: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1603: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM', p_uom);
1604: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Class', p_class);
1605: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1606: END IF;
1607: x_status := -1;
1608:
1609: p_uom_code := FTE_UTIL_PKG.GET_UOM_CODE(p_uom, p_class);
1605: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1606: END IF;
1607: x_status := -1;
1608:
1609: p_uom_code := FTE_UTIL_PKG.GET_UOM_CODE(p_uom, p_class);
1610: IF (p_uom_code IS NULL) THEN
1611: IF (p_class IS NULL) THEN
1612: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_UOM_INVALID',
1613: p_tokens => STRINGARRAY('UOM'),
1608:
1609: p_uom_code := FTE_UTIL_PKG.GET_UOM_CODE(p_uom, p_class);
1610: IF (p_uom_code IS NULL) THEN
1611: IF (p_class IS NULL) THEN
1612: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_UOM_INVALID',
1613: p_tokens => STRINGARRAY('UOM'),
1614: p_values => STRINGARRAY(p_uom));
1615: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1616: p_msg => x_error_msg,
1611: IF (p_class IS NULL) THEN
1612: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_UOM_INVALID',
1613: p_tokens => STRINGARRAY('UOM'),
1614: p_values => STRINGARRAY(p_uom));
1615: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1616: p_msg => x_error_msg,
1617: p_category => 'B',
1618: p_line_number => p_line_number);
1619: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1615: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1616: p_msg => x_error_msg,
1617: p_category => 'B',
1618: p_line_number => p_line_number);
1619: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1620: x_status := 1;
1621: RETURN;
1622: ELSIF (p_class = 'Weight') THEN
1623: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_WT_UOM_INVALID',
1619: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1620: x_status := 1;
1621: RETURN;
1622: ELSIF (p_class = 'Weight') THEN
1623: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_WT_UOM_INVALID',
1624: p_tokens => STRINGARRAY('UOM'),
1625: p_values => STRINGARRAY(p_uom));
1626: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1627: p_msg => x_error_msg,
1622: ELSIF (p_class = 'Weight') THEN
1623: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_WT_UOM_INVALID',
1624: p_tokens => STRINGARRAY('UOM'),
1625: p_values => STRINGARRAY(p_uom));
1626: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1627: p_msg => x_error_msg,
1628: p_category => 'A',
1629: p_line_number => p_line_number);
1630: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1626: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1627: p_msg => x_error_msg,
1628: p_category => 'A',
1629: p_line_number => p_line_number);
1630: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1631: x_status := 1;
1632: RETURN;
1633: ELSIF (p_class = 'Volume') THEN
1634: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_VOL_UOM_INVALID',
1630: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1631: x_status := 1;
1632: RETURN;
1633: ELSIF (p_class = 'Volume') THEN
1634: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_VOL_UOM_INVALID',
1635: p_tokens => STRINGARRAY('UOM'),
1636: p_values => STRINGARRAY(p_uom));
1637: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1638: p_msg => x_error_msg,
1633: ELSIF (p_class = 'Volume') THEN
1634: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_VOL_UOM_INVALID',
1635: p_tokens => STRINGARRAY('UOM'),
1636: p_values => STRINGARRAY(p_uom));
1637: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1638: p_msg => x_error_msg,
1639: p_category => 'A',
1640: p_line_number => p_line_number);
1641: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1637: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1638: p_msg => x_error_msg,
1639: p_category => 'A',
1640: p_line_number => p_line_number);
1641: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1642: x_status := 1;
1643: RETURN;
1644: ELSIF (p_class = 'Length') THEN
1645: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_DIM_UOM_INVALID',
1641: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1642: x_status := 1;
1643: RETURN;
1644: ELSIF (p_class = 'Length') THEN
1645: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_DIM_UOM_INVALID',
1646: p_tokens => STRINGARRAY('UOM'),
1647: p_values =>STRINGARRAY(p_uom));
1648: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1649: p_msg => x_error_msg,
1644: ELSIF (p_class = 'Length') THEN
1645: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_DIM_UOM_INVALID',
1646: p_tokens => STRINGARRAY('UOM'),
1647: p_values =>STRINGARRAY(p_uom));
1648: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1649: p_msg => x_error_msg,
1650: p_category => 'A',
1651: p_line_number => p_line_number);
1652: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1648: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1649: p_msg => x_error_msg,
1650: p_category => 'A',
1651: p_line_number => p_line_number);
1652: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1653: x_status := 1;
1654: RETURN;
1655: ELSIF (p_class = 'Time') THEN
1656: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_UOM_INVALID',
1652: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1653: x_status := 1;
1654: RETURN;
1655: ELSIF (p_class = 'Time') THEN
1656: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_UOM_INVALID',
1657: p_tokens => STRINGARRAY('UOM'),
1658: p_values => STRINGARRAY(p_uom));
1659: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1660: p_msg => x_error_msg,
1655: ELSIF (p_class = 'Time') THEN
1656: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_UOM_INVALID',
1657: p_tokens => STRINGARRAY('UOM'),
1658: p_values => STRINGARRAY(p_uom));
1659: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1660: p_msg => x_error_msg,
1661: p_category => 'B',
1662: p_line_number => p_line_number);
1663: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1659: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1660: p_msg => x_error_msg,
1661: p_category => 'B',
1662: p_line_number => p_line_number);
1663: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1664: x_status := 1;
1665: RETURN;
1666: END IF;
1667: END IF;
1664: x_status := 1;
1665: RETURN;
1666: END IF;
1667: END IF;
1668: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1669: EXCEPTION
1670: WHEN OTHERS THEN
1671: x_error_msg := sqlerrm;
1672: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1668: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1669: EXCEPTION
1670: WHEN OTHERS THEN
1671: x_error_msg := sqlerrm;
1672: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1673: p_msg => x_error_msg,
1674: p_category => 'O',
1675: p_line_number => p_line_number);
1676: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1672: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1673: p_msg => x_error_msg,
1674: p_category => 'O',
1675: p_line_number => p_line_number);
1676: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1677: x_status := 1;
1678: RETURN;
1679: END VALIDATE_UOM;
1680:
1710: l_mode VARCHAR2(50);
1711:
1712: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_MODE_OF_TRANS';
1713: BEGIN
1714: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1715:
1716: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1717: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode', p_mode);
1718: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
1713: BEGIN
1714: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1715:
1716: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1717: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode', p_mode);
1718: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
1719: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1720: END IF;
1721: x_status := -1;
1714: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1715:
1716: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1717: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode', p_mode);
1718: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
1719: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1720: END IF;
1721: x_status := -1;
1722:
1715:
1716: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1717: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode', p_mode);
1718: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
1719: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1720: END IF;
1721: x_status := -1;
1722:
1723: IF (p_mode IS NULL) THEN
1720: END IF;
1721: x_status := -1;
1722:
1723: IF (p_mode IS NULL) THEN
1724: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_MODE_OF_TRANS_MISSING');
1725: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1726: p_msg => x_error_msg,
1727: p_category => 'A',
1728: p_line_number => p_line_number);
1721: x_status := -1;
1722:
1723: IF (p_mode IS NULL) THEN
1724: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_MODE_OF_TRANS_MISSING');
1725: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1726: p_msg => x_error_msg,
1727: p_category => 'A',
1728: p_line_number => p_line_number);
1729: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1725: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1726: p_msg => x_error_msg,
1727: p_category => 'A',
1728: p_line_number => p_line_number);
1729: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1730: x_status := 1;
1731: RETURN;
1732: ELSE
1733: p_mode_code := FTE_UTIL_PKG.GET_LOOKUP_CODE('WSH_MODE_OF_TRANSPORT', p_mode);
1729: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1730: x_status := 1;
1731: RETURN;
1732: ELSE
1733: p_mode_code := FTE_UTIL_PKG.GET_LOOKUP_CODE('WSH_MODE_OF_TRANSPORT', p_mode);
1734: IF (p_mode_code IS NOT NULL) THEN
1735: OPEN GET_CARRIER_MODE(p_carrier_id, p_mode_code);
1736: FETCH GET_CARRIER_MODE INTO l_mode;
1737: CLOSE GET_CARRIER_MODE;
1735: OPEN GET_CARRIER_MODE(p_carrier_id, p_mode_code);
1736: FETCH GET_CARRIER_MODE INTO l_mode;
1737: CLOSE GET_CARRIER_MODE;
1738: IF (l_mode IS NOT NULL) THEN
1739: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1740: RETURN;
1741: ELSE
1742: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CARRIER_MODE_INVALID',
1743: p_tokens => STRINGARRAY('MODE'),
1738: IF (l_mode IS NOT NULL) THEN
1739: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1740: RETURN;
1741: ELSE
1742: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CARRIER_MODE_INVALID',
1743: p_tokens => STRINGARRAY('MODE'),
1744: p_values => STRINGARRAY(p_mode));
1745: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1746: p_msg => x_error_msg,
1741: ELSE
1742: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CARRIER_MODE_INVALID',
1743: p_tokens => STRINGARRAY('MODE'),
1744: p_values => STRINGARRAY(p_mode));
1745: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1746: p_msg => x_error_msg,
1747: p_category => 'D',
1748: p_line_number => p_line_number);
1749: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1745: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1746: p_msg => x_error_msg,
1747: p_category => 'D',
1748: p_line_number => p_line_number);
1749: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1750: x_status := 1;
1751: RETURN;
1752: END IF;
1753: ELSE
1750: x_status := 1;
1751: RETURN;
1752: END IF;
1753: ELSE
1754: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_MODE_OF_TRANS_INVALID',
1755: p_tokens => STRINGARRAY('MODE'),
1756: p_values => STRINGARRAY(p_mode));
1757: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1758: p_msg => x_error_msg,
1753: ELSE
1754: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_MODE_OF_TRANS_INVALID',
1755: p_tokens => STRINGARRAY('MODE'),
1756: p_values => STRINGARRAY(p_mode));
1757: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1758: p_msg => x_error_msg,
1759: p_category => 'D',
1760: p_line_number => p_line_number);
1761: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1757: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1758: p_msg => x_error_msg,
1759: p_category => 'D',
1760: p_line_number => p_line_number);
1761: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1762: x_status := 1;
1763: RETURN;
1764: END IF;
1765: END IF;
1762: x_status := 1;
1763: RETURN;
1764: END IF;
1765: END IF;
1766: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1767: EXCEPTION
1768: WHEN OTHERS THEN
1769: IF (GET_CARRIER_MODE%ISOPEN) THEN
1770: CLOSE GET_CARRIER_MODE;
1769: IF (GET_CARRIER_MODE%ISOPEN) THEN
1770: CLOSE GET_CARRIER_MODE;
1771: END IF;
1772: x_error_msg := sqlerrm;
1773: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1774: p_msg => x_error_msg,
1775: p_category => 'O',
1776: p_line_number => p_line_number);
1777: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1773: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1774: p_msg => x_error_msg,
1775: p_category => 'O',
1776: p_line_number => p_line_number);
1777: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1778: x_status := 1;
1779: RETURN;
1780: END VALIDATE_MODE_OF_TRANS;
1781:
1811: l_mode_code VARCHAR2(100);
1812:
1813: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_RATING_ZONE_CHART';
1814: BEGIN
1815: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1816:
1817: x_status := -1;
1818:
1819: l_name_prefix := FTE_UTIL_PKG.GET_DATA('NAME_PREFIX', p_values);
1815: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1816:
1817: x_status := -1;
1818:
1819: l_name_prefix := FTE_UTIL_PKG.GET_DATA('NAME_PREFIX', p_values);
1820: l_mode_of_trans := FTE_UTIL_PKG.GET_DATA('MODE_OF_TRANSPORTATION', p_values);
1821: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
1822: l_price_prefix := FTE_UTIL_PKG.GET_DATA('RATE_CHART_PREFIX', p_values);
1823: l_view_flag := FTE_UTIL_PKG.GET_DATA('RATE_CHART_VIEW_FLAG', p_values);
1816:
1817: x_status := -1;
1818:
1819: l_name_prefix := FTE_UTIL_PKG.GET_DATA('NAME_PREFIX', p_values);
1820: l_mode_of_trans := FTE_UTIL_PKG.GET_DATA('MODE_OF_TRANSPORTATION', p_values);
1821: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
1822: l_price_prefix := FTE_UTIL_PKG.GET_DATA('RATE_CHART_PREFIX', p_values);
1823: l_view_flag := FTE_UTIL_PKG.GET_DATA('RATE_CHART_VIEW_FLAG', p_values);
1824: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
1817: x_status := -1;
1818:
1819: l_name_prefix := FTE_UTIL_PKG.GET_DATA('NAME_PREFIX', p_values);
1820: l_mode_of_trans := FTE_UTIL_PKG.GET_DATA('MODE_OF_TRANSPORTATION', p_values);
1821: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
1822: l_price_prefix := FTE_UTIL_PKG.GET_DATA('RATE_CHART_PREFIX', p_values);
1823: l_view_flag := FTE_UTIL_PKG.GET_DATA('RATE_CHART_VIEW_FLAG', p_values);
1824: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
1825: l_end_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
1818:
1819: l_name_prefix := FTE_UTIL_PKG.GET_DATA('NAME_PREFIX', p_values);
1820: l_mode_of_trans := FTE_UTIL_PKG.GET_DATA('MODE_OF_TRANSPORTATION', p_values);
1821: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
1822: l_price_prefix := FTE_UTIL_PKG.GET_DATA('RATE_CHART_PREFIX', p_values);
1823: l_view_flag := FTE_UTIL_PKG.GET_DATA('RATE_CHART_VIEW_FLAG', p_values);
1824: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
1825: l_end_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
1826:
1819: l_name_prefix := FTE_UTIL_PKG.GET_DATA('NAME_PREFIX', p_values);
1820: l_mode_of_trans := FTE_UTIL_PKG.GET_DATA('MODE_OF_TRANSPORTATION', p_values);
1821: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
1822: l_price_prefix := FTE_UTIL_PKG.GET_DATA('RATE_CHART_PREFIX', p_values);
1823: l_view_flag := FTE_UTIL_PKG.GET_DATA('RATE_CHART_VIEW_FLAG', p_values);
1824: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
1825: l_end_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
1826:
1827: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1820: l_mode_of_trans := FTE_UTIL_PKG.GET_DATA('MODE_OF_TRANSPORTATION', p_values);
1821: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
1822: l_price_prefix := FTE_UTIL_PKG.GET_DATA('RATE_CHART_PREFIX', p_values);
1823: l_view_flag := FTE_UTIL_PKG.GET_DATA('RATE_CHART_VIEW_FLAG', p_values);
1824: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
1825: l_end_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
1826:
1827: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1828: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name prefix', l_name_prefix );
1821: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
1822: l_price_prefix := FTE_UTIL_PKG.GET_DATA('RATE_CHART_PREFIX', p_values);
1823: l_view_flag := FTE_UTIL_PKG.GET_DATA('RATE_CHART_VIEW_FLAG', p_values);
1824: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
1825: l_end_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
1826:
1827: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1828: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name prefix', l_name_prefix );
1829: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode of transportation', l_mode_of_trans);
1824: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
1825: l_end_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
1826:
1827: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1828: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name prefix', l_name_prefix );
1829: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode of transportation', l_mode_of_trans);
1830: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name );
1831: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart prefix', l_price_prefix );
1832: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart view flag', l_view_flag );
1825: l_end_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
1826:
1827: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1828: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name prefix', l_name_prefix );
1829: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode of transportation', l_mode_of_trans);
1830: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name );
1831: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart prefix', l_price_prefix );
1832: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart view flag', l_view_flag );
1833: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date );
1826:
1827: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1828: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name prefix', l_name_prefix );
1829: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode of transportation', l_mode_of_trans);
1830: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name );
1831: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart prefix', l_price_prefix );
1832: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart view flag', l_view_flag );
1833: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date );
1834: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date );
1827: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1828: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name prefix', l_name_prefix );
1829: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode of transportation', l_mode_of_trans);
1830: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name );
1831: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart prefix', l_price_prefix );
1832: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart view flag', l_view_flag );
1833: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date );
1834: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date );
1835: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1828: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name prefix', l_name_prefix );
1829: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode of transportation', l_mode_of_trans);
1830: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name );
1831: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart prefix', l_price_prefix );
1832: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart view flag', l_view_flag );
1833: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date );
1834: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date );
1835: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1836: END IF;
1829: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode of transportation', l_mode_of_trans);
1830: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name );
1831: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart prefix', l_price_prefix );
1832: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart view flag', l_view_flag );
1833: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date );
1834: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date );
1835: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1836: END IF;
1837:
1830: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name );
1831: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart prefix', l_price_prefix );
1832: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart view flag', l_view_flag );
1833: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date );
1834: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date );
1835: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1836: END IF;
1837:
1838: -- carrier name validation
1831: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart prefix', l_price_prefix );
1832: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart view flag', l_view_flag );
1833: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date );
1834: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date );
1835: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1836: END IF;
1837:
1838: -- carrier name validation
1839: VALIDATE_CARRIER(p_carrier_name => l_carrier_name,
1842: x_status => x_status,
1843: x_error_msg => x_error_msg);
1844:
1845: IF (x_status <> -1) THEN
1846: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1847: RETURN;
1848: END IF;
1849:
1850: -- Mode of Transportation
1856: x_status => x_status,
1857: x_error_msg => x_error_msg);
1858:
1859: IF (x_status <> -1) THEN
1860: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1861: RETURN;
1862: END IF;
1863:
1864: IF (l_view_flag IS NULL) THEN
1863:
1864: IF (l_view_flag IS NULL) THEN
1865: l_view_flag := 'N';
1866: ELSIF (l_view_flag NOT IN ('Y', 'N')) THEN
1867: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_PRICELIST_VIEW_INVALID',
1868: p_tokens => STRINGARRAY('FLAG'),
1869: p_values => STRINGARRAY(l_view_flag));
1870: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1871: p_msg => x_error_msg,
1866: ELSIF (l_view_flag NOT IN ('Y', 'N')) THEN
1867: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_PRICELIST_VIEW_INVALID',
1868: p_tokens => STRINGARRAY('FLAG'),
1869: p_values => STRINGARRAY(l_view_flag));
1870: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1871: p_msg => x_error_msg,
1872: p_category => 'D',
1873: p_line_number => p_line_number);
1874: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1870: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1871: p_msg => x_error_msg,
1872: p_category => 'D',
1873: p_line_number => p_line_number);
1874: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1875: x_status := 1;
1876: RETURN;
1877: END IF;
1878:
1883: x_status => x_status,
1884: x_error_msg => x_error_msg);
1885:
1886: IF (x_status <> -1) THEN
1887: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1888: RETURN;
1889: END IF;
1890:
1891: -- Validation for END_DATE
1895: x_status => x_status,
1896: x_error_msg => x_error_msg);
1897:
1898: IF (x_status <> -1) THEN
1899: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1900: RETURN;
1901: END IF;
1902:
1903: --VALIDATE_EFFECTIVE_DATE
1904:
1905: p_chart_info := STRINGARRAY(l_name_prefix, l_mode_of_trans, '', l_carrier_name,
1906: l_price_prefix, l_view_flag, l_carrier_id,
1907: l_start_date, l_end_date);
1908: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1909: EXCEPTION
1910: WHEN OTHERS THEN
1911: x_error_msg := sqlerrm;
1912: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1908: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1909: EXCEPTION
1910: WHEN OTHERS THEN
1911: x_error_msg := sqlerrm;
1912: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1913: p_msg => x_error_msg,
1914: p_category => 'O',
1915: p_line_number => p_line_number);
1916: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1912: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1913: p_msg => x_error_msg,
1914: p_category => 'O',
1915: p_line_number => p_line_number);
1916: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1917: x_status := 1;
1918: RETURN;
1919: END VALIDATE_RATING_ZONE_CHART;
1920:
1952: l_service VARCHAR2(100);
1953:
1954: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_RATING_SETUP';
1955: BEGIN
1956: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1957:
1958: x_status := -1;
1959:
1960: l_service_type := FTE_UTIL_PKG.GET_DATA('SERVICE_LEVEL', p_values);
1956: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
1957:
1958: x_status := -1;
1959:
1960: l_service_type := FTE_UTIL_PKG.GET_DATA('SERVICE_LEVEL', p_values);
1961: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
1962: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
1963: l_name := FTE_UTIL_PKG.GET_DATA('NAME', p_values);
1964: l_value_from := FTE_UTIL_PKG.GET_DATA('VALUE_FROM', p_values);
1957:
1958: x_status := -1;
1959:
1960: l_service_type := FTE_UTIL_PKG.GET_DATA('SERVICE_LEVEL', p_values);
1961: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
1962: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
1963: l_name := FTE_UTIL_PKG.GET_DATA('NAME', p_values);
1964: l_value_from := FTE_UTIL_PKG.GET_DATA('VALUE_FROM', p_values);
1965: l_value_to := FTE_UTIL_PKG.GET_DATA('VALUE_TO', p_values);
1958: x_status := -1;
1959:
1960: l_service_type := FTE_UTIL_PKG.GET_DATA('SERVICE_LEVEL', p_values);
1961: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
1962: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
1963: l_name := FTE_UTIL_PKG.GET_DATA('NAME', p_values);
1964: l_value_from := FTE_UTIL_PKG.GET_DATA('VALUE_FROM', p_values);
1965: l_value_to := FTE_UTIL_PKG.GET_DATA('VALUE_TO', p_values);
1966: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
1959:
1960: l_service_type := FTE_UTIL_PKG.GET_DATA('SERVICE_LEVEL', p_values);
1961: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
1962: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
1963: l_name := FTE_UTIL_PKG.GET_DATA('NAME', p_values);
1964: l_value_from := FTE_UTIL_PKG.GET_DATA('VALUE_FROM', p_values);
1965: l_value_to := FTE_UTIL_PKG.GET_DATA('VALUE_TO', p_values);
1966: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
1967: l_currency := FTE_UTIL_PKG.GET_DATA('CURRENCY', p_values);
1960: l_service_type := FTE_UTIL_PKG.GET_DATA('SERVICE_LEVEL', p_values);
1961: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
1962: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
1963: l_name := FTE_UTIL_PKG.GET_DATA('NAME', p_values);
1964: l_value_from := FTE_UTIL_PKG.GET_DATA('VALUE_FROM', p_values);
1965: l_value_to := FTE_UTIL_PKG.GET_DATA('VALUE_TO', p_values);
1966: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
1967: l_currency := FTE_UTIL_PKG.GET_DATA('CURRENCY', p_values);
1968:
1961: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
1962: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
1963: l_name := FTE_UTIL_PKG.GET_DATA('NAME', p_values);
1964: l_value_from := FTE_UTIL_PKG.GET_DATA('VALUE_FROM', p_values);
1965: l_value_to := FTE_UTIL_PKG.GET_DATA('VALUE_TO', p_values);
1966: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
1967: l_currency := FTE_UTIL_PKG.GET_DATA('CURRENCY', p_values);
1968:
1969: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1962: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
1963: l_name := FTE_UTIL_PKG.GET_DATA('NAME', p_values);
1964: l_value_from := FTE_UTIL_PKG.GET_DATA('VALUE_FROM', p_values);
1965: l_value_to := FTE_UTIL_PKG.GET_DATA('VALUE_TO', p_values);
1966: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
1967: l_currency := FTE_UTIL_PKG.GET_DATA('CURRENCY', p_values);
1968:
1969: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1970: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service Level', l_service_type);
1963: l_name := FTE_UTIL_PKG.GET_DATA('NAME', p_values);
1964: l_value_from := FTE_UTIL_PKG.GET_DATA('VALUE_FROM', p_values);
1965: l_value_to := FTE_UTIL_PKG.GET_DATA('VALUE_TO', p_values);
1966: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
1967: l_currency := FTE_UTIL_PKG.GET_DATA('CURRENCY', p_values);
1968:
1969: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1970: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service Level', l_service_type);
1971: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type);
1966: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
1967: l_currency := FTE_UTIL_PKG.GET_DATA('CURRENCY', p_values);
1968:
1969: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1970: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service Level', l_service_type);
1971: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type);
1972: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype);
1973: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
1974: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value from', l_value_from);
1967: l_currency := FTE_UTIL_PKG.GET_DATA('CURRENCY', p_values);
1968:
1969: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1970: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service Level', l_service_type);
1971: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type);
1972: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype);
1973: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
1974: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value from', l_value_from);
1975: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value to', l_value_to);
1968:
1969: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1970: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service Level', l_service_type);
1971: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type);
1972: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype);
1973: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
1974: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value from', l_value_from);
1975: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value to', l_value_to);
1976: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Uom', l_uom);
1969: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
1970: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service Level', l_service_type);
1971: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type);
1972: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype);
1973: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
1974: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value from', l_value_from);
1975: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value to', l_value_to);
1976: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Uom', l_uom);
1977: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
1970: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service Level', l_service_type);
1971: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type);
1972: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype);
1973: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
1974: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value from', l_value_from);
1975: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value to', l_value_to);
1976: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Uom', l_uom);
1977: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
1978: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1971: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type);
1972: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype);
1973: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
1974: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value from', l_value_from);
1975: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value to', l_value_to);
1976: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Uom', l_uom);
1977: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
1978: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1979: END IF;
1972: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype);
1973: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
1974: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value from', l_value_from);
1975: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value to', l_value_to);
1976: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Uom', l_uom);
1977: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
1978: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1979: END IF;
1980:
1973: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
1974: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value from', l_value_from);
1975: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value to', l_value_to);
1976: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Uom', l_uom);
1977: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
1978: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1979: END IF;
1980:
1981: l_service := Validate_Service_Level (p_carrier_id => NULL,
1974: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value from', l_value_from);
1975: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value to', l_value_to);
1976: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Uom', l_uom);
1977: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
1978: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
1979: END IF;
1980:
1981: l_service := Validate_Service_Level (p_carrier_id => NULL,
1982: p_carrier_name => NULL,
1985: x_status => x_status,
1986: x_error_msg => x_error_msg);
1987:
1988: IF (x_status <> -1) THEN
1989: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1990: RETURN;
1991: END IF;
1992:
1993: l_count := p_setup_info.COUNT+1;
2000: END IF;
2001:
2002: p_last_service_type := l_service_type;
2003:
2004: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2005: EXCEPTION
2006: WHEN OTHERS THEN
2007: x_error_msg := sqlerrm;
2008: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2004: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2005: EXCEPTION
2006: WHEN OTHERS THEN
2007: x_error_msg := sqlerrm;
2008: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2009: p_msg => x_error_msg,
2010: p_category => 'O',
2011: p_line_number => p_line_number);
2012: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2008: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2009: p_msg => x_error_msg,
2010: p_category => 'O',
2011: p_line_number => p_line_number);
2012: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2013: x_status := 1;
2014: RETURN;
2015: END VALIDATE_RATING_SETUP;
2016:
2040: l_origin_city VARCHAR2(200);
2041:
2042: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_ORIGIN';
2043: BEGIN
2044: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
2045:
2046: x_status := -1;
2047:
2048: l_origin_postal := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_RANGE', p_values);
2044: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
2045:
2046: x_status := -1;
2047:
2048: l_origin_postal := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_RANGE', p_values);
2049: l_origin_country := FTE_UTIL_PKG.GET_DATA('COUNTRY', p_values);
2050: l_origin_state := FTE_UTIL_PKG.GET_DATA('STATE', p_values);
2051: l_origin_city := FTE_UTIL_PKG.GET_DATA('CITY', p_values);
2052:
2045:
2046: x_status := -1;
2047:
2048: l_origin_postal := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_RANGE', p_values);
2049: l_origin_country := FTE_UTIL_PKG.GET_DATA('COUNTRY', p_values);
2050: l_origin_state := FTE_UTIL_PKG.GET_DATA('STATE', p_values);
2051: l_origin_city := FTE_UTIL_PKG.GET_DATA('CITY', p_values);
2052:
2053: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2046: x_status := -1;
2047:
2048: l_origin_postal := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_RANGE', p_values);
2049: l_origin_country := FTE_UTIL_PKG.GET_DATA('COUNTRY', p_values);
2050: l_origin_state := FTE_UTIL_PKG.GET_DATA('STATE', p_values);
2051: l_origin_city := FTE_UTIL_PKG.GET_DATA('CITY', p_values);
2052:
2053: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2054: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Country', l_origin_country);
2047:
2048: l_origin_postal := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_RANGE', p_values);
2049: l_origin_country := FTE_UTIL_PKG.GET_DATA('COUNTRY', p_values);
2050: l_origin_state := FTE_UTIL_PKG.GET_DATA('STATE', p_values);
2051: l_origin_city := FTE_UTIL_PKG.GET_DATA('CITY', p_values);
2052:
2053: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2054: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Country', l_origin_country);
2055: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'State', l_origin_state);
2050: l_origin_state := FTE_UTIL_PKG.GET_DATA('STATE', p_values);
2051: l_origin_city := FTE_UTIL_PKG.GET_DATA('CITY', p_values);
2052:
2053: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2054: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Country', l_origin_country);
2055: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'State', l_origin_state);
2056: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'City', l_origin_city);
2057: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Postal', l_origin_postal);
2058: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2051: l_origin_city := FTE_UTIL_PKG.GET_DATA('CITY', p_values);
2052:
2053: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2054: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Country', l_origin_country);
2055: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'State', l_origin_state);
2056: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'City', l_origin_city);
2057: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Postal', l_origin_postal);
2058: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2059: END IF;
2052:
2053: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2054: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Country', l_origin_country);
2055: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'State', l_origin_state);
2056: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'City', l_origin_city);
2057: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Postal', l_origin_postal);
2058: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2059: END IF;
2060:
2053: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2054: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Country', l_origin_country);
2055: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'State', l_origin_state);
2056: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'City', l_origin_city);
2057: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Postal', l_origin_postal);
2058: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2059: END IF;
2060:
2061: IF (l_origin_country IS NULL) THEN
2054: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Country', l_origin_country);
2055: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'State', l_origin_state);
2056: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'City', l_origin_city);
2057: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Postal', l_origin_postal);
2058: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2059: END IF;
2060:
2061: IF (l_origin_country IS NULL) THEN
2062: l_origin_country := 'US';
2062: l_origin_country := 'US';
2063: END IF;
2064:
2065: IF (l_origin_postal IS NULL) THEN
2066: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_POSTAL_MISSING');
2067: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2068: p_msg => x_error_msg,
2069: p_category => 'A',
2070: p_line_number => p_line_number);
2063: END IF;
2064:
2065: IF (l_origin_postal IS NULL) THEN
2066: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_POSTAL_MISSING');
2067: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2068: p_msg => x_error_msg,
2069: p_category => 'A',
2070: p_line_number => p_line_number);
2071: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2067: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2068: p_msg => x_error_msg,
2069: p_category => 'A',
2070: p_line_number => p_line_number);
2071: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2072: x_status := 1;
2073: RETURN;
2074: END IF;
2075:
2074: END IF;
2075:
2076: p_origin := STRINGARRAY(l_origin_postal, l_origin_country, l_origin_state, l_origin_city);
2077:
2078: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2079: EXCEPTION
2080: WHEN OTHERS THEN
2081: x_error_msg := sqlerrm;
2082: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2078: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2079: EXCEPTION
2080: WHEN OTHERS THEN
2081: x_error_msg := sqlerrm;
2082: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2083: p_msg => x_error_msg,
2084: p_category => 'O',
2085: p_line_number => p_line_number);
2086: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2082: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2083: p_msg => x_error_msg,
2084: p_category => 'O',
2085: p_line_number => p_line_number);
2086: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2087: x_status := 1;
2088: RETURN;
2089: END VALIDATE_ORIGIN;
2090:
2127: l_result BOOLEAN := FALSE;
2128:
2129: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_DESTINATION';
2130: BEGIN
2131: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
2132:
2133: x_status := -1;
2134:
2135: --checking the service columns
2155: x_status => x_status,
2156: x_error_msg => x_error_msg);
2157:
2158: IF (x_status <> -1 OR NOT l_result) THEN
2159: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2160: RETURN;
2161: END IF;
2162:
2163: l_dest_postal := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_RANGE', p_values);
2159: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2160: RETURN;
2161: END IF;
2162:
2163: l_dest_postal := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_RANGE', p_values);
2164: l_dest_country := FTE_UTIL_PKG.GET_DATA('COUNTRY', p_values);
2165: l_dest_state := FTE_UTIL_PKG.GET_DATA('STATE', p_values);
2166: l_dest_city := FTE_UTIL_PKG.GET_DATA('CITY', p_values);
2167:
2160: RETURN;
2161: END IF;
2162:
2163: l_dest_postal := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_RANGE', p_values);
2164: l_dest_country := FTE_UTIL_PKG.GET_DATA('COUNTRY', p_values);
2165: l_dest_state := FTE_UTIL_PKG.GET_DATA('STATE', p_values);
2166: l_dest_city := FTE_UTIL_PKG.GET_DATA('CITY', p_values);
2167:
2168: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2161: END IF;
2162:
2163: l_dest_postal := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_RANGE', p_values);
2164: l_dest_country := FTE_UTIL_PKG.GET_DATA('COUNTRY', p_values);
2165: l_dest_state := FTE_UTIL_PKG.GET_DATA('STATE', p_values);
2166: l_dest_city := FTE_UTIL_PKG.GET_DATA('CITY', p_values);
2167:
2168: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2169: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Country', l_dest_country);
2162:
2163: l_dest_postal := FTE_UTIL_PKG.GET_DATA('POSTAL_CODE_RANGE', p_values);
2164: l_dest_country := FTE_UTIL_PKG.GET_DATA('COUNTRY', p_values);
2165: l_dest_state := FTE_UTIL_PKG.GET_DATA('STATE', p_values);
2166: l_dest_city := FTE_UTIL_PKG.GET_DATA('CITY', p_values);
2167:
2168: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2169: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Country', l_dest_country);
2170: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'State', l_dest_state);
2165: l_dest_state := FTE_UTIL_PKG.GET_DATA('STATE', p_values);
2166: l_dest_city := FTE_UTIL_PKG.GET_DATA('CITY', p_values);
2167:
2168: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2169: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Country', l_dest_country);
2170: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'State', l_dest_state);
2171: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'City', l_dest_city);
2172: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Postal', l_dest_postal);
2173: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2166: l_dest_city := FTE_UTIL_PKG.GET_DATA('CITY', p_values);
2167:
2168: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2169: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Country', l_dest_country);
2170: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'State', l_dest_state);
2171: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'City', l_dest_city);
2172: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Postal', l_dest_postal);
2173: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2174: END IF;
2167:
2168: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2169: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Country', l_dest_country);
2170: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'State', l_dest_state);
2171: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'City', l_dest_city);
2172: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Postal', l_dest_postal);
2173: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2174: END IF;
2175:
2168: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2169: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Country', l_dest_country);
2170: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'State', l_dest_state);
2171: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'City', l_dest_city);
2172: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Postal', l_dest_postal);
2173: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2174: END IF;
2175:
2176: IF (l_dest_country IS NULL) THEN
2169: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Country', l_dest_country);
2170: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'State', l_dest_state);
2171: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'City', l_dest_city);
2172: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Postal', l_dest_postal);
2173: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2174: END IF;
2175:
2176: IF (l_dest_country IS NULL) THEN
2177: l_dest_country := p_origin_zone(FTE_VALIDATION_PKG.ZONE(3));
2185: l_dest_city := p_origin_zone(FTE_VALIDATION_PKG.ZONE(5));
2186: END IF;
2187:
2188: IF (l_dest_postal IS NULL) THEN
2189: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_POSTAL_MISSING');
2190: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2191: p_msg => x_error_msg,
2192: p_category => 'A',
2193: p_line_number => p_line_number);
2186: END IF;
2187:
2188: IF (l_dest_postal IS NULL) THEN
2189: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_POSTAL_MISSING');
2190: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2191: p_msg => x_error_msg,
2192: p_category => 'A',
2193: p_line_number => p_line_number);
2194: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2190: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2191: p_msg => x_error_msg,
2192: p_category => 'A',
2193: p_line_number => p_line_number);
2194: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2195: x_status := 1;
2196: RETURN;
2197: END IF;
2198:
2197: END IF;
2198:
2199: p_dest := STRINGARRAY(l_dest_postal, l_dest_country, l_dest_state, l_dest_city);
2200:
2201: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2202: EXCEPTION
2203: WHEN OTHERS THEN
2204: x_error_msg := sqlerrm;
2205: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2201: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2202: EXCEPTION
2203: WHEN OTHERS THEN
2204: x_error_msg := sqlerrm;
2205: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2206: p_msg => x_error_msg,
2207: p_category => 'O',
2208: p_line_number => p_line_number);
2209: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2205: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2206: p_msg => x_error_msg,
2207: p_category => 'O',
2208: p_line_number => p_line_number);
2209: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2210: x_status := 1;
2211: RETURN;
2212: END VALIDATE_DESTINATION;
2213:
2239: l_rate_chart_info STRINGARRAY := STRINGARRAY();
2240: l_count NUMBER;
2241: l_module_name CONSTANT VARCHAR2(100) := 'FTE.PLSQL.' || G_PKG_NAME || '.VALIDATE_LANE_RATE_CHART';
2242: BEGIN
2243: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
2244:
2245: x_status := -1;
2246:
2247: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2244:
2245: x_status := -1;
2246:
2247: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2248: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action ', p_action);
2249: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane ID ', p_lane_tbl(p_lane_tbl.COUNT).lane_id);
2250: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2251: END IF;
2252:
2245: x_status := -1;
2246:
2247: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2248: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action ', p_action);
2249: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane ID ', p_lane_tbl(p_lane_tbl.COUNT).lane_id);
2250: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2251: END IF;
2252:
2253: IF (NOT p_lane_tbl(p_lane_tbl.COUNT).basis_flag) THEN
2246:
2247: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2248: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action ', p_action);
2249: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane ID ', p_lane_tbl(p_lane_tbl.COUNT).lane_id);
2250: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2251: END IF;
2252:
2253: IF (NOT p_lane_tbl(p_lane_tbl.COUNT).basis_flag) THEN
2254: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LANE_BASIS_MISSING');
2250: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2251: END IF;
2252:
2253: IF (NOT p_lane_tbl(p_lane_tbl.COUNT).basis_flag) THEN
2254: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LANE_BASIS_MISSING');
2255: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2256: p_msg => x_error_msg,
2257: p_category => 'A',
2258: p_line_number => p_line_number);
2251: END IF;
2252:
2253: IF (NOT p_lane_tbl(p_lane_tbl.COUNT).basis_flag) THEN
2254: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LANE_BASIS_MISSING');
2255: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2256: p_msg => x_error_msg,
2257: p_category => 'A',
2258: p_line_number => p_line_number);
2259: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2255: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2256: p_msg => x_error_msg,
2257: p_category => 'A',
2258: p_line_number => p_line_number);
2259: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2260: x_status := 1;
2261: RETURN;
2262: END IF;
2263:
2263:
2264: IF (p_lane_tbl IS NOT NULL) THEN -- if service line is not missing
2265: IF (p_lane_tbl(p_lane_tbl.COUNT).lane_id <> 0) THEN
2266:
2267: l_rate_chart_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME', p_values);
2268: IF (l_rate_chart_name IS NULL) THEN
2269: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LANE_RATE_CHART_MISSING');
2270: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2271: p_msg => x_error_msg,
2265: IF (p_lane_tbl(p_lane_tbl.COUNT).lane_id <> 0) THEN
2266:
2267: l_rate_chart_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME', p_values);
2268: IF (l_rate_chart_name IS NULL) THEN
2269: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LANE_RATE_CHART_MISSING');
2270: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2271: p_msg => x_error_msg,
2272: p_category => 'A',
2273: p_line_number => p_line_number);
2266:
2267: l_rate_chart_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME', p_values);
2268: IF (l_rate_chart_name IS NULL) THEN
2269: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LANE_RATE_CHART_MISSING');
2270: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2271: p_msg => x_error_msg,
2272: p_category => 'A',
2273: p_line_number => p_line_number);
2274: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2270: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2271: p_msg => x_error_msg,
2272: p_category => 'A',
2273: p_line_number => p_line_number);
2274: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2275: x_status := 1;
2276: RETURN;
2277: END IF;
2278: l_rate_chart_info := FTE_RATE_CHART_PKG.GET_RATE_CHART_INFO(p_name => l_rate_chart_name,
2279: p_carrier_id => p_lane_tbl(p_lane_tbl.COUNT).carrier_id,
2280: x_status => x_status,
2281: x_error_msg => x_error_msg);
2282: IF (x_status <> -1) THEN
2283: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2284: RETURN;
2285: END IF;
2286:
2287: IF (l_rate_chart_info IS NULL) THEN
2288:
2289: IF ( p_set_error = FALSE) THEN
2290: x_status := -1;
2291: x_error_msg := 'Returning from VALIDATE_RATE_CHART with TRUE';
2292: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2293: RETURN;
2294: END IF;
2295: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_RATE_CHART_UNKNOWN',
2296: p_tokens => STRINGARRAY('RATE_CHART'),
2291: x_error_msg := 'Returning from VALIDATE_RATE_CHART with TRUE';
2292: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2293: RETURN;
2294: END IF;
2295: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_RATE_CHART_UNKNOWN',
2296: p_tokens => STRINGARRAY('RATE_CHART'),
2297: p_values => STRINGARRAY(l_rate_chart_name));
2298: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2299: p_msg => x_error_msg,
2294: END IF;
2295: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_RATE_CHART_UNKNOWN',
2296: p_tokens => STRINGARRAY('RATE_CHART'),
2297: p_values => STRINGARRAY(l_rate_chart_name));
2298: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2299: p_msg => x_error_msg,
2300: p_category => 'C',
2301: p_line_number => p_line_number);
2302: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2298: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2299: p_msg => x_error_msg,
2300: p_category => 'C',
2301: p_line_number => p_line_number);
2302: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2303: x_status := 1;
2304: RETURN;
2305:
2306: END IF;
2305:
2306: END IF;
2307:
2308: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2309: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart name', l_rate_chart_name);
2310: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'List header ID', l_rate_chart_info(1));
2311: END IF;
2312:
2313: IF (p_action <> 'DELETE') THEN
2306: END IF;
2307:
2308: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2309: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart name', l_rate_chart_name);
2310: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'List header ID', l_rate_chart_info(1));
2311: END IF;
2312:
2313: IF (p_action <> 'DELETE') THEN
2314: IF (FTE_LANE_PKG.CHECK_EXISTING_LOAD(p_id => p_lane_tbl(p_lane_tbl.COUNT).lane_id,
2317: p_line_number => p_line_number,
2318: x_status => x_status,
2319: x_error_msg => x_error_msg)) THEN
2320: IF (x_status <> -1) THEN
2321: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2322: RETURN;
2323: END IF;
2324: x_status := 2;
2325: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LANE_RATE_CHART_EXIST',
2321: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2322: RETURN;
2323: END IF;
2324: x_status := 2;
2325: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LANE_RATE_CHART_EXIST',
2326: p_tokens => STRINGARRAY('NAME'),
2327: p_values => STRINGARRAY(l_rate_chart_name));
2328: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2329: p_msg => x_error_msg,
2324: x_status := 2;
2325: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LANE_RATE_CHART_EXIST',
2326: p_tokens => STRINGARRAY('NAME'),
2327: p_values => STRINGARRAY(l_rate_chart_name));
2328: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2329: p_msg => x_error_msg,
2330: p_category => 'D',
2331: p_line_number => p_line_number);
2332: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2328: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2329: p_msg => x_error_msg,
2330: p_category => 'D',
2331: p_line_number => p_line_number);
2332: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2333: RETURN;
2334: END IF;
2335:
2336: IF (FTE_LANE_PKG.VERIFY_OVERLAPPING_DATE(p_name => l_rate_chart_name,
2336: IF (FTE_LANE_PKG.VERIFY_OVERLAPPING_DATE(p_name => l_rate_chart_name,
2337: p_lane_id => p_lane_tbl(p_lane_tbl.COUNT).lane_id,
2338: x_status => x_status,
2339: x_error_msg => x_error_msg)) THEN
2340: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_DATE_OVERLAP',
2341: p_tokens => STRINGARRAY('RATE_CHART1', 'RATE_CHART2'),
2342: p_values => STRINGARRAY(l_rate_chart_name, NULL));
2343: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2344: p_msg => x_error_msg,
2339: x_error_msg => x_error_msg)) THEN
2340: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_DATE_OVERLAP',
2341: p_tokens => STRINGARRAY('RATE_CHART1', 'RATE_CHART2'),
2342: p_values => STRINGARRAY(l_rate_chart_name, NULL));
2343: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2344: p_msg => x_error_msg,
2345: p_category => 'D',
2346: p_line_number => p_line_number);
2347: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2343: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2344: p_msg => x_error_msg,
2345: p_category => 'D',
2346: p_line_number => p_line_number);
2347: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2348: x_status := 1;
2349: RETURN;
2350: END IF;
2351: END IF;
2359: p_lane_rate_chart_tbl(l_count).start_date_active := TO_DATE(l_rate_chart_info(2), FTE_BULKLOAD_PKG.G_DATE_FORMAT2);
2360: EXCEPTION
2361: WHEN OTHERS THEN
2362: x_error_msg := sqlerrm;
2363: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2364: p_msg => x_error_msg,
2365: p_category => 'O',
2366: p_line_number => p_line_number);
2367: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2363: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2364: p_msg => x_error_msg,
2365: p_category => 'O',
2366: p_line_number => p_line_number);
2367: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2368: x_status := 1;
2369: RETURN;
2370: END;
2371:
2369: RETURN;
2370: END;
2371:
2372: IF (p_lane_rate_chart_tbl(l_count).start_date_active IS NULL) THEN
2373: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_INCORRECT_DATE',
2374: p_tokens => STRINGARRAY('DATE'),
2375: p_values => STRINGARRAY(l_rate_chart_info(2)));
2376: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2377: p_msg => x_error_msg,
2372: IF (p_lane_rate_chart_tbl(l_count).start_date_active IS NULL) THEN
2373: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_INCORRECT_DATE',
2374: p_tokens => STRINGARRAY('DATE'),
2375: p_values => STRINGARRAY(l_rate_chart_info(2)));
2376: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2377: p_msg => x_error_msg,
2378: p_category => 'D',
2379: p_line_number => p_line_number);
2380: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2376: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2377: p_msg => x_error_msg,
2378: p_category => 'D',
2379: p_line_number => p_line_number);
2380: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2381: x_status := 1;
2382: RETURN;
2383: END IF;
2384:
2382: RETURN;
2383: END IF;
2384:
2385: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2386: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_rate_chart_info(2));
2387: END IF;
2388: END IF;
2389:
2390: IF (l_rate_chart_info(3) IS NOT NULL) THEN
2392: p_lane_rate_chart_tbl(l_count).end_date_active := TO_DATE(l_rate_chart_info(3), FTE_BULKLOAD_PKG.G_DATE_FORMAT2);
2393: EXCEPTION
2394: WHEN OTHERS THEN
2395: x_error_msg := sqlerrm;
2396: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2397: p_msg => x_error_msg,
2398: p_category => 'O',
2399: p_line_number => p_line_number);
2400: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2396: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2397: p_msg => x_error_msg,
2398: p_category => 'O',
2399: p_line_number => p_line_number);
2400: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2401: x_status := 1;
2402: RETURN;
2403: END;
2404:
2402: RETURN;
2403: END;
2404:
2405: IF (p_lane_rate_chart_tbl(l_count).end_date_active IS NULL) THEN
2406: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_INCORRECT_DATE',
2407: p_tokens => STRINGARRAY('DATE'),
2408: p_values => STRINGARRAY(l_rate_chart_info(3)));
2409: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2410: p_msg => x_error_msg,
2405: IF (p_lane_rate_chart_tbl(l_count).end_date_active IS NULL) THEN
2406: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_INCORRECT_DATE',
2407: p_tokens => STRINGARRAY('DATE'),
2408: p_values => STRINGARRAY(l_rate_chart_info(3)));
2409: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2410: p_msg => x_error_msg,
2411: p_category => 'D',
2412: p_line_number => p_line_number);
2413: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2409: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2410: p_msg => x_error_msg,
2411: p_category => 'D',
2412: p_line_number => p_line_number);
2413: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2414: x_status := 1;
2415: RETURN;
2416: END IF;
2417:
2415: RETURN;
2416: END IF;
2417:
2418: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2419: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_rate_chart_info(3));
2420: END IF;
2421: END IF;
2422: END IF;
2423: ELSE
2420: END IF;
2421: END IF;
2422: END IF;
2423: ELSE
2424: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LANE_REF_MISSING');
2425: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2426: p_msg => x_error_msg,
2427: p_category => 'D',
2428: p_line_number => p_line_number);
2421: END IF;
2422: END IF;
2423: ELSE
2424: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LANE_REF_MISSING');
2425: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2426: p_msg => x_error_msg,
2427: p_category => 'D',
2428: p_line_number => p_line_number);
2429: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2425: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2426: p_msg => x_error_msg,
2427: p_category => 'D',
2428: p_line_number => p_line_number);
2429: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2430: x_status := 1;
2431: RETURN;
2432: END IF;
2433:
2430: x_status := 1;
2431: RETURN;
2432: END IF;
2433:
2434: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2435: EXCEPTION
2436: WHEN OTHERS THEN
2437: x_error_msg := sqlerrm;
2438: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2434: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2435: EXCEPTION
2436: WHEN OTHERS THEN
2437: x_error_msg := sqlerrm;
2438: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2439: p_msg => x_error_msg,
2440: p_category => 'O',
2441: p_line_number => p_line_number);
2442: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2438: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2439: p_msg => x_error_msg,
2440: p_category => 'O',
2441: p_line_number => p_line_number);
2442: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2443: x_status := 1;
2444: RETURN;
2445: END VALIDATE_LANE_RATE_CHART;
2446:
2477: l_basis_code VARCHAR2(100);
2478:
2479: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_LANE_COMMODITY';
2480: BEGIN
2481: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
2482:
2483: x_status := -1;
2484:
2485: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2482:
2483: x_status := -1;
2484:
2485: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2486: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
2487: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
2488: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2489: END IF;
2490:
2483: x_status := -1;
2484:
2485: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2486: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
2487: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
2488: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2489: END IF;
2490:
2491: l_count := p_lane_commodity_tbl.COUNT+1;
2484:
2485: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2486: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
2487: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
2488: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2489: END IF;
2490:
2491: l_count := p_lane_commodity_tbl.COUNT+1;
2492:
2496: -- laneId is set to -1 when there's any error with the lane
2497: IF (p_lane_tbl IS NOT NULL) THEN -- if service line is not missing
2498: IF (p_lane_tbl(p_lane_tbl.COUNT).lane_id <> 0) THEN
2499: l_com_class := p_lane_tbl(p_lane_tbl.COUNT).comm_fc_class_code;
2500: l_com_type := FTE_UTIL_PKG.GET_DATA('COMMODITY_TYPE', p_values);
2501:
2502: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2503: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Commodity class', l_com_class);
2504: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Commodity type', l_com_type);
2499: l_com_class := p_lane_tbl(p_lane_tbl.COUNT).comm_fc_class_code;
2500: l_com_type := FTE_UTIL_PKG.GET_DATA('COMMODITY_TYPE', p_values);
2501:
2502: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2503: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Commodity class', l_com_class);
2504: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Commodity type', l_com_type);
2505: END IF;
2506:
2507: IF (l_com_type IS NULL) THEN
2500: l_com_type := FTE_UTIL_PKG.GET_DATA('COMMODITY_TYPE', p_values);
2501:
2502: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2503: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Commodity class', l_com_class);
2504: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Commodity type', l_com_type);
2505: END IF;
2506:
2507: IF (l_com_type IS NULL) THEN
2508: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_COMM_TYPE_MISSING');
2504: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Commodity type', l_com_type);
2505: END IF;
2506:
2507: IF (l_com_type IS NULL) THEN
2508: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_COMM_TYPE_MISSING');
2509: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2510: p_msg => x_error_msg,
2511: p_category => 'A',
2512: p_line_number => p_line_number);
2505: END IF;
2506:
2507: IF (l_com_type IS NULL) THEN
2508: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_COMM_TYPE_MISSING');
2509: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2510: p_msg => x_error_msg,
2511: p_category => 'A',
2512: p_line_number => p_line_number);
2513: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2509: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2510: p_msg => x_error_msg,
2511: p_category => 'A',
2512: p_line_number => p_line_number);
2513: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2514: x_status := 1;
2515: RETURN;
2516: END IF;
2517:
2515: RETURN;
2516: END IF;
2517:
2518: IF (l_com_class IS NULL) THEN
2519: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_COMM_CLASS_MISSING');
2520: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2521: p_msg => x_error_msg,
2522: p_category => 'A',
2523: p_line_number => p_line_number);
2516: END IF;
2517:
2518: IF (l_com_class IS NULL) THEN
2519: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_COMM_CLASS_MISSING');
2520: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2521: p_msg => x_error_msg,
2522: p_category => 'A',
2523: p_line_number => p_line_number);
2524: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2520: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2521: p_msg => x_error_msg,
2522: p_category => 'A',
2523: p_line_number => p_line_number);
2524: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2525: x_status := 1;
2526: RETURN;
2527: ELSE
2528: l_catg_id := FTE_UTIL_PKG.GET_CATG_ID(l_com_class, l_com_type);
2524: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2525: x_status := 1;
2526: RETURN;
2527: ELSE
2528: l_catg_id := FTE_UTIL_PKG.GET_CATG_ID(l_com_class, l_com_type);
2529:
2530: IF (l_catg_id = -1) THEN
2531: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_COMMODITY_UNKNOWN',
2532: p_tokens => STRINGARRAY('COMMODITY'),
2527: ELSE
2528: l_catg_id := FTE_UTIL_PKG.GET_CATG_ID(l_com_class, l_com_type);
2529:
2530: IF (l_catg_id = -1) THEN
2531: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_COMMODITY_UNKNOWN',
2532: p_tokens => STRINGARRAY('COMMODITY'),
2533: p_values => STRINGARRAY(l_com_type));
2534: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2535: p_msg => x_error_msg,
2530: IF (l_catg_id = -1) THEN
2531: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_COMMODITY_UNKNOWN',
2532: p_tokens => STRINGARRAY('COMMODITY'),
2533: p_values => STRINGARRAY(l_com_type));
2534: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2535: p_msg => x_error_msg,
2536: p_category => 'D',
2537: p_line_number => p_line_number);
2538: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2534: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2535: p_msg => x_error_msg,
2536: p_category => 'D',
2537: p_line_number => p_line_number);
2538: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2539: x_status := 1;
2540: RETURN;
2541: ELSIF (l_catg_id = -2) THEN
2542: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_COMMODITY_AMBIG',
2538: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2539: x_status := 1;
2540: RETURN;
2541: ELSIF (l_catg_id = -2) THEN
2542: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_COMMODITY_AMBIG',
2543: p_tokens => STRINGARRAY('COMMODITY'),
2544: p_values => STRINGARRAY(l_com_type));
2545: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2546: p_msg => x_error_msg,
2541: ELSIF (l_catg_id = -2) THEN
2542: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_COMMODITY_AMBIG',
2543: p_tokens => STRINGARRAY('COMMODITY'),
2544: p_values => STRINGARRAY(l_com_type));
2545: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2546: p_msg => x_error_msg,
2547: p_category => 'D',
2548: p_line_number => p_line_number);
2549: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2545: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2546: p_msg => x_error_msg,
2547: p_category => 'D',
2548: p_line_number => p_line_number);
2549: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2550: x_status := 1;
2551: RETURN;
2552: ELSIF (l_catg_id = -3) THEN
2553: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_COMM_MISMATCH',
2549: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2550: x_status := 1;
2551: RETURN;
2552: ELSIF (l_catg_id = -3) THEN
2553: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_COMM_MISMATCH',
2554: p_tokens => STRINGARRAY('COMMODITY'),
2555: p_values => STRINGARRAY(l_com_type));
2556: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2557: p_msg => x_error_msg,
2552: ELSIF (l_catg_id = -3) THEN
2553: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_COMM_MISMATCH',
2554: p_tokens => STRINGARRAY('COMMODITY'),
2555: p_values => STRINGARRAY(l_com_type));
2556: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2557: p_msg => x_error_msg,
2558: p_category => 'D',
2559: p_line_number => p_line_number);
2560: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2556: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2557: p_msg => x_error_msg,
2558: p_category => 'D',
2559: p_line_number => p_line_number);
2560: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2561: x_status := 1;
2562: RETURN;
2563: ELSE
2564: IF (p_action = 'ADD') THEN
2568: p_line_number => p_line_number,
2569: x_status => x_status,
2570: x_error_msg => x_error_msg)) THEN
2571: IF (x_status <> -1) THEN
2572: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2573: RETURN;
2574: END IF;
2575: x_status := 2;
2576: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LANE_COMMODITY_EXIST',
2572: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2573: RETURN;
2574: END IF;
2575: x_status := 2;
2576: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LANE_COMMODITY_EXIST',
2577: p_tokens => STRINGARRAY('NAME'),
2578: p_values => STRINGARRAY(l_com_type));
2579: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2580: p_msg => x_error_msg,
2575: x_status := 2;
2576: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LANE_COMMODITY_EXIST',
2577: p_tokens => STRINGARRAY('NAME'),
2578: p_values => STRINGARRAY(l_com_type));
2579: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2580: p_msg => x_error_msg,
2581: p_category => 'D',
2582: p_line_number => p_line_number);
2583: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2579: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2580: p_msg => x_error_msg,
2581: p_category => 'D',
2582: p_line_number => p_line_number);
2583: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2584: RETURN;
2585: END IF;
2586: END IF;
2587: p_lane_commodity_tbl(l_count).commodity_catg_id := l_catg_id;
2588: END IF;
2589: END IF;
2590:
2591: -- Validation for BASIS
2592: l_basis := FTE_UTIL_PKG.GET_DATA('BASIS', p_values);
2593: IF (l_basis IS NULL OR p_lane_tbl(p_lane_tbl.COUNT).container_all_flag) THEN
2594: IF (NOT p_lane_tbl(p_lane_tbl.COUNT).basis_flag) THEN
2595: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BASIS_MISSING');
2596: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2591: -- Validation for BASIS
2592: l_basis := FTE_UTIL_PKG.GET_DATA('BASIS', p_values);
2593: IF (l_basis IS NULL OR p_lane_tbl(p_lane_tbl.COUNT).container_all_flag) THEN
2594: IF (NOT p_lane_tbl(p_lane_tbl.COUNT).basis_flag) THEN
2595: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BASIS_MISSING');
2596: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2597: p_msg => x_error_msg,
2598: p_category => 'A',
2599: p_line_number => p_line_number);
2592: l_basis := FTE_UTIL_PKG.GET_DATA('BASIS', p_values);
2593: IF (l_basis IS NULL OR p_lane_tbl(p_lane_tbl.COUNT).container_all_flag) THEN
2594: IF (NOT p_lane_tbl(p_lane_tbl.COUNT).basis_flag) THEN
2595: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BASIS_MISSING');
2596: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2597: p_msg => x_error_msg,
2598: p_category => 'A',
2599: p_line_number => p_line_number);
2600: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2596: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2597: p_msg => x_error_msg,
2598: p_category => 'A',
2599: p_line_number => p_line_number);
2600: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2601: x_status := 1;
2602: RETURN;
2603: END IF;
2604: ELSE
2601: x_status := 1;
2602: RETURN;
2603: END IF;
2604: ELSE
2605: l_basis_code := FTE_UTIL_PKG.GET_LOOKUP_CODE('FTE_BASES', l_basis);
2606: IF (l_basis_code IS NOT NULL) THEN
2607: p_lane_commodity_tbl(l_count).basis := l_basis_code;
2608: p_lane_commodity_tbl(l_count).basis_flag := true;
2609: ELSE
2606: IF (l_basis_code IS NOT NULL) THEN
2607: p_lane_commodity_tbl(l_count).basis := l_basis_code;
2608: p_lane_commodity_tbl(l_count).basis_flag := true;
2609: ELSE
2610: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_COMM_BASIS_INVALID',
2611: p_tokens => STRINGARRAY('BASIS'),
2612: p_values => STRINGARRAY(l_basis));
2613: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2614: p_msg => x_error_msg,
2609: ELSE
2610: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_COMM_BASIS_INVALID',
2611: p_tokens => STRINGARRAY('BASIS'),
2612: p_values => STRINGARRAY(l_basis));
2613: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2614: p_msg => x_error_msg,
2615: p_category => 'D',
2616: p_line_number => p_line_number);
2617: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2613: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2614: p_msg => x_error_msg,
2615: p_category => 'D',
2616: p_line_number => p_line_number);
2617: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2618: x_status := 1;
2619: RETURN;
2620: END IF;
2621: END IF;
2624: p_lane_commodity_tbl(l_count).lane_commodity_id := FTE_LANE_PKG.GET_NEXT_LANE_COMMODITY_ID;
2625:
2626: END IF;
2627: ELSE
2628: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LANE_REF_MISSING');
2629: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2630: p_msg => x_error_msg,
2631: p_category => 'D',
2632: p_line_number => p_line_number);
2625:
2626: END IF;
2627: ELSE
2628: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LANE_REF_MISSING');
2629: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2630: p_msg => x_error_msg,
2631: p_category => 'D',
2632: p_line_number => p_line_number);
2633: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2629: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2630: p_msg => x_error_msg,
2631: p_category => 'D',
2632: p_line_number => p_line_number);
2633: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2634: x_status := 1;
2635: RETURN;
2636: END IF;
2637:
2634: x_status := 1;
2635: RETURN;
2636: END IF;
2637:
2638: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2639:
2640: EXCEPTION
2641: WHEN OTHERS THEN
2642: x_error_msg := sqlerrm;
2639:
2640: EXCEPTION
2641: WHEN OTHERS THEN
2642: x_error_msg := sqlerrm;
2643: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2644: p_msg => x_error_msg,
2645: p_category => 'O',
2646: p_line_number => p_line_number);
2647: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2643: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2644: p_msg => x_error_msg,
2645: p_category => 'O',
2646: p_line_number => p_line_number);
2647: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2648: x_status := 1;
2649: RETURN;
2650: END VALIDATE_LANE_COMMODITY;
2651:
2680: l_carrier_name VARCHAR2(100);
2681:
2682: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_LANE_SERVICE_LEVEL';
2683: BEGIN
2684: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
2685:
2686: x_status := -1;
2687:
2688: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2685:
2686: x_status := -1;
2687:
2688: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2689: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
2690: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
2691: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2692: END IF;
2693:
2686: x_status := -1;
2687:
2688: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2689: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
2690: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
2691: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2692: END IF;
2693:
2694: -- If the lane is deleted, or anything is wrong with the lane
2687:
2688: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2689: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
2690: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
2691: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2692: END IF;
2693:
2694: -- If the lane is deleted, or anything is wrong with the lane
2695: -- don't do anything with the Types...
2698: IF (p_lane_tbl IS NOT NULL) THEN -- if service line is not missing
2699: IF (p_lane_tbl(p_lane_tbl.COUNT).lane_id <> 0) THEN
2700:
2701: IF (p_type = 'SERVICE_LEVEL') THEN
2702: l_service_level := FTE_UTIL_PKG.GET_DATA('SERVICE_LEVEL', p_values);
2703:
2704: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2705: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service Level', l_service_level);
2706: END IF;
2701: IF (p_type = 'SERVICE_LEVEL') THEN
2702: l_service_level := FTE_UTIL_PKG.GET_DATA('SERVICE_LEVEL', p_values);
2703:
2704: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2705: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service Level', l_service_level);
2706: END IF;
2707: END IF;
2708:
2709: IF (l_service_level IS NULL) THEN
2706: END IF;
2707: END IF;
2708:
2709: IF (l_service_level IS NULL) THEN
2710: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NO_SERVICE');
2711: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2712: p_msg => x_error_msg,
2713: p_category => 'D',
2714: p_line_number => p_line_number);
2707: END IF;
2708:
2709: IF (l_service_level IS NULL) THEN
2710: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NO_SERVICE');
2711: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2712: p_msg => x_error_msg,
2713: p_category => 'D',
2714: p_line_number => p_line_number);
2715: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2711: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2712: p_msg => x_error_msg,
2713: p_category => 'D',
2714: p_line_number => p_line_number);
2715: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2716: x_status := 1;
2717: RETURN;
2718: ELSE
2719: l_service_code := Validate_Service_Level (p_carrier_id => p_lane_tbl(p_lane_tbl.COUNT).carrier_id,
2722: p_line_number => p_line_number,
2723: x_status => x_status,
2724: x_error_msg => x_error_msg);
2725: IF (x_status <> -1) THEN
2726: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2727: RETURN;
2728: END IF;
2729:
2730: IF (l_service_code IS NULL) THEN
2727: RETURN;
2728: END IF;
2729:
2730: IF (l_service_code IS NULL) THEN
2731: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_SERVICE_UNKNOWN',
2732: p_tokens => STRINGARRAY('SERVICE'),
2733: p_values => STRINGARRAY(l_service_level));
2734: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2735: p_msg => x_error_msg,
2730: IF (l_service_code IS NULL) THEN
2731: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_SERVICE_UNKNOWN',
2732: p_tokens => STRINGARRAY('SERVICE'),
2733: p_values => STRINGARRAY(l_service_level));
2734: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2735: p_msg => x_error_msg,
2736: p_category => 'D',
2737: p_line_number => p_line_number);
2738: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2734: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2735: p_msg => x_error_msg,
2736: p_category => 'D',
2737: p_line_number => p_line_number);
2738: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2739: x_status := 1;
2740: RETURN;
2741: ELSIF (p_type = 'SERVICE_LEVEL'
2742: AND NOT(VALIDATE_CARRIER_SERVICE(p_service_code => l_service_code,
2754: p_line_number => p_line_number,
2755: x_status => x_status,
2756: x_error_msg => x_error_msg))) THEN
2757:
2758: l_carrier_name := FTE_UTIL_PKG.GET_CARRIER_NAME(p_lane_tbl(p_lane_tbl.COUNT).carrier_id);
2759: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CARRIER_SERVICE_INVALID',
2760: p_tokens => STRINGARRAY('SERVICE_LEVEL', 'CARRIER_NAME'),
2761: p_values => STRINGARRAY(l_service_level, l_carrier_name));
2762: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2755: x_status => x_status,
2756: x_error_msg => x_error_msg))) THEN
2757:
2758: l_carrier_name := FTE_UTIL_PKG.GET_CARRIER_NAME(p_lane_tbl(p_lane_tbl.COUNT).carrier_id);
2759: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CARRIER_SERVICE_INVALID',
2760: p_tokens => STRINGARRAY('SERVICE_LEVEL', 'CARRIER_NAME'),
2761: p_values => STRINGARRAY(l_service_level, l_carrier_name));
2762: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2763: p_msg => x_error_msg,
2758: l_carrier_name := FTE_UTIL_PKG.GET_CARRIER_NAME(p_lane_tbl(p_lane_tbl.COUNT).carrier_id);
2759: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CARRIER_SERVICE_INVALID',
2760: p_tokens => STRINGARRAY('SERVICE_LEVEL', 'CARRIER_NAME'),
2761: p_values => STRINGARRAY(l_service_level, l_carrier_name));
2762: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2763: p_msg => x_error_msg,
2764: p_category => 'B',
2765: p_line_number => p_line_number);
2766: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2762: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2763: p_msg => x_error_msg,
2764: p_category => 'B',
2765: p_line_number => p_line_number);
2766: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2767: x_status := 1;
2768: RETURN;
2769: END IF;
2770: END IF;
2777: p_line_number => p_line_number,
2778: x_status => x_status,
2779: x_error_msg => x_error_msg)) THEN
2780: IF (x_status <> -1) THEN
2781: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2782: RETURN;
2783: END IF;
2784: x_status := 2;
2785: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LANE_SERVICE_EXIST',
2781: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2782: RETURN;
2783: END IF;
2784: x_status := 2;
2785: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LANE_SERVICE_EXIST',
2786: p_tokens => STRINGARRAY('NAME'),
2787: p_values => STRINGARRAY(l_service_level));
2788: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2789: p_msg => x_error_msg,
2784: x_status := 2;
2785: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LANE_SERVICE_EXIST',
2786: p_tokens => STRINGARRAY('NAME'),
2787: p_values => STRINGARRAY(l_service_level));
2788: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2789: p_msg => x_error_msg,
2790: p_category => 'D',
2791: p_line_number => p_line_number);
2792: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2788: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2789: p_msg => x_error_msg,
2790: p_category => 'D',
2791: p_line_number => p_line_number);
2792: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2793: RETURN;
2794: END IF;
2795: END IF;
2796:
2801: p_lane_service_tbl(l_count).lane_service_id := FTE_LANE_PKG.GET_NEXT_LANE_SERVICE_ID;
2802:
2803: END IF;
2804: ELSE
2805: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LANE_REF_MISSING');
2806: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2807: p_msg => x_error_msg,
2808: p_category => 'D',
2809: p_line_number => p_line_number);
2802:
2803: END IF;
2804: ELSE
2805: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LANE_REF_MISSING');
2806: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2807: p_msg => x_error_msg,
2808: p_category => 'D',
2809: p_line_number => p_line_number);
2810: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2806: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2807: p_msg => x_error_msg,
2808: p_category => 'D',
2809: p_line_number => p_line_number);
2810: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2811: x_status := 1;
2812: RETURN;
2813: END IF;
2814:
2811: x_status := 1;
2812: RETURN;
2813: END IF;
2814:
2815: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2816:
2817: EXCEPTION
2818: WHEN OTHERS THEN
2819: x_error_msg := sqlerrm;
2816:
2817: EXCEPTION
2818: WHEN OTHERS THEN
2819: x_error_msg := sqlerrm;
2820: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2821: p_msg => x_error_msg,
2822: p_category => 'O',
2823: p_line_number => p_line_number);
2824: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2820: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2821: p_msg => x_error_msg,
2822: p_category => 'O',
2823: p_line_number => p_line_number);
2824: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2825: x_status := 1;
2826: RETURN;
2827:
2828: END VALIDATE_LANE_SERVICE_LEVEL;
2889: l_zone_id NUMBER;
2890: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_SERVICE';
2891:
2892: BEGIN
2893: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
2894:
2895: x_status := -1;
2896:
2897: p_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
2893: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
2894:
2895: x_status := -1;
2896:
2897: p_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
2898: p_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
2899:
2900: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2901: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
2894:
2895: x_status := -1;
2896:
2897: p_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
2898: p_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
2899:
2900: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2901: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
2902: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
2897: p_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
2898: p_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
2899:
2900: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2901: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
2902: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
2903: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2904: END IF;
2905:
2898: p_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
2899:
2900: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2901: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
2902: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
2903: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2904: END IF;
2905:
2906: IF (p_type IS NULL) THEN
2899:
2900: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2901: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', p_type);
2902: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
2903: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2904: END IF;
2905:
2906: IF (p_type IS NULL) THEN
2907: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_TYPE_MISSING');
2903: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
2904: END IF;
2905:
2906: IF (p_type IS NULL) THEN
2907: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_TYPE_MISSING');
2908: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2909: p_msg => x_error_msg,
2910: p_category => 'A',
2911: p_line_number => p_line_number);
2904: END IF;
2905:
2906: IF (p_type IS NULL) THEN
2907: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_TYPE_MISSING');
2908: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2909: p_msg => x_error_msg,
2910: p_category => 'A',
2911: p_line_number => p_line_number);
2912: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2908: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2909: p_msg => x_error_msg,
2910: p_category => 'A',
2911: p_line_number => p_line_number);
2912: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2913: x_status := 1;
2914: RETURN;
2915: ELSE
2916: p_type := UPPER(p_type);
2916: p_type := UPPER(p_type);
2917: END IF;
2918:
2919: IF (p_type NOT IN ('SERVICE', 'COMMODITY_TYPE', 'SERVICE_LEVEL', 'RATE_CHART')) THEN
2920: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_LANE_TYPE_UNKNOWN',
2921: P_Tokens => STRINGARRAY('TYPE'),
2922: P_values => STRINGARRAY(p_type));
2923: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2924: p_msg => x_error_msg,
2919: IF (p_type NOT IN ('SERVICE', 'COMMODITY_TYPE', 'SERVICE_LEVEL', 'RATE_CHART')) THEN
2920: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_LANE_TYPE_UNKNOWN',
2921: P_Tokens => STRINGARRAY('TYPE'),
2922: P_values => STRINGARRAY(p_type));
2923: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2924: p_msg => x_error_msg,
2925: p_category => 'D',
2926: p_line_number => p_line_number);
2927: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2923: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2924: p_msg => x_error_msg,
2925: p_category => 'D',
2926: p_line_number => p_line_number);
2927: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2928: x_status := 1;
2929: RETURN;
2930: END IF;
2931:
2935: x_status => x_status,
2936: x_error_msg => x_error_msg);
2937:
2938: IF (x_status <> -1) THEN
2939: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2940: RETURN;
2941: END IF;
2942:
2943: IF (p_type = 'SERVICE') THEN
2943: IF (p_type = 'SERVICE') THEN
2944: l_count := p_lane_tbl.COUNT+1;
2945: p_lane_tbl(l_count).action := p_action;
2946:
2947: l_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER', p_values);
2948: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
2949: l_rate_chart_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME', p_values);
2950: l_mode := FTE_UTIL_PKG.GET_DATA('MODE_OF_TRANSPORTATION', p_values);
2951: l_com_class := FTE_UTIL_PKG.GET_DATA('COMMODITY_CLASS', p_values);
2944: l_count := p_lane_tbl.COUNT+1;
2945: p_lane_tbl(l_count).action := p_action;
2946:
2947: l_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER', p_values);
2948: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
2949: l_rate_chart_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME', p_values);
2950: l_mode := FTE_UTIL_PKG.GET_DATA('MODE_OF_TRANSPORTATION', p_values);
2951: l_com_class := FTE_UTIL_PKG.GET_DATA('COMMODITY_CLASS', p_values);
2952: l_basis := FTE_UTIL_PKG.GET_DATA('BASIS', p_values);
2945: p_lane_tbl(l_count).action := p_action;
2946:
2947: l_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER', p_values);
2948: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
2949: l_rate_chart_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME', p_values);
2950: l_mode := FTE_UTIL_PKG.GET_DATA('MODE_OF_TRANSPORTATION', p_values);
2951: l_com_class := FTE_UTIL_PKG.GET_DATA('COMMODITY_CLASS', p_values);
2952: l_basis := FTE_UTIL_PKG.GET_DATA('BASIS', p_values);
2953: l_view_flag := FTE_UTIL_PKG.GET_DATA('RATE_CHART_VIEW_FLAG', p_values);
2946:
2947: l_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER', p_values);
2948: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
2949: l_rate_chart_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME', p_values);
2950: l_mode := FTE_UTIL_PKG.GET_DATA('MODE_OF_TRANSPORTATION', p_values);
2951: l_com_class := FTE_UTIL_PKG.GET_DATA('COMMODITY_CLASS', p_values);
2952: l_basis := FTE_UTIL_PKG.GET_DATA('BASIS', p_values);
2953: l_view_flag := FTE_UTIL_PKG.GET_DATA('RATE_CHART_VIEW_FLAG', p_values);
2954: l_distance := FTE_UTIL_PKG.GET_DATA('DISTANCE', p_values);
2947: l_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER', p_values);
2948: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
2949: l_rate_chart_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME', p_values);
2950: l_mode := FTE_UTIL_PKG.GET_DATA('MODE_OF_TRANSPORTATION', p_values);
2951: l_com_class := FTE_UTIL_PKG.GET_DATA('COMMODITY_CLASS', p_values);
2952: l_basis := FTE_UTIL_PKG.GET_DATA('BASIS', p_values);
2953: l_view_flag := FTE_UTIL_PKG.GET_DATA('RATE_CHART_VIEW_FLAG', p_values);
2954: l_distance := FTE_UTIL_PKG.GET_DATA('DISTANCE', p_values);
2955: l_distance_uom := FTE_UTIL_PKG.GET_DATA('DISTANCE_UOM', p_values);
2948: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
2949: l_rate_chart_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME', p_values);
2950: l_mode := FTE_UTIL_PKG.GET_DATA('MODE_OF_TRANSPORTATION', p_values);
2951: l_com_class := FTE_UTIL_PKG.GET_DATA('COMMODITY_CLASS', p_values);
2952: l_basis := FTE_UTIL_PKG.GET_DATA('BASIS', p_values);
2953: l_view_flag := FTE_UTIL_PKG.GET_DATA('RATE_CHART_VIEW_FLAG', p_values);
2954: l_distance := FTE_UTIL_PKG.GET_DATA('DISTANCE', p_values);
2955: l_distance_uom := FTE_UTIL_PKG.GET_DATA('DISTANCE_UOM', p_values);
2956: l_transit := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME', p_values);
2949: l_rate_chart_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME', p_values);
2950: l_mode := FTE_UTIL_PKG.GET_DATA('MODE_OF_TRANSPORTATION', p_values);
2951: l_com_class := FTE_UTIL_PKG.GET_DATA('COMMODITY_CLASS', p_values);
2952: l_basis := FTE_UTIL_PKG.GET_DATA('BASIS', p_values);
2953: l_view_flag := FTE_UTIL_PKG.GET_DATA('RATE_CHART_VIEW_FLAG', p_values);
2954: l_distance := FTE_UTIL_PKG.GET_DATA('DISTANCE', p_values);
2955: l_distance_uom := FTE_UTIL_PKG.GET_DATA('DISTANCE_UOM', p_values);
2956: l_transit := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME', p_values);
2957: l_transit_uom := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME_UOM', p_values);
2950: l_mode := FTE_UTIL_PKG.GET_DATA('MODE_OF_TRANSPORTATION', p_values);
2951: l_com_class := FTE_UTIL_PKG.GET_DATA('COMMODITY_CLASS', p_values);
2952: l_basis := FTE_UTIL_PKG.GET_DATA('BASIS', p_values);
2953: l_view_flag := FTE_UTIL_PKG.GET_DATA('RATE_CHART_VIEW_FLAG', p_values);
2954: l_distance := FTE_UTIL_PKG.GET_DATA('DISTANCE', p_values);
2955: l_distance_uom := FTE_UTIL_PKG.GET_DATA('DISTANCE_UOM', p_values);
2956: l_transit := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME', p_values);
2957: l_transit_uom := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME_UOM', p_values);
2958: l_effect_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
2951: l_com_class := FTE_UTIL_PKG.GET_DATA('COMMODITY_CLASS', p_values);
2952: l_basis := FTE_UTIL_PKG.GET_DATA('BASIS', p_values);
2953: l_view_flag := FTE_UTIL_PKG.GET_DATA('RATE_CHART_VIEW_FLAG', p_values);
2954: l_distance := FTE_UTIL_PKG.GET_DATA('DISTANCE', p_values);
2955: l_distance_uom := FTE_UTIL_PKG.GET_DATA('DISTANCE_UOM', p_values);
2956: l_transit := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME', p_values);
2957: l_transit_uom := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME_UOM', p_values);
2958: l_effect_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
2959: l_expiry_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
2952: l_basis := FTE_UTIL_PKG.GET_DATA('BASIS', p_values);
2953: l_view_flag := FTE_UTIL_PKG.GET_DATA('RATE_CHART_VIEW_FLAG', p_values);
2954: l_distance := FTE_UTIL_PKG.GET_DATA('DISTANCE', p_values);
2955: l_distance_uom := FTE_UTIL_PKG.GET_DATA('DISTANCE_UOM', p_values);
2956: l_transit := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME', p_values);
2957: l_transit_uom := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME_UOM', p_values);
2958: l_effect_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
2959: l_expiry_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
2960: l_editable_flag := FTE_UTIL_PKG.GET_DATA('EDITABLE_FLAG', p_values);
2953: l_view_flag := FTE_UTIL_PKG.GET_DATA('RATE_CHART_VIEW_FLAG', p_values);
2954: l_distance := FTE_UTIL_PKG.GET_DATA('DISTANCE', p_values);
2955: l_distance_uom := FTE_UTIL_PKG.GET_DATA('DISTANCE_UOM', p_values);
2956: l_transit := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME', p_values);
2957: l_transit_uom := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME_UOM', p_values);
2958: l_effect_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
2959: l_expiry_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
2960: l_editable_flag := FTE_UTIL_PKG.GET_DATA('EDITABLE_FLAG', p_values);
2961:
2954: l_distance := FTE_UTIL_PKG.GET_DATA('DISTANCE', p_values);
2955: l_distance_uom := FTE_UTIL_PKG.GET_DATA('DISTANCE_UOM', p_values);
2956: l_transit := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME', p_values);
2957: l_transit_uom := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME_UOM', p_values);
2958: l_effect_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
2959: l_expiry_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
2960: l_editable_flag := FTE_UTIL_PKG.GET_DATA('EDITABLE_FLAG', p_values);
2961:
2962: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2955: l_distance_uom := FTE_UTIL_PKG.GET_DATA('DISTANCE_UOM', p_values);
2956: l_transit := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME', p_values);
2957: l_transit_uom := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME_UOM', p_values);
2958: l_effect_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
2959: l_expiry_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
2960: l_editable_flag := FTE_UTIL_PKG.GET_DATA('EDITABLE_FLAG', p_values);
2961:
2962: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2963: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane number', l_lane_number);
2956: l_transit := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME', p_values);
2957: l_transit_uom := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME_UOM', p_values);
2958: l_effect_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
2959: l_expiry_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
2960: l_editable_flag := FTE_UTIL_PKG.GET_DATA('EDITABLE_FLAG', p_values);
2961:
2962: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2963: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane number', l_lane_number);
2964: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
2959: l_expiry_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
2960: l_editable_flag := FTE_UTIL_PKG.GET_DATA('EDITABLE_FLAG', p_values);
2961:
2962: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2963: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane number', l_lane_number);
2964: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
2965: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart name', l_rate_chart_name);
2966: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode of transportation', l_mode);
2967: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Commodity class', l_com_class);
2960: l_editable_flag := FTE_UTIL_PKG.GET_DATA('EDITABLE_FLAG', p_values);
2961:
2962: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2963: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane number', l_lane_number);
2964: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
2965: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart name', l_rate_chart_name);
2966: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode of transportation', l_mode);
2967: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Commodity class', l_com_class);
2968: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Basis', l_basis);
2961:
2962: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2963: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane number', l_lane_number);
2964: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
2965: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart name', l_rate_chart_name);
2966: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode of transportation', l_mode);
2967: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Commodity class', l_com_class);
2968: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Basis', l_basis);
2969: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart view flag', l_view_flag);
2962: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
2963: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane number', l_lane_number);
2964: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
2965: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart name', l_rate_chart_name);
2966: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode of transportation', l_mode);
2967: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Commodity class', l_com_class);
2968: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Basis', l_basis);
2969: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart view flag', l_view_flag);
2970: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Distance', l_distance);
2963: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane number', l_lane_number);
2964: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
2965: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart name', l_rate_chart_name);
2966: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode of transportation', l_mode);
2967: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Commodity class', l_com_class);
2968: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Basis', l_basis);
2969: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart view flag', l_view_flag);
2970: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Distance', l_distance);
2971: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Distance uom', l_distance_uom);
2964: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
2965: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart name', l_rate_chart_name);
2966: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode of transportation', l_mode);
2967: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Commodity class', l_com_class);
2968: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Basis', l_basis);
2969: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart view flag', l_view_flag);
2970: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Distance', l_distance);
2971: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Distance uom', l_distance_uom);
2972: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit', l_transit);
2965: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart name', l_rate_chart_name);
2966: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode of transportation', l_mode);
2967: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Commodity class', l_com_class);
2968: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Basis', l_basis);
2969: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart view flag', l_view_flag);
2970: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Distance', l_distance);
2971: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Distance uom', l_distance_uom);
2972: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit', l_transit);
2973: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit UOM', l_transit_uom);
2966: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Mode of transportation', l_mode);
2967: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Commodity class', l_com_class);
2968: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Basis', l_basis);
2969: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart view flag', l_view_flag);
2970: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Distance', l_distance);
2971: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Distance uom', l_distance_uom);
2972: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit', l_transit);
2973: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit UOM', l_transit_uom);
2974: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_effect_date);
2967: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Commodity class', l_com_class);
2968: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Basis', l_basis);
2969: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart view flag', l_view_flag);
2970: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Distance', l_distance);
2971: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Distance uom', l_distance_uom);
2972: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit', l_transit);
2973: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit UOM', l_transit_uom);
2974: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_effect_date);
2975: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_expiry_date);
2968: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Basis', l_basis);
2969: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart view flag', l_view_flag);
2970: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Distance', l_distance);
2971: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Distance uom', l_distance_uom);
2972: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit', l_transit);
2973: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit UOM', l_transit_uom);
2974: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_effect_date);
2975: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_expiry_date);
2976: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Editable flag', l_editable_flag);
2969: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate chart view flag', l_view_flag);
2970: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Distance', l_distance);
2971: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Distance uom', l_distance_uom);
2972: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit', l_transit);
2973: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit UOM', l_transit_uom);
2974: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_effect_date);
2975: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_expiry_date);
2976: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Editable flag', l_editable_flag);
2977: END IF;
2970: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Distance', l_distance);
2971: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Distance uom', l_distance_uom);
2972: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit', l_transit);
2973: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit UOM', l_transit_uom);
2974: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_effect_date);
2975: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_expiry_date);
2976: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Editable flag', l_editable_flag);
2977: END IF;
2978:
2971: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Distance uom', l_distance_uom);
2972: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit', l_transit);
2973: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit UOM', l_transit_uom);
2974: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_effect_date);
2975: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_expiry_date);
2976: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Editable flag', l_editable_flag);
2977: END IF;
2978:
2979: -- this boolean variable is true when :
2972: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit', l_transit);
2973: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit UOM', l_transit_uom);
2974: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_effect_date);
2975: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_expiry_date);
2976: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Editable flag', l_editable_flag);
2977: END IF;
2978:
2979: -- this boolean variable is true when :
2980: -- we load a TL_SERVICE and the Rate Chart is already in the system.
2981: -- In that case, we need to create the Service and we need to create a row into i
2982: -- FTE_LANE_RATE_CHARTS to attach the Service to the Rate Chart.
2983:
2984: IF (l_carrier_name IS NULL) THEN
2985: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_CARRIER_MISSING');
2986: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2987: p_msg => x_error_msg,
2988: p_category => 'A',
2989: p_line_number => p_line_number);
2982: -- FTE_LANE_RATE_CHARTS to attach the Service to the Rate Chart.
2983:
2984: IF (l_carrier_name IS NULL) THEN
2985: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_CARRIER_MISSING');
2986: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2987: p_msg => x_error_msg,
2988: p_category => 'A',
2989: p_line_number => p_line_number);
2990: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2986: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
2987: p_msg => x_error_msg,
2988: p_category => 'A',
2989: p_line_number => p_line_number);
2990: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
2991: x_status := 1;
2992: RETURN;
2993: ELSE
2994: VALIDATE_CARRIER(p_carrier_name => l_carrier_name,
2997: x_status => x_status,
2998: x_error_msg => x_error_msg);
2999:
3000: IF (x_status <> -1) THEN
3001: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3002: RETURN;
3003: END IF;
3004:
3005: p_lane_tbl(l_count).carrier_id := l_carrier_id;
3005: p_lane_tbl(l_count).carrier_id := l_carrier_id;
3006: END IF;
3007:
3008: IF (l_lane_number IS NULL) THEN
3009: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_LANE_NUMBER_MISSING');
3010: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3011: p_msg => x_error_msg,
3012: p_category => 'A',
3013: p_line_number => p_line_number);
3006: END IF;
3007:
3008: IF (l_lane_number IS NULL) THEN
3009: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_LANE_NUMBER_MISSING');
3010: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3011: p_msg => x_error_msg,
3012: p_category => 'A',
3013: p_line_number => p_line_number);
3014: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3010: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3011: p_msg => x_error_msg,
3012: p_category => 'A',
3013: p_line_number => p_line_number);
3014: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3015: x_status := 1;
3016: RETURN;
3017: END IF;
3018:
3017: END IF;
3018:
3019: IF (p_action = 'UPDATE') THEN
3020: IF (l_lane_number IS NULL) THEN
3021: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_LANE_NUMBER_MISSING');
3022: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3023: p_msg => x_error_msg,
3024: p_category => 'A',
3025: p_line_number => p_line_number);
3018:
3019: IF (p_action = 'UPDATE') THEN
3020: IF (l_lane_number IS NULL) THEN
3021: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_LANE_NUMBER_MISSING');
3022: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3023: p_msg => x_error_msg,
3024: p_category => 'A',
3025: p_line_number => p_line_number);
3026: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3022: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3023: p_msg => x_error_msg,
3024: p_category => 'A',
3025: p_line_number => p_line_number);
3026: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3027: x_status := 1;
3028: RETURN;
3029: ELSE
3030: l_old_lane_id := FTE_LANE_PKG.GET_LANE_ID(l_lane_number, l_carrier_id);
3029: ELSE
3030: l_old_lane_id := FTE_LANE_PKG.GET_LANE_ID(l_lane_number, l_carrier_id);
3031:
3032: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
3033: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Old Lane ID', l_old_lane_id);
3034: END IF;
3035:
3036: p_lane_tbl(l_count).lane_id := l_old_lane_id;
3037: p_lane_tbl(l_count).lane_number := l_lane_number;
3035:
3036: p_lane_tbl(l_count).lane_id := l_old_lane_id;
3037: p_lane_tbl(l_count).lane_number := l_lane_number;
3038: IF (l_old_lane_id = -1) THEN
3039: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_LANE_NUMBER_INVALID',
3040: P_Tokens => STRINGARRAY('SERVICE_NUMBER'),
3041: P_values => STRINGARRAY(l_lane_number));
3042:
3043: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3039: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_LANE_NUMBER_INVALID',
3040: P_Tokens => STRINGARRAY('SERVICE_NUMBER'),
3041: P_values => STRINGARRAY(l_lane_number));
3042:
3043: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3044: p_msg => x_error_msg,
3045: p_category => 'C',
3046: p_line_number => p_line_number);
3047: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3043: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3044: p_msg => x_error_msg,
3045: p_category => 'C',
3046: p_line_number => p_line_number);
3047: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3048: x_status := 1;
3049: RETURN;
3050: END IF;
3051: END IF;
3070: ELSIF (p_action = 'DELETE') THEN
3071: l_old_lane_id := FTE_LANE_PKG.GET_LANE_ID(l_lane_number, l_carrier_id);
3072: p_lane_tbl(l_count).lane_id := l_old_lane_id;
3073: IF (l_old_lane_id = -1) THEN
3074: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_LANE_NUMBER_INVALID',
3075: P_Tokens => STRINGARRAY('SERVICE_NUMBER'),
3076: P_values => STRINGARRAY(l_lane_number));
3077: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3078: p_msg => x_error_msg,
3073: IF (l_old_lane_id = -1) THEN
3074: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_LANE_NUMBER_INVALID',
3075: P_Tokens => STRINGARRAY('SERVICE_NUMBER'),
3076: P_values => STRINGARRAY(l_lane_number));
3077: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3078: p_msg => x_error_msg,
3079: p_category => 'C',
3080: p_line_number => p_line_number);
3081: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3077: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3078: p_msg => x_error_msg,
3079: p_category => 'C',
3080: p_line_number => p_line_number);
3081: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3082: x_status := 1;
3083: RETURN;
3084: END IF;
3085: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3081: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3082: x_status := 1;
3083: RETURN;
3084: END IF;
3085: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3086: RETURN;
3087: ELSIF (p_action = 'ADD') THEN
3088:
3089: IF (-1 <> FTE_LANE_PKG.GET_LANE_ID(l_lane_number, l_carrier_id)) THEN
3086: RETURN;
3087: ELSIF (p_action = 'ADD') THEN
3088:
3089: IF (-1 <> FTE_LANE_PKG.GET_LANE_ID(l_lane_number, l_carrier_id)) THEN
3090: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_LANE_REF_EXISTS',
3091: P_Tokens => STRINGARRAY('SERVICE_NUMBER'),
3092: P_values => STRINGARRAY(l_lane_number));
3093: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3094: p_msg => x_error_msg,
3089: IF (-1 <> FTE_LANE_PKG.GET_LANE_ID(l_lane_number, l_carrier_id)) THEN
3090: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_LANE_REF_EXISTS',
3091: P_Tokens => STRINGARRAY('SERVICE_NUMBER'),
3092: P_values => STRINGARRAY(l_lane_number));
3093: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3094: p_msg => x_error_msg,
3095: p_category => 'D',
3096: p_line_number => p_line_number);
3097: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3093: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3094: p_msg => x_error_msg,
3095: p_category => 'D',
3096: p_line_number => p_line_number);
3097: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3098: x_status := 1;
3099: RETURN;
3100: ELSE
3101: p_lane_tbl(l_count).lane_id := FTE_LANE_PKG.GET_NEXT_LANE_ID;
3106: -- validate Origin, Destination, Mode only for ADD
3107: IF (l_old_lane_id = -1) THEN
3108: -- set origin and destination
3109:
3110: l_region_info.city := FTE_UTIL_PKG.GET_DATA('ORIGIN_CITY', p_values);
3111: l_region_info.state := FTE_UTIL_PKG.GET_DATA('ORIGIN_STATE', p_values);
3112: l_region_info.country := FTE_UTIL_PKG.GET_DATA('ORIGIN_COUNTRY', p_values);
3113: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_FROM', p_values);
3114: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_TO', p_values);
3107: IF (l_old_lane_id = -1) THEN
3108: -- set origin and destination
3109:
3110: l_region_info.city := FTE_UTIL_PKG.GET_DATA('ORIGIN_CITY', p_values);
3111: l_region_info.state := FTE_UTIL_PKG.GET_DATA('ORIGIN_STATE', p_values);
3112: l_region_info.country := FTE_UTIL_PKG.GET_DATA('ORIGIN_COUNTRY', p_values);
3113: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_FROM', p_values);
3114: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_TO', p_values);
3115:
3108: -- set origin and destination
3109:
3110: l_region_info.city := FTE_UTIL_PKG.GET_DATA('ORIGIN_CITY', p_values);
3111: l_region_info.state := FTE_UTIL_PKG.GET_DATA('ORIGIN_STATE', p_values);
3112: l_region_info.country := FTE_UTIL_PKG.GET_DATA('ORIGIN_COUNTRY', p_values);
3113: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_FROM', p_values);
3114: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_TO', p_values);
3115:
3116: l_region_info.zone := FTE_UTIL_PKG.GET_DATA('ORIGIN_ZONE', p_values);
3109:
3110: l_region_info.city := FTE_UTIL_PKG.GET_DATA('ORIGIN_CITY', p_values);
3111: l_region_info.state := FTE_UTIL_PKG.GET_DATA('ORIGIN_STATE', p_values);
3112: l_region_info.country := FTE_UTIL_PKG.GET_DATA('ORIGIN_COUNTRY', p_values);
3113: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_FROM', p_values);
3114: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_TO', p_values);
3115:
3116: l_region_info.zone := FTE_UTIL_PKG.GET_DATA('ORIGIN_ZONE', p_values);
3117:
3110: l_region_info.city := FTE_UTIL_PKG.GET_DATA('ORIGIN_CITY', p_values);
3111: l_region_info.state := FTE_UTIL_PKG.GET_DATA('ORIGIN_STATE', p_values);
3112: l_region_info.country := FTE_UTIL_PKG.GET_DATA('ORIGIN_COUNTRY', p_values);
3113: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_FROM', p_values);
3114: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_TO', p_values);
3115:
3116: l_region_info.zone := FTE_UTIL_PKG.GET_DATA('ORIGIN_ZONE', p_values);
3117:
3118: IF (l_region_info.country IS NULL) THEN
3112: l_region_info.country := FTE_UTIL_PKG.GET_DATA('ORIGIN_COUNTRY', p_values);
3113: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_FROM', p_values);
3114: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_TO', p_values);
3115:
3116: l_region_info.zone := FTE_UTIL_PKG.GET_DATA('ORIGIN_ZONE', p_values);
3117:
3118: IF (l_region_info.country IS NULL) THEN
3119:
3120: l_zone_id := FTE_REGION_ZONE_LOADER.GET_ZONE_ID(l_region_info.zone);
3119:
3120: l_zone_id := FTE_REGION_ZONE_LOADER.GET_ZONE_ID(l_region_info.zone);
3121:
3122: IF (l_zone_id IS NULL OR l_zone_id = -1) THEN
3123: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_LANE_ORIGIN_MISSING');
3124:
3125: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3126: p_msg => x_error_msg,
3127: p_category => 'A',
3121:
3122: IF (l_zone_id IS NULL OR l_zone_id = -1) THEN
3123: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_LANE_ORIGIN_MISSING');
3124:
3125: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3126: p_msg => x_error_msg,
3127: p_category => 'A',
3128: p_line_number => p_line_number);
3129:
3126: p_msg => x_error_msg,
3127: p_category => 'A',
3128: p_line_number => p_line_number);
3129:
3130: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3131: x_status := 2;
3132: RETURN;
3133: ELSE
3134: p_lane_tbl(l_count).origin_id := l_zone_id;
3138:
3139: l_region_id := FTE_REGION_ZONE_LOADER.GET_REGION_ID(p_region_info => l_region_info);
3140:
3141: IF (l_region_id IS NULL OR l_region_id = -1) THEN
3142: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_REGION_UNKNOWN',
3143: p_tokens => STRINGARRAY('REGION_NAME'),
3144: p_values => STRINGARRAY(l_region_info.country ||' '||
3145: l_region_info.state ||' '||
3146: l_region_info.city));
3143: p_tokens => STRINGARRAY('REGION_NAME'),
3144: p_values => STRINGARRAY(l_region_info.country ||' '||
3145: l_region_info.state ||' '||
3146: l_region_info.city));
3147: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3148: p_msg => x_error_msg,
3149: p_category => 'D',
3150: p_line_number => p_line_number);
3151:
3148: p_msg => x_error_msg,
3149: p_category => 'D',
3150: p_line_number => p_line_number);
3151:
3152: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3153: x_status := 2;
3154: RETURN;
3155: END IF;
3156:
3162: p_supplier_id => -1,
3163: p_validate_flag => TRUE,
3164: p_postal_code_from => l_region_info.postal_code_from,
3165: p_postal_code_to => l_region_info.postal_code_to) = -1) THEN
3166: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3167: x_status := 2;
3168: RETURN;
3169: END IF;
3170:
3171: p_lane_tbl(l_count).origin_id := l_region_id;
3172:
3173: END IF;
3174:
3175: l_region_info.city := FTE_UTIL_PKG.GET_DATA('DESTINATION_CITY', p_values);
3176: l_region_info.state := FTE_UTIL_PKG.GET_DATA('DESTINATION_STATE', p_values);
3177: l_region_info.country := FTE_UTIL_PKG.GET_DATA('DESTINATION_COUNTRY', p_values);
3178: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_FROM', p_values);
3179: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_TO', p_values);
3172:
3173: END IF;
3174:
3175: l_region_info.city := FTE_UTIL_PKG.GET_DATA('DESTINATION_CITY', p_values);
3176: l_region_info.state := FTE_UTIL_PKG.GET_DATA('DESTINATION_STATE', p_values);
3177: l_region_info.country := FTE_UTIL_PKG.GET_DATA('DESTINATION_COUNTRY', p_values);
3178: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_FROM', p_values);
3179: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_TO', p_values);
3180: l_region_info.zone := FTE_UTIL_PKG.GET_DATA('DESTINATION_ZONE', p_values);
3173: END IF;
3174:
3175: l_region_info.city := FTE_UTIL_PKG.GET_DATA('DESTINATION_CITY', p_values);
3176: l_region_info.state := FTE_UTIL_PKG.GET_DATA('DESTINATION_STATE', p_values);
3177: l_region_info.country := FTE_UTIL_PKG.GET_DATA('DESTINATION_COUNTRY', p_values);
3178: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_FROM', p_values);
3179: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_TO', p_values);
3180: l_region_info.zone := FTE_UTIL_PKG.GET_DATA('DESTINATION_ZONE', p_values);
3181:
3174:
3175: l_region_info.city := FTE_UTIL_PKG.GET_DATA('DESTINATION_CITY', p_values);
3176: l_region_info.state := FTE_UTIL_PKG.GET_DATA('DESTINATION_STATE', p_values);
3177: l_region_info.country := FTE_UTIL_PKG.GET_DATA('DESTINATION_COUNTRY', p_values);
3178: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_FROM', p_values);
3179: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_TO', p_values);
3180: l_region_info.zone := FTE_UTIL_PKG.GET_DATA('DESTINATION_ZONE', p_values);
3181:
3182: IF (l_region_info.country IS NULL) THEN
3175: l_region_info.city := FTE_UTIL_PKG.GET_DATA('DESTINATION_CITY', p_values);
3176: l_region_info.state := FTE_UTIL_PKG.GET_DATA('DESTINATION_STATE', p_values);
3177: l_region_info.country := FTE_UTIL_PKG.GET_DATA('DESTINATION_COUNTRY', p_values);
3178: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_FROM', p_values);
3179: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_TO', p_values);
3180: l_region_info.zone := FTE_UTIL_PKG.GET_DATA('DESTINATION_ZONE', p_values);
3181:
3182: IF (l_region_info.country IS NULL) THEN
3183:
3176: l_region_info.state := FTE_UTIL_PKG.GET_DATA('DESTINATION_STATE', p_values);
3177: l_region_info.country := FTE_UTIL_PKG.GET_DATA('DESTINATION_COUNTRY', p_values);
3178: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_FROM', p_values);
3179: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_TO', p_values);
3180: l_region_info.zone := FTE_UTIL_PKG.GET_DATA('DESTINATION_ZONE', p_values);
3181:
3182: IF (l_region_info.country IS NULL) THEN
3183:
3184: l_zone_id := FTE_REGION_ZONE_LOADER.GET_ZONE_ID(l_region_info.zone);
3183:
3184: l_zone_id := FTE_REGION_ZONE_LOADER.GET_ZONE_ID(l_region_info.zone);
3185:
3186: IF (l_zone_id IS NULL OR l_zone_id = -1 ) THEN
3187: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_LANE_DEST_MISSING');
3188:
3189: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3190: p_msg => x_error_msg,
3191: p_category => 'A',
3185:
3186: IF (l_zone_id IS NULL OR l_zone_id = -1 ) THEN
3187: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_LANE_DEST_MISSING');
3188:
3189: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3190: p_msg => x_error_msg,
3191: p_category => 'A',
3192: p_line_number => p_line_number);
3193:
3190: p_msg => x_error_msg,
3191: p_category => 'A',
3192: p_line_number => p_line_number);
3193:
3194: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3195: x_status := 2;
3196: RETURN;
3197: ELSE
3198: p_lane_tbl(l_count).destination_id := l_zone_id;
3201: ELSE
3202: l_region_id := FTE_REGION_ZONE_LOADER.GET_REGION_ID(p_region_info => l_region_info);
3203:
3204: IF (l_region_id IS NULL OR l_region_id = -1) THEN
3205: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_REGION_UNKNOWN',
3206: p_tokens => STRINGARRAY('REGION_NAME'),
3207: p_values => STRINGARRAY(l_region_info.country ||' '||
3208: l_region_info.state ||' '||
3209: l_region_info.city));
3206: p_tokens => STRINGARRAY('REGION_NAME'),
3207: p_values => STRINGARRAY(l_region_info.country ||' '||
3208: l_region_info.state ||' '||
3209: l_region_info.city));
3210: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3211: p_msg => x_error_msg,
3212: p_category => 'D',
3213: p_line_number => p_line_number);
3214:
3211: p_msg => x_error_msg,
3212: p_category => 'D',
3213: p_line_number => p_line_number);
3214:
3215: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3216: x_status := 2;
3217: RETURN;
3218: END IF;
3219:
3223: p_supplier_id => -1,
3224: p_validate_flag => TRUE,
3225: p_postal_code_from => l_region_info.postal_code_from,
3226: p_postal_code_to => l_region_info.postal_code_to) = -1) THEN
3227: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3228: x_status := 2;
3229: RETURN;
3230: END IF;
3231:
3234:
3235: END IF;
3236:
3237: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
3238: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Origin ID', p_lane_tbl(l_count).origin_id);
3239: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Destination ID', p_lane_tbl(l_count).destination_id);
3240: END IF;
3241:
3242: -- Validation for MODE_OF_TRANSPORTATION
3235: END IF;
3236:
3237: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
3238: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Origin ID', p_lane_tbl(l_count).origin_id);
3239: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Destination ID', p_lane_tbl(l_count).destination_id);
3240: END IF;
3241:
3242: -- Validation for MODE_OF_TRANSPORTATION
3243:
3241:
3242: -- Validation for MODE_OF_TRANSPORTATION
3243:
3244: IF (l_mode IS NULL) THEN
3245: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_MODE_OF_TRANS_MISSING');
3246: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3247: p_msg => x_error_msg,
3248: p_category => 'A',
3249: p_line_number => p_line_number);
3242: -- Validation for MODE_OF_TRANSPORTATION
3243:
3244: IF (l_mode IS NULL) THEN
3245: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_MODE_OF_TRANS_MISSING');
3246: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3247: p_msg => x_error_msg,
3248: p_category => 'A',
3249: p_line_number => p_line_number);
3250: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3246: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3247: p_msg => x_error_msg,
3248: p_category => 'A',
3249: p_line_number => p_line_number);
3250: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3251: x_status := 1;
3252: RETURN;
3253: ELSE
3254: VALIDATE_MODE_OF_TRANS(p_mode => l_mode,
3258: x_status => x_status,
3259: x_error_msg => x_error_msg);
3260:
3261: IF (x_status <> -1) THEN
3262: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3263: RETURN;
3264: END IF;
3265:
3266: IF (l_mode_code = 'TRUCK') THEN
3263: RETURN;
3264: END IF;
3265:
3266: IF (l_mode_code = 'TRUCK') THEN
3267: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_SERVICE_NO_TL');
3268: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3269: p_msg => x_error_msg,
3270: p_category => 'D',
3271: p_line_number => p_line_number);
3264: END IF;
3265:
3266: IF (l_mode_code = 'TRUCK') THEN
3267: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_SERVICE_NO_TL');
3268: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3269: p_msg => x_error_msg,
3270: p_category => 'D',
3271: p_line_number => p_line_number);
3272: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3268: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3269: p_msg => x_error_msg,
3270: p_category => 'D',
3271: p_line_number => p_line_number);
3272: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3273: x_status := 1;
3274: RETURN;
3275: END IF;
3276:
3281: -- Validation for DISTANCE and DISTANCE_UOM
3282: IF (l_distance IS NOT NULL) THEN
3283:
3284: IF (to_number(l_distance) < 0) THEN
3285: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_DISTANCE_NEG');
3286: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3287: p_msg => x_error_msg,
3288: p_category => 'D',
3289: p_line_number => p_line_number);
3282: IF (l_distance IS NOT NULL) THEN
3283:
3284: IF (to_number(l_distance) < 0) THEN
3285: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_DISTANCE_NEG');
3286: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3287: p_msg => x_error_msg,
3288: p_category => 'D',
3289: p_line_number => p_line_number);
3290: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3286: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3287: p_msg => x_error_msg,
3288: p_category => 'D',
3289: p_line_number => p_line_number);
3290: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3291: x_status := 1;
3292: RETURN;
3293: ELSE
3294: p_lane_tbl(l_count).distance := l_distance;
3295: END IF;
3296:
3297: -- If distance is a valid number, valid UOM should be specified.
3298: IF (l_distance_uom IS NULL) THEN
3299: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_UOM_MISSING');
3300: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3301: p_msg => x_error_msg,
3302: p_category => 'A',
3303: p_line_number => p_line_number);
3296:
3297: -- If distance is a valid number, valid UOM should be specified.
3298: IF (l_distance_uom IS NULL) THEN
3299: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_UOM_MISSING');
3300: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3301: p_msg => x_error_msg,
3302: p_category => 'A',
3303: p_line_number => p_line_number);
3304: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3300: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3301: p_msg => x_error_msg,
3302: p_category => 'A',
3303: p_line_number => p_line_number);
3304: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3305: x_status := 1;
3306: RETURN;
3307: ELSE
3308: VALIDATE_UOM(p_uom => l_distance_uom,
3311: p_uom_code => l_distance_uom_code,
3312: x_status => x_status,
3313: x_error_msg => x_error_msg);
3314: IF (x_status <> -1) THEN
3315: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3316: RETURN;
3317: END IF;
3318: p_lane_tbl(l_count).distance_uom := l_distance_uom_code;
3319:
3322:
3323: -- Validation for TRANSIT_TIME and TRANSIT_TIME_UOM
3324: IF (l_transit IS NOT NULL) THEN
3325: IF (to_number(l_transit) < 0) THEN
3326: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_TRANSIT_TIME_NEG');
3327: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3328: p_msg => x_error_msg,
3329: p_category => 'D',
3330: p_line_number => p_line_number);
3323: -- Validation for TRANSIT_TIME and TRANSIT_TIME_UOM
3324: IF (l_transit IS NOT NULL) THEN
3325: IF (to_number(l_transit) < 0) THEN
3326: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_TRANSIT_TIME_NEG');
3327: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3328: p_msg => x_error_msg,
3329: p_category => 'D',
3330: p_line_number => p_line_number);
3331: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3327: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3328: p_msg => x_error_msg,
3329: p_category => 'D',
3330: p_line_number => p_line_number);
3331: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3332: x_status := 1;
3333: RETURN;
3334: ELSE
3335: p_lane_tbl(l_count).transit_time := l_transit;
3335: p_lane_tbl(l_count).transit_time := l_transit;
3336: END IF;
3337: -- If transit is a valid number, valid UOM should be specified.
3338: IF (l_transit_uom IS NULL) THEN
3339: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_UOM_MISSING');
3340: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3341: p_msg => x_error_msg,
3342: p_category => 'A',
3343: p_line_number => p_line_number);
3336: END IF;
3337: -- If transit is a valid number, valid UOM should be specified.
3338: IF (l_transit_uom IS NULL) THEN
3339: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_CAT_UOM_MISSING');
3340: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3341: p_msg => x_error_msg,
3342: p_category => 'A',
3343: p_line_number => p_line_number);
3344: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3340: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3341: p_msg => x_error_msg,
3342: p_category => 'A',
3343: p_line_number => p_line_number);
3344: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3345: x_status := 1;
3346: RETURN;
3347: ELSE
3348: VALIDATE_UOM(p_uom => l_transit_uom,
3351: p_uom_code => l_transit_time_uom_code,
3352: x_status => x_status,
3353: x_error_msg => x_error_msg);
3354: IF (x_status <> -1) THEN
3355: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3356: RETURN;
3357: END IF;
3358: p_lane_tbl(l_count).transit_time_uom := l_transit_time_uom_code;
3359:
3369: p_line_number => p_line_number,
3370: x_status => x_status,
3371: x_error_msg => x_error_msg);
3372: IF (x_status <> -1) THEN
3373: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3374: RETURN;
3375: END IF;
3376: END IF;
3377:
3380: IF (NOT p_lane_tbl(l_count).basis_flag OR l_old_lane_id = -1) THEN
3381: --if the old lane doesn't have a basis or a new lane, then it's okay to put null
3382: p_lane_tbl(l_count).line_number := p_line_number;
3383: ELSIF (l_old_lane_id <> -1) THEN --if old lane does have basis and this is a update of it, then error
3384: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_BASIS_MISSING');
3385: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3386: p_msg => x_error_msg,
3387: p_category => 'A',
3388: p_line_number => p_line_number);
3381: --if the old lane doesn't have a basis or a new lane, then it's okay to put null
3382: p_lane_tbl(l_count).line_number := p_line_number;
3383: ELSIF (l_old_lane_id <> -1) THEN --if old lane does have basis and this is a update of it, then error
3384: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_BASIS_MISSING');
3385: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3386: p_msg => x_error_msg,
3387: p_category => 'A',
3388: p_line_number => p_line_number);
3389: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3385: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3386: p_msg => x_error_msg,
3387: p_category => 'A',
3388: p_line_number => p_line_number);
3389: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3390: x_status := 1;
3391: RETURN;
3392: END IF;
3393: ELSE
3390: x_status := 1;
3391: RETURN;
3392: END IF;
3393: ELSE
3394: l_basis_code := FTE_UTIL_PKG.GET_LOOKUP_CODE('FTE_BASES', l_basis);
3395: IF (l_basis_code IS NOT NULL) THEN
3396: p_lane_tbl(l_count).basis := l_basis_code;
3397: p_lane_tbl(l_count).basis_flag := true;
3398: ELSE
3395: IF (l_basis_code IS NOT NULL) THEN
3396: p_lane_tbl(l_count).basis := l_basis_code;
3397: p_lane_tbl(l_count).basis_flag := true;
3398: ELSE
3399: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_BASIS_INVALID',
3400: p_tokens => STRINGARRAY('BASIS'),
3401: p_values => STRINGARRAY(l_basis));
3402: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3403: p_msg => x_error_msg,
3398: ELSE
3399: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_BASIS_INVALID',
3400: p_tokens => STRINGARRAY('BASIS'),
3401: p_values => STRINGARRAY(l_basis));
3402: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3403: p_msg => x_error_msg,
3404: p_category => 'D',
3405: p_line_number => p_line_number);
3406: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3402: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3403: p_msg => x_error_msg,
3404: p_category => 'D',
3405: p_line_number => p_line_number);
3406: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3407: x_status := 1;
3408: RETURN;
3409: END IF;
3410: END IF;
3417: -- Validation for COMMODITY_CLASS
3418: IF (l_com_class IS NULL) THEN
3419: p_lane_tbl(l_count).comm_fc_class_code := '';
3420: ELSE
3421: l_com_class_code := FTE_UTIL_PKG.GET_LOOKUP_CODE('WSH_COMMODITY_CLASSIFICATION', l_com_class);
3422: IF (l_com_class_code IS NOT NULL) THEN
3423: p_lane_tbl(l_count).comm_fc_class_code := l_com_class_code;
3424: ELSE
3425: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_COMM_CLASS_INVALID',
3421: l_com_class_code := FTE_UTIL_PKG.GET_LOOKUP_CODE('WSH_COMMODITY_CLASSIFICATION', l_com_class);
3422: IF (l_com_class_code IS NOT NULL) THEN
3423: p_lane_tbl(l_count).comm_fc_class_code := l_com_class_code;
3424: ELSE
3425: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_COMM_CLASS_INVALID',
3426: p_tokens => STRINGARRAY('COMMODITY_CLASS'),
3427: p_values => STRINGARRAY(l_com_class));
3428: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3429: p_msg => x_error_msg,
3424: ELSE
3425: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_COMM_CLASS_INVALID',
3426: p_tokens => STRINGARRAY('COMMODITY_CLASS'),
3427: p_values => STRINGARRAY(l_com_class));
3428: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3429: p_msg => x_error_msg,
3430: p_category => 'D',
3431: p_line_number => p_line_number);
3432: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3428: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3429: p_msg => x_error_msg,
3430: p_category => 'D',
3431: p_line_number => p_line_number);
3432: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3433: x_status := 1;
3434: RETURN;
3435: END IF;
3436: END IF;
3442: x_status => x_status,
3443: x_error_msg => x_error_msg);
3444:
3445: IF (x_status <> -1) THEN
3446: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3447: RETURN;
3448: END IF;
3449:
3450: p_lane_tbl(l_count).effective_date := l_effect_date;
3456: x_status => x_status,
3457: x_error_msg => x_error_msg);
3458:
3459: IF (x_status <> -1) THEN
3460: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3461: RETURN;
3462: END IF;
3463:
3464: p_lane_tbl(l_count).expiry_date := l_expiry_date;
3471: END IF;
3472: ELSIF (l_view_flag = 'Y' OR l_view_flag = 'N') THEN
3473: p_lane_tbl(l_count).pricelist_view_flag := l_view_flag;
3474: ELSE
3475: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_PRICELIST_VIEW_INVALID',
3476: p_tokens => STRINGARRAY('VIEW_FLAG'),
3477: p_values => STRINGARRAY(l_view_flag));
3478: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3479: p_msg => x_error_msg,
3474: ELSE
3475: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_PRICELIST_VIEW_INVALID',
3476: p_tokens => STRINGARRAY('VIEW_FLAG'),
3477: p_values => STRINGARRAY(l_view_flag));
3478: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3479: p_msg => x_error_msg,
3480: p_category => 'D',
3481: p_line_number => p_line_number);
3482: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3478: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3479: p_msg => x_error_msg,
3480: p_category => 'D',
3481: p_line_number => p_line_number);
3482: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3483: x_status := 1;
3484: RETURN;
3485: END IF;
3486:
3533: x_status => x_status,
3534: x_error_msg => x_error_msg);
3535: END IF;
3536:
3537: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3538: EXCEPTION
3539: WHEN OTHERS THEN
3540: x_error_msg := sqlerrm;
3541: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3537: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3538: EXCEPTION
3539: WHEN OTHERS THEN
3540: x_error_msg := sqlerrm;
3541: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3542: p_msg => x_error_msg,
3543: p_category => 'O',
3544: p_line_number => p_line_number);
3545: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3541: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3542: p_msg => x_error_msg,
3543: p_category => 'O',
3544: p_line_number => p_line_number);
3545: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3546: x_status := 1;
3547: RETURN;
3548: END VALIDATE_SERVICE;
3549:
3615: AND parameter_id = p_parameter_id;
3616:
3617: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_SERVICE_RATING_SETUP';
3618: BEGIN
3619: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
3620:
3621: x_status := -1;
3622:
3623: p_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
3619: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
3620:
3621: x_status := -1;
3622:
3623: p_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
3624: p_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER', p_values);
3625: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
3626: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
3627: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
3620:
3621: x_status := -1;
3622:
3623: p_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
3624: p_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER', p_values);
3625: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
3626: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
3627: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
3628: l_name := FTE_UTIL_PKG.GET_DATA('NAME', p_values);
3621: x_status := -1;
3622:
3623: p_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
3624: p_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER', p_values);
3625: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
3626: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
3627: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
3628: l_name := FTE_UTIL_PKG.GET_DATA('NAME', p_values);
3629: l_value_from := FTE_UTIL_PKG.GET_DATA('VALUE_FROM', p_values);
3622:
3623: p_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
3624: p_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER', p_values);
3625: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
3626: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
3627: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
3628: l_name := FTE_UTIL_PKG.GET_DATA('NAME', p_values);
3629: l_value_from := FTE_UTIL_PKG.GET_DATA('VALUE_FROM', p_values);
3630: l_value_to := FTE_UTIL_PKG.GET_DATA('VALUE_TO', p_values);
3623: p_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
3624: p_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER', p_values);
3625: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
3626: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
3627: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
3628: l_name := FTE_UTIL_PKG.GET_DATA('NAME', p_values);
3629: l_value_from := FTE_UTIL_PKG.GET_DATA('VALUE_FROM', p_values);
3630: l_value_to := FTE_UTIL_PKG.GET_DATA('VALUE_TO', p_values);
3631: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
3624: p_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER', p_values);
3625: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
3626: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
3627: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
3628: l_name := FTE_UTIL_PKG.GET_DATA('NAME', p_values);
3629: l_value_from := FTE_UTIL_PKG.GET_DATA('VALUE_FROM', p_values);
3630: l_value_to := FTE_UTIL_PKG.GET_DATA('VALUE_TO', p_values);
3631: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
3632: l_currency := FTE_UTIL_PKG.GET_DATA('CURRENCY', p_values);
3625: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
3626: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
3627: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
3628: l_name := FTE_UTIL_PKG.GET_DATA('NAME', p_values);
3629: l_value_from := FTE_UTIL_PKG.GET_DATA('VALUE_FROM', p_values);
3630: l_value_to := FTE_UTIL_PKG.GET_DATA('VALUE_TO', p_values);
3631: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
3632: l_currency := FTE_UTIL_PKG.GET_DATA('CURRENCY', p_values);
3633:
3626: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
3627: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
3628: l_name := FTE_UTIL_PKG.GET_DATA('NAME', p_values);
3629: l_value_from := FTE_UTIL_PKG.GET_DATA('VALUE_FROM', p_values);
3630: l_value_to := FTE_UTIL_PKG.GET_DATA('VALUE_TO', p_values);
3631: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
3632: l_currency := FTE_UTIL_PKG.GET_DATA('CURRENCY', p_values);
3633:
3634: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
3627: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
3628: l_name := FTE_UTIL_PKG.GET_DATA('NAME', p_values);
3629: l_value_from := FTE_UTIL_PKG.GET_DATA('VALUE_FROM', p_values);
3630: l_value_to := FTE_UTIL_PKG.GET_DATA('VALUE_TO', p_values);
3631: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
3632: l_currency := FTE_UTIL_PKG.GET_DATA('CURRENCY', p_values);
3633:
3634: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
3635: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type);
3628: l_name := FTE_UTIL_PKG.GET_DATA('NAME', p_values);
3629: l_value_from := FTE_UTIL_PKG.GET_DATA('VALUE_FROM', p_values);
3630: l_value_to := FTE_UTIL_PKG.GET_DATA('VALUE_TO', p_values);
3631: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
3632: l_currency := FTE_UTIL_PKG.GET_DATA('CURRENCY', p_values);
3633:
3634: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
3635: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type);
3636: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
3631: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
3632: l_currency := FTE_UTIL_PKG.GET_DATA('CURRENCY', p_values);
3633:
3634: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
3635: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type);
3636: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
3637: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Pre Lane Number', p_pre_lane_number);
3638: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane function', p_lane_function);
3639: IF (p_deficit_wt) THEN
3632: l_currency := FTE_UTIL_PKG.GET_DATA('CURRENCY', p_values);
3633:
3634: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
3635: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type);
3636: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
3637: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Pre Lane Number', p_pre_lane_number);
3638: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane function', p_lane_function);
3639: IF (p_deficit_wt) THEN
3640: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'TRUE');
3633:
3634: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
3635: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type);
3636: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
3637: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Pre Lane Number', p_pre_lane_number);
3638: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane function', p_lane_function);
3639: IF (p_deficit_wt) THEN
3640: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'TRUE');
3641: ELSE
3634: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
3635: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type);
3636: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
3637: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Pre Lane Number', p_pre_lane_number);
3638: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane function', p_lane_function);
3639: IF (p_deficit_wt) THEN
3640: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'TRUE');
3641: ELSE
3642: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'FALSE');
3636: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
3637: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Pre Lane Number', p_pre_lane_number);
3638: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane function', p_lane_function);
3639: IF (p_deficit_wt) THEN
3640: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'TRUE');
3641: ELSE
3642: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'FALSE');
3643: END IF;
3644: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Number', p_lane_number);
3638: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane function', p_lane_function);
3639: IF (p_deficit_wt) THEN
3640: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'TRUE');
3641: ELSE
3642: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'FALSE');
3643: END IF;
3644: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Number', p_lane_number);
3645: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
3646: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype);
3640: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'TRUE');
3641: ELSE
3642: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'FALSE');
3643: END IF;
3644: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Number', p_lane_number);
3645: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
3646: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype);
3647: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
3648: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value From', l_value_from);
3641: ELSE
3642: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'FALSE');
3643: END IF;
3644: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Number', p_lane_number);
3645: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
3646: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype);
3647: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
3648: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value From', l_value_from);
3649: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value To', l_value_to);
3642: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Deficit Wt', 'FALSE');
3643: END IF;
3644: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Number', p_lane_number);
3645: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
3646: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype);
3647: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
3648: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value From', l_value_from);
3649: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value To', l_value_to);
3650: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM', l_uom);
3643: END IF;
3644: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Number', p_lane_number);
3645: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
3646: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype);
3647: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
3648: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value From', l_value_from);
3649: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value To', l_value_to);
3650: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM', l_uom);
3651: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
3644: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Number', p_lane_number);
3645: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
3646: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype);
3647: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
3648: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value From', l_value_from);
3649: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value To', l_value_to);
3650: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM', l_uom);
3651: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
3652: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
3645: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
3646: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype);
3647: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
3648: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value From', l_value_from);
3649: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value To', l_value_to);
3650: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM', l_uom);
3651: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
3652: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
3653: END IF;
3646: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype);
3647: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
3648: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value From', l_value_from);
3649: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value To', l_value_to);
3650: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM', l_uom);
3651: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
3652: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
3653: END IF;
3654:
3647: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
3648: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value From', l_value_from);
3649: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value To', l_value_to);
3650: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM', l_uom);
3651: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
3652: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
3653: END IF;
3654:
3655: p_deficit_wt := FALSE;
3648: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value From', l_value_from);
3649: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Value To', l_value_to);
3650: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM', l_uom);
3651: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
3652: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
3653: END IF;
3654:
3655: p_deficit_wt := FALSE;
3656:
3661: x_status => x_status,
3662: x_error_msg => x_error_msg);
3663:
3664: IF (x_status <> -1) THEN
3665: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3666: RETURN;
3667: END IF;
3668:
3669: -- carrier name validation
3673: x_status => x_status,
3674: x_error_msg => x_error_msg);
3675:
3676: IF (x_status <> -1) THEN
3677: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3678: RETURN;
3679: END IF;
3680:
3681: -- LANE_NUMBER
3686: x_status => x_status,
3687: x_error_msg => x_error_msg);
3688:
3689: IF (x_status <> -1) THEN
3690: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3691: RETURN;
3692: END IF;
3693:
3694: -- TYPE
3692: END IF;
3693:
3694: -- TYPE
3695: IF (l_type IS NULL) THEN
3696: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_TYPE_MISSING');
3697: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3698: p_msg => x_error_msg,
3699: p_category => 'A',
3700: p_line_number => p_line_number);
3693:
3694: -- TYPE
3695: IF (l_type IS NULL) THEN
3696: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_TYPE_MISSING');
3697: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3698: p_msg => x_error_msg,
3699: p_category => 'A',
3700: p_line_number => p_line_number);
3701: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3697: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3698: p_msg => x_error_msg,
3699: p_category => 'A',
3700: p_line_number => p_line_number);
3701: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3702: x_status := 1;
3703: RETURN;
3704: ELSE
3705: l_type := UPPER(l_type);
3703: RETURN;
3704: ELSE
3705: l_type := UPPER(l_type);
3706: IF (l_type NOT IN ('PARAMETER', 'RULE')) THEN
3707: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_RATING_TYPE_INVALID');
3708: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3709: p_msg => x_error_msg,
3710: p_category => 'D',
3711: p_line_number => p_line_number);
3704: ELSE
3705: l_type := UPPER(l_type);
3706: IF (l_type NOT IN ('PARAMETER', 'RULE')) THEN
3707: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_RATING_TYPE_INVALID');
3708: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3709: p_msg => x_error_msg,
3710: p_category => 'D',
3711: p_line_number => p_line_number);
3712: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3708: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3709: p_msg => x_error_msg,
3710: p_category => 'D',
3711: p_line_number => p_line_number);
3712: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3713: x_status := 1;
3714: RETURN;
3715: END IF;
3716: END IF;
3715: END IF;
3716: END IF;
3717:
3718: IF (l_subtype IS NULL) THEN
3719: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_SUBTYPE_MISSING');
3720: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3721: p_msg => x_error_msg,
3722: p_category => 'A',
3723: p_line_number => p_line_number);
3716: END IF;
3717:
3718: IF (l_subtype IS NULL) THEN
3719: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_SUBTYPE_MISSING');
3720: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3721: p_msg => x_error_msg,
3722: p_category => 'A',
3723: p_line_number => p_line_number);
3724: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3720: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3721: p_msg => x_error_msg,
3722: p_category => 'A',
3723: p_line_number => p_line_number);
3724: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3725: x_status := 1;
3726: RETURN;
3727: ELSE
3728: l_subtype := UPPER(l_subtype);
3729: END IF;
3730:
3731: -- NAME
3732: IF (l_name IS NULL) THEN
3733: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_NAME_MISSING');
3734: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3735: p_msg => x_error_msg,
3736: p_category => 'A',
3737: p_line_number => p_line_number);
3730:
3731: -- NAME
3732: IF (l_name IS NULL) THEN
3733: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_NAME_MISSING');
3734: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3735: p_msg => x_error_msg,
3736: p_category => 'A',
3737: p_line_number => p_line_number);
3738: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3734: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3735: p_msg => x_error_msg,
3736: p_category => 'A',
3737: p_line_number => p_line_number);
3738: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3739: x_status := 1;
3740: RETURN;
3741: ELSE
3742: l_name := UPPER(l_name);
3743: END IF;
3744:
3745: -- VALUE
3746: IF (l_value_from IS NULL) THEN
3747: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_VALUE_FROM_MISSING');
3748: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3749: p_msg => x_error_msg,
3750: p_category => 'A',
3751: p_line_number => p_line_number);
3744:
3745: -- VALUE
3746: IF (l_value_from IS NULL) THEN
3747: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_VALUE_FROM_MISSING');
3748: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3749: p_msg => x_error_msg,
3750: p_category => 'A',
3751: p_line_number => p_line_number);
3752: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3748: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3749: p_msg => x_error_msg,
3750: p_category => 'A',
3751: p_line_number => p_line_number);
3752: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3753: x_status := 1;
3754: RETURN;
3755: END IF;
3756:
3763: p_uom_code => l_uom_code,
3764: x_status => x_status,
3765: x_error_msg => x_error_msg);
3766: IF (x_status <> -1) THEN
3767: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3768: RETURN;
3769: END IF;
3770: ELSE
3771: VALIDATE_UOM(p_uom => l_uom,
3774: p_uom_code => l_uom_code,
3775: x_status => x_status,
3776: x_error_msg => x_error_msg);
3777: IF (x_status <> -1) THEN
3778: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3779: RETURN;
3780: END IF;
3781: END IF;
3782:
3795: -- First Parameter for New Lane should be LANE/LANE_FUNCTION
3796: IF (p_lane_number <> nvl(p_pre_lane_number, p_lane_number || p_lane_number)) THEN
3797: -- First Parameter for New Lane should be LANE/LANE_FUNCTION
3798: IF (l_type <> 'PARAMETER' OR l_subtype <> 'LANE' OR l_name <> 'LANE_FUNCTION') THEN
3799: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_NAME_FIRST');
3800: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3801: p_msg => x_error_msg,
3802: p_category => 'D',
3803: p_line_number => p_line_number);
3796: IF (p_lane_number <> nvl(p_pre_lane_number, p_lane_number || p_lane_number)) THEN
3797: -- First Parameter for New Lane should be LANE/LANE_FUNCTION
3798: IF (l_type <> 'PARAMETER' OR l_subtype <> 'LANE' OR l_name <> 'LANE_FUNCTION') THEN
3799: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_NAME_FIRST');
3800: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3801: p_msg => x_error_msg,
3802: p_category => 'D',
3803: p_line_number => p_line_number);
3804: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3800: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3801: p_msg => x_error_msg,
3802: p_category => 'D',
3803: p_line_number => p_line_number);
3804: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3805: x_status := 1;
3806: RETURN;
3807: ELSE
3808: IF (UPPER(l_value_from) NOT IN ('NONE', 'LTL', 'PARCEL', 'FLAT')) THEN
3805: x_status := 1;
3806: RETURN;
3807: ELSE
3808: IF (UPPER(l_value_from) NOT IN ('NONE', 'LTL', 'PARCEL', 'FLAT')) THEN
3809: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_VALUE_FROM_LANE');
3810: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3811: p_msg => x_error_msg,
3812: p_category => 'D',
3813: p_line_number => p_line_number);
3806: RETURN;
3807: ELSE
3808: IF (UPPER(l_value_from) NOT IN ('NONE', 'LTL', 'PARCEL', 'FLAT')) THEN
3809: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_VALUE_FROM_LANE');
3810: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3811: p_msg => x_error_msg,
3812: p_category => 'D',
3813: p_line_number => p_line_number);
3814: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3810: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3811: p_msg => x_error_msg,
3812: p_category => 'D',
3813: p_line_number => p_line_number);
3814: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3815: x_status := 1;
3816: RETURN;
3817: ELSE
3818: p_lane_function := l_value_from;
3826: x_status => x_status,
3827: x_error_msg => x_error_msg);
3828:
3829: IF (x_status <> -1) THEN
3830: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3831: RETURN;
3832: END IF;
3833:
3834: OPEN GET_FUNCTION(l_lane_id, l_parameter_id);
3834: OPEN GET_FUNCTION(l_lane_id, l_parameter_id);
3835: FETCH GET_FUNCTION INTO l_old_function;
3836: CLOSE GET_FUNCTION;
3837: IF (l_old_function IS NOT NULL AND l_old_function <> p_lane_function) THEN
3838: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_NO_FUNC_CHANGE');
3839: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3840: p_msg => x_error_msg,
3841: p_category => 'D',
3842: p_line_number => p_line_number);
3835: FETCH GET_FUNCTION INTO l_old_function;
3836: CLOSE GET_FUNCTION;
3837: IF (l_old_function IS NOT NULL AND l_old_function <> p_lane_function) THEN
3838: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_NO_FUNC_CHANGE');
3839: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3840: p_msg => x_error_msg,
3841: p_category => 'D',
3842: p_line_number => p_line_number);
3843: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3839: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3840: p_msg => x_error_msg,
3841: p_category => 'D',
3842: p_line_number => p_line_number);
3843: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3844: x_status := 1;
3845: RETURN;
3846: END IF;
3847: END IF;
3847: END IF;
3848: END IF;
3849: ELSE
3850: IF (l_subtype = 'LANE' AND l_name = 'LANE_FUNCTION') THEN
3851: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_NAME_DUPLICATE');
3852: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3853: p_msg => x_error_msg,
3854: p_category => 'D',
3855: p_line_number => p_line_number);
3848: END IF;
3849: ELSE
3850: IF (l_subtype = 'LANE' AND l_name = 'LANE_FUNCTION') THEN
3851: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_NAME_DUPLICATE');
3852: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3853: p_msg => x_error_msg,
3854: p_category => 'D',
3855: p_line_number => p_line_number);
3856: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3852: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3853: p_msg => x_error_msg,
3854: p_category => 'D',
3855: p_line_number => p_line_number);
3856: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3857: x_status := 1;
3858: RETURN;
3859: END IF;
3860: END IF;
3868: x_status => x_status,
3869: x_error_msg => x_error_msg);
3870:
3871: IF (x_status <> -1) THEN
3872: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3873: RETURN;
3874: END IF;
3875:
3876: OPEN GET_PARAMETER_DATATYPE(l_parameter_id);
3877: FETCH GET_PARAMETER_DATATYPE INTO l_parameter_data_type;
3878: CLOSE GET_PARAMETER_DATATYPE;
3879:
3880: IF (l_parameter_id = -1) THEN
3881: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_NAME_INVALID');
3882: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3883: p_msg => x_error_msg,
3884: p_category => 'D',
3885: p_line_number => p_line_number);
3878: CLOSE GET_PARAMETER_DATATYPE;
3879:
3880: IF (l_parameter_id = -1) THEN
3881: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_NAME_INVALID');
3882: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3883: p_msg => x_error_msg,
3884: p_category => 'D',
3885: p_line_number => p_line_number);
3886: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3882: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3883: p_msg => x_error_msg,
3884: p_category => 'D',
3885: p_line_number => p_line_number);
3886: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3887: x_status := 1;
3888: RETURN;
3889: ELSE
3890: IF (l_name = 'WT_UOM') THEN
3894: p_uom_code => l_temp,
3895: x_status => x_status,
3896: x_error_msg => x_error_msg);
3897: IF (x_status <> -1) THEN
3898: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3899: RETURN;
3900: END IF;
3901: ELSIF (l_name = 'VOL_UOM') THEN
3902: VALIDATE_UOM(p_uom => l_value_from,
3905: p_uom_code => l_temp,
3906: x_status => x_status,
3907: x_error_msg => x_error_msg);
3908: IF (x_status <> -1) THEN
3909: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3910: RETURN;
3911: END IF;
3912: ELSIF (l_name = 'DIM_UOM') THEN
3913: VALIDATE_UOM(p_uom => l_value_from,
3916: p_uom_code => l_temp,
3917: x_status => x_status,
3918: x_error_msg => x_error_msg);
3919: IF (x_status <> -1) THEN
3920: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3921: RETURN;
3922: END IF;
3923: ELSIF (l_name = 'GROUPING_LEVEL') THEN
3924: l_temp := FTE_UTIL_PKG.GET_LOOKUP_CODE('FTE_PRC_GROUPING_LEVEL', l_value_from);
3920: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3921: RETURN;
3922: END IF;
3923: ELSIF (l_name = 'GROUPING_LEVEL') THEN
3924: l_temp := FTE_UTIL_PKG.GET_LOOKUP_CODE('FTE_PRC_GROUPING_LEVEL', l_value_from);
3925: IF (l_temp IS NULL) THEN
3926: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_GROUPING_LEVEL_INVALID',
3927: p_tokens => STRINGARRAY('VALUE'),
3928: p_values => STRINGARRAY(l_value_from));
3922: END IF;
3923: ELSIF (l_name = 'GROUPING_LEVEL') THEN
3924: l_temp := FTE_UTIL_PKG.GET_LOOKUP_CODE('FTE_PRC_GROUPING_LEVEL', l_value_from);
3925: IF (l_temp IS NULL) THEN
3926: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_GROUPING_LEVEL_INVALID',
3927: p_tokens => STRINGARRAY('VALUE'),
3928: p_values => STRINGARRAY(l_value_from));
3929: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3930: p_msg => x_error_msg,
3925: IF (l_temp IS NULL) THEN
3926: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_GROUPING_LEVEL_INVALID',
3927: p_tokens => STRINGARRAY('VALUE'),
3928: p_values => STRINGARRAY(l_value_from));
3929: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3930: p_msg => x_error_msg,
3931: p_category => 'A',
3932: p_line_number => p_line_number);
3933: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3929: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3930: p_msg => x_error_msg,
3931: p_category => 'A',
3932: p_line_number => p_line_number);
3933: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3934: x_status := 1;
3935: RETURN;
3936: END IF;
3937: ELSIF (l_name = 'COMMODITY_AGGREGATION') THEN
3934: x_status := 1;
3935: RETURN;
3936: END IF;
3937: ELSIF (l_name = 'COMMODITY_AGGREGATION') THEN
3938: l_temp := FTE_UTIL_PKG.GET_LOOKUP_CODE('FTE_PRC_COMM_AGGREGATION', l_value_from);
3939: IF (l_temp IS NULL) THEN
3940: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_COMM_AGGREGATION_INVALID',
3941: p_tokens => STRINGARRAY('VALUE'),
3942: p_values => STRINGARRAY(l_value_from));
3936: END IF;
3937: ELSIF (l_name = 'COMMODITY_AGGREGATION') THEN
3938: l_temp := FTE_UTIL_PKG.GET_LOOKUP_CODE('FTE_PRC_COMM_AGGREGATION', l_value_from);
3939: IF (l_temp IS NULL) THEN
3940: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_COMM_AGGREGATION_INVALID',
3941: p_tokens => STRINGARRAY('VALUE'),
3942: p_values => STRINGARRAY(l_value_from));
3943: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3944: p_msg => x_error_msg,
3939: IF (l_temp IS NULL) THEN
3940: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_COMM_AGGREGATION_INVALID',
3941: p_tokens => STRINGARRAY('VALUE'),
3942: p_values => STRINGARRAY(l_value_from));
3943: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3944: p_msg => x_error_msg,
3945: p_category => 'A',
3946: p_line_number => p_line_number);
3947: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3943: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3944: p_msg => x_error_msg,
3945: p_category => 'A',
3946: p_line_number => p_line_number);
3947: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3948: x_status := 1;
3949: RETURN;
3950: END IF;
3951: ELSIF (l_name = 'PRICING_OBJECTIVE') THEN
3948: x_status := 1;
3949: RETURN;
3950: END IF;
3951: ELSIF (l_name = 'PRICING_OBJECTIVE') THEN
3952: l_temp := FTE_UTIL_PKG.GET_LOOKUP_CODE('FTE_PRC_PRICING_OBJECTIVE', l_value_from);
3953: IF (l_temp IS NULL) THEN
3954: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_PRICING_OBJECTIVE_INVALID',
3955: p_tokens => STRINGARRAY('VALUE'),
3956: p_values => STRINGARRAY(l_value_from));
3950: END IF;
3951: ELSIF (l_name = 'PRICING_OBJECTIVE') THEN
3952: l_temp := FTE_UTIL_PKG.GET_LOOKUP_CODE('FTE_PRC_PRICING_OBJECTIVE', l_value_from);
3953: IF (l_temp IS NULL) THEN
3954: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_PRICING_OBJECTIVE_INVALID',
3955: p_tokens => STRINGARRAY('VALUE'),
3956: p_values => STRINGARRAY(l_value_from));
3957: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3958: p_msg => x_error_msg,
3953: IF (l_temp IS NULL) THEN
3954: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_PRICING_OBJECTIVE_INVALID',
3955: p_tokens => STRINGARRAY('VALUE'),
3956: p_values => STRINGARRAY(l_value_from));
3957: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3958: p_msg => x_error_msg,
3959: p_category => 'A',
3960: p_line_number => p_line_number);
3961: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3957: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3958: p_msg => x_error_msg,
3959: p_category => 'A',
3960: p_line_number => p_line_number);
3961: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3962: x_status := 1;
3963: RETURN;
3964: END IF;
3965: END IF;
3989:
3990: -- If it's already defined,
3991: IF (l_prc_parameter_id <> -1) THEN
3992: IF (p_action = 'ADD' AND (NOT p_deficit_wt)) THEN
3993: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_ADD_ERROR',
3994: p_tokens => STRINGARRAY(''),
3995: p_values => STRINGARRAY(p_lane_function||':'||l_type||','||l_subtype||','||l_name));
3996: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3997: p_msg => x_error_msg,
3992: IF (p_action = 'ADD' AND (NOT p_deficit_wt)) THEN
3993: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_ADD_ERROR',
3994: p_tokens => STRINGARRAY(''),
3995: p_values => STRINGARRAY(p_lane_function||':'||l_type||','||l_subtype||','||l_name));
3996: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3997: p_msg => x_error_msg,
3998: p_category => 'D',
3999: p_line_number => p_line_number);
4000: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
3996: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
3997: p_msg => x_error_msg,
3998: p_category => 'D',
3999: p_line_number => p_line_number);
4000: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4001: x_status := 1;
4002: RETURN;
4003: END IF;
4004: p_action := 'UPDATE';
4003: END IF;
4004: p_action := 'UPDATE';
4005: ELSE
4006: IF (p_action = 'UPDATE') THEN
4007: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_UPDATE_ERROR',
4008: p_tokens => STRINGARRAY(''),
4009: p_values => STRINGARRAY(p_lane_function||':'||l_type||','||l_subtype||','||l_name));
4010: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4011: p_msg => x_error_msg,
4006: IF (p_action = 'UPDATE') THEN
4007: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_UPDATE_ERROR',
4008: p_tokens => STRINGARRAY(''),
4009: p_values => STRINGARRAY(p_lane_function||':'||l_type||','||l_subtype||','||l_name));
4010: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4011: p_msg => x_error_msg,
4012: p_category => 'D',
4013: p_line_number => p_line_number);
4014: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4010: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4011: p_msg => x_error_msg,
4012: p_category => 'D',
4013: p_line_number => p_line_number);
4014: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4015: x_status := 1;
4016: RETURN;
4017: END IF;
4018: p_action := 'ADD';
4027: p_prc_parameter_tbl(l_count).parameter_instance_id := l_prc_parameter_id;
4028: p_prc_parameter_tbl(l_count).lane_id := l_lane_id;
4029: p_prc_parameter_tbl(l_count).parameter_id := l_parameter_id;
4030: ELSE
4031: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_UPDATE_ERROR',
4032: p_tokens => STRINGARRAY(''),
4033: p_values => STRINGARRAY(p_lane_function||':'||l_type||','||l_subtype||','||l_name));
4034: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4035: p_msg => x_error_msg,
4030: ELSE
4031: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_UPDATE_ERROR',
4032: p_tokens => STRINGARRAY(''),
4033: p_values => STRINGARRAY(p_lane_function||':'||l_type||','||l_subtype||','||l_name));
4034: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4035: p_msg => x_error_msg,
4036: p_category => 'D',
4037: p_line_number => p_line_number);
4038: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4034: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4035: p_msg => x_error_msg,
4036: p_category => 'D',
4037: p_line_number => p_line_number);
4038: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4039: x_status := 1;
4040: RETURN;
4041: END IF;
4042: END IF;
4049: ELSIF (p_action = 'UPDATE') THEN
4050: p_prc_parameter_tbl(l_count).parameter_instance_id := l_prc_parameter_id;
4051: END IF;
4052:
4053: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4054: EXCEPTION
4055: WHEN OTHERS THEN
4056: IF (GET_PRC_PARAMETER%ISOPEN) THEN
4057: CLOSE GET_PRC_PARAMETER;
4062: IF (GET_FUNCTION%ISOPEN) THEN
4063: CLOSE GET_FUNCTION;
4064: END IF;
4065: x_error_msg := sqlerrm;
4066: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4067: p_msg => x_error_msg,
4068: p_category => 'O',
4069: p_line_number => p_line_number);
4070: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4066: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4067: p_msg => x_error_msg,
4068: p_category => 'O',
4069: p_line_number => p_line_number);
4070: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4071: x_status := 1;
4072: RETURN;
4073: END VALIDATE_SERVICE_RATING_SETUP;
4074:
4127: l_lane_id NUMBER;
4128:
4129: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_SERVICE_RATING_SETUP';
4130: BEGIN
4131: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
4132:
4133: x_status := -1;
4134:
4135: p_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
4131: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
4132:
4133: x_status := -1;
4134:
4135: p_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
4136: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
4137: l_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER', p_values);
4138: l_vessel_type := FTE_UTIL_PKG.GET_DATA('VESSEL_TYPE', p_values);
4139: l_vessel_name := FTE_UTIL_PKG.GET_DATA('VESSEL_NAME', p_values);
4132:
4133: x_status := -1;
4134:
4135: p_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
4136: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
4137: l_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER', p_values);
4138: l_vessel_type := FTE_UTIL_PKG.GET_DATA('VESSEL_TYPE', p_values);
4139: l_vessel_name := FTE_UTIL_PKG.GET_DATA('VESSEL_NAME', p_values);
4140: l_voyage_number := FTE_UTIL_PKG.GET_DATA('VOYAGE_NUMBER', p_values);
4133: x_status := -1;
4134:
4135: p_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
4136: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
4137: l_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER', p_values);
4138: l_vessel_type := FTE_UTIL_PKG.GET_DATA('VESSEL_TYPE', p_values);
4139: l_vessel_name := FTE_UTIL_PKG.GET_DATA('VESSEL_NAME', p_values);
4140: l_voyage_number := FTE_UTIL_PKG.GET_DATA('VOYAGE_NUMBER', p_values);
4141: l_departure_dt := FTE_UTIL_PKG.GET_DATA('DEPARTURE_DATE', p_values);
4134:
4135: p_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
4136: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
4137: l_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER', p_values);
4138: l_vessel_type := FTE_UTIL_PKG.GET_DATA('VESSEL_TYPE', p_values);
4139: l_vessel_name := FTE_UTIL_PKG.GET_DATA('VESSEL_NAME', p_values);
4140: l_voyage_number := FTE_UTIL_PKG.GET_DATA('VOYAGE_NUMBER', p_values);
4141: l_departure_dt := FTE_UTIL_PKG.GET_DATA('DEPARTURE_DATE', p_values);
4142: l_departure_tm := FTE_UTIL_PKG.GET_DATA('DEPARTURE_TIME', p_values);
4135: p_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
4136: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
4137: l_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER', p_values);
4138: l_vessel_type := FTE_UTIL_PKG.GET_DATA('VESSEL_TYPE', p_values);
4139: l_vessel_name := FTE_UTIL_PKG.GET_DATA('VESSEL_NAME', p_values);
4140: l_voyage_number := FTE_UTIL_PKG.GET_DATA('VOYAGE_NUMBER', p_values);
4141: l_departure_dt := FTE_UTIL_PKG.GET_DATA('DEPARTURE_DATE', p_values);
4142: l_departure_tm := FTE_UTIL_PKG.GET_DATA('DEPARTURE_TIME', p_values);
4143: l_arrival_dt := FTE_UTIL_PKG.GET_DATA('ARRIVAL_DATE', p_values);
4136: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME', p_values);
4137: l_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER', p_values);
4138: l_vessel_type := FTE_UTIL_PKG.GET_DATA('VESSEL_TYPE', p_values);
4139: l_vessel_name := FTE_UTIL_PKG.GET_DATA('VESSEL_NAME', p_values);
4140: l_voyage_number := FTE_UTIL_PKG.GET_DATA('VOYAGE_NUMBER', p_values);
4141: l_departure_dt := FTE_UTIL_PKG.GET_DATA('DEPARTURE_DATE', p_values);
4142: l_departure_tm := FTE_UTIL_PKG.GET_DATA('DEPARTURE_TIME', p_values);
4143: l_arrival_dt := FTE_UTIL_PKG.GET_DATA('ARRIVAL_DATE', p_values);
4144: l_arrival_tm := FTE_UTIL_PKG.GET_DATA('ARRIVAL_TIME', p_values);
4137: l_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER', p_values);
4138: l_vessel_type := FTE_UTIL_PKG.GET_DATA('VESSEL_TYPE', p_values);
4139: l_vessel_name := FTE_UTIL_PKG.GET_DATA('VESSEL_NAME', p_values);
4140: l_voyage_number := FTE_UTIL_PKG.GET_DATA('VOYAGE_NUMBER', p_values);
4141: l_departure_dt := FTE_UTIL_PKG.GET_DATA('DEPARTURE_DATE', p_values);
4142: l_departure_tm := FTE_UTIL_PKG.GET_DATA('DEPARTURE_TIME', p_values);
4143: l_arrival_dt := FTE_UTIL_PKG.GET_DATA('ARRIVAL_DATE', p_values);
4144: l_arrival_tm := FTE_UTIL_PKG.GET_DATA('ARRIVAL_TIME', p_values);
4145: l_indicator := FTE_UTIL_PKG.GET_DATA('ARRIVAL_DATE_INDICATOR', p_values);
4138: l_vessel_type := FTE_UTIL_PKG.GET_DATA('VESSEL_TYPE', p_values);
4139: l_vessel_name := FTE_UTIL_PKG.GET_DATA('VESSEL_NAME', p_values);
4140: l_voyage_number := FTE_UTIL_PKG.GET_DATA('VOYAGE_NUMBER', p_values);
4141: l_departure_dt := FTE_UTIL_PKG.GET_DATA('DEPARTURE_DATE', p_values);
4142: l_departure_tm := FTE_UTIL_PKG.GET_DATA('DEPARTURE_TIME', p_values);
4143: l_arrival_dt := FTE_UTIL_PKG.GET_DATA('ARRIVAL_DATE', p_values);
4144: l_arrival_tm := FTE_UTIL_PKG.GET_DATA('ARRIVAL_TIME', p_values);
4145: l_indicator := FTE_UTIL_PKG.GET_DATA('ARRIVAL_DATE_INDICATOR', p_values);
4146: l_freq_type := FTE_UTIL_PKG.GET_DATA('FREQUENCY_TYPE', p_values);
4139: l_vessel_name := FTE_UTIL_PKG.GET_DATA('VESSEL_NAME', p_values);
4140: l_voyage_number := FTE_UTIL_PKG.GET_DATA('VOYAGE_NUMBER', p_values);
4141: l_departure_dt := FTE_UTIL_PKG.GET_DATA('DEPARTURE_DATE', p_values);
4142: l_departure_tm := FTE_UTIL_PKG.GET_DATA('DEPARTURE_TIME', p_values);
4143: l_arrival_dt := FTE_UTIL_PKG.GET_DATA('ARRIVAL_DATE', p_values);
4144: l_arrival_tm := FTE_UTIL_PKG.GET_DATA('ARRIVAL_TIME', p_values);
4145: l_indicator := FTE_UTIL_PKG.GET_DATA('ARRIVAL_DATE_INDICATOR', p_values);
4146: l_freq_type := FTE_UTIL_PKG.GET_DATA('FREQUENCY_TYPE', p_values);
4147: l_frequency := FTE_UTIL_PKG.GET_DATA('FREQUENCY', p_values);
4140: l_voyage_number := FTE_UTIL_PKG.GET_DATA('VOYAGE_NUMBER', p_values);
4141: l_departure_dt := FTE_UTIL_PKG.GET_DATA('DEPARTURE_DATE', p_values);
4142: l_departure_tm := FTE_UTIL_PKG.GET_DATA('DEPARTURE_TIME', p_values);
4143: l_arrival_dt := FTE_UTIL_PKG.GET_DATA('ARRIVAL_DATE', p_values);
4144: l_arrival_tm := FTE_UTIL_PKG.GET_DATA('ARRIVAL_TIME', p_values);
4145: l_indicator := FTE_UTIL_PKG.GET_DATA('ARRIVAL_DATE_INDICATOR', p_values);
4146: l_freq_type := FTE_UTIL_PKG.GET_DATA('FREQUENCY_TYPE', p_values);
4147: l_frequency := FTE_UTIL_PKG.GET_DATA('FREQUENCY', p_values);
4148: l_transit := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME', p_values);
4141: l_departure_dt := FTE_UTIL_PKG.GET_DATA('DEPARTURE_DATE', p_values);
4142: l_departure_tm := FTE_UTIL_PKG.GET_DATA('DEPARTURE_TIME', p_values);
4143: l_arrival_dt := FTE_UTIL_PKG.GET_DATA('ARRIVAL_DATE', p_values);
4144: l_arrival_tm := FTE_UTIL_PKG.GET_DATA('ARRIVAL_TIME', p_values);
4145: l_indicator := FTE_UTIL_PKG.GET_DATA('ARRIVAL_DATE_INDICATOR', p_values);
4146: l_freq_type := FTE_UTIL_PKG.GET_DATA('FREQUENCY_TYPE', p_values);
4147: l_frequency := FTE_UTIL_PKG.GET_DATA('FREQUENCY', p_values);
4148: l_transit := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME', p_values);
4149: l_transit_uom := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME_UOM', p_values);
4142: l_departure_tm := FTE_UTIL_PKG.GET_DATA('DEPARTURE_TIME', p_values);
4143: l_arrival_dt := FTE_UTIL_PKG.GET_DATA('ARRIVAL_DATE', p_values);
4144: l_arrival_tm := FTE_UTIL_PKG.GET_DATA('ARRIVAL_TIME', p_values);
4145: l_indicator := FTE_UTIL_PKG.GET_DATA('ARRIVAL_DATE_INDICATOR', p_values);
4146: l_freq_type := FTE_UTIL_PKG.GET_DATA('FREQUENCY_TYPE', p_values);
4147: l_frequency := FTE_UTIL_PKG.GET_DATA('FREQUENCY', p_values);
4148: l_transit := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME', p_values);
4149: l_transit_uom := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME_UOM', p_values);
4150: l_port_loading := FTE_UTIL_PKG.GET_DATA('PORT_OF_LOADING', p_values);
4143: l_arrival_dt := FTE_UTIL_PKG.GET_DATA('ARRIVAL_DATE', p_values);
4144: l_arrival_tm := FTE_UTIL_PKG.GET_DATA('ARRIVAL_TIME', p_values);
4145: l_indicator := FTE_UTIL_PKG.GET_DATA('ARRIVAL_DATE_INDICATOR', p_values);
4146: l_freq_type := FTE_UTIL_PKG.GET_DATA('FREQUENCY_TYPE', p_values);
4147: l_frequency := FTE_UTIL_PKG.GET_DATA('FREQUENCY', p_values);
4148: l_transit := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME', p_values);
4149: l_transit_uom := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME_UOM', p_values);
4150: l_port_loading := FTE_UTIL_PKG.GET_DATA('PORT_OF_LOADING', p_values);
4151: l_port_discharge := FTE_UTIL_PKG.GET_DATA('PORT_OF_DISCHARGE', p_values);
4144: l_arrival_tm := FTE_UTIL_PKG.GET_DATA('ARRIVAL_TIME', p_values);
4145: l_indicator := FTE_UTIL_PKG.GET_DATA('ARRIVAL_DATE_INDICATOR', p_values);
4146: l_freq_type := FTE_UTIL_PKG.GET_DATA('FREQUENCY_TYPE', p_values);
4147: l_frequency := FTE_UTIL_PKG.GET_DATA('FREQUENCY', p_values);
4148: l_transit := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME', p_values);
4149: l_transit_uom := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME_UOM', p_values);
4150: l_port_loading := FTE_UTIL_PKG.GET_DATA('PORT_OF_LOADING', p_values);
4151: l_port_discharge := FTE_UTIL_PKG.GET_DATA('PORT_OF_DISCHARGE', p_values);
4152: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
4145: l_indicator := FTE_UTIL_PKG.GET_DATA('ARRIVAL_DATE_INDICATOR', p_values);
4146: l_freq_type := FTE_UTIL_PKG.GET_DATA('FREQUENCY_TYPE', p_values);
4147: l_frequency := FTE_UTIL_PKG.GET_DATA('FREQUENCY', p_values);
4148: l_transit := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME', p_values);
4149: l_transit_uom := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME_UOM', p_values);
4150: l_port_loading := FTE_UTIL_PKG.GET_DATA('PORT_OF_LOADING', p_values);
4151: l_port_discharge := FTE_UTIL_PKG.GET_DATA('PORT_OF_DISCHARGE', p_values);
4152: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
4153: l_end_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
4146: l_freq_type := FTE_UTIL_PKG.GET_DATA('FREQUENCY_TYPE', p_values);
4147: l_frequency := FTE_UTIL_PKG.GET_DATA('FREQUENCY', p_values);
4148: l_transit := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME', p_values);
4149: l_transit_uom := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME_UOM', p_values);
4150: l_port_loading := FTE_UTIL_PKG.GET_DATA('PORT_OF_LOADING', p_values);
4151: l_port_discharge := FTE_UTIL_PKG.GET_DATA('PORT_OF_DISCHARGE', p_values);
4152: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
4153: l_end_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
4154:
4147: l_frequency := FTE_UTIL_PKG.GET_DATA('FREQUENCY', p_values);
4148: l_transit := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME', p_values);
4149: l_transit_uom := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME_UOM', p_values);
4150: l_port_loading := FTE_UTIL_PKG.GET_DATA('PORT_OF_LOADING', p_values);
4151: l_port_discharge := FTE_UTIL_PKG.GET_DATA('PORT_OF_DISCHARGE', p_values);
4152: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
4153: l_end_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
4154:
4155: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
4148: l_transit := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME', p_values);
4149: l_transit_uom := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME_UOM', p_values);
4150: l_port_loading := FTE_UTIL_PKG.GET_DATA('PORT_OF_LOADING', p_values);
4151: l_port_discharge := FTE_UTIL_PKG.GET_DATA('PORT_OF_DISCHARGE', p_values);
4152: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
4153: l_end_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
4154:
4155: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
4156: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
4149: l_transit_uom := FTE_UTIL_PKG.GET_DATA('TRANSIT_TIME_UOM', p_values);
4150: l_port_loading := FTE_UTIL_PKG.GET_DATA('PORT_OF_LOADING', p_values);
4151: l_port_discharge := FTE_UTIL_PKG.GET_DATA('PORT_OF_DISCHARGE', p_values);
4152: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
4153: l_end_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
4154:
4155: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
4156: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
4157: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Number', l_lane_number);
4152: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE', p_values);
4153: l_end_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
4154:
4155: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
4156: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
4157: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Number', l_lane_number);
4158: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
4159: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Vessel type', l_vessel_type);
4160: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Vessel name', l_vessel_name);
4153: l_end_date := FTE_UTIL_PKG.GET_DATA('END_DATE', p_values);
4154:
4155: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
4156: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
4157: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Number', l_lane_number);
4158: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
4159: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Vessel type', l_vessel_type);
4160: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Vessel name', l_vessel_name);
4161: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Voyage number', l_voyage_number);
4154:
4155: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
4156: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
4157: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Number', l_lane_number);
4158: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
4159: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Vessel type', l_vessel_type);
4160: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Vessel name', l_vessel_name);
4161: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Voyage number', l_voyage_number);
4162: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Departure date', l_departure_dt);
4155: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
4156: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
4157: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Number', l_lane_number);
4158: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
4159: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Vessel type', l_vessel_type);
4160: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Vessel name', l_vessel_name);
4161: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Voyage number', l_voyage_number);
4162: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Departure date', l_departure_dt);
4163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Departure time', l_departure_tm);
4156: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
4157: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Number', l_lane_number);
4158: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
4159: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Vessel type', l_vessel_type);
4160: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Vessel name', l_vessel_name);
4161: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Voyage number', l_voyage_number);
4162: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Departure date', l_departure_dt);
4163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Departure time', l_departure_tm);
4164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival date', l_arrival_dt);
4157: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Lane Number', l_lane_number);
4158: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
4159: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Vessel type', l_vessel_type);
4160: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Vessel name', l_vessel_name);
4161: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Voyage number', l_voyage_number);
4162: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Departure date', l_departure_dt);
4163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Departure time', l_departure_tm);
4164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival date', l_arrival_dt);
4165: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival time', l_arrival_tm);
4158: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
4159: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Vessel type', l_vessel_type);
4160: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Vessel name', l_vessel_name);
4161: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Voyage number', l_voyage_number);
4162: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Departure date', l_departure_dt);
4163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Departure time', l_departure_tm);
4164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival date', l_arrival_dt);
4165: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival time', l_arrival_tm);
4166: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival date indicator', l_indicator);
4159: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Vessel type', l_vessel_type);
4160: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Vessel name', l_vessel_name);
4161: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Voyage number', l_voyage_number);
4162: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Departure date', l_departure_dt);
4163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Departure time', l_departure_tm);
4164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival date', l_arrival_dt);
4165: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival time', l_arrival_tm);
4166: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival date indicator', l_indicator);
4167: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency type', l_freq_type);
4160: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Vessel name', l_vessel_name);
4161: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Voyage number', l_voyage_number);
4162: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Departure date', l_departure_dt);
4163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Departure time', l_departure_tm);
4164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival date', l_arrival_dt);
4165: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival time', l_arrival_tm);
4166: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival date indicator', l_indicator);
4167: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency type', l_freq_type);
4168: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency', l_frequency);
4161: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Voyage number', l_voyage_number);
4162: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Departure date', l_departure_dt);
4163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Departure time', l_departure_tm);
4164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival date', l_arrival_dt);
4165: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival time', l_arrival_tm);
4166: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival date indicator', l_indicator);
4167: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency type', l_freq_type);
4168: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency', l_frequency);
4169: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit time', l_transit);
4162: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Departure date', l_departure_dt);
4163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Departure time', l_departure_tm);
4164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival date', l_arrival_dt);
4165: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival time', l_arrival_tm);
4166: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival date indicator', l_indicator);
4167: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency type', l_freq_type);
4168: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency', l_frequency);
4169: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit time', l_transit);
4170: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit time UOM', l_transit_uom);
4163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Departure time', l_departure_tm);
4164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival date', l_arrival_dt);
4165: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival time', l_arrival_tm);
4166: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival date indicator', l_indicator);
4167: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency type', l_freq_type);
4168: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency', l_frequency);
4169: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit time', l_transit);
4170: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit time UOM', l_transit_uom);
4171: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Port of loading', l_port_loading);
4164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival date', l_arrival_dt);
4165: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival time', l_arrival_tm);
4166: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival date indicator', l_indicator);
4167: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency type', l_freq_type);
4168: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency', l_frequency);
4169: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit time', l_transit);
4170: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit time UOM', l_transit_uom);
4171: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Port of loading', l_port_loading);
4172: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Port of discharge', l_port_discharge);
4165: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival time', l_arrival_tm);
4166: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival date indicator', l_indicator);
4167: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency type', l_freq_type);
4168: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency', l_frequency);
4169: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit time', l_transit);
4170: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit time UOM', l_transit_uom);
4171: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Port of loading', l_port_loading);
4172: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Port of discharge', l_port_discharge);
4173: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date);
4166: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Arrival date indicator', l_indicator);
4167: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency type', l_freq_type);
4168: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency', l_frequency);
4169: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit time', l_transit);
4170: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit time UOM', l_transit_uom);
4171: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Port of loading', l_port_loading);
4172: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Port of discharge', l_port_discharge);
4173: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date);
4174: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date);
4167: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency type', l_freq_type);
4168: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency', l_frequency);
4169: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit time', l_transit);
4170: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit time UOM', l_transit_uom);
4171: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Port of loading', l_port_loading);
4172: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Port of discharge', l_port_discharge);
4173: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date);
4174: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date);
4175: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
4168: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Frequency', l_frequency);
4169: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit time', l_transit);
4170: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit time UOM', l_transit_uom);
4171: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Port of loading', l_port_loading);
4172: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Port of discharge', l_port_discharge);
4173: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date);
4174: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date);
4175: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
4176: END IF;
4169: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit time', l_transit);
4170: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit time UOM', l_transit_uom);
4171: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Port of loading', l_port_loading);
4172: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Port of discharge', l_port_discharge);
4173: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date);
4174: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date);
4175: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
4176: END IF;
4177:
4170: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Transit time UOM', l_transit_uom);
4171: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Port of loading', l_port_loading);
4172: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Port of discharge', l_port_discharge);
4173: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date);
4174: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date);
4175: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
4176: END IF;
4177:
4178: l_count := p_schedule_tbl.COUNT+1;
4171: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Port of loading', l_port_loading);
4172: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Port of discharge', l_port_discharge);
4173: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date);
4174: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date);
4175: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
4176: END IF;
4177:
4178: l_count := p_schedule_tbl.COUNT+1;
4179: p_schedule_tbl(l_count).vessel_type := l_vessel_type;
4191: x_status => x_status,
4192: x_error_msg => x_error_msg);
4193:
4194: IF (x_status <> -1) THEN
4195: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4196: RETURN;
4197: END IF;
4198:
4199: -- carrier name validation
4203: x_status => x_status,
4204: x_error_msg => x_error_msg);
4205:
4206: IF (x_status <> -1) THEN
4207: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4208: RETURN;
4209: END IF;
4210:
4211: -- LANE_NUMBER
4216: x_status => x_status,
4217: x_error_msg => x_error_msg);
4218:
4219: IF (x_status <> -1) THEN
4220: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4221: RETURN;
4222: END IF;
4223:
4224: p_schedule_tbl(l_count).lane_number := l_lane_number;
4224: p_schedule_tbl(l_count).lane_number := l_lane_number;
4225:
4226: -- VESSEL_TYPE, VESSEL_NAME, VOYAGE_NUMBER Validation
4227: IF (l_voyage_number IS NULL) THEN
4228: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_VOYAGE_NUMBER_MISSING');
4229: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4230: p_msg => x_error_msg,
4231: p_category => 'D',
4232: p_line_number => p_line_number);
4225:
4226: -- VESSEL_TYPE, VESSEL_NAME, VOYAGE_NUMBER Validation
4227: IF (l_voyage_number IS NULL) THEN
4228: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_VOYAGE_NUMBER_MISSING');
4229: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4230: p_msg => x_error_msg,
4231: p_category => 'D',
4232: p_line_number => p_line_number);
4233: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4229: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4230: p_msg => x_error_msg,
4231: p_category => 'D',
4232: p_line_number => p_line_number);
4233: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4234: x_status := 1;
4235: RETURN;
4236: END IF;
4237:
4243: END IF;
4244:
4245: IF (l_indicator IS NOT NULL) THEN
4246: IF (TO_NUMBER(l_indicator) < -1) THEN
4247: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LESS_THAN_MINUSONE');
4248: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4249: p_msg => x_error_msg,
4250: p_category => 'D',
4251: p_line_number => p_line_number);
4244:
4245: IF (l_indicator IS NOT NULL) THEN
4246: IF (TO_NUMBER(l_indicator) < -1) THEN
4247: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LESS_THAN_MINUSONE');
4248: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4249: p_msg => x_error_msg,
4250: p_category => 'D',
4251: p_line_number => p_line_number);
4252: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4248: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4249: p_msg => x_error_msg,
4250: p_category => 'D',
4251: p_line_number => p_line_number);
4252: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4253: x_status := 1;
4254: RETURN;
4255: ELSE
4256: IF (ISNUM(l_indicator) = 0) THEN
4253: x_status := 1;
4254: RETURN;
4255: ELSE
4256: IF (ISNUM(l_indicator) = 0) THEN
4257: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NUMBER_INVALID');
4258: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4259: p_msg => x_error_msg,
4260: p_category => 'D',
4261: p_line_number => p_line_number);
4254: RETURN;
4255: ELSE
4256: IF (ISNUM(l_indicator) = 0) THEN
4257: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NUMBER_INVALID');
4258: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4259: p_msg => x_error_msg,
4260: p_category => 'D',
4261: p_line_number => p_line_number);
4262: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4258: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4259: p_msg => x_error_msg,
4260: p_category => 'D',
4261: p_line_number => p_line_number);
4262: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4263: x_status := 1;
4264: RETURN;
4265: END IF;
4266: l_indicator_value := TO_NUMBER(l_indicator);
4269:
4270: -- FREQUENCY_TYPE and FREQUENCY Validation
4271: -- FREQUENCY_TYPE or DEPARTURE_DATE should be specified
4272: IF (l_freq_type IS NULL AND l_departure_dt IS NULL) THEN
4273: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NO_DEPARTURE_DATE');
4274: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4275: p_msg => x_error_msg,
4276: p_category => 'A',
4277: p_line_number => p_line_number);
4270: -- FREQUENCY_TYPE and FREQUENCY Validation
4271: -- FREQUENCY_TYPE or DEPARTURE_DATE should be specified
4272: IF (l_freq_type IS NULL AND l_departure_dt IS NULL) THEN
4273: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NO_DEPARTURE_DATE');
4274: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4275: p_msg => x_error_msg,
4276: p_category => 'A',
4277: p_line_number => p_line_number);
4278: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4274: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4275: p_msg => x_error_msg,
4276: p_category => 'A',
4277: p_line_number => p_line_number);
4278: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4279: x_status := 1;
4280: RETURN;
4281: END IF;
4282:
4281: END IF;
4282:
4283: -- FREQUENCY_TYPE or ARRIVAL_DATE should be specified
4284: IF (l_freq_type IS NULL AND l_arrival_dt IS NULL) THEN
4285: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NO_ARRIVAL_DATE');
4286: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4287: p_msg => x_error_msg,
4288: p_category => 'A',
4289: p_line_number => p_line_number);
4282:
4283: -- FREQUENCY_TYPE or ARRIVAL_DATE should be specified
4284: IF (l_freq_type IS NULL AND l_arrival_dt IS NULL) THEN
4285: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NO_ARRIVAL_DATE');
4286: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4287: p_msg => x_error_msg,
4288: p_category => 'A',
4289: p_line_number => p_line_number);
4290: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4286: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4287: p_msg => x_error_msg,
4288: p_category => 'A',
4289: p_line_number => p_line_number);
4290: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4291: x_status := 1;
4292: RETURN;
4293: END IF;
4294:
4293: END IF;
4294:
4295: IF (l_freq_type IS NOT NULL) THEN
4296: l_old_freq_type := l_freq_type;
4297: l_freq_type := FTE_UTIL_PKG.GET_LOOKUP_CODE('FTE_FREQUENCY_TYPE', l_old_freq_type);
4298:
4299: IF (l_freq_type IS NULL) THEN
4300: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_UNDEFINED_FREQ_TYPE',
4301: p_tokens => STRINGARRAY(''),
4296: l_old_freq_type := l_freq_type;
4297: l_freq_type := FTE_UTIL_PKG.GET_LOOKUP_CODE('FTE_FREQUENCY_TYPE', l_old_freq_type);
4298:
4299: IF (l_freq_type IS NULL) THEN
4300: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_UNDEFINED_FREQ_TYPE',
4301: p_tokens => STRINGARRAY(''),
4302: p_values => STRINGARRAY(l_old_freq_type));
4303: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4304: p_msg => x_error_msg,
4299: IF (l_freq_type IS NULL) THEN
4300: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_UNDEFINED_FREQ_TYPE',
4301: p_tokens => STRINGARRAY(''),
4302: p_values => STRINGARRAY(l_old_freq_type));
4303: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4304: p_msg => x_error_msg,
4305: p_category => 'D',
4306: p_line_number => p_line_number);
4307: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4303: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4304: p_msg => x_error_msg,
4305: p_category => 'D',
4306: p_line_number => p_line_number);
4307: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4308: x_status := 1;
4309:
4310: RETURN;
4311: ELSE
4314: IF (l_freq_type = 'DAILY') THEN
4315: p_schedule_tbl(l_count).frequency := NULL;
4316: ELSIF (l_freq_type = 'WEEKLY') THEN
4317: IF (l_frequency IS NULL) THEN
4318: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NO_FREQUENCY');
4319: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4320: p_msg => x_error_msg,
4321: p_category => 'A',
4322: p_line_number => p_line_number);
4315: p_schedule_tbl(l_count).frequency := NULL;
4316: ELSIF (l_freq_type = 'WEEKLY') THEN
4317: IF (l_frequency IS NULL) THEN
4318: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NO_FREQUENCY');
4319: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4320: p_msg => x_error_msg,
4321: p_category => 'A',
4322: p_line_number => p_line_number);
4323: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4319: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4320: p_msg => x_error_msg,
4321: p_category => 'A',
4322: p_line_number => p_line_number);
4323: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4324: x_status := 1;
4325: RETURN;
4326: ELSE
4327: l_freq_code := GET_FREQ_CODE(p_frequency => l_frequency,
4328: p_line_number => p_line_number,
4329: x_status => x_status,
4330: x_error_msg => x_error_msg);
4331: IF (l_freq_code IS NULL) THEN
4332: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_INVALID_FREQUENCY',
4333: p_tokens => STRINGARRAY('frequency'),
4334: p_values => STRINGARRAY(l_frequency));
4335: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4336: p_msg => x_error_msg,
4331: IF (l_freq_code IS NULL) THEN
4332: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_INVALID_FREQUENCY',
4333: p_tokens => STRINGARRAY('frequency'),
4334: p_values => STRINGARRAY(l_frequency));
4335: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4336: p_msg => x_error_msg,
4337: p_category => 'D',
4338: p_line_number => p_line_number);
4339: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4335: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4336: p_msg => x_error_msg,
4337: p_category => 'D',
4338: p_line_number => p_line_number);
4339: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4340: x_status := 1;
4341: RETURN;
4342: ELSE
4343: p_schedule_tbl(l_count).frequency := TO_NUMBER(l_freq_code);
4346: p_line_number => p_line_number,
4347: x_status => x_status,
4348: x_error_msg => x_error_msg);
4349: IF (x_status <> -1) THEN
4350: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4351: RETURN;
4352: END IF;
4353:
4354: p_schedule_tbl(l_count).frequency_arrival := l_freq_arr;
4357: END IF;
4358:
4359: -- DEPARTURE_TIME is mandatory if FREQUENCY is set
4360: IF (l_departure_tm IS NULL) THEN
4361: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NO_DEPARTURE_TIME');
4362: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4363: p_msg => x_error_msg,
4364: p_category => 'A',
4365: p_line_number => p_line_number);
4358:
4359: -- DEPARTURE_TIME is mandatory if FREQUENCY is set
4360: IF (l_departure_tm IS NULL) THEN
4361: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NO_DEPARTURE_TIME');
4362: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4363: p_msg => x_error_msg,
4364: p_category => 'A',
4365: p_line_number => p_line_number);
4366: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4362: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4363: p_msg => x_error_msg,
4364: p_category => 'A',
4365: p_line_number => p_line_number);
4366: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4367: x_status := 1;
4368: RETURN;
4369: ELSE
4370: l_departure_tm := TRIM(' ' FROM l_departure_tm);
4372: l_tmp_tm := TO_CHAR(TO_DATE(l_departure_tm, FTE_BULKLOAD_PKG.G_TIME_FORMAT), FTE_BULKLOAD_PKG.G_TIME_FORMAT);
4373: EXCEPTION
4374: WHEN OTHERS THEN
4375: x_error_msg := sqlerrm;
4376: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4377: p_msg => x_error_msg,
4378: p_category => 'O',
4379: p_line_number => p_line_number);
4380: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4376: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4377: p_msg => x_error_msg,
4378: p_category => 'O',
4379: p_line_number => p_line_number);
4380: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4381: x_status := 1;
4382: RETURN;
4383: END;
4384:
4382: RETURN;
4383: END;
4384:
4385: IF (l_tmp_tm IS NULL) THEN
4386: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_DEPARTURE_TIME_INVALID');
4387: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4388: p_msg => x_error_msg,
4389: p_category => 'D',
4390: p_line_number => p_line_number);
4383: END;
4384:
4385: IF (l_tmp_tm IS NULL) THEN
4386: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_DEPARTURE_TIME_INVALID');
4387: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4388: p_msg => x_error_msg,
4389: p_category => 'D',
4390: p_line_number => p_line_number);
4391: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4387: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4388: p_msg => x_error_msg,
4389: p_category => 'D',
4390: p_line_number => p_line_number);
4391: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4392: x_status := 1;
4393: RETURN;
4394: END IF;
4395: p_schedule_tbl(l_count).departure_time := l_tmp_tm;
4396: END IF;
4397:
4398: -- ARRIVAL_TIME is mandatory if FREQUENCY is set
4399: IF (l_arrival_tm IS NULL) THEN
4400: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NO_ARRIVAL_TIME');
4401: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4402: p_msg => x_error_msg,
4403: p_category => 'A',
4404: p_line_number => p_line_number);
4397:
4398: -- ARRIVAL_TIME is mandatory if FREQUENCY is set
4399: IF (l_arrival_tm IS NULL) THEN
4400: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NO_ARRIVAL_TIME');
4401: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4402: p_msg => x_error_msg,
4403: p_category => 'A',
4404: p_line_number => p_line_number);
4405: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4401: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4402: p_msg => x_error_msg,
4403: p_category => 'A',
4404: p_line_number => p_line_number);
4405: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4406: x_status := 1;
4407: RETURN;
4408: ELSE
4409: l_arrival_tm := TRIM(' ' FROM l_arrival_tm);
4411: l_tmp_tm := TO_CHAR(TO_DATE(l_arrival_tm, FTE_BULKLOAD_PKG.G_TIME_FORMAT), FTE_BULKLOAD_PKG.G_TIME_FORMAT);
4412: EXCEPTION
4413: WHEN OTHERS THEN
4414: x_error_msg := sqlerrm;
4415: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4416: p_msg => x_error_msg,
4417: p_category => 'O',
4418: p_line_number => p_line_number);
4419: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4415: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4416: p_msg => x_error_msg,
4417: p_category => 'O',
4418: p_line_number => p_line_number);
4419: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4420: x_status := 1;
4421: RETURN;
4422: END;
4423:
4421: RETURN;
4422: END;
4423:
4424: IF (l_tmp_tm IS NULL) THEN
4425: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_ARRIVAL_TIME_INVALID');
4426: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4427: p_msg => x_error_msg,
4428: p_category => 'D',
4429: p_line_number => p_line_number);
4422: END;
4423:
4424: IF (l_tmp_tm IS NULL) THEN
4425: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_ARRIVAL_TIME_INVALID');
4426: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4427: p_msg => x_error_msg,
4428: p_category => 'D',
4429: p_line_number => p_line_number);
4430: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4426: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4427: p_msg => x_error_msg,
4428: p_category => 'D',
4429: p_line_number => p_line_number);
4430: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4431: x_status := 1;
4432: RETURN;
4433: END IF;
4434:
4451: p_schedule_tbl(l_count).departure_date := TO_DATE(TRIM(' ' FROM l_departure), FTE_BULKLOAD_PKG.G_DATE_FORMAT);
4452: EXCEPTION
4453: WHEN OTHERS THEN
4454: x_error_msg := sqlerrm;
4455: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4456: p_msg => x_error_msg,
4457: p_category => 'O',
4458: p_line_number => p_line_number);
4459: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4455: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4456: p_msg => x_error_msg,
4457: p_category => 'O',
4458: p_line_number => p_line_number);
4459: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4460: x_status := 1;
4461: RETURN;
4462: END;
4463:
4461: RETURN;
4462: END;
4463:
4464: IF (p_schedule_tbl(l_count).departure_date IS NULL) THEN
4465: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_INCORRECT_DATE',
4466: p_tokens => STRINGARRAY('DATE'),
4467: p_values => STRINGARRAY(l_departure));
4468: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4469: p_msg => x_error_msg,
4464: IF (p_schedule_tbl(l_count).departure_date IS NULL) THEN
4465: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_INCORRECT_DATE',
4466: p_tokens => STRINGARRAY('DATE'),
4467: p_values => STRINGARRAY(l_departure));
4468: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4469: p_msg => x_error_msg,
4470: p_category => 'D',
4471: p_line_number => p_line_number);
4472: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4468: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4469: p_msg => x_error_msg,
4470: p_category => 'D',
4471: p_line_number => p_line_number);
4472: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4473: x_status := 1;
4474: RETURN;
4475: END IF;
4476:
4488: p_schedule_tbl(l_count).arrival_date := TO_DATE(TRIM(' ' FROM l_arrival), FTE_BULKLOAD_PKG.G_DATE_FORMAT);
4489: EXCEPTION
4490: WHEN OTHERS THEN
4491: x_error_msg := sqlerrm;
4492: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4493: p_msg => x_error_msg,
4494: p_category => 'O',
4495: p_line_number => p_line_number);
4496: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4492: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4493: p_msg => x_error_msg,
4494: p_category => 'O',
4495: p_line_number => p_line_number);
4496: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4497: x_status := 1;
4498: RETURN;
4499: END;
4500:
4498: RETURN;
4499: END;
4500:
4501: IF (p_schedule_tbl(l_count).arrival_date IS NULL) THEN
4502: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_INCORRECT_DATE',
4503: p_tokens => STRINGARRAY('DATE'),
4504: p_values => STRINGARRAY(l_arrival));
4505: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4506: p_msg => x_error_msg,
4501: IF (p_schedule_tbl(l_count).arrival_date IS NULL) THEN
4502: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_INCORRECT_DATE',
4503: p_tokens => STRINGARRAY('DATE'),
4504: p_values => STRINGARRAY(l_arrival));
4505: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4506: p_msg => x_error_msg,
4507: p_category => 'D',
4508: p_line_number => p_line_number);
4509: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4505: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4506: p_msg => x_error_msg,
4507: p_category => 'D',
4508: p_line_number => p_line_number);
4509: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4510: x_status := 1;
4511: RETURN;
4512: END IF;
4513: END IF;
4522: x_status => x_status,
4523: x_error_msg => x_error_msg);
4524:
4525: IF (x_status <> -1) THEN
4526: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4527: RETURN;
4528: END IF;
4529:
4530: p_schedule_tbl(l_count).effective_date := l_start_date;
4537: x_status => x_status,
4538: x_error_msg => x_error_msg);
4539:
4540: IF (x_status <> -1) THEN
4541: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4542: RETURN;
4543: END IF;
4544:
4545: p_schedule_tbl(l_count).expiry_date := l_end_date;
4547: -- Validation for TRANSIT_TIME and TRANSIT_TIME_UOM
4548:
4549: IF (l_transit IS NOT NULL) THEN
4550: IF (ISNUM(l_indicator) = 0) THEN
4551: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NUMBER_INVALID');
4552: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4553: p_msg => x_error_msg,
4554: p_category => 'D',
4555: p_line_number => p_line_number);
4548:
4549: IF (l_transit IS NOT NULL) THEN
4550: IF (ISNUM(l_indicator) = 0) THEN
4551: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NUMBER_INVALID');
4552: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4553: p_msg => x_error_msg,
4554: p_category => 'D',
4555: p_line_number => p_line_number);
4556: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4552: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4553: p_msg => x_error_msg,
4554: p_category => 'D',
4555: p_line_number => p_line_number);
4556: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4557: x_status := 1;
4558: RETURN;
4559: END IF;
4560:
4558: RETURN;
4559: END IF;
4560:
4561: IF (to_number(l_transit) < 0) THEN
4562: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_TRANSIT_TIME_NEG');
4563: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4564: p_msg => x_error_msg,
4565: p_category => 'D',
4566: p_line_number => p_line_number);
4559: END IF;
4560:
4561: IF (to_number(l_transit) < 0) THEN
4562: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_TRANSIT_TIME_NEG');
4563: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4564: p_msg => x_error_msg,
4565: p_category => 'D',
4566: p_line_number => p_line_number);
4567: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4563: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4564: p_msg => x_error_msg,
4565: p_category => 'D',
4566: p_line_number => p_line_number);
4567: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4568: x_status := 1;
4569: RETURN;
4570: END IF;
4571: -- If transit is a valid number, valid UOM should be specified.
4569: RETURN;
4570: END IF;
4571: -- If transit is a valid number, valid UOM should be specified.
4572: IF (l_transit_uom IS NULL) THEN
4573: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_UOM_MISSING');
4574: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4575: p_msg => x_error_msg,
4576: p_category => 'A',
4577: p_line_number => p_line_number);
4570: END IF;
4571: -- If transit is a valid number, valid UOM should be specified.
4572: IF (l_transit_uom IS NULL) THEN
4573: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_UOM_MISSING');
4574: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4575: p_msg => x_error_msg,
4576: p_category => 'A',
4577: p_line_number => p_line_number);
4578: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4574: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4575: p_msg => x_error_msg,
4576: p_category => 'A',
4577: p_line_number => p_line_number);
4578: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4579: x_status := 1;
4580: RETURN;
4581: ELSE
4582: l_transit_uom_code := FTE_UTIL_PKG.GET_UOM_CODE(l_transit_uom, 'Time');
4578: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4579: x_status := 1;
4580: RETURN;
4581: ELSE
4582: l_transit_uom_code := FTE_UTIL_PKG.GET_UOM_CODE(l_transit_uom, 'Time');
4583: IF (l_transit_uom_code IS NOT NULL) THEN
4584: p_schedule_tbl(l_count).transit_time_uom := l_transit_uom_code;
4585: ELSE
4586: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_UOM_INVALID',
4582: l_transit_uom_code := FTE_UTIL_PKG.GET_UOM_CODE(l_transit_uom, 'Time');
4583: IF (l_transit_uom_code IS NOT NULL) THEN
4584: p_schedule_tbl(l_count).transit_time_uom := l_transit_uom_code;
4585: ELSE
4586: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_UOM_INVALID',
4587: p_tokens => STRINGARRAY('UOM'),
4588: p_values => STRINGARRAY(l_transit_uom));
4589: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4590: p_msg => x_error_msg,
4585: ELSE
4586: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_UOM_INVALID',
4587: p_tokens => STRINGARRAY('UOM'),
4588: p_values => STRINGARRAY(l_transit_uom));
4589: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4590: p_msg => x_error_msg,
4591: p_category => 'B',
4592: p_line_number => p_line_number);
4593: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4589: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4590: p_msg => x_error_msg,
4591: p_category => 'B',
4592: p_line_number => p_line_number);
4593: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4594: x_status := 1;
4595: RETURN;
4596: END IF;
4597: END IF;
4609:
4610: -- FTE_CAT_VALIDATION_PKG.VALIDATE_ELEMENTS(SCHEDULETABLE, data, _encoding, errors);
4611: END IF;
4612: ELSIF (l_old_schedule_id = -1 AND p_action = 'DELETE') THEN
4613: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NO_SCHEDULE');
4614: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4615: p_msg => x_error_msg,
4616: p_category => 'B',
4617: p_line_number => p_line_number);
4610: -- FTE_CAT_VALIDATION_PKG.VALIDATE_ELEMENTS(SCHEDULETABLE, data, _encoding, errors);
4611: END IF;
4612: ELSIF (l_old_schedule_id = -1 AND p_action = 'DELETE') THEN
4613: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NO_SCHEDULE');
4614: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4615: p_msg => x_error_msg,
4616: p_category => 'B',
4617: p_line_number => p_line_number);
4618: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4614: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4615: p_msg => x_error_msg,
4616: p_category => 'B',
4617: p_line_number => p_line_number);
4618: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4619: x_status := 1;
4620: RETURN;
4621: ELSIF (l_old_schedule_id <> -1 AND p_action = 'DELETE') THEN
4622: p_schedule_tbl(l_count).schedules_id := l_old_schedule_id;
4624: ELSE
4625: p_schedule_tbl(l_count).schedules_id := l_old_schedule_id;
4626: -- schedule already exist
4627: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
4628: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Schedule already exist');
4629: END IF;
4630: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4631: RETURN;
4632: END IF;
4626: -- schedule already exist
4627: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
4628: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Schedule already exist');
4629: END IF;
4630: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4631: RETURN;
4632: END IF;
4633:
4634: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4630: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4631: RETURN;
4632: END IF;
4633:
4634: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4635: EXCEPTION
4636: WHEN OTHERS THEN
4637: x_error_msg := sqlerrm;
4638: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4634: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4635: EXCEPTION
4636: WHEN OTHERS THEN
4637: x_error_msg := sqlerrm;
4638: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4639: p_msg => x_error_msg,
4640: p_category => 'O',
4641: p_line_number => p_line_number);
4642: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4638: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4639: p_msg => x_error_msg,
4640: p_category => 'O',
4641: p_line_number => p_line_number);
4642: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4643: x_status := 1;
4644: RETURN;
4645: END VALIDATE_SCHEDULE;
4646:
4701: l_count NUMBER;
4702: l_chart_type VARCHAR2(50) := FTE_RATE_CHART_PKG.g_chart_type;
4703:
4704: BEGIN
4705: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
4706:
4707: l_list_header_id := -1;
4708: x_status := -1;
4709:
4708: x_status := -1;
4709:
4710: l_qualifier_group := 1;
4711:
4712: p_action := FTE_UTIL_PKG.Get_Data('ACTION', p_values);
4713: l_description := FTE_UTIL_PKG.Get_Data('DESCRIPTION', p_values);
4714: l_start_date := FTE_UTIL_PKG.Get_Data('START_DATE', p_values);
4715: l_end_date := FTE_UTIL_PKG.Get_Data('END_DATE', p_values);
4716: l_currency := FTE_UTIL_PKG.Get_Data('CURRENCY', p_values);
4709:
4710: l_qualifier_group := 1;
4711:
4712: p_action := FTE_UTIL_PKG.Get_Data('ACTION', p_values);
4713: l_description := FTE_UTIL_PKG.Get_Data('DESCRIPTION', p_values);
4714: l_start_date := FTE_UTIL_PKG.Get_Data('START_DATE', p_values);
4715: l_end_date := FTE_UTIL_PKG.Get_Data('END_DATE', p_values);
4716: l_currency := FTE_UTIL_PKG.Get_Data('CURRENCY', p_values);
4717: l_carrier_name := FTE_UTIL_PKG.Get_Data('CARRIER_NAME', p_values);
4710: l_qualifier_group := 1;
4711:
4712: p_action := FTE_UTIL_PKG.Get_Data('ACTION', p_values);
4713: l_description := FTE_UTIL_PKG.Get_Data('DESCRIPTION', p_values);
4714: l_start_date := FTE_UTIL_PKG.Get_Data('START_DATE', p_values);
4715: l_end_date := FTE_UTIL_PKG.Get_Data('END_DATE', p_values);
4716: l_currency := FTE_UTIL_PKG.Get_Data('CURRENCY', p_values);
4717: l_carrier_name := FTE_UTIL_PKG.Get_Data('CARRIER_NAME', p_values);
4718: l_service_level := FTE_UTIL_PKG.Get_Data('SERVICE_LEVEL', p_values);
4711:
4712: p_action := FTE_UTIL_PKG.Get_Data('ACTION', p_values);
4713: l_description := FTE_UTIL_PKG.Get_Data('DESCRIPTION', p_values);
4714: l_start_date := FTE_UTIL_PKG.Get_Data('START_DATE', p_values);
4715: l_end_date := FTE_UTIL_PKG.Get_Data('END_DATE', p_values);
4716: l_currency := FTE_UTIL_PKG.Get_Data('CURRENCY', p_values);
4717: l_carrier_name := FTE_UTIL_PKG.Get_Data('CARRIER_NAME', p_values);
4718: l_service_level := FTE_UTIL_PKG.Get_Data('SERVICE_LEVEL', p_values);
4719: l_attribute1 := FTE_UTIL_PKG.Get_Data('ATTRIBUTE1', p_values);
4712: p_action := FTE_UTIL_PKG.Get_Data('ACTION', p_values);
4713: l_description := FTE_UTIL_PKG.Get_Data('DESCRIPTION', p_values);
4714: l_start_date := FTE_UTIL_PKG.Get_Data('START_DATE', p_values);
4715: l_end_date := FTE_UTIL_PKG.Get_Data('END_DATE', p_values);
4716: l_currency := FTE_UTIL_PKG.Get_Data('CURRENCY', p_values);
4717: l_carrier_name := FTE_UTIL_PKG.Get_Data('CARRIER_NAME', p_values);
4718: l_service_level := FTE_UTIL_PKG.Get_Data('SERVICE_LEVEL', p_values);
4719: l_attribute1 := FTE_UTIL_PKG.Get_Data('ATTRIBUTE1', p_values);
4720: p_carrier_id := FTE_UTIL_PKG.Get_Data('CARRIER_ID', p_values);
4713: l_description := FTE_UTIL_PKG.Get_Data('DESCRIPTION', p_values);
4714: l_start_date := FTE_UTIL_PKG.Get_Data('START_DATE', p_values);
4715: l_end_date := FTE_UTIL_PKG.Get_Data('END_DATE', p_values);
4716: l_currency := FTE_UTIL_PKG.Get_Data('CURRENCY', p_values);
4717: l_carrier_name := FTE_UTIL_PKG.Get_Data('CARRIER_NAME', p_values);
4718: l_service_level := FTE_UTIL_PKG.Get_Data('SERVICE_LEVEL', p_values);
4719: l_attribute1 := FTE_UTIL_PKG.Get_Data('ATTRIBUTE1', p_values);
4720: p_carrier_id := FTE_UTIL_PKG.Get_Data('CARRIER_ID', p_values);
4721:
4714: l_start_date := FTE_UTIL_PKG.Get_Data('START_DATE', p_values);
4715: l_end_date := FTE_UTIL_PKG.Get_Data('END_DATE', p_values);
4716: l_currency := FTE_UTIL_PKG.Get_Data('CURRENCY', p_values);
4717: l_carrier_name := FTE_UTIL_PKG.Get_Data('CARRIER_NAME', p_values);
4718: l_service_level := FTE_UTIL_PKG.Get_Data('SERVICE_LEVEL', p_values);
4719: l_attribute1 := FTE_UTIL_PKG.Get_Data('ATTRIBUTE1', p_values);
4720: p_carrier_id := FTE_UTIL_PKG.Get_Data('CARRIER_ID', p_values);
4721:
4722: -- Multiple RC
4715: l_end_date := FTE_UTIL_PKG.Get_Data('END_DATE', p_values);
4716: l_currency := FTE_UTIL_PKG.Get_Data('CURRENCY', p_values);
4717: l_carrier_name := FTE_UTIL_PKG.Get_Data('CARRIER_NAME', p_values);
4718: l_service_level := FTE_UTIL_PKG.Get_Data('SERVICE_LEVEL', p_values);
4719: l_attribute1 := FTE_UTIL_PKG.Get_Data('ATTRIBUTE1', p_values);
4720: p_carrier_id := FTE_UTIL_PKG.Get_Data('CARRIER_ID', p_values);
4721:
4722: -- Multiple RC
4723: l_replaced_rc := FTE_UTIL_PKG.Get_Data('REPLACED_RATE_CHART', p_values);
4716: l_currency := FTE_UTIL_PKG.Get_Data('CURRENCY', p_values);
4717: l_carrier_name := FTE_UTIL_PKG.Get_Data('CARRIER_NAME', p_values);
4718: l_service_level := FTE_UTIL_PKG.Get_Data('SERVICE_LEVEL', p_values);
4719: l_attribute1 := FTE_UTIL_PKG.Get_Data('ATTRIBUTE1', p_values);
4720: p_carrier_id := FTE_UTIL_PKG.Get_Data('CARRIER_ID', p_values);
4721:
4722: -- Multiple RC
4723: l_replaced_rc := FTE_UTIL_PKG.Get_Data('REPLACED_RATE_CHART', p_values);
4724:
4719: l_attribute1 := FTE_UTIL_PKG.Get_Data('ATTRIBUTE1', p_values);
4720: p_carrier_id := FTE_UTIL_PKG.Get_Data('CARRIER_ID', p_values);
4721:
4722: -- Multiple RC
4723: l_replaced_rc := FTE_UTIL_PKG.Get_Data('REPLACED_RATE_CHART', p_values);
4724:
4725: --find out what type of rate chart it is
4726: l_chart_type := NULL;
4727:
4724:
4725: --find out what type of rate chart it is
4726: l_chart_type := NULL;
4727:
4728: l_name := FTE_UTIL_PKG.Get_Data('RATE_CHART_NAME', p_values);
4729: IF (l_name IS NOT NULL) THEN
4730: l_chart_type := 'FTE_RATE_CHART';
4731: l_list_type_code := 'PRL';
4732: END IF;
4731: l_list_type_code := 'PRL';
4732: END IF;
4733:
4734: IF (l_name IS NULL) THEN
4735: l_name := FTE_UTIL_PKG.Get_Data('LTL_RATE_CHART_NAME', p_values);
4736: IF (l_name IS NOT NULL) THEN
4737: l_chart_type := 'FTE_RATE_CHART';
4738: l_list_type_code := 'PRL';
4739: FTE_RATE_CHART_PKG.g_is_LTL := TRUE;
4740: END IF;
4741: END IF;
4742:
4743: IF (l_name IS NULL) THEN
4744: l_name := FTE_UTIL_PKG.Get_Data('CHARGES_DISCOUNTS_NAME', p_values);
4745: IF (l_name IS NOT NULL) THEN
4746: l_chart_type := 'FTE_MODIFIER';
4747: l_list_type_code := 'SLT';
4748: l_attribute1 := 'FTE_MODIFIER';
4753: END IF;
4754: END IF;
4755:
4756: IF (l_name IS NULL) THEN
4757: l_name := FTE_UTIL_PKG.Get_Data('TL_CHART_NAME', p_values);
4758: IF (l_name IS NOT NULL) THEN
4759: l_chart_type := 'TL_RATE_CHART';
4760: l_list_type_code := 'PRL';
4761: END IF;
4761: END IF;
4762: END IF;
4763:
4764: IF (l_name IS NULL) THEN
4765: l_name := FTE_UTIL_PKG.Get_Data('TL_MODIFIER_NAME', p_values);
4766: IF (l_name IS NOT NULL) THEN
4767: l_chart_type := 'TL_MODIFIER';
4768: l_list_type_code := 'DLT';
4769: END IF;
4769: END IF;
4770: END IF;
4771:
4772: IF (l_name IS NULL) THEN
4773: l_name := FTE_UTIL_PKG.Get_Data('FACILITY_RATE_CHART_NAME', p_values);
4774: IF (l_name IS NOT NULL) THEN
4775: l_chart_type := 'FAC_RATE_CHART';
4776: l_list_type_code := 'PRL';
4777: END IF;
4777: END IF;
4778: END IF;
4779:
4780: IF (l_name IS NULL) THEN
4781: l_name := FTE_UTIL_PKG.Get_Data('TL_FACILITY_MODIFIER_NAME', p_values);
4782: IF (l_name IS NOT NULL) THEN
4783: l_chart_type := 'FAC_MODIFIER';
4784: l_list_type_code := 'DLT';
4785: END IF;
4785: END IF;
4786: END IF;
4787:
4788: IF (l_name IS NULL) THEN
4789: l_name := FTE_UTIL_PKG.Get_Data('TL_MIN_CHARGE', p_values);
4790: IF (l_name IS NOT NULL) THEN
4791: l_chart_type := 'MIN_MODIFIER';
4792: l_list_type_code := 'DLT';
4793: END IF;
4794: END IF;
4795:
4796: --DEBUG MESSAGES
4797: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
4798: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
4799: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Description', l_description);
4800: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date);
4801: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date);
4802: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
4795:
4796: --DEBUG MESSAGES
4797: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
4798: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
4799: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Description', l_description);
4800: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date);
4801: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date);
4802: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
4803: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
4796: --DEBUG MESSAGES
4797: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
4798: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
4799: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Description', l_description);
4800: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date);
4801: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date);
4802: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
4803: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
4804: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service level', l_service_level);
4797: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
4798: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
4799: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Description', l_description);
4800: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date);
4801: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date);
4802: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
4803: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
4804: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service level', l_service_level);
4805: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute1', l_attribute1);
4798: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', p_action);
4799: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Description', l_description);
4800: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date);
4801: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date);
4802: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
4803: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
4804: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service level', l_service_level);
4805: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute1', l_attribute1);
4806: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
4799: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Description', l_description);
4800: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date);
4801: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date);
4802: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
4803: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
4804: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service level', l_service_level);
4805: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute1', l_attribute1);
4806: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
4807: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Replaced RC', l_replaced_rc);
4800: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Start date', l_start_date);
4801: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date);
4802: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
4803: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
4804: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service level', l_service_level);
4805: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute1', l_attribute1);
4806: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
4807: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Replaced RC', l_replaced_rc);
4808: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
4801: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'End date', l_end_date);
4802: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
4803: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
4804: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service level', l_service_level);
4805: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute1', l_attribute1);
4806: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
4807: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Replaced RC', l_replaced_rc);
4808: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
4809: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
4802: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency', l_currency);
4803: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
4804: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service level', l_service_level);
4805: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute1', l_attribute1);
4806: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
4807: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Replaced RC', l_replaced_rc);
4808: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
4809: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
4810: END IF;
4803: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier name', l_carrier_name);
4804: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service level', l_service_level);
4805: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute1', l_attribute1);
4806: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
4807: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Replaced RC', l_replaced_rc);
4808: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
4809: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
4810: END IF;
4811:
4804: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service level', l_service_level);
4805: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute1', l_attribute1);
4806: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
4807: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Replaced RC', l_replaced_rc);
4808: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
4809: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
4810: END IF;
4811:
4812: VALIDATE_DATE(p_date => l_start_date,
4805: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute1', l_attribute1);
4806: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Carrier ID', p_carrier_id);
4807: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Replaced RC', l_replaced_rc);
4808: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Name', l_name);
4809: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
4810: END IF;
4811:
4812: VALIDATE_DATE(p_date => l_start_date,
4813: p_line_number => p_line_number,
4814: x_status => x_status,
4815: x_error_msg => x_error_msg);
4816:
4817: IF (x_status <> -1) THEN
4818: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4819: RETURN;
4820: END IF;
4821:
4822: VALIDATE_DATE(p_date => l_end_date,
4824: x_status => x_status,
4825: x_error_msg => x_error_msg);
4826:
4827: IF (x_status <> -1) THEN
4828: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4829: RETURN;
4830: END IF;
4831:
4832: IF (p_validate) THEN
4830: END IF;
4831:
4832: IF (p_validate) THEN
4833: IF (l_name IS NULL OR LENGTH(l_name) = 0 ) THEN
4834: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_PRICE_NAME_MISSING');
4835: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4836: p_msg => x_error_msg,
4837: p_category => 'A',
4838: p_line_number => p_line_number);
4831:
4832: IF (p_validate) THEN
4833: IF (l_name IS NULL OR LENGTH(l_name) = 0 ) THEN
4834: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_PRICE_NAME_MISSING');
4835: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4836: p_msg => x_error_msg,
4837: p_category => 'A',
4838: p_line_number => p_line_number);
4839: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4835: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4836: p_msg => x_error_msg,
4837: p_category => 'A',
4838: p_line_number => p_line_number);
4839: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4840: x_status := 2;
4841: RETURN;
4842: END IF;
4843:
4847: x_status => x_status,
4848: x_error_msg => x_error_msg);
4849:
4850: IF (x_status <> -1) THEN
4851: FTE_UTIL_PKG.Exit_Debug(l_module_name);
4852: RETURN;
4853: END IF;
4854:
4855: IF (p_carrier_id IS NULL) THEN
4856: -- Validation for Carrier Name. Use cached Carrier Id, if same carrier.
4857: IF (l_carrier_name IS NULL OR LENGTH(l_carrier_name) = 0) THEN
4858: --Facility Rate Charts and Surcharges Don't need a carrier.
4859: IF (l_chart_type <> 'FAC_RATE_CHART' and l_chart_type <> 'FAC_MODIFIER') THEN
4860: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CAT_CARRIER_MISSING');
4861: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4862: p_msg => x_error_msg,
4863: p_category => 'A',
4864: p_line_number => p_line_number);
4857: IF (l_carrier_name IS NULL OR LENGTH(l_carrier_name) = 0) THEN
4858: --Facility Rate Charts and Surcharges Don't need a carrier.
4859: IF (l_chart_type <> 'FAC_RATE_CHART' and l_chart_type <> 'FAC_MODIFIER') THEN
4860: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CAT_CARRIER_MISSING');
4861: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4862: p_msg => x_error_msg,
4863: p_category => 'A',
4864: p_line_number => p_line_number);
4865: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4861: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4862: p_msg => x_error_msg,
4863: p_category => 'A',
4864: p_line_number => p_line_number);
4865: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4866: x_status := 2;
4867: RETURN;
4868: END IF;
4869: ELSE
4873: x_status => x_status,
4874: x_error_msg => x_error_msg);
4875:
4876: IF (x_status <> -1) THEN
4877: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4878: RETURN;
4879: END IF;
4880:
4881: END IF; --End Validating Carrier.
4887:
4888: -- Validate Price List and Check if the Pricelist is assigned to any Lane for DELETE
4889: -- If the pricelist already exists, set status to 999 and return immediately.
4890: IF (p_action = 'ADD' AND l_list_header_id <> -1) THEN
4891: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_PRICELIST_EXIST',
4892: p_tokens => StringArray('NAME'),
4893: p_values => StringArray(l_name));
4894:
4895: IF (l_chart_type <> 'LTL_RATE_CHART') THEN
4892: p_tokens => StringArray('NAME'),
4893: p_values => StringArray(l_name));
4894:
4895: IF (l_chart_type <> 'LTL_RATE_CHART') THEN
4896: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4897: p_msg => x_error_msg,
4898: p_category => 'D',
4899: p_line_number => p_line_number);
4900: END IF;
4899: p_line_number => p_line_number);
4900: END IF;
4901:
4902: x_status := 999;
4903: FTE_UTIL_PKG.Exit_Debug(l_module_name);
4904: RETURN;
4905:
4906: ELSIF (p_action IN ('DELETE', 'UPDATE') AND (l_temp <> l_chart_type OR l_temp IS NULL) AND l_list_header_id <> -1) THEN
4907:
4949: ELSE
4950: l_tokens(l_tokens.COUNT) := 'Unknown Type Chart';
4951: END IF;
4952:
4953: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_CAT_DELETE_TYPE_WRONG',
4954: p_tokens => StringArray('NAME', 'TYPE', 'ACTUAL'),
4955: p_values => l_tokens);
4956:
4957: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4953: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_CAT_DELETE_TYPE_WRONG',
4954: p_tokens => StringArray('NAME', 'TYPE', 'ACTUAL'),
4955: p_values => l_tokens);
4956:
4957: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4958: p_msg => x_error_msg,
4959: p_category => 'D',
4960: p_line_number => p_line_number);
4961:
4959: p_category => 'D',
4960: p_line_number => p_line_number);
4961:
4962: x_status := 2;
4963: FTE_UTIL_PKG.Exit_Debug(l_module_name);
4964: RETURN;
4965: ELSIF (p_action IN ('DELETE', 'UPDATE', 'APPEND') AND l_list_header_id = -1) THEN
4966: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_PRICELIST_INVALID',
4967: p_tokens => StringArray('NAME'),
4962: x_status := 2;
4963: FTE_UTIL_PKG.Exit_Debug(l_module_name);
4964: RETURN;
4965: ELSIF (p_action IN ('DELETE', 'UPDATE', 'APPEND') AND l_list_header_id = -1) THEN
4966: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_PRICELIST_INVALID',
4967: p_tokens => StringArray('NAME'),
4968: p_values => StringArray(l_name));
4969:
4970: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4966: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_PRICELIST_INVALID',
4967: p_tokens => StringArray('NAME'),
4968: p_values => StringArray(l_name));
4969:
4970: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4971: p_msg => x_error_msg,
4972: p_category => 'C',
4973: p_line_number => p_line_number);
4974:
4972: p_category => 'C',
4973: p_line_number => p_line_number);
4974:
4975: x_status := 2;
4976: FTE_UTIL_PKG.Exit_Debug(l_module_name);
4977: RETURN;
4978: END IF;
4979:
4980: IF (l_service_level IS NULL) THEN
4979:
4980: IF (l_service_level IS NULL) THEN
4981: --TL Rate Charts must have a service level attached to the header
4982: IF (l_chart_type IN ('TL_RATE_CHART', 'TL_MODIFIER', 'MIN_MODIFIER')) THEN
4983: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_SERVICE_LEVEL_MISSING');
4984: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4985: p_msg => x_error_msg,
4986: p_category => 'A',
4987: p_line_number => p_line_number);
4980: IF (l_service_level IS NULL) THEN
4981: --TL Rate Charts must have a service level attached to the header
4982: IF (l_chart_type IN ('TL_RATE_CHART', 'TL_MODIFIER', 'MIN_MODIFIER')) THEN
4983: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_SERVICE_LEVEL_MISSING');
4984: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4985: p_msg => x_error_msg,
4986: p_category => 'A',
4987: p_line_number => p_line_number);
4988: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4984: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
4985: p_msg => x_error_msg,
4986: p_category => 'A',
4987: p_line_number => p_line_number);
4988: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
4989: x_status := 2;
4990: RETURN;
4991: END IF;
4992: ELSE
4997: x_status => x_status,
4998: x_error_msg => x_error_msg);
4999:
5000: IF (l_service_level IS NULL OR x_status <> -1) THEN
5001: FTE_UTIL_PKG.Exit_Debug(l_module_name);
5002: RETURN;
5003: END IF;
5004: END IF;
5005:
5012: x_status => x_status,
5013: x_error_msg => x_error_msg);
5014:
5015: IF (x_status <> -1) THEN
5016: FTE_UTIL_PKG.Exit_Debug(l_module_name);
5017: RETURN;
5018: END IF;
5019:
5020: END IF; --End Validate and Cache Currency
5032: FTE_RATE_CHART_PKG.LH_REPLACE_RC(FTE_RATE_CHART_PKG.lh_replace_rc.COUNT + 1) := l_old_rc_id;
5033:
5034: EXCEPTION
5035: WHEN NO_DATA_FOUND THEN
5036: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_REPLACE_RC_NOT_FOUND',
5037: p_tokens => StringArray('RATE_CHART'),
5038: p_values => STRINGARRAY(l_replaced_rc));
5039: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5040: p_msg => x_error_msg,
5035: WHEN NO_DATA_FOUND THEN
5036: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_REPLACE_RC_NOT_FOUND',
5037: p_tokens => StringArray('RATE_CHART'),
5038: p_values => STRINGARRAY(l_replaced_rc));
5039: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5040: p_msg => x_error_msg,
5041: p_category => 'D',
5042: p_line_number => p_line_number);
5043:
5041: p_category => 'D',
5042: p_line_number => p_line_number);
5043:
5044: x_status := 2;
5045: FTE_UTIL_PKG.Exit_Debug(l_module_name);
5046: RETURN;
5047: WHEN OTHERS THEN
5048: x_error_msg := sqlerrm;
5049: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5045: FTE_UTIL_PKG.Exit_Debug(l_module_name);
5046: RETURN;
5047: WHEN OTHERS THEN
5048: x_error_msg := sqlerrm;
5049: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5050: p_msg => x_error_msg,
5051: p_category => 'O',
5052: p_line_number => p_line_number);
5053: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5049: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5050: p_msg => x_error_msg,
5051: p_category => 'O',
5052: p_line_number => p_line_number);
5053: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5054: x_status := 2;
5055: RETURN;
5056: END;
5057: END IF;
5055: RETURN;
5056: END;
5057: END IF;
5058: ELSE
5059: l_list_header_id := TO_NUMBER(FTE_UTIL_PKG.Get_Data('LIST_HEADER_ID', p_values));
5060: END IF;
5061:
5062: IF (p_process_id is NULL) THEN
5063: FTE_RATE_CHART_PKG.G_Process_Id := FTE_BULKLOAD_PKG.get_process_id;
5070:
5071: p_qp_list_header_tbl(l_count).NAME := l_name;
5072: p_qp_list_header_tbl(l_count).LIST_HEADER_ID := l_list_header_id;
5073: p_qp_list_header_tbl(l_count).INTERFACE_ACTION_CODE := 'D';
5074: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5075: RETURN;
5076: ELSIF (p_action IN ('ADD', 'APPEND','UPDATE')) THEN
5077:
5078: IF (p_action = 'ADD') THEN
5145: END IF;
5146:
5147: FTE_RATE_CHART_PKG.g_chart_type := l_chart_type;
5148:
5149: FTE_UTIL_PKG.Exit_Debug(l_module_name);
5150:
5151: EXCEPTION
5152: WHEN OTHERS THEN
5153: x_error_msg := sqlerrm;
5150:
5151: EXCEPTION
5152: WHEN OTHERS THEN
5153: x_error_msg := sqlerrm;
5154: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5155: p_msg => x_error_msg,
5156: p_category => 'O',
5157: p_line_number => p_line_number);
5158: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5154: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5155: p_msg => x_error_msg,
5156: p_category => 'O',
5157: p_line_number => p_line_number);
5158: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5159: x_status := 2;
5160: END VALIDATE_RATE_CHART;
5161:
5162: -----------------------------------------------------------------------------
5227: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_RATE_LINE';
5228: l_count NUMBER;
5229:
5230: BEGIN
5231: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
5232:
5233: --reset the upper value used for parcel LTL breaks.
5234: FTE_RATE_CHART_PKG.G_previous_upper := 0;
5235:
5240: l_product_attribute := null;
5241: l_item := 'ALL';
5242: l_prc_attr_datatype := 'C';
5243:
5244: l_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
5245: l_linenum := FTE_UTIL_PKG.GET_DATA('LINE_NUMBER', p_values);
5246: l_description := FTE_UTIL_PKG.GET_DATA('DESCRIPTION', p_values);
5247: l_operamt := FTE_UTIL_PKG.GET_DATA('RATE', p_values);
5248: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
5241: l_item := 'ALL';
5242: l_prc_attr_datatype := 'C';
5243:
5244: l_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
5245: l_linenum := FTE_UTIL_PKG.GET_DATA('LINE_NUMBER', p_values);
5246: l_description := FTE_UTIL_PKG.GET_DATA('DESCRIPTION', p_values);
5247: l_operamt := FTE_UTIL_PKG.GET_DATA('RATE', p_values);
5248: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
5249: l_precedence := FTE_UTIL_PKG.GET_DATA('PRECEDENCE', p_values);
5242: l_prc_attr_datatype := 'C';
5243:
5244: l_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
5245: l_linenum := FTE_UTIL_PKG.GET_DATA('LINE_NUMBER', p_values);
5246: l_description := FTE_UTIL_PKG.GET_DATA('DESCRIPTION', p_values);
5247: l_operamt := FTE_UTIL_PKG.GET_DATA('RATE', p_values);
5248: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
5249: l_precedence := FTE_UTIL_PKG.GET_DATA('PRECEDENCE', p_values);
5250: l_break_type := FTE_UTIL_PKG.GET_DATA('RATE_BREAK_TYPE', p_values);
5243:
5244: l_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
5245: l_linenum := FTE_UTIL_PKG.GET_DATA('LINE_NUMBER', p_values);
5246: l_description := FTE_UTIL_PKG.GET_DATA('DESCRIPTION', p_values);
5247: l_operamt := FTE_UTIL_PKG.GET_DATA('RATE', p_values);
5248: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
5249: l_precedence := FTE_UTIL_PKG.GET_DATA('PRECEDENCE', p_values);
5250: l_break_type := FTE_UTIL_PKG.GET_DATA('RATE_BREAK_TYPE', p_values);
5251: l_volume_type := FTE_UTIL_PKG.GET_DATA('VOLUME_TYPE', p_values);
5244: l_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
5245: l_linenum := FTE_UTIL_PKG.GET_DATA('LINE_NUMBER', p_values);
5246: l_description := FTE_UTIL_PKG.GET_DATA('DESCRIPTION', p_values);
5247: l_operamt := FTE_UTIL_PKG.GET_DATA('RATE', p_values);
5248: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
5249: l_precedence := FTE_UTIL_PKG.GET_DATA('PRECEDENCE', p_values);
5250: l_break_type := FTE_UTIL_PKG.GET_DATA('RATE_BREAK_TYPE', p_values);
5251: l_volume_type := FTE_UTIL_PKG.GET_DATA('VOLUME_TYPE', p_values);
5252: l_rate_type := FTE_UTIL_PKG.GET_DATA('RATE_TYPE', p_values);
5245: l_linenum := FTE_UTIL_PKG.GET_DATA('LINE_NUMBER', p_values);
5246: l_description := FTE_UTIL_PKG.GET_DATA('DESCRIPTION', p_values);
5247: l_operamt := FTE_UTIL_PKG.GET_DATA('RATE', p_values);
5248: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
5249: l_precedence := FTE_UTIL_PKG.GET_DATA('PRECEDENCE', p_values);
5250: l_break_type := FTE_UTIL_PKG.GET_DATA('RATE_BREAK_TYPE', p_values);
5251: l_volume_type := FTE_UTIL_PKG.GET_DATA('VOLUME_TYPE', p_values);
5252: l_rate_type := FTE_UTIL_PKG.GET_DATA('RATE_TYPE', p_values);
5253: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
5246: l_description := FTE_UTIL_PKG.GET_DATA('DESCRIPTION', p_values);
5247: l_operamt := FTE_UTIL_PKG.GET_DATA('RATE', p_values);
5248: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
5249: l_precedence := FTE_UTIL_PKG.GET_DATA('PRECEDENCE', p_values);
5250: l_break_type := FTE_UTIL_PKG.GET_DATA('RATE_BREAK_TYPE', p_values);
5251: l_volume_type := FTE_UTIL_PKG.GET_DATA('VOLUME_TYPE', p_values);
5252: l_rate_type := FTE_UTIL_PKG.GET_DATA('RATE_TYPE', p_values);
5253: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
5254: l_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
5247: l_operamt := FTE_UTIL_PKG.GET_DATA('RATE', p_values);
5248: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
5249: l_precedence := FTE_UTIL_PKG.GET_DATA('PRECEDENCE', p_values);
5250: l_break_type := FTE_UTIL_PKG.GET_DATA('RATE_BREAK_TYPE', p_values);
5251: l_volume_type := FTE_UTIL_PKG.GET_DATA('VOLUME_TYPE', p_values);
5252: l_rate_type := FTE_UTIL_PKG.GET_DATA('RATE_TYPE', p_values);
5253: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
5254: l_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
5255: l_attr_value_to := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE_TO', p_values);
5248: l_uom := FTE_UTIL_PKG.GET_DATA('UOM', p_values);
5249: l_precedence := FTE_UTIL_PKG.GET_DATA('PRECEDENCE', p_values);
5250: l_break_type := FTE_UTIL_PKG.GET_DATA('RATE_BREAK_TYPE', p_values);
5251: l_volume_type := FTE_UTIL_PKG.GET_DATA('VOLUME_TYPE', p_values);
5252: l_rate_type := FTE_UTIL_PKG.GET_DATA('RATE_TYPE', p_values);
5253: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
5254: l_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
5255: l_attr_value_to := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE_TO', p_values);
5256: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
5249: l_precedence := FTE_UTIL_PKG.GET_DATA('PRECEDENCE', p_values);
5250: l_break_type := FTE_UTIL_PKG.GET_DATA('RATE_BREAK_TYPE', p_values);
5251: l_volume_type := FTE_UTIL_PKG.GET_DATA('VOLUME_TYPE', p_values);
5252: l_rate_type := FTE_UTIL_PKG.GET_DATA('RATE_TYPE', p_values);
5253: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
5254: l_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
5255: l_attr_value_to := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE_TO', p_values);
5256: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
5257: l_comp_operator := FTE_UTIL_PKG.GET_DATA('COMPARISON_OPERATOR', p_values);
5250: l_break_type := FTE_UTIL_PKG.GET_DATA('RATE_BREAK_TYPE', p_values);
5251: l_volume_type := FTE_UTIL_PKG.GET_DATA('VOLUME_TYPE', p_values);
5252: l_rate_type := FTE_UTIL_PKG.GET_DATA('RATE_TYPE', p_values);
5253: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
5254: l_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
5255: l_attr_value_to := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE_TO', p_values);
5256: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
5257: l_comp_operator := FTE_UTIL_PKG.GET_DATA('COMPARISON_OPERATOR', p_values);
5258: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
5251: l_volume_type := FTE_UTIL_PKG.GET_DATA('VOLUME_TYPE', p_values);
5252: l_rate_type := FTE_UTIL_PKG.GET_DATA('RATE_TYPE', p_values);
5253: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
5254: l_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
5255: l_attr_value_to := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE_TO', p_values);
5256: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
5257: l_comp_operator := FTE_UTIL_PKG.GET_DATA('COMPARISON_OPERATOR', p_values);
5258: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
5259: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
5252: l_rate_type := FTE_UTIL_PKG.GET_DATA('RATE_TYPE', p_values);
5253: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
5254: l_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
5255: l_attr_value_to := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE_TO', p_values);
5256: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
5257: l_comp_operator := FTE_UTIL_PKG.GET_DATA('COMPARISON_OPERATOR', p_values);
5258: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
5259: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
5260: l_formula_id := FTE_UTIL_PKG.GET_DATA('FORMULA_ID', p_values);
5253: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
5254: l_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
5255: l_attr_value_to := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE_TO', p_values);
5256: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
5257: l_comp_operator := FTE_UTIL_PKG.GET_DATA('COMPARISON_OPERATOR', p_values);
5258: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
5259: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
5260: l_formula_id := FTE_UTIL_PKG.GET_DATA('FORMULA_ID', p_values);
5261: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE_ACTIVE', p_values);
5254: l_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
5255: l_attr_value_to := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE_TO', p_values);
5256: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
5257: l_comp_operator := FTE_UTIL_PKG.GET_DATA('COMPARISON_OPERATOR', p_values);
5258: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
5259: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
5260: l_formula_id := FTE_UTIL_PKG.GET_DATA('FORMULA_ID', p_values);
5261: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE_ACTIVE', p_values);
5262: l_end_date := FTE_UTIL_PKG.GET_DATA('END_DATE_ACTIVE', p_values);
5255: l_attr_value_to := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE_TO', p_values);
5256: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
5257: l_comp_operator := FTE_UTIL_PKG.GET_DATA('COMPARISON_OPERATOR', p_values);
5258: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
5259: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
5260: l_formula_id := FTE_UTIL_PKG.GET_DATA('FORMULA_ID', p_values);
5261: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE_ACTIVE', p_values);
5262: l_end_date := FTE_UTIL_PKG.GET_DATA('END_DATE_ACTIVE', p_values);
5263:
5256: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
5257: l_comp_operator := FTE_UTIL_PKG.GET_DATA('COMPARISON_OPERATOR', p_values);
5258: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
5259: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
5260: l_formula_id := FTE_UTIL_PKG.GET_DATA('FORMULA_ID', p_values);
5261: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE_ACTIVE', p_values);
5262: l_end_date := FTE_UTIL_PKG.GET_DATA('END_DATE_ACTIVE', p_values);
5263:
5264: --FTE_RATE_CHART
5257: l_comp_operator := FTE_UTIL_PKG.GET_DATA('COMPARISON_OPERATOR', p_values);
5258: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
5259: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
5260: l_formula_id := FTE_UTIL_PKG.GET_DATA('FORMULA_ID', p_values);
5261: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE_ACTIVE', p_values);
5262: l_end_date := FTE_UTIL_PKG.GET_DATA('END_DATE_ACTIVE', p_values);
5263:
5264: --FTE_RATE_CHART
5265: IF (l_chart_type = 'FTE_RATE_CHART') THEN
5258: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
5259: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
5260: l_formula_id := FTE_UTIL_PKG.GET_DATA('FORMULA_ID', p_values);
5261: l_start_date := FTE_UTIL_PKG.GET_DATA('START_DATE_ACTIVE', p_values);
5262: l_end_date := FTE_UTIL_PKG.GET_DATA('END_DATE_ACTIVE', p_values);
5263:
5264: --FTE_RATE_CHART
5265: IF (l_chart_type = 'FTE_RATE_CHART') THEN
5266: l_list_type_code := 'PLL';
5268: --FTE_MODIFIER
5269: ELSIF (l_chart_type = 'FTE_MODIFIER') THEN
5270: l_phase := 2;
5271: l_qual_ind := 5;
5272: l_dscvalue_amt := FTE_UTIL_PKG.GET_DATA('RATE_PER_UOM', p_values);
5273: l_dscprcnt_amt := FTE_UTIL_PKG.GET_DATA('PERCENTAGE', p_values);
5274: l_dsclumpsum_amt := FTE_UTIL_PKG.GET_DATA('FIXED_RATE', p_values);
5275: l_mod_level_code := FTE_UTIL_PKG.GET_DATA('MOD_LEVEL_CODE', p_values);
5276: l_list_type_code := 'SUR';
5269: ELSIF (l_chart_type = 'FTE_MODIFIER') THEN
5270: l_phase := 2;
5271: l_qual_ind := 5;
5272: l_dscvalue_amt := FTE_UTIL_PKG.GET_DATA('RATE_PER_UOM', p_values);
5273: l_dscprcnt_amt := FTE_UTIL_PKG.GET_DATA('PERCENTAGE', p_values);
5274: l_dsclumpsum_amt := FTE_UTIL_PKG.GET_DATA('FIXED_RATE', p_values);
5275: l_mod_level_code := FTE_UTIL_PKG.GET_DATA('MOD_LEVEL_CODE', p_values);
5276: l_list_type_code := 'SUR';
5277:
5270: l_phase := 2;
5271: l_qual_ind := 5;
5272: l_dscvalue_amt := FTE_UTIL_PKG.GET_DATA('RATE_PER_UOM', p_values);
5273: l_dscprcnt_amt := FTE_UTIL_PKG.GET_DATA('PERCENTAGE', p_values);
5274: l_dsclumpsum_amt := FTE_UTIL_PKG.GET_DATA('FIXED_RATE', p_values);
5275: l_mod_level_code := FTE_UTIL_PKG.GET_DATA('MOD_LEVEL_CODE', p_values);
5276: l_list_type_code := 'SUR';
5277:
5278: --TL_RATE_CHART
5271: l_qual_ind := 5;
5272: l_dscvalue_amt := FTE_UTIL_PKG.GET_DATA('RATE_PER_UOM', p_values);
5273: l_dscprcnt_amt := FTE_UTIL_PKG.GET_DATA('PERCENTAGE', p_values);
5274: l_dsclumpsum_amt := FTE_UTIL_PKG.GET_DATA('FIXED_RATE', p_values);
5275: l_mod_level_code := FTE_UTIL_PKG.GET_DATA('MOD_LEVEL_CODE', p_values);
5276: l_list_type_code := 'SUR';
5277:
5278: --TL_RATE_CHART
5279: ELSIF (l_chart_type = 'TL_RATE_CHART') THEN
5276: l_list_type_code := 'SUR';
5277:
5278: --TL_RATE_CHART
5279: ELSIF (l_chart_type = 'TL_RATE_CHART') THEN
5280: l_attribute1 := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE1', p_values);
5281: l_list_type_code := 'PLL';
5282:
5283: --TL_MODIFIER
5284: ELSIF (l_chart_type IN ('TL_MODIFIER', 'MIN_MODIFIER', 'FAC_MODIFIER')) THEN
5283: --TL_MODIFIER
5284: ELSIF (l_chart_type IN ('TL_MODIFIER', 'MIN_MODIFIER', 'FAC_MODIFIER')) THEN
5285: l_phase := 2;
5286: l_qual_ind := 22;
5287: l_dscvalue_amt := FTE_UTIL_PKG.GET_DATA('RATE_PER_UOM', p_values);
5288: l_dscprcnt_amt := FTE_UTIL_PKG.GET_DATA('PERCENTAGE', p_values);
5289: l_dsclumpsum_amt := FTE_UTIL_PKG.GET_DATA('FIXED_RATE', p_values);
5290: l_mod_level_code := FTE_UTIL_PKG.GET_DATA('MOD_LEVEL_CODE', p_values);
5291: l_list_type_code := 'SUR';
5284: ELSIF (l_chart_type IN ('TL_MODIFIER', 'MIN_MODIFIER', 'FAC_MODIFIER')) THEN
5285: l_phase := 2;
5286: l_qual_ind := 22;
5287: l_dscvalue_amt := FTE_UTIL_PKG.GET_DATA('RATE_PER_UOM', p_values);
5288: l_dscprcnt_amt := FTE_UTIL_PKG.GET_DATA('PERCENTAGE', p_values);
5289: l_dsclumpsum_amt := FTE_UTIL_PKG.GET_DATA('FIXED_RATE', p_values);
5290: l_mod_level_code := FTE_UTIL_PKG.GET_DATA('MOD_LEVEL_CODE', p_values);
5291: l_list_type_code := 'SUR';
5292:
5285: l_phase := 2;
5286: l_qual_ind := 22;
5287: l_dscvalue_amt := FTE_UTIL_PKG.GET_DATA('RATE_PER_UOM', p_values);
5288: l_dscprcnt_amt := FTE_UTIL_PKG.GET_DATA('PERCENTAGE', p_values);
5289: l_dsclumpsum_amt := FTE_UTIL_PKG.GET_DATA('FIXED_RATE', p_values);
5290: l_mod_level_code := FTE_UTIL_PKG.GET_DATA('MOD_LEVEL_CODE', p_values);
5291: l_list_type_code := 'SUR';
5292:
5293: ELSIF (l_chart_type = 'FAC_RATE_CHART') THEN
5286: l_qual_ind := 22;
5287: l_dscvalue_amt := FTE_UTIL_PKG.GET_DATA('RATE_PER_UOM', p_values);
5288: l_dscprcnt_amt := FTE_UTIL_PKG.GET_DATA('PERCENTAGE', p_values);
5289: l_dsclumpsum_amt := FTE_UTIL_PKG.GET_DATA('FIXED_RATE', p_values);
5290: l_mod_level_code := FTE_UTIL_PKG.GET_DATA('MOD_LEVEL_CODE', p_values);
5291: l_list_type_code := 'SUR';
5292:
5293: ELSIF (l_chart_type = 'FAC_RATE_CHART') THEN
5294: l_list_type_code := 'PLL';
5294: l_list_type_code := 'PLL';
5295:
5296: ELSE
5297:
5298: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CHART_TYPE_ERROR');
5299: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5300: p_msg => x_error_msg,
5301: p_category => 'O');
5302:
5295:
5296: ELSE
5297:
5298: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CHART_TYPE_ERROR');
5299: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5300: p_msg => x_error_msg,
5301: p_category => 'O');
5302:
5303: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5299: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5300: p_msg => x_error_msg,
5301: p_category => 'O');
5302:
5303: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5304: x_status := 2;
5305: RETURN;
5306: END IF;
5307:
5311: l_mod_level_code := 'LINE';
5312: END IF;
5313:
5314: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
5315: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
5316: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Description', l_description );
5317: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate', l_operamt);
5318: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM', l_uom);
5319: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Precedence', l_precedence);
5312: END IF;
5313:
5314: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
5315: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
5316: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Description', l_description );
5317: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate', l_operamt);
5318: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM', l_uom);
5319: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Precedence', l_precedence);
5320: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate break type', l_break_type);
5313:
5314: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
5315: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
5316: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Description', l_description );
5317: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate', l_operamt);
5318: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM', l_uom);
5319: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Precedence', l_precedence);
5320: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate break type', l_break_type);
5321: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Volume type', l_volume_type);
5314: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
5315: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
5316: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Description', l_description );
5317: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate', l_operamt);
5318: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM', l_uom);
5319: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Precedence', l_precedence);
5320: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate break type', l_break_type);
5321: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Volume type', l_volume_type);
5322: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate type', l_rate_type);
5315: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
5316: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Description', l_description );
5317: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate', l_operamt);
5318: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM', l_uom);
5319: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Precedence', l_precedence);
5320: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate break type', l_break_type);
5321: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Volume type', l_volume_type);
5322: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate type', l_rate_type);
5323: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
5316: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Description', l_description );
5317: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate', l_operamt);
5318: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM', l_uom);
5319: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Precedence', l_precedence);
5320: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate break type', l_break_type);
5321: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Volume type', l_volume_type);
5322: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate type', l_rate_type);
5323: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
5324: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_attr_value_from );
5317: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate', l_operamt);
5318: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM', l_uom);
5319: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Precedence', l_precedence);
5320: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate break type', l_break_type);
5321: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Volume type', l_volume_type);
5322: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate type', l_rate_type);
5323: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
5324: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_attr_value_from );
5325: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_attr_value_to );
5318: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM', l_uom);
5319: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Precedence', l_precedence);
5320: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate break type', l_break_type);
5321: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Volume type', l_volume_type);
5322: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate type', l_rate_type);
5323: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
5324: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_attr_value_from );
5325: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_attr_value_to );
5326: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
5319: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Precedence', l_precedence);
5320: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate break type', l_break_type);
5321: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Volume type', l_volume_type);
5322: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate type', l_rate_type);
5323: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
5324: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_attr_value_from );
5325: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_attr_value_to );
5326: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
5327: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', l_comp_operator);
5320: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate break type', l_break_type);
5321: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Volume type', l_volume_type);
5322: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate type', l_rate_type);
5323: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
5324: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_attr_value_from );
5325: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_attr_value_to );
5326: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
5327: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', l_comp_operator);
5328: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type );
5321: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Volume type', l_volume_type);
5322: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate type', l_rate_type);
5323: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
5324: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_attr_value_from );
5325: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_attr_value_to );
5326: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
5327: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', l_comp_operator);
5328: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type );
5329: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype );
5322: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate type', l_rate_type);
5323: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
5324: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_attr_value_from );
5325: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_attr_value_to );
5326: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
5327: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', l_comp_operator);
5328: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type );
5329: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype );
5330: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Formula ID', l_formula_id);
5323: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
5324: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_attr_value_from );
5325: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_attr_value_to );
5326: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
5327: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', l_comp_operator);
5328: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type );
5329: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype );
5330: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Formula ID', l_formula_id);
5331: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
5324: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_attr_value_from );
5325: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_attr_value_to );
5326: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
5327: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', l_comp_operator);
5328: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type );
5329: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype );
5330: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Formula ID', l_formula_id);
5331: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
5332: END IF;
5325: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_attr_value_to );
5326: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
5327: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', l_comp_operator);
5328: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type );
5329: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype );
5330: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Formula ID', l_formula_id);
5331: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
5332: END IF;
5333:
5326: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
5327: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', l_comp_operator);
5328: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type );
5329: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype );
5330: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Formula ID', l_formula_id);
5331: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
5332: END IF;
5333:
5334: l_action := UPPER(l_action);
5327: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', l_comp_operator);
5328: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Type', l_type );
5329: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Subtype', l_subtype );
5330: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Formula ID', l_formula_id);
5331: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
5332: END IF;
5333:
5334: l_action := UPPER(l_action);
5335:
5343: x_status => x_status,
5344: x_error_msg => x_error_msg);
5345:
5346: IF (x_status <> -1) THEN
5347: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5348: RETURN;
5349: END IF;
5350:
5351: VALIDATE_DATE(p_date => l_end_date,
5353: x_status => x_status,
5354: x_error_msg => x_error_msg);
5355:
5356: IF (x_status <> -1) THEN
5357: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5358: RETURN;
5359: END IF;
5360:
5361: IF (p_validate) THEN
5365: x_status => x_status,
5366: x_error_msg => x_error_msg);
5367:
5368: IF (x_status <> -1) THEN
5369: FTE_UTIL_PKG.Exit_Debug(l_module_name);
5370: RETURN;
5371: END IF;
5372:
5373: IF (l_linenum IS NULL) THEN
5370: RETURN;
5371: END IF;
5372:
5373: IF (l_linenum IS NULL) THEN
5374: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CAT_LINE_NUMBER_MISSING');
5375: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5376: p_msg => x_error_msg,
5377: p_category => 'A',
5378: p_line_number => p_line_number);
5371: END IF;
5372:
5373: IF (l_linenum IS NULL) THEN
5374: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CAT_LINE_NUMBER_MISSING');
5375: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5376: p_msg => x_error_msg,
5377: p_category => 'A',
5378: p_line_number => p_line_number);
5379: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5375: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5376: p_msg => x_error_msg,
5377: p_category => 'A',
5378: p_line_number => p_line_number);
5379: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5380: x_status := 2;
5381: RETURN;
5382: ELSIF (isNum(l_linenum) = 0) THEN
5383: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_CAT_NUMBER_INVALID', -- need change
5379: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5380: x_status := 2;
5381: RETURN;
5382: ELSIF (isNum(l_linenum) = 0) THEN
5383: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_CAT_NUMBER_INVALID', -- need change
5384: p_tokens => STRINGARRAY('NUMBER'),
5385: p_values => STRINGARRAY(l_linenum));
5386: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5387: p_msg => x_error_msg,
5382: ELSIF (isNum(l_linenum) = 0) THEN
5383: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_CAT_NUMBER_INVALID', -- need change
5384: p_tokens => STRINGARRAY('NUMBER'),
5385: p_values => STRINGARRAY(l_linenum));
5386: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5387: p_msg => x_error_msg,
5388: p_category => 'D',
5389: p_line_number => p_line_number);
5390: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5386: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5387: p_msg => x_error_msg,
5388: p_category => 'D',
5389: p_line_number => p_line_number);
5390: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5391: x_status := 2;
5392: RETURN;
5393: END IF;
5394: END IF;
5404: --The UOM is not mandatory for Modifiers, even for RATE_PER_UOM.
5405: --If the UOM is not specified, the UOM of the rate line will be used.
5406: IF (l_chart_type NOT IN ('FTE_MODIFIER', 'TL_MODIFIER',
5407: 'MIN_MODIFIER', 'FAC_MODIFIER')) THEN
5408: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CAT_UOM_MISSING');
5409: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5410: p_msg => x_error_msg,
5411: p_category => 'A',
5412: p_line_number => p_line_number);
5405: --If the UOM is not specified, the UOM of the rate line will be used.
5406: IF (l_chart_type NOT IN ('FTE_MODIFIER', 'TL_MODIFIER',
5407: 'MIN_MODIFIER', 'FAC_MODIFIER')) THEN
5408: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CAT_UOM_MISSING');
5409: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5410: p_msg => x_error_msg,
5411: p_category => 'A',
5412: p_line_number => p_line_number);
5413: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5409: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5410: p_msg => x_error_msg,
5411: p_category => 'A',
5412: p_line_number => p_line_number);
5413: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5414: x_status := 2;
5415: RETURN;
5416: END IF;
5417: ELSE
5422: x_status => x_status,
5423: x_error_msg => x_error_msg);
5424:
5425: IF (x_status <> -1) THEN
5426: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5427: RETURN;
5428: END IF;
5429:
5430: END IF;
5431:
5432: IF (LENGTH(l_break_type) > 0) THEN
5433: l_break_type := UPPER(l_break_type);
5434: IF (NOT( l_break_type = 'POINT' OR l_break_type = 'RANGE' )) THEN
5435: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_BREAK_TYPE_INVALID',
5436: p_tokens => STRINGARRAY('BREAK_TYPE'),
5437: p_values => STRINGARRAY(l_break_type));
5438: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5439: p_msg => x_error_msg,
5434: IF (NOT( l_break_type = 'POINT' OR l_break_type = 'RANGE' )) THEN
5435: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_BREAK_TYPE_INVALID',
5436: p_tokens => STRINGARRAY('BREAK_TYPE'),
5437: p_values => STRINGARRAY(l_break_type));
5438: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5439: p_msg => x_error_msg,
5440: p_category => 'D',
5441: p_line_number => p_line_number);
5442: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5438: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5439: p_msg => x_error_msg,
5440: p_category => 'D',
5441: p_line_number => p_line_number);
5442: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5443: x_status := 2;
5444: RETURN;
5445: END IF;
5446: END IF;
5446: END IF;
5447:
5448: -- if it's has no rate or break type, throw error.
5449: IF (l_chart_type = 'FTE_RATE_CHART' AND l_operamt IS NULL AND l_break_type IS NULL) THEN
5450: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CAT_RATE_AND_BREAK');
5451: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5452: p_msg => x_error_msg,
5453: p_category => 'A',
5454: p_line_number => p_line_number);
5447:
5448: -- if it's has no rate or break type, throw error.
5449: IF (l_chart_type = 'FTE_RATE_CHART' AND l_operamt IS NULL AND l_break_type IS NULL) THEN
5450: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CAT_RATE_AND_BREAK');
5451: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5452: p_msg => x_error_msg,
5453: p_category => 'A',
5454: p_line_number => p_line_number);
5455: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5451: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5452: p_msg => x_error_msg,
5453: p_category => 'A',
5454: p_line_number => p_line_number);
5455: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5456: x_status := 2;
5457: RETURN;
5458:
5459: END IF;
5459: END IF;
5460:
5461: -- if both rate and break type not null, error also
5462: IF (l_chart_type = 'FTE_RATE_CHART' AND l_operamt IS NOT NULL AND l_break_type IS NOT NULL) THEN
5463: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CAT_RATE_AND_BREAK');
5464: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5465: p_msg => x_error_msg,
5466: p_category => 'A',
5467: p_line_number => p_line_number);
5460:
5461: -- if both rate and break type not null, error also
5462: IF (l_chart_type = 'FTE_RATE_CHART' AND l_operamt IS NOT NULL AND l_break_type IS NOT NULL) THEN
5463: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CAT_RATE_AND_BREAK');
5464: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5465: p_msg => x_error_msg,
5466: p_category => 'A',
5467: p_line_number => p_line_number);
5468: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5464: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5465: p_msg => x_error_msg,
5466: p_category => 'A',
5467: p_line_number => p_line_number);
5468: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5469: x_status := 2;
5470: RETURN;
5471: END IF;
5472:
5472:
5473: IF (LENGTH(l_volume_type) > 0) THEN
5474: l_volume_type := UPPER(l_volume_type);
5475: IF (NOT (l_volume_type = 'QUANTITY' OR l_volume_type = 'TOTAL_QUANTITY') ) THEN
5476: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_VOLUME_TYPE_INVALID',
5477: p_tokens => STRINGARRAY('VOLUME_TYPE'),
5478: p_values => STRINGARRAY(l_volume_type));
5479:
5480: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5476: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_VOLUME_TYPE_INVALID',
5477: p_tokens => STRINGARRAY('VOLUME_TYPE'),
5478: p_values => STRINGARRAY(l_volume_type));
5479:
5480: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5481: p_msg => x_error_msg,
5482: p_category => 'D',
5483: p_line_number => p_line_number);
5484: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5480: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5481: p_msg => x_error_msg,
5482: p_category => 'D',
5483: p_line_number => p_line_number);
5484: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5485: x_status := 2;
5486: RETURN;
5487: -- x_error_msg := 'VOLUME_TYPE (' || l_volume_type || ') FOR LINE ' || l_linenum || ' INVALID';
5488: END IF;
5489: END IF;
5490:
5491: -- if it's a standard line and don't have rate type, throw error.
5492: IF (l_chart_type = 'FTE_RATE_CHART' AND l_operamt IS NOT NULL AND l_rate_type IS NULL) THEN
5493: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CAT_RATE_TYPE_MISSING');
5494: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5495: p_msg => x_error_msg,
5496: p_category => 'A',
5497: p_line_number => p_line_number);
5490:
5491: -- if it's a standard line and don't have rate type, throw error.
5492: IF (l_chart_type = 'FTE_RATE_CHART' AND l_operamt IS NOT NULL AND l_rate_type IS NULL) THEN
5493: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CAT_RATE_TYPE_MISSING');
5494: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5495: p_msg => x_error_msg,
5496: p_category => 'A',
5497: p_line_number => p_line_number);
5498: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5494: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5495: p_msg => x_error_msg,
5496: p_category => 'A',
5497: p_line_number => p_line_number);
5498: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5499: x_status := 2;
5500: RETURN;
5501: END IF;
5502:
5504: p_line_number => p_line_number,
5505: x_status => x_status,
5506: x_error_msg => x_error_msg);
5507: IF (x_status <> -1) THEN
5508: FTE_UTIL_PKG.Exit_Debug(l_module_name);
5509: return;
5510: ELSE
5511: l_operator := l_rate_type;
5512: END IF;
5523: p_line_number => p_line_number,
5524: x_status => x_status,
5525: x_error_msg => x_error_msg);
5526: IF (x_status <> -1) THEN
5527: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5528: RETURN;
5529: END IF;
5530: END IF;
5531: ELSE
5528: RETURN;
5529: END IF;
5530: END IF;
5531: ELSE
5532: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_SUBTYPE_MISSING');
5533: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5534: p_msg => x_error_msg,
5535: p_category => 'A',
5536: p_line_number => p_line_number);
5529: END IF;
5530: END IF;
5531: ELSE
5532: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_SUBTYPE_MISSING');
5533: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5534: p_msg => x_error_msg,
5535: p_category => 'A',
5536: p_line_number => p_line_number);
5537: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5533: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5534: p_msg => x_error_msg,
5535: p_category => 'A',
5536: p_line_number => p_line_number);
5537: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5538: x_status := 2;
5539: RETURN;
5540: END IF;
5541:
5539: RETURN;
5540: END IF;
5541:
5542: IF (l_subtype IS NULL) THEN
5543: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
5544: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_SUBTYPE_INVALID',
5545: p_tokens => STRINGARRAY('SUBTYPE'),
5546: p_values => STRINGARRAY(l_subtype));
5547:
5540: END IF;
5541:
5542: IF (l_subtype IS NULL) THEN
5543: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
5544: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_SUBTYPE_INVALID',
5545: p_tokens => STRINGARRAY('SUBTYPE'),
5546: p_values => STRINGARRAY(l_subtype));
5547:
5548: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5544: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_SUBTYPE_INVALID',
5545: p_tokens => STRINGARRAY('SUBTYPE'),
5546: p_values => STRINGARRAY(l_subtype));
5547:
5548: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5549: p_msg => x_error_msg,
5550: p_category => 'D',
5551: p_line_number => p_line_number);
5552: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5548: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5549: p_msg => x_error_msg,
5550: p_category => 'D',
5551: p_line_number => p_line_number);
5552: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5553: x_status := 2;
5554: RETURN;
5555: END IF;
5556:
5556:
5557: ELSIF (l_type = 'DISCOUNT') THEN
5558: l_list_type_code := 'DIS';
5559: ELSE
5560: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_MOD_TYPE_INVALID',
5561: p_tokens => STRINGARRAY('TYPE'),
5562: p_values => STRINGARRAY(l_type));
5563:
5564: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5560: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_MOD_TYPE_INVALID',
5561: p_tokens => STRINGARRAY('TYPE'),
5562: p_values => STRINGARRAY(l_type));
5563:
5564: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5565: p_msg => x_error_msg,
5566: p_category => 'D',
5567: p_line_number => p_line_number);
5568: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5564: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5565: p_msg => x_error_msg,
5566: p_category => 'D',
5567: p_line_number => p_line_number);
5568: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5569: x_status := 2;
5570: RETURN;
5571: END IF;
5572:
5581: l_operator := 'LUMPSUM';
5582: l_operamt := l_dsclumpsum_amt;
5583: ELSIF (l_chart_type = 'FTE_MODIFIER') THEN
5584: --FTE_MODIFIERS don't have breaks, so one of these values must be specified.
5585: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_MOD_RATE_MISSING');
5586: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5587: p_msg => x_error_msg,
5588: p_category => 'A',
5589: p_line_number => p_line_number);
5582: l_operamt := l_dsclumpsum_amt;
5583: ELSIF (l_chart_type = 'FTE_MODIFIER') THEN
5584: --FTE_MODIFIERS don't have breaks, so one of these values must be specified.
5585: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_MOD_RATE_MISSING');
5586: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5587: p_msg => x_error_msg,
5588: p_category => 'A',
5589: p_line_number => p_line_number);
5590: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5586: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5587: p_msg => x_error_msg,
5588: p_category => 'A',
5589: p_line_number => p_line_number);
5590: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5591: x_status := 2;
5592: RETURN;
5593: END IF;
5594: END IF; --end validation of specific Attributes.
5611: l_break_type := NULL;
5612: END IF;
5613:
5614: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
5615: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Chart Type', l_chart_type);
5616: END IF;
5617:
5618: p_qp_list_line_tbl(l_count).PROCESS_ID := FTE_RATE_CHART_PKG.G_Process_Id;
5619: p_qp_list_line_tbl(l_count).OPERAND := fnd_number.canonical_to_number(l_operamt);
5668: --Facility rate chart
5669: p_qp_list_line_tbl(l_count).PRIMARY_UOM_FLAG := 'Y';
5670:
5671: ELSIF (l_chart_type NOT IN ('FAC_MODIFIER')) THEN
5672: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CHART_TYPE_ERROR');
5673: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5674: p_msg => x_error_msg,
5675: p_category => 'O');
5676: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5669: p_qp_list_line_tbl(l_count).PRIMARY_UOM_FLAG := 'Y';
5670:
5671: ELSIF (l_chart_type NOT IN ('FAC_MODIFIER')) THEN
5672: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CHART_TYPE_ERROR');
5673: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5674: p_msg => x_error_msg,
5675: p_category => 'O');
5676: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5677: x_status := 2;
5672: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CHART_TYPE_ERROR');
5673: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5674: p_msg => x_error_msg,
5675: p_category => 'O');
5676: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5677: x_status := 2;
5678: RETURN;
5679: END IF;
5680:
5714: END IF;
5715:
5716: FTE_RATE_CHART_PKG.g_chart_type := l_chart_type;
5717:
5718: FTE_UTIL_PKG.Exit_Debug(l_module_name);
5719: EXCEPTION
5720: WHEN OTHERS THEN
5721: x_error_msg := sqlerrm;
5722: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5718: FTE_UTIL_PKG.Exit_Debug(l_module_name);
5719: EXCEPTION
5720: WHEN OTHERS THEN
5721: x_error_msg := sqlerrm;
5722: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5723: p_msg => x_error_msg,
5724: p_category => 'O',
5725: p_line_number => p_line_number);
5726: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5722: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5723: p_msg => x_error_msg,
5724: p_category => 'O',
5725: p_line_number => p_line_number);
5726: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5727: x_status := 2;
5728: END VALIDATE_RATE_LINE;
5729:
5730: -----------------------------------------------------------------------------
5794: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_RATE_BREAK';
5795:
5796: BEGIN
5797: x_status := -1;
5798: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
5799:
5800: l_precedence := 220;
5801: l_prcbrk_linenum := 0;
5802: l_product_attribute := null;
5804: l_attribute2 := '';
5805: x_status := -1;
5806: l_break_type_code := 'PLL';
5807:
5808: l_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
5809: l_linenum := FTE_UTIL_PKG.GET_DATA('LINE_NUMBER', p_values);
5810: l_attr_value_from := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('LOWER_LIMIT', p_values));
5811: l_attr_value_to := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('UPPER_LIMIT', p_values));
5812: l_break_price := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('RATE', p_values));
5805: x_status := -1;
5806: l_break_type_code := 'PLL';
5807:
5808: l_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
5809: l_linenum := FTE_UTIL_PKG.GET_DATA('LINE_NUMBER', p_values);
5810: l_attr_value_from := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('LOWER_LIMIT', p_values));
5811: l_attr_value_to := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('UPPER_LIMIT', p_values));
5812: l_break_price := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('RATE', p_values));
5813: l_rate_type := FTE_UTIL_PKG.GET_DATA('RATE_TYPE', p_values);
5806: l_break_type_code := 'PLL';
5807:
5808: l_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
5809: l_linenum := FTE_UTIL_PKG.GET_DATA('LINE_NUMBER', p_values);
5810: l_attr_value_from := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('LOWER_LIMIT', p_values));
5811: l_attr_value_to := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('UPPER_LIMIT', p_values));
5812: l_break_price := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('RATE', p_values));
5813: l_rate_type := FTE_UTIL_PKG.GET_DATA('RATE_TYPE', p_values);
5814: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
5807:
5808: l_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
5809: l_linenum := FTE_UTIL_PKG.GET_DATA('LINE_NUMBER', p_values);
5810: l_attr_value_from := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('LOWER_LIMIT', p_values));
5811: l_attr_value_to := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('UPPER_LIMIT', p_values));
5812: l_break_price := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('RATE', p_values));
5813: l_rate_type := FTE_UTIL_PKG.GET_DATA('RATE_TYPE', p_values);
5814: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
5815: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
5808: l_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
5809: l_linenum := FTE_UTIL_PKG.GET_DATA('LINE_NUMBER', p_values);
5810: l_attr_value_from := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('LOWER_LIMIT', p_values));
5811: l_attr_value_to := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('UPPER_LIMIT', p_values));
5812: l_break_price := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('RATE', p_values));
5813: l_rate_type := FTE_UTIL_PKG.GET_DATA('RATE_TYPE', p_values);
5814: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
5815: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
5816: l_formula_id := FTE_UTIL_PKG.GET_DATA('FORMULA_ID', p_values);
5809: l_linenum := FTE_UTIL_PKG.GET_DATA('LINE_NUMBER', p_values);
5810: l_attr_value_from := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('LOWER_LIMIT', p_values));
5811: l_attr_value_to := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('UPPER_LIMIT', p_values));
5812: l_break_price := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('RATE', p_values));
5813: l_rate_type := FTE_UTIL_PKG.GET_DATA('RATE_TYPE', p_values);
5814: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
5815: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
5816: l_formula_id := FTE_UTIL_PKG.GET_DATA('FORMULA_ID', p_values);
5817:
5810: l_attr_value_from := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('LOWER_LIMIT', p_values));
5811: l_attr_value_to := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('UPPER_LIMIT', p_values));
5812: l_break_price := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('RATE', p_values));
5813: l_rate_type := FTE_UTIL_PKG.GET_DATA('RATE_TYPE', p_values);
5814: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
5815: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
5816: l_formula_id := FTE_UTIL_PKG.GET_DATA('FORMULA_ID', p_values);
5817:
5818: IF (l_chart_type IN ('TL_MODIFIER', 'MIN_MODIFIER', 'FAC_MODIFIER')) THEN
5811: l_attr_value_to := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('UPPER_LIMIT', p_values));
5812: l_break_price := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('RATE', p_values));
5813: l_rate_type := FTE_UTIL_PKG.GET_DATA('RATE_TYPE', p_values);
5814: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
5815: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
5816: l_formula_id := FTE_UTIL_PKG.GET_DATA('FORMULA_ID', p_values);
5817:
5818: IF (l_chart_type IN ('TL_MODIFIER', 'MIN_MODIFIER', 'FAC_MODIFIER')) THEN
5819: l_phase := 2;
5812: l_break_price := Fnd_Number.Canonical_To_Number(FTE_UTIL_PKG.GET_DATA('RATE', p_values));
5813: l_rate_type := FTE_UTIL_PKG.GET_DATA('RATE_TYPE', p_values);
5814: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
5815: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
5816: l_formula_id := FTE_UTIL_PKG.GET_DATA('FORMULA_ID', p_values);
5817:
5818: IF (l_chart_type IN ('TL_MODIFIER', 'MIN_MODIFIER', 'FAC_MODIFIER')) THEN
5819: l_phase := 2;
5820: l_group := 22;
5817:
5818: IF (l_chart_type IN ('TL_MODIFIER', 'MIN_MODIFIER', 'FAC_MODIFIER')) THEN
5819: l_phase := 2;
5820: l_group := 22;
5821: l_mod_level_code := FTE_UTIL_PKG.GET_DATA('MOD_LEVEL_CODE', p_values);
5822: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
5823: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
5824: l_break_type_code := 'SUR';
5825: END IF;
5818: IF (l_chart_type IN ('TL_MODIFIER', 'MIN_MODIFIER', 'FAC_MODIFIER')) THEN
5819: l_phase := 2;
5820: l_group := 22;
5821: l_mod_level_code := FTE_UTIL_PKG.GET_DATA('MOD_LEVEL_CODE', p_values);
5822: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
5823: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
5824: l_break_type_code := 'SUR';
5825: END IF;
5826:
5819: l_phase := 2;
5820: l_group := 22;
5821: l_mod_level_code := FTE_UTIL_PKG.GET_DATA('MOD_LEVEL_CODE', p_values);
5822: l_subtype := FTE_UTIL_PKG.GET_DATA('SUBTYPE', p_values);
5823: l_type := FTE_UTIL_PKG.GET_DATA('TYPE', p_values);
5824: l_break_type_code := 'SUR';
5825: END IF;
5826:
5827: IF (l_mod_level_code = 'LINEGROUP') THEN
5830: l_mod_level_code := 'LINE';
5831: END IF;
5832:
5833: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
5834: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
5835: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate type', l_rate_type);
5836: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
5837: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_attr_value_from );
5838: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_attr_value_to );
5831: END IF;
5832:
5833: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
5834: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
5835: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate type', l_rate_type);
5836: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
5837: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_attr_value_from );
5838: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_attr_value_to );
5839: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate', l_break_price );
5832:
5833: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
5834: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
5835: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate type', l_rate_type);
5836: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
5837: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_attr_value_from );
5838: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_attr_value_to );
5839: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate', l_break_price );
5840: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
5833: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
5834: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
5835: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate type', l_rate_type);
5836: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
5837: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_attr_value_from );
5838: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_attr_value_to );
5839: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate', l_break_price );
5840: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
5841: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Formula ID', l_formula_id);
5834: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
5835: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate type', l_rate_type);
5836: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
5837: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_attr_value_from );
5838: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_attr_value_to );
5839: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate', l_break_price );
5840: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
5841: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Formula ID', l_formula_id);
5842: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
5835: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate type', l_rate_type);
5836: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
5837: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_attr_value_from );
5838: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_attr_value_to );
5839: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate', l_break_price );
5840: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
5841: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Formula ID', l_formula_id);
5842: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
5843: END IF;
5836: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
5837: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_attr_value_from );
5838: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_attr_value_to );
5839: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate', l_break_price );
5840: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
5841: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Formula ID', l_formula_id);
5842: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
5843: END IF;
5844:
5837: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_attr_value_from );
5838: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_attr_value_to );
5839: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate', l_break_price );
5840: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
5841: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Formula ID', l_formula_id);
5842: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
5843: END IF;
5844:
5845: IF (p_validate) THEN
5838: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_attr_value_to );
5839: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate', l_break_price );
5840: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
5841: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Formula ID', l_formula_id);
5842: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
5843: END IF;
5844:
5845: IF (p_validate) THEN
5846: IF (l_linenum IS NULL) THEN
5843: END IF;
5844:
5845: IF (p_validate) THEN
5846: IF (l_linenum IS NULL) THEN
5847: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CAT_LINE_NUMBER_MISSING');
5848: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5849: p_msg => x_error_msg,
5850: p_category => 'A',
5851: p_line_number => p_line_number);
5844:
5845: IF (p_validate) THEN
5846: IF (l_linenum IS NULL) THEN
5847: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CAT_LINE_NUMBER_MISSING');
5848: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5849: p_msg => x_error_msg,
5850: p_category => 'A',
5851: p_line_number => p_line_number);
5852: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5848: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5849: p_msg => x_error_msg,
5850: p_category => 'A',
5851: p_line_number => p_line_number);
5852: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5853: x_status := 2;
5854: RETURN;
5855: ELSIF (isNum(l_linenum) = 0) THEN
5856: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CAT_NUMBER_INVALID');
5852: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5853: x_status := 2;
5854: RETURN;
5855: ELSIF (isNum(l_linenum) = 0) THEN
5856: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CAT_NUMBER_INVALID');
5857: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5858: p_msg => x_error_msg,
5859: p_category => 'D',
5860: p_line_number => p_line_number);
5853: x_status := 2;
5854: RETURN;
5855: ELSIF (isNum(l_linenum) = 0) THEN
5856: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CAT_NUMBER_INVALID');
5857: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5858: p_msg => x_error_msg,
5859: p_category => 'D',
5860: p_line_number => p_line_number);
5861: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5857: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5858: p_msg => x_error_msg,
5859: p_category => 'D',
5860: p_line_number => p_line_number);
5861: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5862: x_status := 2;
5863: RETURN;
5864: END IF;
5865: END IF;
5869: l_rate_type := FTE_RATE_CHART_PKG.G_Prc_Rate_Type;
5870:
5871: -- if both line rate type and break line rate type are null, then error
5872: IF (l_rate_type IS NULL) THEN
5873: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_RATE_TYPE_INVALID',
5874: p_tokens => STRINGARRAY('RATE_TYPE'),
5875: p_values => STRINGARRAY(l_rate_type));
5876: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5877: p_msg => x_error_msg,
5872: IF (l_rate_type IS NULL) THEN
5873: x_error_msg := Fte_Util_PKG.Get_Msg(p_name => 'FTE_RATE_TYPE_INVALID',
5874: p_tokens => STRINGARRAY('RATE_TYPE'),
5875: p_values => STRINGARRAY(l_rate_type));
5876: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5877: p_msg => x_error_msg,
5878: p_category => 'D',
5879: p_line_number => p_line_number);
5880: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5876: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5877: p_msg => x_error_msg,
5878: p_category => 'D',
5879: p_line_number => p_line_number);
5880: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5881: x_status := 2;
5882: RETURN;
5883: END IF;
5884: ELSE
5888: x_status => x_status,
5889: x_error_msg => x_error_msg);
5890:
5891: IF (x_status <> -1) THEN
5892: FTE_UTIL_PKG.Exit_Debug(l_module_name);
5893: return;
5894: END IF;
5895: END IF;
5896: END IF;
5904: x_status => x_status,
5905: x_error_msg => x_error_msg);
5906:
5907: IF (x_status <> -1) THEN
5908: FTE_UTIL_PKG.Exit_Debug(l_module_name);
5909: return;
5910: END IF;
5911:
5912: IF (l_attr_value_to IS NULL) THEN
5909: return;
5910: END IF;
5911:
5912: IF (l_attr_value_to IS NULL) THEN
5913: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_UPPER_LIMIT_MISSING');
5914: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5915: p_msg => x_error_msg,
5916: p_category => 'A',
5917: p_line_number => p_line_number);
5910: END IF;
5911:
5912: IF (l_attr_value_to IS NULL) THEN
5913: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_UPPER_LIMIT_MISSING');
5914: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5915: p_msg => x_error_msg,
5916: p_category => 'A',
5917: p_line_number => p_line_number);
5918: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5914: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5915: p_msg => x_error_msg,
5916: p_category => 'A',
5917: p_line_number => p_line_number);
5918: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5919: x_status := 2;
5920: RETURN;
5921: ELSE
5922: IF (l_attr_value_from IS NULL) THEN
5932: l_lower := l_attr_value_from;
5933: l_upper := l_attr_value_to;
5934:
5935: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
5936: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute Value From', l_attr_value_from);
5937: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute Value To', l_attr_value_to);
5938: END IF;
5939:
5940: IF (l_lower > l_upper) THEN
5933: l_upper := l_attr_value_to;
5934:
5935: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
5936: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute Value From', l_attr_value_from);
5937: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute Value To', l_attr_value_to);
5938: END IF;
5939:
5940: IF (l_lower > l_upper) THEN
5941: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_BREAKS_BAD_LIMITS');
5937: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute Value To', l_attr_value_to);
5938: END IF;
5939:
5940: IF (l_lower > l_upper) THEN
5941: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_BREAKS_BAD_LIMITS');
5942: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5943: p_msg => x_error_msg,
5944: p_category => 'D',
5945: p_line_number => p_line_number);
5938: END IF;
5939:
5940: IF (l_lower > l_upper) THEN
5941: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_BREAKS_BAD_LIMITS');
5942: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5943: p_msg => x_error_msg,
5944: p_category => 'D',
5945: p_line_number => p_line_number);
5946: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5942: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5943: p_msg => x_error_msg,
5944: p_category => 'D',
5945: p_line_number => p_line_number);
5946: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5947: x_status := 2;
5948: RETURN;
5949: END IF;
5950:
5952: FTE_RATE_CHART_PKG.G_previous_upper := l_tmp_d;
5953: END IF;
5954:
5955: IF (l_break_price IS NULL) THEN
5956: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CAT_RATE_MISSING');
5957: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5958: p_msg => x_error_msg,
5959: p_category => 'A',
5960: p_line_number => p_line_number);
5953: END IF;
5954:
5955: IF (l_break_price IS NULL) THEN
5956: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_CAT_RATE_MISSING');
5957: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5958: p_msg => x_error_msg,
5959: p_category => 'A',
5960: p_line_number => p_line_number);
5961: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5957: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5958: p_msg => x_error_msg,
5959: p_category => 'A',
5960: p_line_number => p_line_number);
5961: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5962: x_status := 2;
5963: RETURN;
5964: END IF;
5965:
5963: RETURN;
5964: END IF;
5965:
5966: IF (FTE_RATE_CHART_PKG.G_Prc_Brk_Type IS NULL) THEN
5967: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_RATE_BREAK_TYPE_MISSING');
5968: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5969: p_msg => x_error_msg,
5970: p_category => 'A',
5971: p_line_number => p_line_number);
5964: END IF;
5965:
5966: IF (FTE_RATE_CHART_PKG.G_Prc_Brk_Type IS NULL) THEN
5967: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_RATE_BREAK_TYPE_MISSING');
5968: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5969: p_msg => x_error_msg,
5970: p_category => 'A',
5971: p_line_number => p_line_number);
5972: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5968: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5969: p_msg => x_error_msg,
5970: p_category => 'A',
5971: p_line_number => p_line_number);
5972: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5973: x_status := 2;
5974: RETURN;
5975: END IF;
5976:
5974: RETURN;
5975: END IF;
5976:
5977: IF (FTE_RATE_CHART_PKG.G_Prc_Vol_Type IS NULL) THEN
5978: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_VOLUME_TYPE_MISSING');
5979: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5980: p_msg => x_error_msg,
5981: p_category => 'A',
5982: p_line_number => p_line_number);
5975: END IF;
5976:
5977: IF (FTE_RATE_CHART_PKG.G_Prc_Vol_Type IS NULL) THEN
5978: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_VOLUME_TYPE_MISSING');
5979: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5980: p_msg => x_error_msg,
5981: p_category => 'A',
5982: p_line_number => p_line_number);
5983: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5979: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
5980: p_msg => x_error_msg,
5981: p_category => 'A',
5982: p_line_number => p_line_number);
5983: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
5984: x_status := 2;
5985: RETURN;
5986: END IF;
5987: END IF;
6080: END IF;
6081:
6082: FTE_RATE_CHART_PKG.g_chart_type := l_chart_type;
6083:
6084: FTE_UTIL_PKG.Exit_Debug(l_module_name);
6085: EXCEPTION
6086: WHEN OTHERS THEN
6087: x_error_msg := sqlerrm;
6088: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6084: FTE_UTIL_PKG.Exit_Debug(l_module_name);
6085: EXCEPTION
6086: WHEN OTHERS THEN
6087: x_error_msg := sqlerrm;
6088: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6089: p_msg => x_error_msg,
6090: p_category => 'O',
6091: p_line_number => p_line_number);
6092: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6088: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6089: p_msg => x_error_msg,
6090: p_category => 'O',
6091: p_line_number => p_line_number);
6092: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6093: x_status := 2;
6094: END VALIDATE_RATE_BREAK;
6095:
6096: -----------------------------------------------------------------------------
6140:
6141: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_RATING_ATTRIBUTE';
6142:
6143: BEGIN
6144: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
6145:
6146: l_list_header_id := -1;
6147: x_status := -1;
6148:
6145:
6146: l_list_header_id := -1;
6147: x_status := -1;
6148:
6149: l_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
6150: l_linenum := FTE_UTIL_PKG.GET_DATA('LINE_NUMBER', p_values);
6151: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
6152: l_pricing_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
6153: l_pricing_attr_value_to := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE_TO', p_values);
6146: l_list_header_id := -1;
6147: x_status := -1;
6148:
6149: l_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
6150: l_linenum := FTE_UTIL_PKG.GET_DATA('LINE_NUMBER', p_values);
6151: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
6152: l_pricing_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
6153: l_pricing_attr_value_to := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE_TO', p_values);
6154: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
6147: x_status := -1;
6148:
6149: l_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
6150: l_linenum := FTE_UTIL_PKG.GET_DATA('LINE_NUMBER', p_values);
6151: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
6152: l_pricing_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
6153: l_pricing_attr_value_to := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE_TO', p_values);
6154: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
6155: l_comp_operator := FTE_UTIL_PKG.GET_DATA('COMPARISON_OPERATOR', p_values);
6148:
6149: l_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
6150: l_linenum := FTE_UTIL_PKG.GET_DATA('LINE_NUMBER', p_values);
6151: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
6152: l_pricing_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
6153: l_pricing_attr_value_to := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE_TO', p_values);
6154: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
6155: l_comp_operator := FTE_UTIL_PKG.GET_DATA('COMPARISON_OPERATOR', p_values);
6156:
6149: l_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
6150: l_linenum := FTE_UTIL_PKG.GET_DATA('LINE_NUMBER', p_values);
6151: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
6152: l_pricing_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
6153: l_pricing_attr_value_to := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE_TO', p_values);
6154: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
6155: l_comp_operator := FTE_UTIL_PKG.GET_DATA('COMPARISON_OPERATOR', p_values);
6156:
6157: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
6150: l_linenum := FTE_UTIL_PKG.GET_DATA('LINE_NUMBER', p_values);
6151: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
6152: l_pricing_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
6153: l_pricing_attr_value_to := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE_TO', p_values);
6154: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
6155: l_comp_operator := FTE_UTIL_PKG.GET_DATA('COMPARISON_OPERATOR', p_values);
6156:
6157: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
6158: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
6151: l_pricing_attribute := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE', p_values);
6152: l_pricing_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
6153: l_pricing_attr_value_to := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE_TO', p_values);
6154: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
6155: l_comp_operator := FTE_UTIL_PKG.GET_DATA('COMPARISON_OPERATOR', p_values);
6156:
6157: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
6158: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
6159: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
6154: l_context := FTE_UTIL_PKG.GET_DATA('CONTEXT', p_values);
6155: l_comp_operator := FTE_UTIL_PKG.GET_DATA('COMPARISON_OPERATOR', p_values);
6156:
6157: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
6158: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
6159: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
6160: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_pricing_attr_value_from );
6161: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_pricing_attr_value_to );
6162: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
6155: l_comp_operator := FTE_UTIL_PKG.GET_DATA('COMPARISON_OPERATOR', p_values);
6156:
6157: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
6158: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
6159: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
6160: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_pricing_attr_value_from );
6161: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_pricing_attr_value_to );
6162: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
6163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', l_comp_operator);
6156:
6157: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
6158: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
6159: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
6160: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_pricing_attr_value_from );
6161: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_pricing_attr_value_to );
6162: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
6163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', l_comp_operator);
6164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
6157: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
6158: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
6159: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
6160: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_pricing_attr_value_from );
6161: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_pricing_attr_value_to );
6162: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
6163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', l_comp_operator);
6164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
6165: END IF;
6158: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
6159: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
6160: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_pricing_attr_value_from );
6161: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_pricing_attr_value_to );
6162: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
6163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', l_comp_operator);
6164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
6165: END IF;
6166:
6159: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_pricing_attribute);
6160: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_pricing_attr_value_from );
6161: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_pricing_attr_value_to );
6162: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
6163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', l_comp_operator);
6164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
6165: END IF;
6166:
6167: l_region_id := -1;
6160: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value', l_pricing_attr_value_from );
6161: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute value to', l_pricing_attr_value_to );
6162: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_context);
6163: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Comparison operator', l_comp_operator);
6164: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
6165: END IF;
6166:
6167: l_region_id := -1;
6168:
6172: x_status => x_status,
6173: x_error_msg => x_error_msg);
6174:
6175: IF (x_status <> -1) THEN
6176: FTE_UTIL_PKG.Exit_Debug(l_module_name);
6177: return;
6178: END IF;
6179:
6180: IF (l_linenum IS NULL) THEN
6177: return;
6178: END IF;
6179:
6180: IF (l_linenum IS NULL) THEN
6181: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LINE_NUMBER_MISSING');
6182: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6183: p_msg => x_error_msg,
6184: p_category => 'A',
6185: p_line_number => p_line_number);
6178: END IF;
6179:
6180: IF (l_linenum IS NULL) THEN
6181: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LINE_NUMBER_MISSING');
6182: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6183: p_msg => x_error_msg,
6184: p_category => 'A',
6185: p_line_number => p_line_number);
6186: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6182: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6183: p_msg => x_error_msg,
6184: p_category => 'A',
6185: p_line_number => p_line_number);
6186: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6187: x_status := 2;
6188: RETURN;
6189: ELSIF (isNum(l_linenum) = 0) THEN
6190: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NUMBER_INVALID');
6186: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6187: x_status := 2;
6188: RETURN;
6189: ELSIF (isNum(l_linenum) = 0) THEN
6190: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NUMBER_INVALID');
6191: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6192: p_msg => x_error_msg,
6193: p_category => 'D',
6194: p_line_number => p_line_number);
6187: x_status := 2;
6188: RETURN;
6189: ELSIF (isNum(l_linenum) = 0) THEN
6190: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_NUMBER_INVALID');
6191: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6192: p_msg => x_error_msg,
6193: p_category => 'D',
6194: p_line_number => p_line_number);
6195: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6191: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6192: p_msg => x_error_msg,
6193: p_category => 'D',
6194: p_line_number => p_line_number);
6195: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6196: x_status := 2;
6197: RETURN;
6198: END IF;
6199:
6201: l_context := 'LOGISTICS';
6202: END IF;
6203:
6204: IF (l_pricing_attribute IS NULL) THEN
6205: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_ATTRIBUTE_MISSING');
6206: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6207: p_msg => x_error_msg,
6208: p_category => 'A',
6209: p_line_number => p_line_number);
6202: END IF;
6203:
6204: IF (l_pricing_attribute IS NULL) THEN
6205: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_ATTRIBUTE_MISSING');
6206: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6207: p_msg => x_error_msg,
6208: p_category => 'A',
6209: p_line_number => p_line_number);
6210: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6206: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6207: p_msg => x_error_msg,
6208: p_category => 'A',
6209: p_line_number => p_line_number);
6210: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6211: x_status := 2;
6212: RETURN;
6213: ELSIF l_pricing_attribute NOT IN ('COMMODITY' ,'COMMODITY_TYPE',
6214: 'CONTAINER_TYPE',
6241: 'DESTINATION_COUNTRY' ,'DESTINATION_STATE',
6242: 'DESTINATION_CITY' ,'DESTINATION_POSTAL_CODE_FROM',
6243: 'DESTINATION_ZONE' ,'DESTINATION_POSTAL_CODE_TO') THEN
6244:
6245: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_ATTRIBUTE_INVALID');
6246: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6247: p_msg => x_error_msg,
6248: p_category => 'D',
6249: p_line_number => p_line_number);
6242: 'DESTINATION_CITY' ,'DESTINATION_POSTAL_CODE_FROM',
6243: 'DESTINATION_ZONE' ,'DESTINATION_POSTAL_CODE_TO') THEN
6244:
6245: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_ATTRIBUTE_INVALID');
6246: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6247: p_msg => x_error_msg,
6248: p_category => 'D',
6249: p_line_number => p_line_number);
6250: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6246: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6247: p_msg => x_error_msg,
6248: p_category => 'D',
6249: p_line_number => p_line_number);
6250: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6251: x_status := 2;
6252: RETURN;
6253: ELSIF (l_pricing_attr_value_from IS NULL) THEN
6254: --'tl_modifiers' have several attributes that don't require values.
6252: RETURN;
6253: ELSIF (l_pricing_attr_value_from IS NULL) THEN
6254: --'tl_modifiers' have several attributes that don't require values.
6255: IF (l_chart_type NOT IN ('TL_MODIFIER', 'FAC_MODIFIER', 'MIN_MODIFIER')) THEN
6256: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_ATTR_VALUE_MISSING');
6257: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6258: p_msg => x_error_msg,
6259: p_category => 'A',
6260: p_line_number => p_line_number);
6253: ELSIF (l_pricing_attr_value_from IS NULL) THEN
6254: --'tl_modifiers' have several attributes that don't require values.
6255: IF (l_chart_type NOT IN ('TL_MODIFIER', 'FAC_MODIFIER', 'MIN_MODIFIER')) THEN
6256: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_ATTR_VALUE_MISSING');
6257: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6258: p_msg => x_error_msg,
6259: p_category => 'A',
6260: p_line_number => p_line_number);
6261: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6257: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6258: p_msg => x_error_msg,
6259: p_category => 'A',
6260: p_line_number => p_line_number);
6261: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6262: x_status := 2;
6263: RETURN;
6264: END IF;
6265: END IF;
6286: p_qp_pricing_attrib_tbl => p_qp_pricing_attrib_tbl,
6287: x_status => x_status,
6288: x_error_msg => x_error_msg);
6289: ELSE
6290: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_REGION_UNKNOWN',
6291: p_tokens => STRINGARRAY('REGION_NAME'),
6292: p_values => STRINGARRAY(FTE_RATE_CHART_PKG.g_region_info.country ||' '||
6293: FTE_RATE_CHART_PKG.g_region_info.state ||' '||
6294: FTE_RATE_CHART_PKG.g_region_info.city));
6291: p_tokens => STRINGARRAY('REGION_NAME'),
6292: p_values => STRINGARRAY(FTE_RATE_CHART_PKG.g_region_info.country ||' '||
6293: FTE_RATE_CHART_PKG.g_region_info.state ||' '||
6294: FTE_RATE_CHART_PKG.g_region_info.city));
6295: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6296: p_msg => x_error_msg,
6297: p_category => 'D',
6298: p_line_number => p_line_number);
6299:
6297: p_category => 'D',
6298: p_line_number => p_line_number);
6299:
6300: FTE_RATE_CHART_PKG.Reset_Region_Info;
6301: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6302: x_status := 2;
6303: RETURN;
6304: END IF;
6305: FTE_RATE_CHART_PKG.Reset_Region_Info;
6338: p_qp_pricing_attrib_tbl => p_qp_pricing_attrib_tbl,
6339: x_status => x_status,
6340: x_error_msg => x_error_msg);
6341: ELSE
6342: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_REGION_UNKNOWN',
6343: p_tokens => STRINGARRAY('REGION_NAME'),
6344: p_values => STRINGARRAY(FTE_RATE_CHART_PKG.g_region_info.country ||' '||
6345: FTE_RATE_CHART_PKG.g_region_info.state ||' '||
6346: FTE_RATE_CHART_PKG.g_region_info.city));
6343: p_tokens => STRINGARRAY('REGION_NAME'),
6344: p_values => STRINGARRAY(FTE_RATE_CHART_PKG.g_region_info.country ||' '||
6345: FTE_RATE_CHART_PKG.g_region_info.state ||' '||
6346: FTE_RATE_CHART_PKG.g_region_info.city));
6347: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6348: p_msg => x_error_msg,
6349: p_category => 'D',
6350: p_line_number => p_line_number);
6351:
6349: p_category => 'D',
6350: p_line_number => p_line_number);
6351:
6352: FTE_RATE_CHART_PKG.Reset_Region_Info;
6353: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6354: x_status := 2;
6355: RETURN;
6356: END IF;
6357: FTE_RATE_CHART_PKG.Reset_Region_Info;
6380:
6381: IF (l_zone_id <> -1 OR l_zone_id IS NOT NULL) THEN
6382: l_pricing_attr_value_from := l_zone_id;
6383: ELSE
6384: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_ZONE_UNKNOWN',
6385: p_tokens => STRINGARRAY('ZONE'),
6386: p_values => STRINGARRAY(l_pricing_attr_value_from));
6387: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6388: p_msg => x_error_msg,
6383: ELSE
6384: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_ZONE_UNKNOWN',
6385: p_tokens => STRINGARRAY('ZONE'),
6386: p_values => STRINGARRAY(l_pricing_attr_value_from));
6387: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6388: p_msg => x_error_msg,
6389: p_category => 'D',
6390: p_line_number => p_line_number);
6391:
6388: p_msg => x_error_msg,
6389: p_category => 'D',
6390: p_line_number => p_line_number);
6391:
6392: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6393: x_status := 2;
6394: RETURN;
6395: END IF;
6396: ELSIF (l_pricing_attribute = 'ORIGIN_ZONE_ID') THEN
6407: x_status => x_status,
6408: x_error_msg => x_error_msg);
6409:
6410: IF (x_status <> -1) THEN
6411: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6412: RETURN;
6413: END IF;
6414:
6415: l_pricing_attribute := 'SERVICE_TYPE';
6419: END IF;
6420: ELSIF (l_pricing_attribute = 'CONTAINER_TYPE') THEN --(2)
6421:
6422: l_pricing_attribute := 'CONTAINER_TYPE';
6423: l_attr_code := FTE_UTIL_PKG.Get_Lookup_Code('CONTAINER_TYPE', l_pricing_attr_value_from);
6424:
6425: IF (l_attr_code IS NOT NULL) THEN
6426: l_pricing_attr_value_from := l_attr_code;
6427: ELSE
6424:
6425: IF (l_attr_code IS NOT NULL) THEN
6426: l_pricing_attr_value_from := l_attr_code;
6427: ELSE
6428: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_CONTAINER_UNKNOWN',
6429: p_tokens => STRINGARRAY('CONTAINER'),
6430: p_values => STRINGARRAY(l_pricing_attr_value_from));
6431: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6432: p_msg => x_error_msg,
6427: ELSE
6428: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_CONTAINER_UNKNOWN',
6429: p_tokens => STRINGARRAY('CONTAINER'),
6430: p_values => STRINGARRAY(l_pricing_attr_value_from));
6431: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6432: p_msg => x_error_msg,
6433: p_category => 'D',
6434: p_line_number => p_line_number);
6435:
6432: p_msg => x_error_msg,
6433: p_category => 'D',
6434: p_line_number => p_line_number);
6435:
6436: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6437: x_status := 2;
6438: RETURN;
6439: END IF;
6440:
6438: RETURN;
6439: END IF;
6440:
6441: ELSIF (SUBSTR(l_pricing_attribute,1,9) = 'COMMODITY') THEN --(2)
6442: FTE_UTIL_PKG.GET_CATEGORY_ID(p_commodity_value => l_pricing_attr_value_from,
6443: x_catg_id => l_pricing_attr_value_from,
6444: x_status => x_status,
6445: x_error_msg => x_error_msg);
6446:
6444: x_status => x_status,
6445: x_error_msg => x_error_msg);
6446:
6447: IF (l_pricing_attr_value_from IS NULL) THEN
6448: l_pricing_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
6449: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_COMMODITY_UNKNOWN',
6450: p_tokens => STRINGARRAY('COMM'),
6451: p_values => STRINGARRAY(l_pricing_attr_value_from));
6452: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6445: x_error_msg => x_error_msg);
6446:
6447: IF (l_pricing_attr_value_from IS NULL) THEN
6448: l_pricing_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
6449: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_COMMODITY_UNKNOWN',
6450: p_tokens => STRINGARRAY('COMM'),
6451: p_values => STRINGARRAY(l_pricing_attr_value_from));
6452: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6453: p_msg => x_error_msg,
6448: l_pricing_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
6449: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_COMMODITY_UNKNOWN',
6450: p_tokens => STRINGARRAY('COMM'),
6451: p_values => STRINGARRAY(l_pricing_attr_value_from));
6452: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6453: p_msg => x_error_msg,
6454: p_category => 'D',
6455: p_line_number => p_line_number);
6456:
6453: p_msg => x_error_msg,
6454: p_category => 'D',
6455: p_line_number => p_line_number);
6456:
6457: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6458: x_status := 2;
6459: RETURN;
6460: END IF;
6461: ELSIF (l_pricing_attribute = 'TL_VEHICLE_TYPE') THEN
6459: RETURN;
6460: END IF;
6461: ELSIF (l_pricing_attribute = 'TL_VEHICLE_TYPE') THEN
6462: l_pricing_attribute := 'VEHICLE';
6463: l_pricing_attr_value_from := FTE_UTIL_PKG.Get_Vehicle_Type(p_vehicle_type => l_pricing_attr_value_from);
6464:
6465: IF (l_pricing_attr_value_from IS NULL) THEN
6466:
6467: l_pricing_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
6463: l_pricing_attr_value_from := FTE_UTIL_PKG.Get_Vehicle_Type(p_vehicle_type => l_pricing_attr_value_from);
6464:
6465: IF (l_pricing_attr_value_from IS NULL) THEN
6466:
6467: l_pricing_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
6468:
6469: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_VEHICLE_NAME_INVALID',
6470: p_tokens => STRINGARRAY('NAME'),
6471: p_values => STRINGARRAY(l_pricing_attr_value_from));
6465: IF (l_pricing_attr_value_from IS NULL) THEN
6466:
6467: l_pricing_attr_value_from := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE_VALUE', p_values);
6468:
6469: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_VEHICLE_NAME_INVALID',
6470: p_tokens => STRINGARRAY('NAME'),
6471: p_values => STRINGARRAY(l_pricing_attr_value_from));
6472: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6473: p_msg => x_error_msg,
6468:
6469: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_VEHICLE_NAME_INVALID',
6470: p_tokens => STRINGARRAY('NAME'),
6471: p_values => STRINGARRAY(l_pricing_attr_value_from));
6472: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6473: p_msg => x_error_msg,
6474: p_category => 'D',
6475: p_line_number => p_line_number);
6476:
6473: p_msg => x_error_msg,
6474: p_category => 'D',
6475: p_line_number => p_line_number);
6476:
6477: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6478: x_status := 2;
6479: RETURN;
6480: END IF;
6481: ELSIF (l_pricing_attribute = 'TL_NUM_STOPS') THEN
6496: p_qp_pricing_attrib_tbl => p_qp_pricing_attrib_tbl,
6497: x_status => x_status,
6498: x_error_msg => x_error_msg);
6499: ELSE
6500: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_REGION_UNKNOWN',
6501: p_tokens => STRINGARRAY('REGION_NAME'),
6502: p_values => STRINGARRAY(FTE_RATE_CHART_PKG.g_region_info.country ||' '||
6503: FTE_RATE_CHART_PKG.g_region_info.state ||' '||
6504: FTE_RATE_CHART_PKG.g_region_info.city));
6501: p_tokens => STRINGARRAY('REGION_NAME'),
6502: p_values => STRINGARRAY(FTE_RATE_CHART_PKG.g_region_info.country ||' '||
6503: FTE_RATE_CHART_PKG.g_region_info.state ||' '||
6504: FTE_RATE_CHART_PKG.g_region_info.city));
6505: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6506: p_msg => x_error_msg,
6507: p_category => 'D',
6508: p_line_number => p_line_number);
6509:
6507: p_category => 'D',
6508: p_line_number => p_line_number);
6509:
6510: FTE_RATE_CHART_PKG.Reset_Region_Info;
6511: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6512: x_status := 2;
6513: RETURN;
6514: END IF;
6515: END IF;
6515: END IF;
6516:
6517: -- Insert Current Attribute
6518: IF (l_linenum <> FTE_RATE_CHART_PKG.g_line_number) THEN
6519: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_PRC_ATTR_WRONG_LINE',
6520: p_tokens => STRINGARRAY('VALUE'),
6521: p_values => STRINGARRAY(l_pricing_attr_value_from));
6522: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6523: p_msg => x_error_msg,
6518: IF (l_linenum <> FTE_RATE_CHART_PKG.g_line_number) THEN
6519: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_PRC_ATTR_WRONG_LINE',
6520: p_tokens => STRINGARRAY('VALUE'),
6521: p_values => STRINGARRAY(l_pricing_attr_value_from));
6522: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6523: p_msg => x_error_msg,
6524: p_category => 'D',
6525: p_line_number => p_line_number);
6526:
6523: p_msg => x_error_msg,
6524: p_category => 'D',
6525: p_line_number => p_line_number);
6526:
6527: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6528: x_status := 2;
6529: RETURN;
6530: END IF;
6531:
6543: FTE_RATE_CHART_PKG.Reset_Region_Info;
6544: END IF; --end --(1)
6545: FTE_RATE_CHART_PKG.g_chart_type := l_chart_type;
6546:
6547: FTE_UTIL_PKG.Exit_Debug(l_module_name);
6548: EXCEPTION
6549: WHEN OTHERS THEN
6550: x_error_msg := sqlerrm;
6551: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6547: FTE_UTIL_PKG.Exit_Debug(l_module_name);
6548: EXCEPTION
6549: WHEN OTHERS THEN
6550: x_error_msg := sqlerrm;
6551: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6552: p_msg => x_error_msg,
6553: p_category => 'O',
6554: p_line_number => p_line_number);
6555: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6551: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6552: p_msg => x_error_msg,
6553: p_category => 'O',
6554: p_line_number => p_line_number);
6555: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6556: x_status := 2;
6557: END VALIDATE_RATING_ATTRIBUTE;
6558:
6559: -----------------------------------------------------------------------------
6596: l_count NUMBER;
6597: l_chart_type VARCHAR2(50) := FTE_RATE_CHART_PKG.g_chart_type;
6598:
6599: BEGIN
6600: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
6601: x_status := -1;
6602: l_qualifier_group := 1;
6603:
6604: l_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
6600: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
6601: x_status := -1;
6602: l_qualifier_group := 1;
6603:
6604: l_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
6605: l_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME', p_values);
6606: l_tariff := FTE_UTIL_PKG.GET_DATA('TARIFF_NAME', p_values);
6607:
6608: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
6601: x_status := -1;
6602: l_qualifier_group := 1;
6603:
6604: l_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
6605: l_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME', p_values);
6606: l_tariff := FTE_UTIL_PKG.GET_DATA('TARIFF_NAME', p_values);
6607:
6608: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
6609: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
6602: l_qualifier_group := 1;
6603:
6604: l_action := FTE_UTIL_PKG.GET_DATA('ACTION', p_values);
6605: l_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME', p_values);
6606: l_tariff := FTE_UTIL_PKG.GET_DATA('TARIFF_NAME', p_values);
6607:
6608: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
6609: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
6610: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate Chart name', l_name);
6605: l_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME', p_values);
6606: l_tariff := FTE_UTIL_PKG.GET_DATA('TARIFF_NAME', p_values);
6607:
6608: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
6609: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
6610: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate Chart name', l_name);
6611: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Tariff Name', l_tariff);
6612: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
6613: END IF;
6606: l_tariff := FTE_UTIL_PKG.GET_DATA('TARIFF_NAME', p_values);
6607:
6608: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
6609: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
6610: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate Chart name', l_name);
6611: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Tariff Name', l_tariff);
6612: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
6613: END IF;
6614:
6607:
6608: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
6609: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
6610: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate Chart name', l_name);
6611: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Tariff Name', l_tariff);
6612: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
6613: END IF;
6614:
6615: VALIDATE_ACTION(p_action => l_action,
6608: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
6609: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
6610: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Rate Chart name', l_name);
6611: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Tariff Name', l_tariff);
6612: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
6613: END IF;
6614:
6615: VALIDATE_ACTION(p_action => l_action,
6616: p_type => 'ADJUSTED_RATE_CHART',
6618: x_status => x_status,
6619: x_error_msg => x_error_msg);
6620:
6621: IF (x_status <> -1) THEN
6622: FTE_UTIL_PKG.Exit_Debug(l_module_name);
6623: return;
6624: END IF;
6625:
6626: IF (l_name IS NOT NULL AND l_tariff IS NOT NULL) THEN
6623: return;
6624: END IF;
6625:
6626: IF (l_name IS NOT NULL AND l_tariff IS NOT NULL) THEN
6627: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BOTH_RC_TARIFF');
6628: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6629: p_msg => x_error_msg,
6630: p_category => 'D',
6631: p_line_number => p_line_number);
6624: END IF;
6625:
6626: IF (l_name IS NOT NULL AND l_tariff IS NOT NULL) THEN
6627: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BOTH_RC_TARIFF');
6628: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6629: p_msg => x_error_msg,
6630: p_category => 'D',
6631: p_line_number => p_line_number);
6632: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6628: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6629: p_msg => x_error_msg,
6630: p_category => 'D',
6631: p_line_number => p_line_number);
6632: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6633: x_status := 2;
6634: RETURN;
6635:
6636: ELSIF (l_name IS NULL AND l_tariff IS NULL) THEN
6633: x_status := 2;
6634: RETURN;
6635:
6636: ELSIF (l_name IS NULL AND l_tariff IS NULL) THEN
6637: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_NEITHER_RC_TARIFF');
6638: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6639: p_msg => x_error_msg,
6640: p_category => 'D',
6641: p_line_number => p_line_number);
6634: RETURN;
6635:
6636: ELSIF (l_name IS NULL AND l_tariff IS NULL) THEN
6637: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_NEITHER_RC_TARIFF');
6638: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6639: p_msg => x_error_msg,
6640: p_category => 'D',
6641: p_line_number => p_line_number);
6642: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6638: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6639: p_msg => x_error_msg,
6640: p_category => 'D',
6641: p_line_number => p_line_number);
6642: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6643: x_status := 2;
6644: RETURN;
6645: END IF;
6646:
6647: --Facility Modifiers don't need a carrier.
6648: IF (l_chart_type <> 'FAC_MODIFIER') THEN
6649: l_carrier_id := p_carrier_id;
6650: IF (l_carrier_id IS NULL) THEN
6651: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_CARRIER_MISSING');
6652: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6653: p_msg => x_error_msg,
6654: p_category => 'A',
6655: p_line_number => p_line_number);
6648: IF (l_chart_type <> 'FAC_MODIFIER') THEN
6649: l_carrier_id := p_carrier_id;
6650: IF (l_carrier_id IS NULL) THEN
6651: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_CARRIER_MISSING');
6652: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6653: p_msg => x_error_msg,
6654: p_category => 'A',
6655: p_line_number => p_line_number);
6656: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6652: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6653: p_msg => x_error_msg,
6654: p_category => 'A',
6655: p_line_number => p_line_number);
6656: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6657: x_status := 2;
6658: RETURN;
6659: END IF;
6660: END IF;
6670: p_carrier_id => l_carrier_id,
6671: p_attribute1 => l_temp);
6672:
6673: IF (l_list_header_id = -1) THEN
6674: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_PRICELIST_INVALID',
6675: p_tokens => STRINGARRAY('NAME'),
6676: p_values => STRINGARRAY(l_name));
6677: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6678: p_msg => x_error_msg,
6673: IF (l_list_header_id = -1) THEN
6674: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_PRICELIST_INVALID',
6675: p_tokens => STRINGARRAY('NAME'),
6676: p_values => STRINGARRAY(l_name));
6677: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6678: p_msg => x_error_msg,
6679: p_category => 'C',
6680: p_line_number => p_line_number);
6681:
6679: p_category => 'C',
6680: p_line_number => p_line_number);
6681:
6682: x_status := 2;
6683: FTE_UTIL_PKG.Exit_Debug(l_module_name);
6684: RETURN;
6685:
6686: ELSE
6687: l_list_header_ids(1) := l_list_header_id;
6693: IF (l_valid_carrier) THEN
6694: l_list_header_ids := FTE_LTL_LOADER.Get_Tariff_Ratecharts(p_tariff_name => l_tariff,
6695: x_error_msg => x_error_msg);
6696: ELSE
6697: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_TARIFF_NOT_ASSOC',
6698: p_tokens => STRINGARRAY('TARIFF', 'CARRIER'),
6699: p_values => STRINGARRAY(l_tariff, FTE_UTIL_PKG.GET_CARRIER_NAME(l_carrier_id)));
6700: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6701: p_msg => x_error_msg,
6695: x_error_msg => x_error_msg);
6696: ELSE
6697: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_TARIFF_NOT_ASSOC',
6698: p_tokens => STRINGARRAY('TARIFF', 'CARRIER'),
6699: p_values => STRINGARRAY(l_tariff, FTE_UTIL_PKG.GET_CARRIER_NAME(l_carrier_id)));
6700: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6701: p_msg => x_error_msg,
6702: p_category => 'A',
6703: p_line_number => p_line_number);
6696: ELSE
6697: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_TARIFF_NOT_ASSOC',
6698: p_tokens => STRINGARRAY('TARIFF', 'CARRIER'),
6699: p_values => STRINGARRAY(l_tariff, FTE_UTIL_PKG.GET_CARRIER_NAME(l_carrier_id)));
6700: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6701: p_msg => x_error_msg,
6702: p_category => 'A',
6703: p_line_number => p_line_number);
6704: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6700: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6701: p_msg => x_error_msg,
6702: p_category => 'A',
6703: p_line_number => p_line_number);
6704: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6705: x_status := 2;
6706: RETURN;
6707: -- x_error_msg := 'Carrier specified does not associated with the Tariff ' || l_tariff;
6708: END IF;
6710:
6711: IF (l_list_header_ids IS NULL OR l_list_header_ids.COUNT <= 0) THEN
6712: --error?
6713: x_status := 2;
6714: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6715: p_msg => x_error_msg,
6716: p_category => 'A',
6717: p_line_number => p_line_number);
6718:
6715: p_msg => x_error_msg,
6716: p_category => 'A',
6717: p_line_number => p_line_number);
6718:
6719: FTE_UTIL_PKG.Exit_Debug(l_module_name);
6720: return;
6721: END IF;
6722:
6723: -- -------------------------------------------------------------
6742: END IF;
6743:
6744: FTE_RATE_CHART_PKG.g_chart_type := l_chart_type;
6745:
6746: FTE_UTIL_PKG.Exit_Debug(l_module_name);
6747:
6748: EXCEPTION
6749: WHEN OTHERS THEN
6750: x_error_msg := sqlerrm;
6747:
6748: EXCEPTION
6749: WHEN OTHERS THEN
6750: x_error_msg := sqlerrm;
6751: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6752: p_msg => x_error_msg,
6753: p_category => 'O',
6754: p_line_number => p_line_number);
6755: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6751: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6752: p_msg => x_error_msg,
6753: p_category => 'O',
6754: p_line_number => p_line_number);
6755: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6756: x_status := 2;
6757: END VALIDATE_ADJUSTED_RATE_CHART;
6758:
6759:
6789: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.VALIDATE_QUALIFIER';
6790: l_count NUMBER;
6791:
6792: BEGIN
6793: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
6794: x_status := -1;
6795:
6796: l_action := FTE_UTIL_PKG.GET_DATA('ACTION' , p_values);
6797: l_process_id := FTE_UTIL_PKG.GET_DATA('PROCESS_ID' , p_values);
6792: BEGIN
6793: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
6794: x_status := -1;
6795:
6796: l_action := FTE_UTIL_PKG.GET_DATA('ACTION' , p_values);
6797: l_process_id := FTE_UTIL_PKG.GET_DATA('PROCESS_ID' , p_values);
6798: l_qual_attr := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE' , p_values);
6799: l_qual_attr_value := FTE_UTIL_PKG.GET_DATA('VALUE' , p_values);
6800: l_qual_context := FTE_UTIL_PKG.GET_DATA('CONTEXT' , p_values);
6793: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
6794: x_status := -1;
6795:
6796: l_action := FTE_UTIL_PKG.GET_DATA('ACTION' , p_values);
6797: l_process_id := FTE_UTIL_PKG.GET_DATA('PROCESS_ID' , p_values);
6798: l_qual_attr := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE' , p_values);
6799: l_qual_attr_value := FTE_UTIL_PKG.GET_DATA('VALUE' , p_values);
6800: l_qual_context := FTE_UTIL_PKG.GET_DATA('CONTEXT' , p_values);
6801: l_qual_group := FTE_UTIL_PKG.GET_DATA('GROUP' , p_values);
6794: x_status := -1;
6795:
6796: l_action := FTE_UTIL_PKG.GET_DATA('ACTION' , p_values);
6797: l_process_id := FTE_UTIL_PKG.GET_DATA('PROCESS_ID' , p_values);
6798: l_qual_attr := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE' , p_values);
6799: l_qual_attr_value := FTE_UTIL_PKG.GET_DATA('VALUE' , p_values);
6800: l_qual_context := FTE_UTIL_PKG.GET_DATA('CONTEXT' , p_values);
6801: l_qual_group := FTE_UTIL_PKG.GET_DATA('GROUP' , p_values);
6802:
6795:
6796: l_action := FTE_UTIL_PKG.GET_DATA('ACTION' , p_values);
6797: l_process_id := FTE_UTIL_PKG.GET_DATA('PROCESS_ID' , p_values);
6798: l_qual_attr := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE' , p_values);
6799: l_qual_attr_value := FTE_UTIL_PKG.GET_DATA('VALUE' , p_values);
6800: l_qual_context := FTE_UTIL_PKG.GET_DATA('CONTEXT' , p_values);
6801: l_qual_group := FTE_UTIL_PKG.GET_DATA('GROUP' , p_values);
6802:
6803: IF (l_qual_group IS NULL) THEN
6796: l_action := FTE_UTIL_PKG.GET_DATA('ACTION' , p_values);
6797: l_process_id := FTE_UTIL_PKG.GET_DATA('PROCESS_ID' , p_values);
6798: l_qual_attr := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE' , p_values);
6799: l_qual_attr_value := FTE_UTIL_PKG.GET_DATA('VALUE' , p_values);
6800: l_qual_context := FTE_UTIL_PKG.GET_DATA('CONTEXT' , p_values);
6801: l_qual_group := FTE_UTIL_PKG.GET_DATA('GROUP' , p_values);
6802:
6803: IF (l_qual_group IS NULL) THEN
6804: l_qual_group := 1;
6797: l_process_id := FTE_UTIL_PKG.GET_DATA('PROCESS_ID' , p_values);
6798: l_qual_attr := FTE_UTIL_PKG.GET_DATA('ATTRIBUTE' , p_values);
6799: l_qual_attr_value := FTE_UTIL_PKG.GET_DATA('VALUE' , p_values);
6800: l_qual_context := FTE_UTIL_PKG.GET_DATA('CONTEXT' , p_values);
6801: l_qual_group := FTE_UTIL_PKG.GET_DATA('GROUP' , p_values);
6802:
6803: IF (l_qual_group IS NULL) THEN
6804: l_qual_group := 1;
6805: END IF;
6804: l_qual_group := 1;
6805: END IF;
6806:
6807: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
6808: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
6809: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Process ID', l_process_id);
6810: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_qual_attr);
6811: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute Value', l_qual_attr_value);
6812: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_qual_context);
6805: END IF;
6806:
6807: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
6808: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
6809: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Process ID', l_process_id);
6810: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_qual_attr);
6811: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute Value', l_qual_attr_value);
6812: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_qual_context);
6813: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Group', l_qual_group);
6806:
6807: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
6808: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
6809: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Process ID', l_process_id);
6810: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_qual_attr);
6811: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute Value', l_qual_attr_value);
6812: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_qual_context);
6813: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Group', l_qual_group);
6814: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
6807: IF (FTE_BULKLOAD_PKG.g_debug_on) THEN
6808: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
6809: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Process ID', l_process_id);
6810: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_qual_attr);
6811: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute Value', l_qual_attr_value);
6812: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_qual_context);
6813: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Group', l_qual_group);
6814: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
6815: END IF;
6808: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action', l_action);
6809: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Process ID', l_process_id);
6810: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_qual_attr);
6811: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute Value', l_qual_attr_value);
6812: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_qual_context);
6813: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Group', l_qual_group);
6814: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
6815: END IF;
6816:
6809: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Process ID', l_process_id);
6810: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_qual_attr);
6811: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute Value', l_qual_attr_value);
6812: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_qual_context);
6813: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Group', l_qual_group);
6814: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
6815: END IF;
6816:
6817: VALIDATE_ACTION(p_action => l_action,
6810: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute', l_qual_attr);
6811: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Attribute Value', l_qual_attr_value);
6812: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Context', l_qual_context);
6813: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Group', l_qual_group);
6814: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Line number', p_line_number);
6815: END IF;
6816:
6817: VALIDATE_ACTION(p_action => l_action,
6818: p_type => 'QUALIFIER',
6820: x_status => x_status,
6821: x_error_msg => x_error_msg);
6822:
6823: IF (x_status <> -1) THEN
6824: FTE_UTIL_PKG.Exit_Debug(l_module_name);
6825: return;
6826: END IF;
6827:
6828: IF (l_qual_context IS NULL) THEN
6825: return;
6826: END IF;
6827:
6828: IF (l_qual_context IS NULL) THEN
6829: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_QUAL_CONTEXT_MISSING');
6830: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6831: p_msg => x_error_msg,
6832: p_category => 'A',
6833: p_line_number => p_line_number);
6826: END IF;
6827:
6828: IF (l_qual_context IS NULL) THEN
6829: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_QUAL_CONTEXT_MISSING');
6830: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6831: p_msg => x_error_msg,
6832: p_category => 'A',
6833: p_line_number => p_line_number);
6834: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6830: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6831: p_msg => x_error_msg,
6832: p_category => 'A',
6833: p_line_number => p_line_number);
6834: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6835: x_status := 2;
6836: RETURN;
6837: END IF;
6838:
6836: RETURN;
6837: END IF;
6838:
6839: IF (l_qual_attr IS NULL) THEN
6840: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_QUAL_ATTR_MISSING');
6841: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6842: p_msg => x_error_msg,
6843: p_category => 'A',
6844: p_line_number => p_line_number);
6837: END IF;
6838:
6839: IF (l_qual_attr IS NULL) THEN
6840: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_QUAL_ATTR_MISSING');
6841: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6842: p_msg => x_error_msg,
6843: p_category => 'A',
6844: p_line_number => p_line_number);
6845: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6841: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6842: p_msg => x_error_msg,
6843: p_category => 'A',
6844: p_line_number => p_line_number);
6845: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6846: x_status := 2;
6847: RETURN;
6848: END IF;
6849:
6847: RETURN;
6848: END IF;
6849:
6850: IF (l_qual_attr_value IS NULL) THEN
6851: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_QUAL_ATTR_VALUE_MISSING');
6852: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6853: p_msg => x_error_msg,
6854: p_category => 'A',
6855: p_line_number => p_line_number);
6848: END IF;
6849:
6850: IF (l_qual_attr_value IS NULL) THEN
6851: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_QUAL_ATTR_VALUE_MISSING');
6852: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6853: p_msg => x_error_msg,
6854: p_category => 'A',
6855: p_line_number => p_line_number);
6856: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6852: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6853: p_msg => x_error_msg,
6854: p_category => 'A',
6855: p_line_number => p_line_number);
6856: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6857: x_status := 2;
6858: RETURN;
6859: END IF;
6860:
6866: p_qp_qualifier_tbl(l_count).QUALIFIER_ATTR_VALUE := l_qual_attr_value;
6867: p_qp_qualifier_tbl(l_count).QUALIFIER_CONTEXT := l_qual_context;
6868: p_qp_qualifier_tbl(l_count).QUALIFIER_GROUPING_NO := l_qual_group;
6869:
6870: FTE_UTIL_PKG.Exit_Debug(l_module_name);
6871: EXCEPTION
6872: WHEN OTHERS THEN
6873: x_error_msg := sqlerrm;
6874: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6870: FTE_UTIL_PKG.Exit_Debug(l_module_name);
6871: EXCEPTION
6872: WHEN OTHERS THEN
6873: x_error_msg := sqlerrm;
6874: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6875: p_msg => x_error_msg,
6876: p_category => 'O',
6877: p_line_number => p_line_number);
6878: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6874: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
6875: p_msg => x_error_msg,
6876: p_category => 'O',
6877: p_line_number => p_line_number);
6878: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
6879: x_status := 2;
6880: END VALIDATE_QUALIFIER;
6881:
6882:
6885: --
6886: -- Purpose: does validation for a line in tl service block
6887: --
6888: -- IN parameters:
6889: -- 1. FTE_UTIL_PKG.GET_DATA: FTE_BULKLOAD_PKG.data_values_tbl
6890: -- 2. p_line_number: line number of current line
6891: --
6892: -- OUT parameters:
6893: -- 1. p_type: type value of the line
6938: l_module_name CONSTANT VARCHAR2(60) := 'FTE.PLSQL.' || g_pkg_name || '.VALIDATE_TL_SERVICE';
6939:
6940: BEGIN
6941:
6942: FTE_UTIL_PKG.Enter_Debug(l_module_name);
6943: x_status := -1;
6944:
6945: p_action := FTE_UTIL_PKG.GET_DATA('ACTION',p_values);
6946:
6941:
6942: FTE_UTIL_PKG.Enter_Debug(l_module_name);
6943: x_status := -1;
6944:
6945: p_action := FTE_UTIL_PKG.GET_DATA('ACTION',p_values);
6946:
6947: IF (g_debug_on) THEN
6948: FTE_UTIL_PKG.Write_LogFile(l_module_name,'p_action', p_action);
6949: END IF;
6944:
6945: p_action := FTE_UTIL_PKG.GET_DATA('ACTION',p_values);
6946:
6947: IF (g_debug_on) THEN
6948: FTE_UTIL_PKG.Write_LogFile(l_module_name,'p_action', p_action);
6949: END IF;
6950:
6951: VALIDATE_ACTION(p_action => p_action,
6952: p_type => 'TL_SERVICE',
6954: x_status => x_status,
6955: x_error_msg => x_error_msg);
6956:
6957: IF (x_status <> -1) THEN
6958: FTE_UTIL_PKG.Exit_Debug(l_module_name);
6959: RETURN;
6960: END IF;
6961:
6962: l_count := p_lane_tbl.COUNT + 1;
6961:
6962: l_count := p_lane_tbl.COUNT + 1;
6963: p_lane_tbl(l_count).action := p_action;
6964:
6965: l_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER',p_values);
6966: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME',p_values);
6967: l_rate_chart_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME',p_values);
6968: l_effect_date := FTE_UTIL_PKG.GET_DATA('SERVICE_START_DATE',p_values);
6969: l_expiry_date := FTE_UTIL_PKG.GET_DATA('SERVICE_END_DATE',p_values);
6962: l_count := p_lane_tbl.COUNT + 1;
6963: p_lane_tbl(l_count).action := p_action;
6964:
6965: l_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER',p_values);
6966: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME',p_values);
6967: l_rate_chart_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME',p_values);
6968: l_effect_date := FTE_UTIL_PKG.GET_DATA('SERVICE_START_DATE',p_values);
6969: l_expiry_date := FTE_UTIL_PKG.GET_DATA('SERVICE_END_DATE',p_values);
6970: l_service_level := FTE_UTIL_PKG.GET_DATA('SERVICE_LEVEL',p_values);
6963: p_lane_tbl(l_count).action := p_action;
6964:
6965: l_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER',p_values);
6966: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME',p_values);
6967: l_rate_chart_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME',p_values);
6968: l_effect_date := FTE_UTIL_PKG.GET_DATA('SERVICE_START_DATE',p_values);
6969: l_expiry_date := FTE_UTIL_PKG.GET_DATA('SERVICE_END_DATE',p_values);
6970: l_service_level := FTE_UTIL_PKG.GET_DATA('SERVICE_LEVEL',p_values);
6971:
6964:
6965: l_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER',p_values);
6966: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME',p_values);
6967: l_rate_chart_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME',p_values);
6968: l_effect_date := FTE_UTIL_PKG.GET_DATA('SERVICE_START_DATE',p_values);
6969: l_expiry_date := FTE_UTIL_PKG.GET_DATA('SERVICE_END_DATE',p_values);
6970: l_service_level := FTE_UTIL_PKG.GET_DATA('SERVICE_LEVEL',p_values);
6971:
6972: IF (g_debug_on) THEN
6965: l_lane_number := FTE_UTIL_PKG.GET_DATA('SERVICE_NUMBER',p_values);
6966: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME',p_values);
6967: l_rate_chart_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME',p_values);
6968: l_effect_date := FTE_UTIL_PKG.GET_DATA('SERVICE_START_DATE',p_values);
6969: l_expiry_date := FTE_UTIL_PKG.GET_DATA('SERVICE_END_DATE',p_values);
6970: l_service_level := FTE_UTIL_PKG.GET_DATA('SERVICE_LEVEL',p_values);
6971:
6972: IF (g_debug_on) THEN
6973: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_lane_number ', l_lane_number);
6966: l_carrier_name := FTE_UTIL_PKG.GET_DATA('CARRIER_NAME',p_values);
6967: l_rate_chart_name := FTE_UTIL_PKG.GET_DATA('RATE_CHART_NAME',p_values);
6968: l_effect_date := FTE_UTIL_PKG.GET_DATA('SERVICE_START_DATE',p_values);
6969: l_expiry_date := FTE_UTIL_PKG.GET_DATA('SERVICE_END_DATE',p_values);
6970: l_service_level := FTE_UTIL_PKG.GET_DATA('SERVICE_LEVEL',p_values);
6971:
6972: IF (g_debug_on) THEN
6973: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_lane_number ', l_lane_number);
6974: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_carrier_name ', l_carrier_name);
6969: l_expiry_date := FTE_UTIL_PKG.GET_DATA('SERVICE_END_DATE',p_values);
6970: l_service_level := FTE_UTIL_PKG.GET_DATA('SERVICE_LEVEL',p_values);
6971:
6972: IF (g_debug_on) THEN
6973: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_lane_number ', l_lane_number);
6974: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_carrier_name ', l_carrier_name);
6975: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_rate_chart_name', l_rate_chart_name);
6976: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_effect_date ', l_effect_date);
6977: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_expiry_date ', l_expiry_date);
6970: l_service_level := FTE_UTIL_PKG.GET_DATA('SERVICE_LEVEL',p_values);
6971:
6972: IF (g_debug_on) THEN
6973: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_lane_number ', l_lane_number);
6974: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_carrier_name ', l_carrier_name);
6975: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_rate_chart_name', l_rate_chart_name);
6976: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_effect_date ', l_effect_date);
6977: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_expiry_date ', l_expiry_date);
6978: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_service_level ', l_service_level);
6971:
6972: IF (g_debug_on) THEN
6973: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_lane_number ', l_lane_number);
6974: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_carrier_name ', l_carrier_name);
6975: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_rate_chart_name', l_rate_chart_name);
6976: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_effect_date ', l_effect_date);
6977: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_expiry_date ', l_expiry_date);
6978: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_service_level ', l_service_level);
6979: END IF;
6972: IF (g_debug_on) THEN
6973: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_lane_number ', l_lane_number);
6974: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_carrier_name ', l_carrier_name);
6975: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_rate_chart_name', l_rate_chart_name);
6976: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_effect_date ', l_effect_date);
6977: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_expiry_date ', l_expiry_date);
6978: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_service_level ', l_service_level);
6979: END IF;
6980:
6973: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_lane_number ', l_lane_number);
6974: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_carrier_name ', l_carrier_name);
6975: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_rate_chart_name', l_rate_chart_name);
6976: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_effect_date ', l_effect_date);
6977: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_expiry_date ', l_expiry_date);
6978: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_service_level ', l_service_level);
6979: END IF;
6980:
6981: VALIDATE_CARRIER(p_carrier_name => l_carrier_name,
6974: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_carrier_name ', l_carrier_name);
6975: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_rate_chart_name', l_rate_chart_name);
6976: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_effect_date ', l_effect_date);
6977: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_expiry_date ', l_expiry_date);
6978: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_service_level ', l_service_level);
6979: END IF;
6980:
6981: VALIDATE_CARRIER(p_carrier_name => l_carrier_name,
6982: p_line_number => p_line_number,
6984: x_status => x_status,
6985: x_error_msg => x_error_msg);
6986:
6987: IF (g_debug_on) THEN
6988: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_carrier_id', l_carrier_id);
6989: END IF;
6990:
6991: IF (x_status <> -1) THEN
6992: FTE_UTIL_PKG.Exit_Debug(l_module_name);
6988: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_carrier_id', l_carrier_id);
6989: END IF;
6990:
6991: IF (x_status <> -1) THEN
6992: FTE_UTIL_PKG.Exit_Debug(l_module_name);
6993: RETURN;
6994: END IF;
6995:
6996: --+
6999: p_lane_tbl(l_count).carrier_id := l_carrier_id;
7000:
7001: IF (l_lane_number IS NULL) THEN
7002: x_status := 2;
7003: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LANE_NUMBER_MISSING');
7004: FTE_UTIL_PKG.Write_OutFile(p_msg => x_error_msg,
7005: p_category => 'A',
7006: p_module_name => l_module_name,
7007: p_line_number => p_line_number);
7000:
7001: IF (l_lane_number IS NULL) THEN
7002: x_status := 2;
7003: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LANE_NUMBER_MISSING');
7004: FTE_UTIL_PKG.Write_OutFile(p_msg => x_error_msg,
7005: p_category => 'A',
7006: p_module_name => l_module_name,
7007: p_line_number => p_line_number);
7008: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7004: FTE_UTIL_PKG.Write_OutFile(p_msg => x_error_msg,
7005: p_category => 'A',
7006: p_module_name => l_module_name,
7007: p_line_number => p_line_number);
7008: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7009: RETURN;
7010:
7011: ELSE
7012: --+
7015: --+
7016: l_old_lane_id := FTE_LANE_PKG.GET_LANE_ID(l_lane_number, l_carrier_id);
7017:
7018: IF(g_debug_on) THEN
7019: FTE_UTIL_PKG.Write_LogFile(l_module_name,'l_old_lane_id ',l_old_lane_id);
7020: END IF;
7021:
7022: END IF;
7023:
7023:
7024: IF (p_action = 'UPDATE') THEN
7025:
7026: IF (l_old_lane_id = -1) THEN
7027: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LANE_NUMBER_INVALID');
7028: FTE_UTIL_PKG.Write_OutFile(p_msg => x_error_msg,
7029: p_category => 'A',
7030: p_module_name => l_module_name,
7031: p_line_number => p_line_number);
7024: IF (p_action = 'UPDATE') THEN
7025:
7026: IF (l_old_lane_id = -1) THEN
7027: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LANE_NUMBER_INVALID');
7028: FTE_UTIL_PKG.Write_OutFile(p_msg => x_error_msg,
7029: p_category => 'A',
7030: p_module_name => l_module_name,
7031: p_line_number => p_line_number);
7032: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7028: FTE_UTIL_PKG.Write_OutFile(p_msg => x_error_msg,
7029: p_category => 'A',
7030: p_module_name => l_module_name,
7031: p_line_number => p_line_number);
7032: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7033: RETURN;
7034: END IF;
7035:
7036: p_lane_tbl(l_count).lane_id := l_old_lane_id;
7038:
7039: ELSIF (p_action = 'DELETE') THEN
7040:
7041: IF (l_old_lane_id = -1) THEN
7042: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LANE_NUMBER_INVALID');
7043: FTE_UTIL_PKG.Write_OutFile(p_msg => x_error_msg,
7044: p_category => 'C',
7045: p_module_name => l_module_name,
7046: p_line_number => p_line_number); -- TODO add tokens
7039: ELSIF (p_action = 'DELETE') THEN
7040:
7041: IF (l_old_lane_id = -1) THEN
7042: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LANE_NUMBER_INVALID');
7043: FTE_UTIL_PKG.Write_OutFile(p_msg => x_error_msg,
7044: p_category => 'C',
7045: p_module_name => l_module_name,
7046: p_line_number => p_line_number); -- TODO add tokens
7047: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7043: FTE_UTIL_PKG.Write_OutFile(p_msg => x_error_msg,
7044: p_category => 'C',
7045: p_module_name => l_module_name,
7046: p_line_number => p_line_number); -- TODO add tokens
7047: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7048: RETURN;
7049: END IF;
7050:
7051: p_lane_tbl(l_count).lane_id := l_old_lane_id;
7048: RETURN;
7049: END IF;
7050:
7051: p_lane_tbl(l_count).lane_id := l_old_lane_id;
7052: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7053: RETURN;
7054:
7055: ELSIF (p_action = 'ADD') THEN
7056:
7055: ELSIF (p_action = 'ADD') THEN
7056:
7057: IF (l_old_lane_id <> -1) THEN
7058: x_status := 2;
7059: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LANE_REF_EXISTS');
7060: FTE_UTIL_PKG.Write_OutFile(p_msg => x_error_msg,
7061: p_category => 'D',
7062: p_module_name => l_module_name,
7063: p_line_number => p_line_number); -- TODO add tokens SERVICE_NUMBER
7056:
7057: IF (l_old_lane_id <> -1) THEN
7058: x_status := 2;
7059: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_LANE_REF_EXISTS');
7060: FTE_UTIL_PKG.Write_OutFile(p_msg => x_error_msg,
7061: p_category => 'D',
7062: p_module_name => l_module_name,
7063: p_line_number => p_line_number); -- TODO add tokens SERVICE_NUMBER
7064: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7060: FTE_UTIL_PKG.Write_OutFile(p_msg => x_error_msg,
7061: p_category => 'D',
7062: p_module_name => l_module_name,
7063: p_line_number => p_line_number); -- TODO add tokens SERVICE_NUMBER
7064: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7065: RETURN;
7066:
7067: ELSE
7068: --+
7080: --+
7081: -- set origin and destination
7082: --+
7083:
7084: l_region_info.city := FTE_UTIL_PKG.GET_DATA('ORIGIN_CITY',p_values);
7085: l_region_info.state := FTE_UTIL_PKG.GET_DATA('ORIGIN_STATE',p_values);
7086: l_region_info.country := FTE_UTIL_PKG.GET_DATA('ORIGIN_COUNTRY',p_values);
7087: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_FROM',p_values);
7088: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_TO',p_values);
7081: -- set origin and destination
7082: --+
7083:
7084: l_region_info.city := FTE_UTIL_PKG.GET_DATA('ORIGIN_CITY',p_values);
7085: l_region_info.state := FTE_UTIL_PKG.GET_DATA('ORIGIN_STATE',p_values);
7086: l_region_info.country := FTE_UTIL_PKG.GET_DATA('ORIGIN_COUNTRY',p_values);
7087: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_FROM',p_values);
7088: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_TO',p_values);
7089: l_region_info.zone := FTE_UTIL_PKG.GET_DATA('ORIGIN_ZONE',p_values);
7082: --+
7083:
7084: l_region_info.city := FTE_UTIL_PKG.GET_DATA('ORIGIN_CITY',p_values);
7085: l_region_info.state := FTE_UTIL_PKG.GET_DATA('ORIGIN_STATE',p_values);
7086: l_region_info.country := FTE_UTIL_PKG.GET_DATA('ORIGIN_COUNTRY',p_values);
7087: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_FROM',p_values);
7088: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_TO',p_values);
7089: l_region_info.zone := FTE_UTIL_PKG.GET_DATA('ORIGIN_ZONE',p_values);
7090:
7083:
7084: l_region_info.city := FTE_UTIL_PKG.GET_DATA('ORIGIN_CITY',p_values);
7085: l_region_info.state := FTE_UTIL_PKG.GET_DATA('ORIGIN_STATE',p_values);
7086: l_region_info.country := FTE_UTIL_PKG.GET_DATA('ORIGIN_COUNTRY',p_values);
7087: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_FROM',p_values);
7088: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_TO',p_values);
7089: l_region_info.zone := FTE_UTIL_PKG.GET_DATA('ORIGIN_ZONE',p_values);
7090:
7091: IF (l_region_info.country IS NULL AND l_region_info.zone IS NOT NULL) THEN
7084: l_region_info.city := FTE_UTIL_PKG.GET_DATA('ORIGIN_CITY',p_values);
7085: l_region_info.state := FTE_UTIL_PKG.GET_DATA('ORIGIN_STATE',p_values);
7086: l_region_info.country := FTE_UTIL_PKG.GET_DATA('ORIGIN_COUNTRY',p_values);
7087: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_FROM',p_values);
7088: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_TO',p_values);
7089: l_region_info.zone := FTE_UTIL_PKG.GET_DATA('ORIGIN_ZONE',p_values);
7090:
7091: IF (l_region_info.country IS NULL AND l_region_info.zone IS NOT NULL) THEN
7092:
7085: l_region_info.state := FTE_UTIL_PKG.GET_DATA('ORIGIN_STATE',p_values);
7086: l_region_info.country := FTE_UTIL_PKG.GET_DATA('ORIGIN_COUNTRY',p_values);
7087: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_FROM',p_values);
7088: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('ORIGIN_POSTAL_CODE_TO',p_values);
7089: l_region_info.zone := FTE_UTIL_PKG.GET_DATA('ORIGIN_ZONE',p_values);
7090:
7091: IF (l_region_info.country IS NULL AND l_region_info.zone IS NOT NULL) THEN
7092:
7093: l_zone_id := FTE_REGION_ZONE_LOADER.GET_ZONE_ID(l_region_info.zone);
7094:
7095: IF (l_zone_id <> -1 OR l_zone_id IS NOT NULL) THEN
7096: p_lane_tbl(l_count).origin_id := l_zone_id;
7097: ELSE
7098: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LANE_ORIGIN_MISSING');
7099:
7100: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
7101: p_msg => x_error_msg,
7102: p_category => 'A',
7096: p_lane_tbl(l_count).origin_id := l_zone_id;
7097: ELSE
7098: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LANE_ORIGIN_MISSING');
7099:
7100: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
7101: p_msg => x_error_msg,
7102: p_category => 'A',
7103: p_line_number => p_line_number);
7104:
7101: p_msg => x_error_msg,
7102: p_category => 'A',
7103: p_line_number => p_line_number);
7104:
7105: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
7106: x_status := 2;
7107: RETURN;
7108: END IF;
7109:
7111:
7112: l_region_id := FTE_REGION_ZONE_LOADER.GET_REGION_ID(p_region_info => l_region_info);
7113:
7114: IF (l_region_id IS NULL OR l_region_id = -1) THEN
7115: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_REGION_UNKNOWN',
7116: p_tokens => STRINGARRAY('REGION_NAME'),
7117: p_values => STRINGARRAY(l_region_info.country ||' '||
7118: l_region_info.state ||' '||
7119: l_region_info.city));
7116: p_tokens => STRINGARRAY('REGION_NAME'),
7117: p_values => STRINGARRAY(l_region_info.country ||' '||
7118: l_region_info.state ||' '||
7119: l_region_info.city));
7120: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
7121: p_msg => x_error_msg,
7122: p_category => 'D',
7123: p_line_number => p_line_number);
7124:
7121: p_msg => x_error_msg,
7122: p_category => 'D',
7123: p_line_number => p_line_number);
7124:
7125: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
7126: x_status := 2;
7127: RETURN;
7128: END IF;
7129:
7133: p_supplier_id => -1,
7134: p_validate_flag => TRUE,
7135: p_postal_code_from => l_region_info.postal_code_from,
7136: p_postal_code_to => l_region_info.postal_code_to) = -1) THEN
7137: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
7138: x_status := 2;
7139: RETURN;
7140: END IF;
7141:
7141:
7142: p_lane_tbl(l_count).origin_id := l_region_id;
7143:
7144: ELSE
7145: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LOAD_ORIGIN_MISSING');
7146: FTE_UTIL_PKG.Write_OutFile(p_msg => x_error_msg,
7147: p_category => 'D',
7148: p_module_name => l_module_name,
7149: p_line_number => p_line_number); -- TODO add tokens
7142: p_lane_tbl(l_count).origin_id := l_region_id;
7143:
7144: ELSE
7145: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LOAD_ORIGIN_MISSING');
7146: FTE_UTIL_PKG.Write_OutFile(p_msg => x_error_msg,
7147: p_category => 'D',
7148: p_module_name => l_module_name,
7149: p_line_number => p_line_number); -- TODO add tokens
7150: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7146: FTE_UTIL_PKG.Write_OutFile(p_msg => x_error_msg,
7147: p_category => 'D',
7148: p_module_name => l_module_name,
7149: p_line_number => p_line_number); -- TODO add tokens
7150: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7151: RETURN;
7152:
7153: END IF;
7154:
7151: RETURN;
7152:
7153: END IF;
7154:
7155: l_region_info.city := FTE_UTIL_PKG.GET_DATA('DESTINATION_CITY',p_values);
7156: l_region_info.state := FTE_UTIL_PKG.GET_DATA('DESTINATION_STATE',p_values);
7157: l_region_info.country := FTE_UTIL_PKG.GET_DATA('DESTINATION_COUNTRY',p_values);
7158: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_FROM',p_values);
7159: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_TO',p_values);
7152:
7153: END IF;
7154:
7155: l_region_info.city := FTE_UTIL_PKG.GET_DATA('DESTINATION_CITY',p_values);
7156: l_region_info.state := FTE_UTIL_PKG.GET_DATA('DESTINATION_STATE',p_values);
7157: l_region_info.country := FTE_UTIL_PKG.GET_DATA('DESTINATION_COUNTRY',p_values);
7158: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_FROM',p_values);
7159: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_TO',p_values);
7160: l_region_info.zone := FTE_UTIL_PKG.GET_DATA('DESTINATION_ZONE',p_values);
7153: END IF;
7154:
7155: l_region_info.city := FTE_UTIL_PKG.GET_DATA('DESTINATION_CITY',p_values);
7156: l_region_info.state := FTE_UTIL_PKG.GET_DATA('DESTINATION_STATE',p_values);
7157: l_region_info.country := FTE_UTIL_PKG.GET_DATA('DESTINATION_COUNTRY',p_values);
7158: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_FROM',p_values);
7159: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_TO',p_values);
7160: l_region_info.zone := FTE_UTIL_PKG.GET_DATA('DESTINATION_ZONE',p_values);
7161:
7154:
7155: l_region_info.city := FTE_UTIL_PKG.GET_DATA('DESTINATION_CITY',p_values);
7156: l_region_info.state := FTE_UTIL_PKG.GET_DATA('DESTINATION_STATE',p_values);
7157: l_region_info.country := FTE_UTIL_PKG.GET_DATA('DESTINATION_COUNTRY',p_values);
7158: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_FROM',p_values);
7159: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_TO',p_values);
7160: l_region_info.zone := FTE_UTIL_PKG.GET_DATA('DESTINATION_ZONE',p_values);
7161:
7162: IF (l_region_info.country IS NULL AND l_region_info.zone IS NOT NULL) THEN
7155: l_region_info.city := FTE_UTIL_PKG.GET_DATA('DESTINATION_CITY',p_values);
7156: l_region_info.state := FTE_UTIL_PKG.GET_DATA('DESTINATION_STATE',p_values);
7157: l_region_info.country := FTE_UTIL_PKG.GET_DATA('DESTINATION_COUNTRY',p_values);
7158: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_FROM',p_values);
7159: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_TO',p_values);
7160: l_region_info.zone := FTE_UTIL_PKG.GET_DATA('DESTINATION_ZONE',p_values);
7161:
7162: IF (l_region_info.country IS NULL AND l_region_info.zone IS NOT NULL) THEN
7163:
7156: l_region_info.state := FTE_UTIL_PKG.GET_DATA('DESTINATION_STATE',p_values);
7157: l_region_info.country := FTE_UTIL_PKG.GET_DATA('DESTINATION_COUNTRY',p_values);
7158: l_region_info.postal_code_from := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_FROM',p_values);
7159: l_region_info.postal_code_to := FTE_UTIL_PKG.GET_DATA('DESTINATION_POSTAL_CODE_TO',p_values);
7160: l_region_info.zone := FTE_UTIL_PKG.GET_DATA('DESTINATION_ZONE',p_values);
7161:
7162: IF (l_region_info.country IS NULL AND l_region_info.zone IS NOT NULL) THEN
7163:
7164: l_zone_id := FTE_REGION_ZONE_LOADER.GET_ZONE_ID(l_region_info.zone);
7165:
7166: IF (l_zone_id <> -1 OR l_zone_id IS NOT NULL) THEN
7167: p_lane_tbl(l_count).destination_id := l_zone_id;
7168: ELSE
7169: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LANE_ORIGIN_MISSING');
7170:
7171: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
7172: p_msg => x_error_msg,
7173: p_category => 'A',
7167: p_lane_tbl(l_count).destination_id := l_zone_id;
7168: ELSE
7169: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LANE_ORIGIN_MISSING');
7170:
7171: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
7172: p_msg => x_error_msg,
7173: p_category => 'A',
7174: p_line_number => p_line_number);
7175:
7172: p_msg => x_error_msg,
7173: p_category => 'A',
7174: p_line_number => p_line_number);
7175:
7176: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
7177: x_status := 2;
7178: RETURN;
7179: END IF;
7180:
7182:
7183: l_region_id := FTE_REGION_ZONE_LOADER.GET_REGION_ID(p_region_info => l_region_info);
7184:
7185: IF (l_region_id IS NULL OR l_region_id = -1) THEN
7186: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_REGION_UNKNOWN',
7187: p_tokens => STRINGARRAY('REGION_NAME'),
7188: p_values => STRINGARRAY(l_region_info.country ||' '||
7189: l_region_info.state ||' '||
7190: l_region_info.city));
7187: p_tokens => STRINGARRAY('REGION_NAME'),
7188: p_values => STRINGARRAY(l_region_info.country ||' '||
7189: l_region_info.state ||' '||
7190: l_region_info.city));
7191: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
7192: p_msg => x_error_msg,
7193: p_category => 'D',
7194: p_line_number => p_line_number);
7195:
7192: p_msg => x_error_msg,
7193: p_category => 'D',
7194: p_line_number => p_line_number);
7195:
7196: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
7197: x_status := 2;
7198: RETURN;
7199: END IF;
7200:
7204: p_supplier_id => -1,
7205: p_validate_flag => TRUE,
7206: p_postal_code_from => l_region_info.postal_code_from,
7207: p_postal_code_to => l_region_info.postal_code_to) = -1) THEN
7208: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
7209: x_status := 2;
7210: RETURN;
7211: END IF;
7212:
7212:
7213: p_lane_tbl(l_count).destination_id := l_region_id;
7214:
7215: ELSE
7216: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LOAD_DESTINATION_MISSING');
7217: FTE_UTIL_PKG.Write_OutFile(p_msg => x_error_msg,
7218: p_category => 'D',
7219: p_module_name => l_module_name,
7220: p_line_number => p_line_number); -- TODO add tokens
7213: p_lane_tbl(l_count).destination_id := l_region_id;
7214:
7215: ELSE
7216: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LOAD_DESTINATION_MISSING');
7217: FTE_UTIL_PKG.Write_OutFile(p_msg => x_error_msg,
7218: p_category => 'D',
7219: p_module_name => l_module_name,
7220: p_line_number => p_line_number); -- TODO add tokens
7221: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7217: FTE_UTIL_PKG.Write_OutFile(p_msg => x_error_msg,
7218: p_category => 'D',
7219: p_module_name => l_module_name,
7220: p_line_number => p_line_number); -- TODO add tokens
7221: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7222: RETURN;
7223:
7224: END IF;
7225:
7223:
7224: END IF;
7225:
7226: IF (g_debug_on) THEN
7227: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'origin ID ',p_lane_tbl(l_count).origin_id);
7228: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'destination ID', p_lane_tbl(l_count).destination_id);
7229: END IF;
7230:
7231: VALIDATE_MODE_OF_TRANS(p_mode => l_mode,
7224: END IF;
7225:
7226: IF (g_debug_on) THEN
7227: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'origin ID ',p_lane_tbl(l_count).origin_id);
7228: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'destination ID', p_lane_tbl(l_count).destination_id);
7229: END IF;
7230:
7231: VALIDATE_MODE_OF_TRANS(p_mode => l_mode,
7232: p_line_number => p_line_number,
7235: x_status => x_status,
7236: x_error_msg => x_error_msg);
7237:
7238: IF(x_status <> -1) THEN
7239: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7240: RETURN;
7241: END IF;
7242:
7243: p_lane_tbl(l_count).mode_of_transportation_code := l_mode_code;
7253: x_status => x_status,
7254: x_error_msg => x_error_msg);
7255:
7256: IF (x_status <> -1) THEN
7257: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
7258: RETURN;
7259: END IF;
7260:
7261: p_lane_tbl(l_count).effective_date := l_effect_date;
7267: x_status => x_status,
7268: x_error_msg => x_error_msg);
7269:
7270: IF (x_status <> -1) THEN
7271: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
7272: RETURN;
7273: END IF;
7274:
7275: p_lane_tbl(l_count).expiry_date := l_expiry_date;
7294: -- p_lane_tbl(l_count).SERVICE_DETAIL_FLAG := 'N';
7295: --+
7296:
7297: IF (l_rate_chart_name IS NULL) THEN
7298: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LOAD_RC_NAME_MISSING');
7299: FTE_UTIL_PKG.WRITE_OUTFILE(p_msg => x_error_msg,
7300: p_category => 'C',
7301: p_module_name => l_module_name,
7302: p_line_number => p_line_number);
7295: --+
7296:
7297: IF (l_rate_chart_name IS NULL) THEN
7298: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_LOAD_RC_NAME_MISSING');
7299: FTE_UTIL_PKG.WRITE_OUTFILE(p_msg => x_error_msg,
7300: p_category => 'C',
7301: p_module_name => l_module_name,
7302: p_line_number => p_line_number);
7303: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
7299: FTE_UTIL_PKG.WRITE_OUTFILE(p_msg => x_error_msg,
7300: p_category => 'C',
7301: p_module_name => l_module_name,
7302: p_line_number => p_line_number);
7303: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
7304: x_status := 1;
7305: RETURN;
7306:
7307: END IF;
7324:
7325: IF (x_status <> -1) THEN
7326:
7327: IF (g_debug_on) THEN
7328: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'VALIDATE_LANE_RATE_CHART returned with status',x_status);
7329: END IF;
7330:
7331: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7332: RETURN;
7327: IF (g_debug_on) THEN
7328: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'VALIDATE_LANE_RATE_CHART returned with status',x_status);
7329: END IF;
7330:
7331: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7332: RETURN;
7333:
7334: ELSE
7335: p_lane_tbl(l_count).LANE_TYPE := 'HOLD_' || l_rate_chart_name;
7348: x_status => x_status,
7349: x_error_msg => x_error_msg);
7350: END IF;
7351:
7352: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7353: EXCEPTION
7354: WHEN OTHERS THEN
7355: x_status := 2;
7356: x_error_msg := sqlerrm;
7353: EXCEPTION
7354: WHEN OTHERS THEN
7355: x_status := 2;
7356: x_error_msg := sqlerrm;
7357: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
7358: p_msg => x_error_msg,
7359: p_category => 'O',
7360: p_line_number => p_line_number);
7361: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
7357: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
7358: p_msg => x_error_msg,
7359: p_category => 'O',
7360: p_line_number => p_line_number);
7361: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
7362:
7363: END VALIDATE_TL_SERVICE;
7364:
7365: --_______________________________________________________________________________________--
7399:
7400: l_module_name CONSTANT VARCHAR2(100) := 'FTE.PLSQL.' || G_PKG_NAME || '.VALIDATE_ZONE';
7401:
7402: BEGIN
7403: FTE_UTIL_PKG.Enter_Debug(l_module_name);
7404: x_status := -1;
7405:
7406: p_action := p_values('ACTION');
7407: p_zone_name := p_values('ZONE_NAME');
7407: p_zone_name := p_values('ZONE_NAME');
7408: p_country := p_values('COUNTRY');
7409:
7410: IF (g_debug_on) THEN
7411: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'Action', p_action);
7412: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'Zone Name', p_zone_name);
7413: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'Country', p_country);
7414: END IF;
7415:
7408: p_country := p_values('COUNTRY');
7409:
7410: IF (g_debug_on) THEN
7411: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'Action', p_action);
7412: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'Zone Name', p_zone_name);
7413: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'Country', p_country);
7414: END IF;
7415:
7416: IF (p_region_type IS NOT NULL AND p_region_type = '10') THEN
7409:
7410: IF (g_debug_on) THEN
7411: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'Action', p_action);
7412: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'Zone Name', p_zone_name);
7413: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'Country', p_country);
7414: END IF;
7415:
7416: IF (p_region_type IS NOT NULL AND p_region_type = '10') THEN
7417:
7421: x_status => x_status,
7422: x_error_msg => x_error_msg);
7423:
7424: IF (x_status <> -1) THEN
7425: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7426: RETURN;
7427: END IF;
7428:
7429: IF (p_zone_name IS NULL) THEN
7426: RETURN;
7427: END IF;
7428:
7429: IF (p_zone_name IS NULL) THEN
7430: FTE_UTIL_PKG.Write_OutFile('FTE_CAT_ZONE_NAME_MISSING', 'A', p_line_number);
7431: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7432: RETURN;
7433: END IF;
7434:
7427: END IF;
7428:
7429: IF (p_zone_name IS NULL) THEN
7430: FTE_UTIL_PKG.Write_OutFile('FTE_CAT_ZONE_NAME_MISSING', 'A', p_line_number);
7431: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7432: RETURN;
7433: END IF;
7434:
7435: IF (p_country IS NULL) THEN
7432: RETURN;
7433: END IF;
7434:
7435: IF (p_country IS NULL) THEN
7436: FTE_UTIL_PKG.Write_OutFile('FTE_CAT_COUNTRY_REQUIRED', 'A', p_line_number);
7437: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7438: RETURN;
7439: END IF;
7440:
7433: END IF;
7434:
7435: IF (p_country IS NULL) THEN
7436: FTE_UTIL_PKG.Write_OutFile('FTE_CAT_COUNTRY_REQUIRED', 'A', p_line_number);
7437: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7438: RETURN;
7439: END IF;
7440:
7441: END IF;
7460: -- No such region, cannot add zone
7461: --+
7462: IF (p_region_id IS NULL OR p_region_id = -1) THEN
7463: x_status := 2;
7464: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_CAT_REGION_UNKNOWN',
7465: p_tokens => STRINGARRAY('REGION_NAME'),
7466: p_values => STRINGARRAY(p_region_rec.country ||' '||
7467: p_region_rec.state ||' '||
7468: p_region_rec.city));
7465: p_tokens => STRINGARRAY('REGION_NAME'),
7466: p_values => STRINGARRAY(p_region_rec.country ||' '||
7467: p_region_rec.state ||' '||
7468: p_region_rec.city));
7469: FTE_UTIL_PKG.Write_OutFile(p_module_name => l_module_name,
7470: p_msg => x_error_msg,
7471: p_category => 'C',
7472: p_line_number => p_line_number);
7473: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7469: FTE_UTIL_PKG.Write_OutFile(p_module_name => l_module_name,
7470: p_msg => x_error_msg,
7471: p_category => 'C',
7472: p_line_number => p_line_number);
7473: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7474: RETURN;
7475: END IF;
7476:
7477: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7473: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7474: RETURN;
7475: END IF;
7476:
7477: FTE_UTIL_PKG.Exit_Debug(l_module_name);
7478:
7479: EXCEPTION
7480: WHEN OTHERS THEN
7481: x_status := 2;
7479: EXCEPTION
7480: WHEN OTHERS THEN
7481: x_status := 2;
7482: x_error_msg := sqlerrm;
7483: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
7484: p_msg => x_error_msg,
7485: p_category => 'O',
7486: p_line_number => p_line_number);
7487: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
7483: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
7484: p_msg => x_error_msg,
7485: p_category => 'O',
7486: p_line_number => p_line_number);
7487: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
7488:
7489: END VALIDATE_ZONE;
7490:
7491: END FTE_VALIDATION_PKG;