أريد منع جميع المستخدمين من دخول قاعدة البيانات عن طريق اي برنامج الا عن طريق Application

السلام عليكم

select SYS_CONTEXT('USERENV','Module') from dual

قم بإنشاء هذا الTrigger في المستخدم SYS

CREATE OR REPLACE TRIGGER killsession
after logon on database
declare
X NUMBER;
Y NUMBER;
CURSOR CURCUR IS SELECT SID,SERIAL# FROM V$SESSION WHERE program is not null and  program <>'Application_name'; 
begin
OPEN CURCUR;
LOOP
FETCH CURCUR INTO X,Y;
EXIT WHEN CURCUR%NOTFOUND;
EXECUTE IMMEDIATE 'ALTER SYSTEM KILL SESSION '''||x||','||y||'''';
end LOOP;
CLOSE CURCUR;
END;
/