MetabaseIdentifier: String;
Each repository object has the description, which can be worked with using the IMetabaseobjectdescriptor interface.
This repository identifier is used in object version control during update and will be taken into account in object properties.
For details about object version control during update see the General Policy Settings article.
To execute the example, add a link to the Metabase system assembly.
Sub Main;
Var
MB: IMetabase;
MS: IMetabaseSecurity;
Policy: IMetabasePolicy;
Lic: Object;
Begin
// Get the current repository
MB := MetabaseClass.Active;
// Get license to be able to work with the security manager
Lic := MB.RequestLicense(UiLicenseFeatureType.Adm);
MS := MB.Security;
Policy := MS.Policy;
// Set repository name
If Policy.MetabaseIdentifier = "" Then
Policy.MetabaseIdentifier := "REPOSITORY";
Else
Debug.WriteLine(Policy.MetabaseIdentifier);
End If;
// Save changes
MS.Apply;
// Check in license
Lic := Null;
End Sub Main;
After executing the example the repository identifier is set.
See also: