GetObjectControlIsEmpty(ObjectKey: Integer): Boolean;
GetObjectControlIsEmpty(ObjectKey: UInteger): Boolean;
ObjectKey. Ключ вложенного объекта.
Метод GetObjectControlIsEmpty возвращает признак отсутствия настроек по управлению параметрами указанного объекта.
Свойство возвращает одно из следующих значений:
True. Для указанного объекта не настроено управление параметрами.
False. Для указанного объекта настроено управление параметрами.
Для выполнения примера предполагается наличие в репозитории куба с идентификатором «STD_CUBE». Данный куб имеет в своей структуре измерение, которое построено на параметрическом справочнике «COUNTRY». Добавьте ссылку на системную сборку Metabase.
Sub UserProc;
Var
MB: IMetabase;
MObj: IMetabaseObject;
ControlInfo: IMetabaseObjectControlInfo;
ControlEmpty: Boolean;
Begin
MB := MetabaseClass.Active;
MObj := Mb.ItemById("STD_CUBE").Edit;
ControlInfo := MObj.Params.ControlInfo;
ControlEmpty := ControlInfo.GetObjectControlIsEmpty(MB.GetObjectKeyById("COUNTRY"));
Debug.WriteLine(ControlEmpty);
End Sub UserProc;
При выполнении примера в консоль среды разработки будет выведено значение True, если в кубе управление параметрами для справочника «COUNTRY» не настроено и False, если настроено.
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.
Imports Prognoz.Platform.Interop.Metabase;
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
MObj: IMetabaseObject;
ControlInfo: IMetabaseObjectControlInfo;
ControlEmpty: Boolean;
Begin
MB := Params.Metabase;
MObj := Mb.ItemById["STD_CUBE"].Edit();
ControlInfo := MObj.Params.ControlInfo;
ControlEmpty := ControlInfo.GetObjectControlIsEmpty(MB.GetObjectKeyById("COUNTRY"));
System.Diagnostics.Debug.WriteLine(ControlEmpty);
End Sub;
См. также: