IMetabaseUser.Profile

Синтаксис Fore

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

Описание

Свойство Profile возвращает профиль пользователя.

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

Пример Fore

Sub UserProc;
Var
    Mb: IMetabase;
    User: IMetabaseUser;
    Prof: IUserProfile;
    Emails: IUserEmails;
Begin
    Mb := MetabaseClass.Active;
    User := Mb.LogonSession.User;
    Prof := User.Profile.Edit;
    //Адрес по умолчанию
    Prof.Email := "user_work@example.ru";
    Emails := Prof.Emails;
    //Мобильный, рабочий и домашний адреса
    Emails.Mobile := "user_mobile@example.ru";
    Emails.Working := "user_work@example.ru";
    Emails.Personal := "user_personal@example.ru";
    //Применить изменения профиля
    Prof.Apply;
End Sub UserProc;

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

Пример Fore.NET

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

Public Shared Sub Main(Params: StartParams);
Var
    Mb: IMetabase;
    User: IMetabaseUser;
    Prof: IUserProfile;
    Emails: IUserEmails;
Begin
    Mb := Params.Metabase;
    User := Mb.LogonSession.User;
    Prof := User.Profile.Edit();
    //Адрес по умолчанию
    Prof.Email := "user_work@example.ru";
    Emails := Prof.Emails;
    //Мобильный, рабочий и домашний адреса
    Emails.Mobile := "user_mobile@example.ru";
    Emails.Working := "user_work@example.ru";
    Emails.Personal := "user_personal@example.ru";
    //Применить изменения профиля
    Prof.Apply();
End Sub;

См. также: