求助一个简单的 PL/SQL编成 4

Question

创建一个系统的触发器----用于自动记录用户注销数据库时的用户名和时间

Answer 1

1. 用 sys 用户登录 Oracle
2. 创建记录用户登录信息的表
CREATE TABLE LOG$INFORMATION 
( 
   ID        NUMBER(10), 
   USERNAME VARCHAR2(30), 
   LOGINTIME DATE, 
   TERMINAL VARCHAR2(50), 
   IPADRESS VARCHAR2(20), 
   OSUSER    VARCHAR2(30), 
   MACHINE   VARCHAR2(64), 
   PROGRAM   VARCHAR2(64), 
   SID       NUMBER, 
   SERIAL#   NUMBER, 
   AUSID     NUMBER 
) 
3. 创建一个 Sequence，作为登录信息的主键
CREATE SEQUENCE LOGIN_SEQ 
minvalue 1 
maxvalue 9999999999 
start with 1 
increment by 1 
cache 204. 创建触发器，记录用户登录信息
CREATE OR REPLACE TRIGGER LOGIN_RECORD_TR 
AFTER logon ON DATABASE 
DECLARE 
mtSession v$session%ROWTYPE; 
CURSOR cSession(iiQuerySid IN NUMBER) IS 
    SELECT * FROM v$session 
       WHERE audsid = iiQuerySid; 
BEGIN 
OPEN cSession(userenv('SESSIONID')); 
   FETCH cSession INTO mtSession; 
      IF cSession%FOUND AND SYS_CONTEXT ('USERENV','IP_ADDRESS') IS NOT NULL THEN 
         INSERT INTO log$information(
            id,
            username,
            logintime,
            terminal,
            ipadress,
            osuser,
            machine,
            program,
            sid,
            serial#,
            ausid
         ) VALUES(
            login_seq.nextval,
            USER,
            SYSDATE,
            mtSession.Terminal, 
            SYS_CONTEXT ('USERENV','IP_ADDRESS'),
            mtSession.Osuser,
            mtSession.Machine,
            mtSession.Program,
            mtSession.Sid,
            mtSession.Serial#,
            userenv('SESSIONID')
         ); 
      END IF; 
   CLOSE cSession; 
EXCEPTION 
   WHEN OTHERS THEN 
     RAISE; 
END;
/

Answer 2

http://topic.csdn.net/u/20100605/21/eddf1731-1df5-4d59-8769-67057297505c.html?seed=71308516&r=66017537#r_66017537感激不尽噢