Я изменяю дизайн программы, но не знаю, почему не могу показать какую-либо запись.Конструкция функции позволяет получить функцию «код шины» и «имя шины dir» и получить параметр для использования функции.
FUNCTION get_abc_text(iv_name varchar2,
iv_bus varchar2,
iv_bus_name VARCHAR2)
RETURN VARCHAR2 IS
v_abc varchar2(500);
v_return varchar2(500);
BEGIN
v_abc := 'SELECT bus_number2' || iv_bus_name || '
FROM city_bus_value_vl fbus,
city_bus_value_sets fbusa,
(SELECT fbus.bus_value bus_group, fbus.bus_value2,
fbus.bus_description bus_desc
FROM city_bus_value_vl fbus,
city_bus_value_sets fbusa
WHERE fbus.bus_value_id = fbusa.bus_value_id
AND fbus.bus_value_name = ''BUS_GP''
) bus_gp,
(SELECT fbus.bus_number1 bus_code,
fbus.bus_value bus_no
FROM city_bus_value_vl fbus,
city_bus_value_sets fbusa,
WHERE fbus.bus_value_id = fbusa.bus_value_id
AND fbus.bus_value_name = ''BUS_GP_DIR''
) bus_dir
WHERE fbus.bus_value_id = fbusa.bus_value_id
AND bus_gp.bus_number2 IS NOT NULL
AND bus_gp.bus_group= fbus.bus_number1
AND fbus.bus_value = bus_dir.bus_number1
AND fbus.enabled_flag = ''Y''
AND fbus.bus_value_name = :v_bus_name' || get_bus_number(iv_name) || '
AND fbus.bus_value = :v_bus_dir' || get_bus_dir(iv_bus) ;
EXECUTE IMMEDIATE v_abc
INTO v_return;
EXCEPTION
WHEN OTHERS THEN
RETURN '';
END;
Пожалуйста, помогите проверить проблему с кодом.