Хелен Борри - Firebird РУКОВОДСТВО РАЗРАБОТЧИКА БАЗ ДАННЫХ

Таблица JOB В примере базы данных имеет столбец LANGUAGE REQ, содержащий требуемые языки. Столбец определен как массив из пяти элементов VARCHAR(15).

Следующий пример использует хранимую процедуру для просмотра содержимого этого столбца. Процедура использует цикл FOR ... SELECT для поиска каждой строки из таблицы JOB, где столбец LANGUAGE_REQ не является пустым. Затем цикл WHILE отыскивает каждый элемент массива и возвращает значение вызвавшему приложению.

SET TERM ^;

CREATE PROCEDURE VIEW_LANGS

RETURNS (

code VARCHAR(5) ,

grade SMALLINT,

cty VARCHAR(15),

lang VARCHAR(15))

AS

DECLARE VARIABLE i INTEGER;

BEGIN

FOR SELECT

JOB_CODE,

JOB_GRADE,

JOB_COUNTRY

FROM JOB

WHERE LANGUAGE_REQ IS NOT NULL

DO

BEGIN

i = 1;

WHILE (i <= 5) DO

BEGIN

SELECT LANGUAGE_REQ[:i] FROM JOB

WHERE ((JOB_CODE = :code)

AND (JOB_GRADE = :grade)

AND (JOB_COUNTRY = :cty))

INTO :lang;

i =i + 1;

SUSPEND;

END

END

END ^

SET TERM ; ^

Ее вызов:

SELECT * FROM VIEW_LANGS;

CODE GRADE CTY LANG

Eng 3 Japan Japanese

Eng 3 Japan Mandarin

Eng 3 Japan English

Eng 3 Japan

Eng 3 Japan

Eng 4 England English

Eng 4 England German

Eng 4 England French

. . .

Процедура может быть модифицирована таким образом, что будет получать входные аргументы и возвращать другую комбинацию данных в качестве выхода.

Разработчикам не нужно напоминать о необходимости строгого тестирования модулей PSQL, прежде чем передавать их в работу, где они в один скверный день могут принести большой вред. Синтаксический анализатор предупредит вас об ошибках кодирования PSQL, однако как программы ваши модули не защищены от логических ошибок, как и любой код приложения, который вы пишете.

Например, наша процедура LOG SALES прекрасно работает, пока каждая запись продаж имеет непустое значение SALES REP. При этом данный столбец допускает пустое значение. Процедура генерирует результирующий набор, в котором каждая выходная строка зависит от значений в предшествующих строках. Если мы не учтем возможные эффекты появления значения NULL В таком ключе, наша процедура выдаст неверный результат. Позже в этой главе в разд. "Изменение хранимых процедур" мы добавим меры предосторожности при работе, когда могут появиться некоторые проблемы.

Хотя возможно написание процедуры выбора, которая будет выполнять операции по изменению данных в процессе конструирования выходного набора, этого делать не рекомендуется. Хранимая процедура выбора разрабатывается для вывода набора данных клиенту в контексте вызвавшей ее транзакции. Пока клиентское приложение не завершит использование этого выходного набора, транзакция остается неподтвержденной. Если операции DML включены в код, который генерирует выходной набор, эти запросы DML остаются неподтвержденными, пока транзакция не будет завершена клиентом.

В частности, данные могут потенциально сохраняться в несогласованном виде, если значения выхода хранимой процедуры выступают в качестве параметров для операций в других транзакциях.

Firebird 1.0.x предоставляет два способа изменения хранимых процедур с использованием операторов DDL, a Firebird 1.5 добавляет еще и третий. Это:

* оператор ALTER PROCEDURE, который изменяет определение существующей хранимой процедуры, сохраняя ее взаимозависимости с другими объектами;

* оператор RECREATE PROCEDURE, который выполняется, даже если указанная процедура не существует. Если она существует, то эта версия удаляется, а затем заново создается. Существующие зависимости не сохраняются;

* оператор CREATE OR ALTER PROCEDURE (доступен начиная с версии 1.5) предоставляет лучший вариант. Если процедура существует, применяются правила ALTER, зависимости сохраняются. Если не существует, то будет работать точно так же, как и CREATE PROCEDURE.

Любая из этих операций вызовет исключение, если любая попытка изменений разрушает зависимости.

Внутренние изменения процедуры прозрачны всем клиентским приложениям, использующим эту процедуру. Вам не нужно пересоздавать приложения, если изменения не коснулись интерфейса между вызывающей программой и процедурой - тип, количество или порядок выходных или выходных аргументов.

За исключением ключевого слова, которое вы выбрали для изменения хранимой процедуры, синтаксис для всех операторов такой же, как и для CREATE PROCEDURE. Как и в любом другом компилируемом или интерпретируемом модуле, не существует способов непосредственного изменения элементов без полного пересоздания всего модуля. Каждая "переделка", независимо от выбранного ключевого слова для задания операции, имеет дело с созданием новой версии исходного кода и нового двоично- кодированного объекта.

Синтаксис:

{CREATE | ALTER | RECREATE | CREATE OR ALTER} PROCEDURE Имя

[(переменная тип-данных [,переменная тип-данных ...])]

[RETURNS (переменная тип-данных [, переменная тип-данных ...])]

AS

тело-процедуры;

В ALTER PROCEDURE имя процедуры должно быть именем существующей процедуры.

Это мягкий способ изменения кода процедуры, потому что если у нее есть зависимости, на которые логически не влияют изменения, то они не будут влиять на структурную часть.

Вообще, не оказывается влияния на зависимости, включающие другие объекты, которые зависят от измененной процедуры. При этом, если изменения хранимой процедуры изменяют определения ее входных и выходных аргументов, нужно будет выполнить RECREATE PROCEDURE для любой другой процедуры, к которой происходит обращение в процессе выполнения.

! ! !

ВНИМАНИЕ! Некоторые версии Firebird 1.0.x обнаруживают ошибку, когда зависимые объекты выдают исключение при перекомпиляции зависимого объекта, даже если изменения не оказывали воздействия на интерфейс между объектами.

. ! .

Оператор RECREATE PROCEDURE идентичен оператору CREATE PROCEDURE за исключением того, что для существующей процедуры с тем же именем он внутренне выполняет операцию DROP PROCEDURE перед созданием нового двоичного объекта. Имя процедуры не должно существовать.

Вы можете использовать его, как и ALTER PROCEDURE, однако оно не сохраняет существующие зависимости. Операция будет заблокирована, если существуют зависимые объекты (просмотры или другие процедуры, которые ссылаются на данную процедуру).

Процедура не обязательно должна существовать, однако будьте внимательны с чувствительностью к регистру в именах объектов, если при создании процедуры используются идентификаторы, заключенные в апострофы. Предположим, вы создаете следующую процедуру:

CREATE PROCEDURE "Try_Me"

RETURNS (AWORD VARCHAR(10))

AS

BEGIN

AWORD = 'turtle';

END ^

Теперь вы решаете изменить ее с использованием RECREATE PROCEDURE:

RECREATE PROCEDURE Try_Me

RETURNS (AWORD VARCHAR(10))

AS

BEGIN

AWORD = 'Venezuela';

END ^