Многомодульные приложения и библиотеки объектов

В Oracle Forms вы можете разрабатывать приложения, состоящие из одного и более модулей. В этой главе будет рассмотрено создание приложений с многомодульной структурой и обмен данными между составляющими этой структуры (рис. 12.1).

Рис. 12.1. Организация многомодульного приложения

Основной вопрос, который возникает, - это какова потребность в таком приложении и какой выигрыш от использования такой архитектуры. Для ответа перечислим основные преимущества использования многомодульного приложения:

• Отладка.
• Логика приложения.
• Масштабируемость и производительность.

Остановимся на каждом из пунктов более подробно.

Отладка - многомодульное приложение проще отладить, так как намного проще разбираться в небольших фрагментах кода и не ставить точки останова по всему приложению в поисках ошибки, а отлаживать конкретный модуль. Если у вас, к примеру, имеется готовое отлаженное приложение, то почему бы не интегрировать его в основной модуль? Это значительно проще и эффективнее, чем дописывать существующее приложение.

Логика приложения - многомодульное приложение позволяет разбить вашу задачу на логические единицы, тем самым давая возможность дорабатывать и вносить изменения не во все приложение, а лишь в отдельный модуль. Запуская отдельные модули приложения, вы можете определять тип открытия нового модуля, указывая Forms, открывать новую форму в той же сессии, что и родительская, или создать для него отдельную сессию. Логику такого приложения всегда проще понять и модернизировать.

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

Запуск другой формы

В Oracle Forms для запуска другой формы существуют встроенные подпрограммы, которые перечислены ниже:

• OPEN_FORM - открывает независимую форму ;
• CALL_FORM - вызывает модальную форму ;
• NEW_FORM - заменяет текущую форму.

Для более подробного ознакомления с этими процедурами выполните примеры, которые будут приведены далее.

CALL_FORM - запускает указанную форму, оставляя порождающую форму активной; Forms запускает вызываемую форму с теми же опциями Run Form, что и у порождающей формы. Когда вызываемая форма завершается - по функции EXIT или в результате неправильной передачи управления - обработка возвращается в порождающую форму в точку, откуда исходил вызов CALL. По умолчанию CALL использует параметры HIDE и NO_REPLACE:

• HIDE заставляет Forms стирать вызывающую форму с экрана перед рисованием вызываемой формы. Если вы используете параметр NO_HIDE, Forms не стирает вызывающую форму перед рисованием вызываемой формы. Это означает, что если вы вызываете форму с параметром NO_HIDE и некоторая страница вызываемой формы меньше области экрана, вызывающая форма выдается фоном.
• NO_REPLACE заставляет Forms поддерживать характеристику Default Menu Application вызывающей формы. Если вы используете параметр REPLACE, Forms заменяет характеристику Default Menu Application вызывающей формы на характеристику Default Menu Application вызываемой формы.

Процедура CALL_FORM имеет много описаний, которые вы можете найти в Online Help Forms.

Рассмотрим несколько основных способов написаний этих процедур, а также перечислим возможные параметры.

Синтаксис процедуры CALL_FORM

CALL_FORM (formmodule_name VARCHAR2);
CALL_FORM (formmodule_name VARCHAR2, display NUMBER, 
           switch_menu NUMBER,  query_mode NUMBER, 
           data_mode NUMBER, paramlist_name VARCHAR2);
...

• formmodule_name - определяет имя модуля. Тип данных VARCHAR2.
• display ( HIDE установлен по умолчанию) - Form Builder скрывает вызывающее приложение перед прорисовкой вызванного модуля:
  • NO_HIDE - Form Builder не стирает вызывающую форму перед рисованием вызываемой формы;
  • HIDE - Form Builder скрывает вызывающее приложение перед прорисовкой вызванного модуля.
• switch_menu ( NO_REPLACE по умолчанию) - заставляет Forms поддерживать характеристику Default Menu Application вызывающей формы:
  • DO_REPLACE - заставляет Form Builder заменить меню по умолчанию на модуль меню вызываемой формы;
  • NO_REPLACE - заставляет Form Builder поддерживать характеристику Default Menu Application вызывающей формы.
• query_mode ( NO_QUERY_ONLY по умолчанию) - заставляет Form Builder запускать целевой модуль в нормальном режиме, разрешая выполнять операции DML:
  • QUERY_ONLY - заставляет Form Builder запускать формы в режиме RED_ONLY (только чтение), а также запрещает пользователю выполнять операции DML;
  • NO_QUERY_ONLY - заставляет Form Builder запускать формы в нормальном режиме.
• data_mode ( NO_SHARE_LIBRARY_DATA по умолчанию) - в режиме выполнения Построитель форм не открывает общий доступ к данным библиотеки между формами:
  • SHARE_LIBRARY_DATA - в режиме выполнения построитель форм открывает общий доступ между формами;
  • NO_SHARE_LIBRARY_DATA - в режиме выполнения построитель форм не открывает общий доступ к данным библиотеки между формами.
• paramlist_name [ID] - имя списка параметров или его идентификатор. С синтаксисом процедуры мы ознакомились, теперь можно перейти к выполнению примеров. Далее приведено два листинга, демонстрирующих вызов формы с параметрами (листинг 12.1) и без (листинг 12.2).

