Можно ли сделать проверку на базе(выполнение процедуры), при каждом подключении к базе. Нужно это для ведения статистики: кто, когда с какого приложения подключился, проверка монопольности подключения если надо.
Если можно то как?

Спасибо, именно то.
Но проблема - не могу вывести уведомление пользователю и закрыть соединение. может в ASA7 надо иначе поступать?
Попитка1: из BOL Version 8.0.1
create procedure DBA.login_check()
begin
declare INVALID_LOGON exception for sqlstate '28000';
// Allow a maximum of 3 concurrent connections
if( db_property('ConnCount') > 3 ) then
signal INVALID_LOGON;
//ничего не происходит
else
call sp_login_environment;
end if;
end
go
grant execute on DBA.login_check to PUBLIC
go
set option PUBLIC.Login_procedure='DBA.login_check'

Попитка2: из Форума, средство от ASCRUS
REATE PROCEDURE sp_OnLogin ()
BEGIN
DECLARE @Conn_id bigint;

DECLARE LOCAL TEMPORARY TABLE #Users (
UserName varchar(128) NOT NULL PRIMARY KEY
);

// Проверяем на присутствие уже залогиненных пользователей
SET @Conn_id = NEXT_CONNECTION(NULL);
WHILE @Conn_id IS NOT NULL LOOP
INSERT INTO #Users(UserName)
VALUES(Connection_Property('UserId', @Conn_id));

SET @Conn_id = NEXT_CONNECTION(@Conn_id);
END LOOP;

// Вызываем стандартную инициализацию сервера
CALL sp_login_environment ();

// Инициализируем глобальные переменные и еще что нибудь делаем
// ...
EXCEPTION
WHEN OTHERS THEN
RAISERROR 20000 'Такой пользователь уже подключен';
//не выполняется
END;
grant execute on DBA.sp_OnLogin to PUBLIC
go
set option PUBLIC.Login_procedure='DBA.sp_OnLogin'

На сколько я понял. RAISERROR, SIGNAL - генерируют ошыбку и выводят предупреждение для клиента.
для аса7 в BOL вычитал что
SQLSTATE = 28000 - Invalid user id or password

попытка1:
declare INVALID_LOGON exception for sqlstate value '28000';
signal INVALID_LOGON;
попытка2:
raiserror 28000 'Invalid user ID or password';

сообщение выводится, но соединение не разрывается.
примера в BOL проверки подключения для аса7 не нашел.

поставил у себя такую же процедуру
Дал пользователю на нее права, запускаю приложение.

sqlca.DBParm= /*Параметры подключения*/
Connect;
//если правильно вводить лигин и пароль то
//sqlca.SqlCode всегда = 0
///???????
IF sqlca.SqlCode <> 0 THEN
HALT CLOSE
ELSE

ENDIF

Через ODBC.
версия ASA 7.0.1.918

Спасибо mustlive и ARCRUS.
Действительно поставил версию ASA 7.0.4.3529 , и все заработало как часики.
Пора делать upgrade. :)