LockIdentifiersPeriod: Integer;
LockIdentifiersPeriod: System.Int32;
The LockIdentifiersPeriod property determines period during which it is forbidden to reuse certificates of deleted users.
The period is in days. By default the property is set to 0.
To execute the example, add links to the Metabase, ForeSystem (for the Fore.NET example) system assemblies.
Sub UserProc;
Var
MB: IMetabase;
MS: IMetabaseSecurity;
Policy: IMetabasePolicy;
Lic: Object;
Begin
MB := MetabaseClass.Active;
// Check out license to work with security manager
Lic := MB.RequestLicense(UiLicenseFeatureType.Adm);
MS := MB.Security;
Policy := MS.Policy;
// Set period
Policy.LockIdentifiersPeriod := 10;
// Save changes
MS.Apply;
// Check in license
Lic := Null;
End Sub UserProc;
Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.ForeSystem;
…
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
MS: IMetabaseSecurity;
Policy: IMetabasePolicy;
Lic: Object;
Begin
MB := Params.Metabase;
// Check out license to work with security manager
Lic := MB.RequestLicense(UiLicenseFeatureType.lftAdm);
MS := MB.Security;
Policy := MS.Policy;
// Set period
Policy.LockIdentifiersPeriod := 10;
// Save changes
MS.Apply();
// Check in license
Lic := Null;
End Sub;
After executing the example the period during which it is forbidden to reuse identifiers of deleted users will be set to ten days.
See also: