Создание Lookup формы

[Maxim Gorbunov]

Создание Lookup формы

В качестве Lookup формы может выступать любая форма Axapta.

Внедрение Lookup формы
Существует два пути внедрения Lookup формы.

Внедрение в качестве FormHelp для Extended Data Type.
Если указать название формы в поле Form Help у Extended Data Type, во всех таблицах, где выполняется lookup по полю этого типа, будет использоваться указанная lookup форма.

Внедрение непосредственно в Grid в методе lookup выбранного столбца. Метод lookup вызывается при нажатии на lookup-кнопку. Его метод super открывает стандартную lookup форму (grid с выбранными столбцами). Для использования другой формы следует вместо вызова метода super добавить вызов метода performFormLookup объекта, который осуществил вызов метода (то есть this.performFormLookup). В качестве параметра этому методу передаются объект типа FormRun, поэтому перед его вызовом необходимо создать форму, которая будет использоваться для lookup. Полный текст метода lookup может быть, например, таким:

  void Lookup()
  {
      FormRun FR = New FormRun(New Args("ColorLookup"));
      FR.Init();
      this.PerformFormLookup(FR);
  }

Структура Lookup формы
Во-первых, следует изменить значение свойства Frame формы на Border или None, чтобы при ее вызове не появлялся заголовок. Форма должна закрываться методом CloseSelect(str). В качестве строки этому методу передается значение, которое будет результатом lookup.

PerformFormLookup вызывает метод SelectMode у формы, переданной ему в качестве параметра. Этот метод переводит форму в SelectMode. SelectMode можно вызвать и самостоятельно. В качестве параметра следует передать FormControl. В этом случае можно не закрывать форму с помощью CloseSelect, а результат будет взят из поля value указанного Control.

Форма, вызванная методом PerformFormLookup, закрывается автоматически при переводе фокуса. Эту проблему можно решить, например, используя дополнительный флаг, сообщающий о том, что выбор сделан. Теперь вызывать метод super у closeSelect следует только в том случае, когда флаг установлен. Пример смотрите в форме HB_Tutorial_CustomLookup.

Изменение lookup-пиктограммы
При использовании Extended Data Type появляется возможность изменять для полей этого типа lookup-пиктограмму, изображенную на кнопке, нажатие на которую вызывает lookup. Это делается изменением значения поля ButtonImage у Extended Data Type. Возможные значения: Arrow (по умолчанию), Mail, URL, Three Dots, Open File и Calendar.

Использование группы полей AutoLookup для создания Lookup формы
Стандартная Lookup форма вызывается, когда определен relation в таблице. Пусть Table1 и Table2 связаны relation Table2.ID == Table1.ID. В формах, использующих значение Table2.ID появиться возможность использовать стандартную Lookup форму. По умолчанию она будет состоять из Grid с одним столбцом Table1.ID. Можно расширить набор столбцов, добавив новые поля в группу AutoLookup у Table1 (разумеется, это должны быть поля Table1).

Пример
В качестве примера используйте проект Произвольная Lookup форма.

Максим Горбунов

[Александр_1975]

А как управлять сортировкой в LookUp-форме?

[Yuri Safronov]

Перекрыть метод lookup у элемента, у которого выпадает lookup-форма:

PHP код:

public void lookup()
{
    PriceDiscAdmTable priceTable;
    ;

    super();

    priceTable.lookupOpenJournal(this);
} 


А в таблицу PriceDiscAdmTable добавляем метод:

PHP код:

client void lookupOpenJournal(Object _lookupCtrl)
{
    SysTableLookup          sysTableLookup;
    Query                   query = new Query();
    QueryBuildDataSource    queryBuildDataSource;
    QueryBuildRange         queryBuildRange;
    ;

    sysTableLookup       = SysTableLookup::newParameters(tableNum(PriceDiscAdmTable), _lookupCtrl);
    queryBuildDataSource = query.addDataSource(tableNum(PriceDiscAdmTable));
    queryBuildRange      = queryBuildDataSource.addRange(fieldNum(PriceDiscAdmTable, posted));
    queryBuildRange.value( queryValue(NoYes::No) );

    // Здесь мы собственно и задаём порядок сортировки
    queryBuildDataSource.addSortField(fieldnum(PriceDiscAdmTable, JournalNum), SortOrder:: Descending );
    
    sysTableLookup.addLookupfield(fieldNum(PriceDiscAdmTable, JournalNum));
    sysTableLookup.addLookupfield(fieldNum(PriceDiscAdmTable, JournalName));
    sysTableLookup.addLookupfield(fieldNum(PriceDiscAdmTable, Name));
    sysTableLookup.addLookupfield(fieldNum(PriceDiscAdmTable, Posted));

    sysTableLookup.parmQuery(query);
    sysTableLookup.performFormLookup();
} 


Вообще-то можно в перекрытый метод lookup добавить тот код, который я добавил в метод таблицы. Но правильно будет сделать так как я написал.

[Damn]

А почему ширину полей руками менять нельзя в стандартном lookup-е ? Искал-искал в форуме, не нашёл как это сделать.

[Yuri Safronov]

Как это сделать я не знаю.
Попробуй двойное нажатие левой кнопки мыши между названиями столбцов. Устанавливается ширина колонки равная самой длинной строке столбца. Но это помогает когда ты видишь не все данные в поле.

[ATimTim]

Сделал lookup, как описано выше .
Вопрос возник по фильтрованному спсику.
Когда вводишь посредством спика, то все хорошо - список соответсвует критериям фильтра . Но остается одна лазейка - ввод вручную. В этом случае получиться ввести значение, которое не соответствует фильтру, главное чтобы оно просто было таблице-списке.
Как закрыть эту лазейку?

[Maxim Gorbunov]

Смотрите метод validateField у таблицы и DataSource

[Yuri Safronov]

Максим прав, нужно перекрыть метод validateField .
Но, как в нём проверить, что полученное значение удовлетворяет критериям queryBuildRange?

Есть разные пути решения этого вопроса, но универсального я не знаю.

[AndyG]

Существует 3-й способ внедрения Lookup формы, на источнике данных перекрыть метод Lookup, например \Forms\Address\Data Sources\Address\Fields\State\Methods.

Если не трудно можно поподробнее рассказать о таком варианте?

[gefr]

Такой вопрос:
1. Создаю Форму.
2. Вставляю в нее datasource, grid, поля в grid.
3. Прописываю

this.selectMode(Grid_ItemId);
Grid_ItemId.setFocus();

4. Выставляю фильтр из настроек (для чего и писалась форма)
5. Привязываю его непосредственно в HelpForm.

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