IUserEmails.Add

Синтаксис Fore

Add(Name: String; Email: String): IUserEmail;

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

Add(Name: String; Email: String): Prognoz.Platform.Interop.Metabase.IUserEmail;

Параметры

Name. Наименование создаваемой записи.

Email. Значение адреса.

Описание

Метод Add добавляет в коллекцию запись о пользовательской электронной почте и возвращает ее параметры.

Наименование записи должно быть уникальным. Если при выполнении метода в качестве значения параметра Name указано наименование существующей записи, то генерируется исключительная ситуация.

Пример Fore

Sub UserProc;
Var
    Mb: IMetabase;
    User: IMetabaseUser;
    Prof: IUserProfile;
    Email: IUserEmail;
Begin
    Mb := MetabaseClass.Active;
    User := Mb.LogonSession.User;
    Prof := User.Profile.Edit;
    Email := Prof.Emails.Add("Default", "user_mail@example.ru");
    Email.SetDefault;
    Prof.Apply;
End Sub UserProc;

При выполнении примера будет изменен профиль пользователя, под которым осуществлен вход в репозиторий. В профиле будет добавлена запись с адресом пользовательской электронной почтой. Данный адрес будет назначен в качестве адреса по умолчанию для пользователя.

Пример Fore.NET

Указанная процедура является точкой входа для .NET-сборки.

Public Shared Sub Main(Params: StartParams);
Var
    Mb: IMetabase;
    User: IMetabaseUser;
    Prof: IUserProfile;
    Email: IUserEmail;
Begin
    Mb := Params.Metabase;
    User := Mb.LogonSession.User;
    Prof := User.Profile.Edit();
    Email := Prof.Emails.Add("Default", "user_mail@example.ru");
    Email.SetDefault();
    Prof.Apply();
End Sub;

См. также:

IUserEmails