31: p_chart_type IN VARCHAR2,
32: x_status OUT NOCOPY NUMBER,
33: x_error_msg OUT NOCOPY VARCHAR2) IS
34:
35: l_block_header FTE_BULKLOAD_PKG.block_header_tbl;
36: l_block_data FTE_BULKLOAD_PKG.block_data_tbl;
37: l_aj_block_data FTE_BULKLOAD_PKG.block_data_tbl;
38: l_line_block_data FTE_BULKLOAD_PKG.block_data_tbl;
39: l_break_block_data FTE_BULKLOAD_PKG.block_data_tbl;
32: x_status OUT NOCOPY NUMBER,
33: x_error_msg OUT NOCOPY VARCHAR2) IS
34:
35: l_block_header FTE_BULKLOAD_PKG.block_header_tbl;
36: l_block_data FTE_BULKLOAD_PKG.block_data_tbl;
37: l_aj_block_data FTE_BULKLOAD_PKG.block_data_tbl;
38: l_line_block_data FTE_BULKLOAD_PKG.block_data_tbl;
39: l_break_block_data FTE_BULKLOAD_PKG.block_data_tbl;
40: l_offset NUMBER := 0;
33: x_error_msg OUT NOCOPY VARCHAR2) IS
34:
35: l_block_header FTE_BULKLOAD_PKG.block_header_tbl;
36: l_block_data FTE_BULKLOAD_PKG.block_data_tbl;
37: l_aj_block_data FTE_BULKLOAD_PKG.block_data_tbl;
38: l_line_block_data FTE_BULKLOAD_PKG.block_data_tbl;
39: l_break_block_data FTE_BULKLOAD_PKG.block_data_tbl;
40: l_offset NUMBER := 0;
41: l_count NUMBER := 0;
34:
35: l_block_header FTE_BULKLOAD_PKG.block_header_tbl;
36: l_block_data FTE_BULKLOAD_PKG.block_data_tbl;
37: l_aj_block_data FTE_BULKLOAD_PKG.block_data_tbl;
38: l_line_block_data FTE_BULKLOAD_PKG.block_data_tbl;
39: l_break_block_data FTE_BULKLOAD_PKG.block_data_tbl;
40: l_offset NUMBER := 0;
41: l_count NUMBER := 0;
42: l_break_count NUMBER := 0;
35: l_block_header FTE_BULKLOAD_PKG.block_header_tbl;
36: l_block_data FTE_BULKLOAD_PKG.block_data_tbl;
37: l_aj_block_data FTE_BULKLOAD_PKG.block_data_tbl;
38: l_line_block_data FTE_BULKLOAD_PKG.block_data_tbl;
39: l_break_block_data FTE_BULKLOAD_PKG.block_data_tbl;
40: l_offset NUMBER := 0;
41: l_count NUMBER := 0;
42: l_break_count NUMBER := 0;
43: l_line_number NUMBER := 0;
58:
59: l_block_data(1)('ACTION') := 'UPDATE';
60: l_block_data(1)('CARRIER_ID') := p_header_table(i).carrier_id;
61: l_block_data(1)('CURRENCY') := p_header_table(i).currency_code;
62: l_block_data(1)('START_DATE') := to_char(p_header_table(i).start_date_active, FTE_BULKLOAD_PKG.G_DATE_FORMAT);
63: l_block_data(1)('END_DATE') := to_char(p_header_table(i).end_date_active, FTE_BULKLOAD_PKG.G_DATE_FORMAT);
64: l_block_data(1)('DESCRIPTION') := p_header_table(i).description;
65: l_block_data(1)('REPLACED_RATE_CHART') := '';
66: l_block_data(1)('LIST_HEADER_ID') := p_header_table(i).list_header_id;
59: l_block_data(1)('ACTION') := 'UPDATE';
60: l_block_data(1)('CARRIER_ID') := p_header_table(i).carrier_id;
61: l_block_data(1)('CURRENCY') := p_header_table(i).currency_code;
62: l_block_data(1)('START_DATE') := to_char(p_header_table(i).start_date_active, FTE_BULKLOAD_PKG.G_DATE_FORMAT);
63: l_block_data(1)('END_DATE') := to_char(p_header_table(i).end_date_active, FTE_BULKLOAD_PKG.G_DATE_FORMAT);
64: l_block_data(1)('DESCRIPTION') := p_header_table(i).description;
65: l_block_data(1)('REPLACED_RATE_CHART') := '';
66: l_block_data(1)('LIST_HEADER_ID') := p_header_table(i).list_header_id;
67:
289: p_action IN VARCHAR2,
290: x_status OUT NOCOPY NUMBER,
291: x_error_msg OUT NOCOPY VARCHAR2) IS
292:
293: l_block_header FTE_BULKLOAD_PKG.block_header_tbl;
294: l_block_data FTE_BULKLOAD_PKG.block_data_tbl;
295:
296: BEGIN
297: x_status := -1;
290: x_status OUT NOCOPY NUMBER,
291: x_error_msg OUT NOCOPY VARCHAR2) IS
292:
293: l_block_header FTE_BULKLOAD_PKG.block_header_tbl;
294: l_block_data FTE_BULKLOAD_PKG.block_data_tbl;
295:
296: BEGIN
297: x_status := -1;
298: IF ( WSH_DEBUG_SV.is_debug_enabled ) THEN
303: l_block_data(1)('TYPE') := 'C';
304: l_block_data(1)('CARRIER_ID') := p_header_table(p_header_table.FIRST).carrier_id;
305: l_block_data(1)('SERVICE_CODE') := p_header_table(p_header_table.FIRST).service_level;
306: l_block_data(1)('CURRENCY') := p_header_table(p_header_table.FIRST).currency_code;
307: l_block_data(1)('START_DATE') := to_char(p_header_table(p_header_table.FIRST).start_date_active, FTE_BULKLOAD_PKG.G_DATE_FORMAT);
308: l_block_data(1)('END_DATE') := to_char(p_header_table(p_header_table.FIRST).end_date_active, FTE_BULKLOAD_PKG.G_DATE_FORMAT);
309:
310: FOR i IN p_tl_line_table.FIRST..p_tl_line_table.LAST LOOP
311: IF (p_tl_line_table(i).type = 'C_ORIGIN_SURCHRG') THEN
304: l_block_data(1)('CARRIER_ID') := p_header_table(p_header_table.FIRST).carrier_id;
305: l_block_data(1)('SERVICE_CODE') := p_header_table(p_header_table.FIRST).service_level;
306: l_block_data(1)('CURRENCY') := p_header_table(p_header_table.FIRST).currency_code;
307: l_block_data(1)('START_DATE') := to_char(p_header_table(p_header_table.FIRST).start_date_active, FTE_BULKLOAD_PKG.G_DATE_FORMAT);
308: l_block_data(1)('END_DATE') := to_char(p_header_table(p_header_table.FIRST).end_date_active, FTE_BULKLOAD_PKG.G_DATE_FORMAT);
309:
310: FOR i IN p_tl_line_table.FIRST..p_tl_line_table.LAST LOOP
311: IF (p_tl_line_table(i).type = 'C_ORIGIN_SURCHRG') THEN
312: l_block_data(l_block_data.COUNT+1)('ACTION') := 'ADD';
424: l_lane_service_tbl FTE_LANE_PKG.lane_service_tbl;
425:
426: l_lane_id NUMBER;
427:
428: l_block_header FTE_BULKLOAD_PKG.block_header_tbl;
429: l_rate_line_data FTE_BULKLOAD_PKG.block_data_tbl;
430: l_postal_code_from VARCHAR2(30) := NULL;
431: l_postal_code_to VARCHAR2(30) := NULL;
432: l_postal_code_from_num NUMBER := NULL;
425:
426: l_lane_id NUMBER;
427:
428: l_block_header FTE_BULKLOAD_PKG.block_header_tbl;
429: l_rate_line_data FTE_BULKLOAD_PKG.block_data_tbl;
430: l_postal_code_from VARCHAR2(30) := NULL;
431: l_postal_code_to VARCHAR2(30) := NULL;
432: l_postal_code_from_num NUMBER := NULL;
433: l_postal_code_to_num NUMBER := NULL;
609: l_rate_line_data(l_rate_line_data.COUNT)('SERVICE_CODE') := P_RATE_CHART_HEADER_TABLE(p_rate_chart_header_table.FIRST).SERVICE_LEVEL;
610: l_rate_line_data(l_rate_line_data.COUNT)('VEHICLE_CODE') := P_RATE_CHART_LINE_TABLE(I).VEHICLE_TYPE;
611: l_rate_line_data(l_rate_line_data.COUNT)('RATE') := P_RATE_CHART_LINE_TABLE(I).RATE;
612: l_rate_line_data(l_rate_line_data.COUNT)('MINIMUM_CHARGE') := P_RATE_CHART_LINE_TABLE(I).MIN_CHARGE;
613: l_rate_line_data(l_rate_line_data.COUNT)('START_DATE') := to_char(P_RATE_CHART_LINE_TABLE(I).START_DATE, FTE_BULKLOAD_PKG.G_DATE_FORMAT);
614: l_rate_line_data(l_rate_line_data.COUNT)('END_DATE') := to_char(P_RATE_CHART_LINE_TABLE(I).END_DATE, FTE_BULKLOAD_PKG.G_DATE_FORMAT);
615:
616: END LOOP;
617:
610: l_rate_line_data(l_rate_line_data.COUNT)('VEHICLE_CODE') := P_RATE_CHART_LINE_TABLE(I).VEHICLE_TYPE;
611: l_rate_line_data(l_rate_line_data.COUNT)('RATE') := P_RATE_CHART_LINE_TABLE(I).RATE;
612: l_rate_line_data(l_rate_line_data.COUNT)('MINIMUM_CHARGE') := P_RATE_CHART_LINE_TABLE(I).MIN_CHARGE;
613: l_rate_line_data(l_rate_line_data.COUNT)('START_DATE') := to_char(P_RATE_CHART_LINE_TABLE(I).START_DATE, FTE_BULKLOAD_PKG.G_DATE_FORMAT);
614: l_rate_line_data(l_rate_line_data.COUNT)('END_DATE') := to_char(P_RATE_CHART_LINE_TABLE(I).END_DATE, FTE_BULKLOAD_PKG.G_DATE_FORMAT);
615:
616: END LOOP;
617:
618: FTE_TL_LOADER.PROCESS_TL_BASE_RATES(p_block_header => l_block_header,