Когда инициируется запрос в базовом блоке либо пользователем, либо подпрограммой, определенная последовательность событий (рис. 2.5) имеет место быть. Это интересно с целью определения возможных мест создания триггера для управления данными и процессами формы.
Триггер PRE – QUERY задается на уровне блока и срабатывает один раз перед выполнением запроса. Вы должны его использовать для проверки условий запроса, заданных пользователем или добавления и/или изменения условий запроса.
Рис. 2.5. Обработка запроса
Пример
Триггер PRE – QUERY в блоке Order
IF Name_In ('order.id') ||
TO CHAR (:order. date_ordered) ||
TO CHAR (:order. date_shipped) is NULL
THEN MESSAGE ('Введите номер заказа и дату');
RAISE form_trigger_failure;
END IF;
Триггер POST – QUERY срабатывает для каждой извлеченной записи, используется для присвоения значений элементам, не связанным с базой дан-ных и для сбора статистики (например, общее количество элементов формы, суммарное значение элементов и т.п.).
Пример
Триггер POST – QUERY вычисляет для текущего заказа число пунктов
SELECT count (ord_id) INTO
: order.Lineitem_count
FROM S_item
WHERE ord_id = : order_id;
Часто триггеры POST – QUERY и WHEN – VALIDATE – ITEM используются для заполнения небазовых элементов формы после изменения базовых элементов или выполнения запроса (рис. 2.6).
1 – извлечение записи;
2 – проверка записи в случае ее изменения
Рис. 2.6. Триггеры POST – QUERY и WHEN – VALIDATE – ITEM
Пример
Совместное использование триггеров
PROCEDURE get_product_name is
BEGIN
SELECT name INTO : item.description
FROM S_product
WHERE id = : item.product_id
END;
Эта процедура вызывается из триггера WHEN – VALIDATE – ITEM на элемент : item.product_id, если значение элемента не найдено в S_PRODUCT.
И эта же самая процедура вызывается триггером POST – QUERY в Item-блоке для отображения имени продукта:
get_product_name;
EXCEPTION
When no_date_found then
MESSAGE ('Такой продукт не существует');
Некоторые триггеры могут срабатывать и в нормальном режиме и в режиме ввода запроса. Задайте свойство Fire в Enter – Query Mode-свойства так, как Вам нужно. По умолчанию Fire установлено в True, что разрешает срабатывание триггеров и в нормальном режиме (date_entry и saving) и в режиме запроса. Обратите внимание, триггер When – Button – Pressed срабатывает, например при выборе из LOV, только в режиме Fire.
Системная переменная MODE используется для выяснения режима формы и может иметь значения:
NORMAL – нормальный режим (чтение и изменение элементов формы);
ENTER – QUERY – режим ввода запроса;
QUERY – режим выполнения запроса.
Пример
Программный код для режима ввода запроса
IF : SYSTEM.MODE = 'NORMAL'
THEN ENTER_QUERY;
ELSE EXECUTE_QUERY;
END IF;
Некоторые встроенные подпрограммы не разрешены в режиме ввода запроса ENTER – QUERY. Также в этом режиме навигация к другим записям в текущей форме не допустима. Это касается GO_BLOCK, PREVIOUS_BLOCK, GO_RECORD, NEXT_RECORD, PREVIOUS_RECORD, UP, DOWN, OPEN_FORM и других. |
Главная
Каталог файлов
