CREATE OR REPLACE TRIGGER "SYS"."INTERDIRE_SQLPLUS" AFTER
LOGON ON DATABASE DECLARE
v_sid sys.v_$session.sid%type;
v_username sys.v_$session.username%type;
v_program sys.v_$session.program%type;
BEGIN
EXECUTE IMMEDIATE 'SELECT distinct sid FROM sys.v_$mystat' INTO v_sid;
EXECUTE IMMEDIATE 'SELECT program FROM sys.v_$session WHERE sid = :v_sid2' INTO v_program USING v_sid;
EXECUTE IMMEDIATE 'SELECT username FROM sys.v_$session WHERE sid = :v_sid2' INTO v_username USING v_sid;
IF (v_program !='Edition_Facture.exe' or v_program != 'Ligne1000.exe') AND v_username = 'AESL1000ESE' THEN
RAISE_APPLICATION_ERROR(-20001,'Connexion avec '||v_username||' sous '||v_program||' interdite, contacter le DBA', TRUE);
END IF;
END;
Partager