Выложу код для примера, можно потом будет в FAQ положить :)
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
CREATE PROCEDURE sp_Login_Init ()
BEGIN
IF User_Name() <> 'DBA'
THEN
IF (SELECT Count(*)
FROM sa_Conn_Info()
WHERE DBNumber = Connection_Property('DBNumber') AND
UserID = User_Name() ) > 1
THEN
RAISERROR 20000 'Такой пользователь уже подключен';
END IF;
END IF;
END;
SET OPTION PUBLIC.LOGIN_PROCEDURE = 'sp_Login_Init';
Теперь кроме DBA никто не имеет права подключаться дважды к БД. IMHO это не очень хорошо, я бы ввел еще проверку на адрес машины, чтобы нельзя было подключаться только с разных машин. Иначе при запущенном клиентском приложении уже нельзя будет вызвать тот же отчетник (FastReport/CrystalReport), который работает в отдельной сесии или утилиты самой ASA.
