ERPKB

Некоторых системных администраторов раздражает, что Axapta позволяет создавать пользователям несколько сеансов и входить под одним пользователем несколько раз не выходя. Если вы хотите предупредить пользователя, что он уже входил под тим именем, то вод решение: В классе Info измените метод startupPost следующим образом:

void startupPost()
{
    int         counter;
    int         num = 0;
    int         maxSessions = Info::licensedUsersTotal();
    xSession    session;
    UserInfo    userInfo;
    UserId      currentUserId;
    ;
 
    currentUserId = curuserid();
    for(counter = 1; counter < maxSessions;counter++ )
    {
        session = new xSession(counter, true);
        if(session && session.userId())
        {
            select firstOnly userInfo
                where userInfo.id == session.userId();
 
            if (userInfo && (currentUserId == session.userId()))
            {  
                num++ ;
            }
        }
    }
 
    if (num > 1)
    {
        if(Вox::yesno("Вы пытаетесь посторно войти пот тем же именем пользователя, а это не разрешается. Все равно войти?",
                   DialogButton::Yes, "Войти", "Выйти") == DialogButton::No)
        {
            infolog.shutDown(true);
        }
    }
}