DataEntryForm.CreateByDataEntryForm

Синтаксис

CreateByDataEntryForm(descriptor: IMetabaseObjectDescriptor; forEdit: Boolean);

Параметры

descriptor. Описание существующего объекта репозитория, являющегося формой ввода;

forEdit. Признак открытия формы ввода на редактирование.

Описание

Конструктор CreateByDataEntryForm создаёт экземпляр формы ввода на базе существующего объекта репозитория.

Пример

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

Добавьте ссылки на системные сборки: Dimensions, Metabase, Report. Также добавьте ссылки на сборки, которые необходимы для работы с формами ввода.

Public Sub CreateAndEditDEF(Report: IPrxReport);
Var
    DEFParent, DEFormDesc: IMetabaseObjectDescriptor;
    DEForm: IDataEntryForm;
Begin
    DEFParent := (Report As IMetabaseObject).Parent.Parent;
    DEFormDesc := DataEntryForm.CreateInputForm("Новая форма ввода", "NEW_DEF", DEFParent.Key);
    DEForm := New DataEntryForm.CreateByDataEntryForm(DEFormDesc, True);
    //...
    // Настройка новой формы ввода
    //...
    DEForm.Save;
    DEForm._Dispose;
End Sub CreateAndEditDEF;

Данный макрос в общем виде показывает каким образом может быть создана и открыта на редактирование новая форма ввода.

См. также:

DataEntryForm