IDynamicInstance.OperationsVisibility

Синтаксис Fore

OperationsVisibility: DynamicInstanceOperationsVisibility;

Синтаксис Fore.NET

OperationsVisibility: Prognoz.Platform.Interop.Dimensions.DynamicInstanceOperationsVisibility;

Описание

Свойство OperationsVisibility возвращает информацию о том, в каких справочниках будут отображаться изменения.

Пример Fore

Для выполнения примера предполагается наличие в репозитории табличного справочника НСИ с настроенной динамической загрузкой элементов и с идентификатором «DYNDIM».

Добавьте ссылки на системные сборки: Dimensions и Metabase.

Sub UserProc;
Var
    MB: IMetabase;
    Dim: IDynamicInstance;
    i: Integer;
Begin
    MB := MetabaseClass.Active;
    Dim := MB.ItemById("DYNDIM").Open(NullAs IDynamicInstance;
    // Выведем наименования дочерних справочников
    For i := 1 To Dim.ChildrenInstancesCount Do
        Debug.WriteLine("Наименование дочернего справочника: " + Dim.ChildInstance(i - 1).DimInstance.Name);
    End For;
    // Выведем информацию о распространении изменений основного справочника
    Select Case Dim.OperationsVisibility
        Case DynamicInstanceOperationsVisibility.Local:
            Debug.WriteLine("Изменения основного справочника не распространяются на другие справочники");
        Case DynamicInstanceOperationsVisibility.Global:
            Debug.WriteLine("Изменения основного справочника распространяются на дочерние справочники");
        Case DynamicInstanceOperationsVisibility.PreSet:
            Debug.WriteLine("Изменения основного справочника распространяются на справочники множества " 
                    + Dim.PreSetMark);
    End Select;
End Sub UserProc;

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

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.

Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    Dim: IDynamicInstance;
    i: Integer;
Begin
    MB := Params.Metabase;
    Dim := MB.ItemById["DYNDIM"].Open(NullAs IDynamicInstance;
    // Выведем наименования дочерних справочников
    For i := 1 To Dim.ChildrenInstancesCount Do
        System.Diagnostics.Debug.WriteLine("Наименование дочернего справочника: " + 
            Dim.ChildInstance[i - 1].DimInstance.Name);
    End For;
    // Выведем информацию о распространении изменений основного справочника
    Select Case Dim.OperationsVisibility
        Case DynamicInstanceOperationsVisibility.diovLocal: 
            System.Diagnostics.Debug.WriteLine("Изменения основного справочника не распространяются на другие справочники");
        Case DynamicInstanceOperationsVisibility.diovGlobal: 
            System.Diagnostics.Debug.WriteLine("Изменения основного справочника распространяются на дочерние справочники");
        Case DynamicInstanceOperationsVisibility.diovPreSet: 
            System.Diagnostics.Debug.WriteLine("Изменения основного справочника распространяются на справочники множества " 
                + Dim.PreSetMark);
    End Select;
End Sub;

См. также:

IDynamicInstance