Вызов функции в перед тем удалить триггер

Question

ид нравится называть эту функцию:

CREATE OR REPLACE PACKAGE orders_salary_manage2 AS 
    FUNCTION total_calc(p_order in NUMBER) 
    RETURN NUMBER; 
END; 

CREATE OR REPLACE PACKAGE BODY orders_salary_manage2 AS 
    tot_orders NUMBER; 

FUNCTION total_calc(p_order in NUMBER) 
RETURN NUMBER 
IS 
    c_price product.unit_price%type; 
    c_prod_desc product.product_desc%type; 
    v_total_cost NUMBER := 0; 
    CURSOR c1 IS 
     SELECT product_desc, unit_price 
     FROM product 
     WHERE product_id IN (SELECT fk2_product_id 
          FROM order_line 
          WHERE fk1_order_id = p_order); 
BEGIN 
    OPEN c1; 
    LOOP 
     FETCH c1 into c_prod_desc, c_price; 
     v_total_cost := v_total_cost + c_price; 
     EXIT WHEN c1%notfound; 
    END LOOP; 
    CLOSE c1; 
    return v_total_cost; 
END; 

от этого триггера:

CREATE OR REPLACE TRIGGER trg_order_total 
BEFORE DELETE ON placed_order 
FOR EACH ROW 
DECLARE 
v_old_order NUMBER := :old.order_id; 
BEGIN 
total_calc(v_old_order); 
END; 

, но я постоянно получаю эту ошибку, обратите внимание, что номер не ошибка просто это:

Ошибка в строке 4: PL/SQL: Заявление игнорировали

1. ПЕРЕД УДАЛИТЬ ПО placed_order
2. ДЛЯ КАЖДОЙ ROW
3. DECLARE
4. v_old_order НОМЕР: =: old.order_id;
5. НАЧАТЬ

им новых для PL/SQL и просто не уверен, что является причиной проблемы. Когда пользователь удаляет заказ из таблицы заказов, триггер должен вызывать функцию для добавления всех продуктов в заказе.

Спасибо

Answer 1

(принимая во внимание ваш пакет скомпилирован без ошибок) потребительных

ret_val:= orders_salary_manage2.total_calc(v_old_order); 

ret_val должен стать NUMBER с функцией пакета total_calc возвращающего NUMBER. Функция ДОЛЖНА всегда возвращать свою outcoume переменной (например, ret_val) в зависимости от типа возвращаемого значения, который должен быть объявлен тип данных переменной.

Синтаксис для вызова процедур и функций Pacakaged является -

<RETURN_VARIABLE> := PACKAGE_NAME.<FUNCTION_NAME>(); 
PACKAGE_NAME.<PROCEDURE_NAME>(); --Since Procedure never returns 

Также обратите внимание, что если ваш пакет в другой схеме и не имеет PUBLIC SYNONYM тогда вам придется предварить имя схемы, как <SCHEMA>.PACKAGE_NAME.<FUNCTION_NAME>() (с учетом вызывающая схема имеет разрешения на выполнение в пакете).

Так,

CREATE OR REPLACE TRIGGER trg_order_total 
BEFORE DELETE ON placed_order 
FOR EACH ROW 
DECLARE 
    v_old_order NUMBER := :old.order_id; 
    v_ret_val NUMBER := 0; 
BEGIN 
    v_ret_val := orders_salary_manage2.total_calc(v_old_order); 
    --...Do stuff with v_ret_val 
END;