[Home] [Help]
1398: SELECT
1399: process_id,
1400: rate_chart_name
1401: FROM
1402: fte_interface_lanes
1403: WHERE
1404: load_id = p_load_id;
1405:
1406: l_process_id NUMBER;
1513:
1514: CLOSE get_process_ids;
1515: -- delete from fte_bulkload_data where load_id = p_load_id; --could be too expensive..
1516:
1517: DELETE FROM fte_interface_lanes WHERE load_id = p_load_id;
1518:
1519: l_num_ln := SQL%ROWCOUNT;
1520:
1521: DELETE FROM fte_interface_zones WHERE zone_id IS NULL;
1526: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'Deleted ' || l_num_lh || ' from QP_LIST_HEADERS');
1527: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'Deleted ' || l_num_ll || ' from QP_LIST_LINES');
1528: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'Deleted ' || l_num_at || ' from QP_PRICINg_ATTRIBUTES');
1529: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'Deleted ' || l_num_ql || ' from QP_QUALIFIERS');
1530: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'Deleted ' || l_num_ln || ' from FTE_INTERFACE_LANES');
1531: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'Deleted ' || l_num_zn || ' from FTE_INTERFACE_ZONES');
1532: FTE_UTIL_PKG.Write_LogFile(l_module_name, 'Deleted ' || l_num_lane || ' from FTE_LANES');
1533: END IF;
1534:
2190: l_number_of_loads NUMBER;
2191: l_previous_name VARCHAR2(40);
2192:
2193: --+
2194: -- This cursor queries the RateChart Name and the String form the FTE_INTERFACE_LANES
2195: --+
2196: CURSOR GET_LANES(p_load_id NUMBER) IS
2197: SELECT
2198: origin_id,
2200: rate_chart_name,
2201: class_string,
2202: min_charge1
2203: FROM
2204: fte_interface_lanes
2205: WHERE
2206: load_id = p_load_id;
2207:
2208: l_module_name CONSTANT VARCHAR2(100) := 'FTE.PLSQL.' || G_PKG_NAME || '.CREATE_LANES';
2958: l_dest_names,
2959: l_min_charges,
2960: l_rate_names
2961: FROM
2962: fte_interface_lanes
2963: WHERE
2964: hash_value = l_hash_value AND
2965: rate_chart_string = l_total_string AND
2966: class_string = l_class_string AND
3055: END IF;
3056:
3057: l_zone_name := p_load_id || '-' || l_number_of_zones;
3058:
3059: INSERT INTO fte_interface_lanes(ORIGIN_NAME,
3060: DEST_NAME,
3061: RATE_CHART_STRING,
3062: RATE_CHART_NAME,
3063: HASH_VALUE,
3485: --+
3486: -- We need to update origin
3487: --+
3488: UPDATE
3489: fte_interface_lanes
3490: SET
3491: origin_name = l_identical_zone,
3492: origin_id = l_zone_id
3493: WHERE
3495: origin_name = l_zone_name;
3496: ELSE
3497: -- We need to update dest
3498: UPDATE
3499: fte_interface_lanes
3500: SET
3501: dest_name = l_identical_zone,
3502: dest_id = l_zone_id
3503: WHERE
3681: --
3682: -- We need to update origin ID
3683: --
3684: UPDATE
3685: FTE_INTERFACE_LANES
3686: SET
3687: ORIGIN_ID = l_zone_id
3688: WHERE
3689: load_id = p_load_id AND
3693:
3694: ELSE
3695: -- We need to update dest
3696: UPDATE
3697: FTE_INTERFACE_LANES
3698: SET
3699: DEST_ID = l_zone_id
3700: WHERE
3701: load_id = p_load_id AND
5463: -- IN Parameters
5464: -- 1. p_load_id: the load id of the bulkload job.
5465: -- 2. p_group_process_id: This specifies the group of rate charts to load.
5466: -- The process ids of this group of rate charts are
5467: -- obtained from the table FTE_INTERFACE_LANES.
5468: --
5469: -- Out Parameters
5470: -- 1. errbuf: A buffer of error messages.
5471: -- 2. retcode: The return code. A return code of '1' specifies ERROR.
5488: CURSOR GET_PROCESS_ID IS
5489: SELECT
5490: l.process_id, qh.name
5491: FROM
5492: fte_interface_lanes l, qp_interface_list_headers qh
5493: WHERE
5494: l.load_id = p_load_id AND
5495: l.group_process_id = p_group_process_id AND
5496: l.process_id = qh.process_id;