BEGIN
 CALL_FORM('FormB', no_hide, no_replace, query_only); 
END;

Ниже на рисунке приведен пример из листинга 11, где вызывающая форма не скрывается после запуска другой формы, но, несмотря на это, остается неактивной (рис. 12.2).

Рис. 12.2. Пример вызова формы с параметром NO_HIDE

DECLARE
 pl_id  PARAMLIST; 
BEGIN
 pl_id := Get_Parameter_List('list_data'); 
 IF NOT Id_Null(pl_id) THEN
  Destroy_Parameter_List( pl_id );
 END IF;
 pl_id := Create_Parameter_List('list_data'); 
 Add_Parameter(pl_id,'l_param',TEXT_PARAMETER,:item.param); 
 CALL_FORM('C:\exemple\Formb',NO_HIDE, no_replace, 
           no_query_only, pl_id); 
END;

Предыдущий пример показывает, как с помощью списка параметров (рис. 12.3) можно передать значение переменной. Вы также можете использовать глобальные переменные и пользовательские параметры для передачи значений.

Рис. 12.3. Передача параметров через процедуру CALL_FORM

Ограничения в использовании CALL_FORM:

1. Передаваемый список параметров может содержать параметры типа TEXT_PARAMETER, но не DATA_PARAMETER.
2. После окончания сессии память, занятая процедурой CALL_FORM, не освобождается и образует стек вызываемых форм, поэтому не стоит злоупотреблять этой процедурой.

Запуск формы с помощью процедуры OPEN_FORM

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

OPEN_FORM
(form_name      VARCHAR2); 
OPEN_FORM
(form_name      VARCHAR2,
 activate_mode  NUMBER,
 session_mode   NUMBER,
 data_mode      NUMBER,
 paramlist_id   PARAMLIST); ...

Принимаемые параметры:

• form_name - имя открываемой формы;
• activate_mode - управляет передачей фокуса. Это свойство может принимать два значения:
  • ACTIVE - после открытия формы передает фокус управления вызванной форме, делая ее активной;
  • NO_ACTIVE - после открытия фокус управления остается в вызывающем модуле;
• session_mode - определяет, в какой сессии будет открыта форма. Для этого вам доступны следующие константы:
  • NO_SESSION - указывает, что открываемая форма должна использовать текущую сессию;
  • SESSION - указывает, что для открываемой формы нужно создать новую сессию;
• data_mode - в режиме выполнения Построитель форм не открывает общий доступ к данным библиотеки между формами;
  • SHARE_LIBRARY_DATA - в режиме выполнения построитель форм открывает общий доступ между формами;
  • NO_SHARE_LIBRARY_DATA - в режиме выполнения построитель форм не открывает общий доступ к данным библиотеки между формами;
  • paramlist_name [ID] - имя списка параметров или его идентификатор.

Замечания:

1. Когда вы будете определять параметр ACTIVE или NO_ACTIVE, учтите, что в первом случае все выполняемые операторы, определенные после вызова процедуры, будут игнорироваться, так как фокус немедленно покидает вызывающее окно по завершении открытия новой формы. Если вы выбираете параметр NO_ACTIVE, то все исполняемые операторы, определенные ниже процедуры OPEN_FORM, будут выполнены по окончании загрузки открываемой формы в память.
2. Если вызывающая форма находится в режиме QUERY_ONLY, то и открываемая форма будет находиться в режиме QUERY_ONLY.

Ограничения:

• Если вы используете параметр SESSION, то определение параметра data_mode как SHARE_LIBRARY_DATA вызовет ошибку выполнения (runtime error).

Теперь, когда мы ознакомились со всеми особенностями процедуры, выполним примеры, демонстрирующие влияние вышеописанных параметров.

1.   OPEN_FORM('form_name'); 
-- открывает форму с параметром NO_ SESSION по умолчанию, 
-- то есть форма будет открыта в текущей сессии (процессе).
2.   OPEN_FORM('form_name', activate, no_session) 
-- открывает форму в текущей сессии и немедленно передает ей управление
3.   OPEN_FORM('form_name', activate, session); 
-- открывает форму и создает для нее новую сессию, 
-- после загрузки форма немедленно получает управление.

Ниже на рис. 12.4 изображен пример № 2 из листинга 12.3, на котором четко видны две активные формы.

Рис. 12.4. Вызов формы с помощью процедуры OPEN_FORM

Для того чтобы передать значение в открываемую форму, воспользуйтесь нижеприведенным примером, в котором показано, как передаются параметры через процедуру OPEN_FORM (рис. 12.5).

Рис. 12.5. Передача параметров через процедуру OPEN_FORM

DECLARE
pl_id  PARAMLIST; 
form_name VARCHAR2(20); 
BEGIN
 pl_id := Get_Parameter_List('list_data'); 
 IF NOT Id_Null(pl_id) THEN
  Destroy_Parameter_List( pl_id ); 
 END IF;
 pl_id := Create_Parameter_List('list_data'); 
 Add_Parameter(pl_id,'l_param',TEXT_PARAMETER,:item.param); 
 OPEN_FORM(Formb',activate, no_session, pl_id); 
END;