The following lines contain the word 'select', 'insert', 'update' or 'delete':
IF (l_action = 'DELETE') THEN
IF (l_type = 'SERVICE') THEN
FTE_LANE_PKG.DELETE_ROW(p_id => g_lane_tbl(g_lane_tbl.COUNT).lane_id,
p_table => 'FTE_LANES',
p_code => NULL,
p_line_number => p_line_number+i+1,
x_status => x_status,
x_error_msg => x_error_msg);
FTE_LANE_PKG.DELETE_ROW(p_id => g_lane_rate_chart_tbl(g_lane_rate_chart_tbl.COUNT).lane_id,
p_table => 'FTE_LANE_RATE_CHARTS',
p_code => to_char(g_lane_rate_chart_tbl(g_lane_rate_chart_tbl.COUNT).list_header_id),
p_line_number => p_line_number+i+1,
x_status => x_status,
x_error_msg => x_error_msg);
FTE_LANE_PKG.UPDATE_LANE_FLAGS(p_type => l_type,
p_lane_id => g_lane_rate_chart_tbl(g_lane_rate_chart_tbl.COUNT).lane_id,
x_status => x_status,
x_error_msg => x_error_msg);
g_lane_rate_chart_tbl.DELETE(g_lane_rate_chart_tbl.COUNT);
FTE_LANE_PKG.DELETE_ROW(p_id => g_lane_tbl(g_lane_tbl.COUNT).lane_id,
p_table => 'FTE_LANE_SERVICES',
p_code => g_lane_service_tbl(g_lane_service_tbl.COUNT).service_code,
p_line_number => p_line_number+i+1,
x_status => x_status,
x_error_msg => x_error_msg);
FTE_LANE_PKG.UPDATE_LANE_FLAGS(p_type => l_type,
p_lane_id => g_lane_tbl(g_lane_tbl.COUNT).lane_id,
x_status => x_status,
x_error_msg => x_error_msg);
g_lane_service_tbl.DELETE(g_lane_service_tbl.COUNT);
FTE_LANE_PKG.DELETE_ROW(p_id => g_lane_tbl(g_lane_tbl.COUNT).lane_id,
p_table => 'FTE_LANE_COMMODITIES',
p_code => to_char(g_lane_commodity_tbl(g_lane_commodity_tbl.COUNT).commodity_catg_id),
p_line_number => p_line_number+i+1,
x_status => x_status,
x_error_msg => x_error_msg);
FTE_LANE_PKG.UPDATE_LANE_FLAGS(p_type => l_type,
p_lane_id => g_lane_tbl(g_lane_tbl.COUNT).lane_id,
x_status => x_status,
x_error_msg => x_error_msg);
g_lane_commodity_tbl.DELETE(g_lane_commodity_tbl.COUNT);
IF (l_action = 'DELETE') THEN
IF (g_deficit_wt) THEN
FTE_LANE_PKG.DELETE_ROW(p_id => g_prc_parameter_tbl(g_prc_parameter_tbl.COUNT).lane_id,
p_table => 'FTE_PRC_PARAMETERS',
p_code => TO_CHAR(g_prc_parameter_tbl(g_prc_parameter_tbl.COUNT).parameter_id),
p_line_number => p_line_number+i+1,
x_status => x_status,
x_error_msg => x_error_msg);
FTE_LANE_PKG.DELETE_ROW(p_id => g_prc_parameter_tbl(g_prc_parameter_tbl.COUNT).parameter_instance_id,
p_table => 'FTE_PRC_PARAMETERS',
p_code => NULL,
p_line_number => p_line_number+i+1,
x_status => x_status,
x_error_msg => x_error_msg);
FTE_LANE_PKG.DELETE_ROW(p_id => g_prc_parameter_tbl(g_prc_parameter_tbl.COUNT).lane_id,
p_table => 'FTE_PRC_PARAMETERS',
p_code => TO_CHAR(g_prc_parameter_tbl(g_prc_parameter_tbl.COUNT).parameter_id),
p_line_number => p_line_number+i+1,
x_status => x_status,
x_error_msg => x_error_msg);
FTE_LANE_PKG.INSERT_PRC_PARAMETERS(p_prc_parameter_tbl => g_prc_parameter_tbl,
x_status => x_status,
x_error_msg => x_error_msg);
ELSIF (l_action = 'UPDATE') THEN
FTE_LANE_PKG.UPDATE_PRC_PARAMETER(p_prc_parameter_tbl => g_prc_parameter_tbl,
x_status => x_status,
x_error_msg => x_error_msg);
g_prc_parameter_tbl.DELETE(g_prc_parameter_tbl.COUNT);
FTE_LANE_PKG.INSERT_SCHEDULES(p_schedule_tbl => g_schedule_tbl,
x_status => x_status,
x_error_msg => x_error_msg);
FTE_LANE_PKG.UPDATE_LANE_FLAGS(p_type => 'SCHEDULE',
p_lane_id => g_schedule_tbl(g_schedule_tbl.COUNT).lane_id,
p_value => 'Y',
x_status => x_status,
x_error_msg => x_error_msg);
ELSIF (l_action = 'DELETE') THEN
-- Delete a schedule and modify a lane
FTE_LANE_PKG.DELETE_ROW(p_id => g_schedule_tbl(g_schedule_tbl.COUNT).schedules_id,
p_table => 'FTE_SCHEDULES',
p_code => g_schedule_tbl(g_schedule_tbl.COUNT).voyage_number,
p_line_number => p_line_number+i+1,
x_status => x_status,
x_error_msg => x_error_msg);
SELECT COUNT(schedules_id)
INTO l_rows
FROM FTE_SCHEDULES
WHERE LANE_ID = l_lane_id
AND NVL(EDITABLE_FLAG,'Y') = 'Y';
FTE_LANE_PKG.UPDATE_LANE_FLAGS(p_type => 'SCHEDULE',
p_lane_id => g_schedule_tbl(g_schedule_tbl.COUNT).lane_id,
p_value => 'N',
x_status => x_status,
x_error_msg => x_error_msg);
g_schedule_tbl.DELETE(g_schedule_tbl.COUNT);
FTE_LANE_PKG.INSERT_LANE_TABLES(p_lane_tbl => g_lane_tbl,
p_lane_rate_chart_tbl => g_lane_rate_chart_tbl,
p_lane_commodity_tbl => g_lane_commodity_tbl,
p_lane_service_tbl => g_lane_service_tbl,
x_status => x_status,
x_error_msg => x_error_msg);