IMetabaseUpdateNode.AccessAllowed

Fore Syntax

AccessAllowed([accesstype: MetabaseUpdateCopyType = 1]):MetabaseUpdateNodeAccessType;

Fore.NET Syntax

AccessAllowed(accesstype: Prognoz.Platform.Interop.Metabase.MetabaseUpdateCopyType):MetabaseUpdateNodeAccessType;

Parameters

accesstype. Type of object copying. Optional parameter, default value is 1 (Available).

Description

The AccessAllowed property returns the type of access to the update object.

Fore Example

To execute the example, add a link to the Metabase system assembly. The C:\Update.pefx update file is required. The object with the OBJ1 identifier is required in the repository.

Sub Main;
Var
    MB: IMetabase;
    Update: IMetabaseUpdate;
    UON: IMetabaseUpdateObjectNode;
    obj: IMetabaseObjectDescriptor;
    objkey: integer;
Begin
    MB := MetabaseClass.Active;
    Update := Mb.CreateUpdate;
    Update.LoadFromFileNF("D:\Update.pefx");
    obj := MB.ItemById("OBJ1");
    objkey := obj.Key;
    Update.AllowReplaceSD := True;
    UON := Update.RootFolder.FindObject(objkey);
    UON.UpdatePart := MetabaseObjectUpdatePart.ReplaceSecurityDescriptor;
    debug.WriteLine(UON.AccessAllowed);
End Sub Main;

After executing the example the console window displays the information with the type of access to the object with the OBJ1 identifier.

Fore.NET Example

To execute the example, add a link to the Metabase system assembly. The C:\Update.pefx update file is required. The object with the OBJ1 identifier is required in the repository.

Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    Update: IMetabaseUpdate;
    UON: IMetabaseUpdateObjectNode;
    obj: IMetabaseObjectDescriptor;
    objkey: uinteger;
Begin
    MB := Params.Metabase;
    Update := Mb.CreateUpdate();
    Update.LoadFromFileNF("D:\"+ "Update.pefx", UpdateLoadMode.ulmReplace);
    obj := MB.ItemById["FLASH_DO"];
    objkey := obj.Key;
    Update.AllowReplaceSD := True;
    UON := Update.RootFolder.FindObject(objkey);
    UON.UpdatePart := MetabaseObjectUpdatePart.moupReplaceSecurityDescriptor;
    System.Diagnostics.Debug.WriteLine(UON.AccessAllowed[MetabaseUpdateCopyType.muctAvailable]);
    End Sub;

After executing the example the console window displays the information with the type of access to the object with the OBJ1 identifier.