SQL获取IP电脑名

create or replace trigger dytrack.tri_49
  before insert or update
  on trk_lw_detail 
  for each row
declare
  -- local variables here
begin
   if :new.mat_state=49 then
       IF inserting THEN
          INSERT INTO  trig_sql
              select sysdate,s.SID, s.SERIAL#, s.USERNAME, s.OSUSER,
                     s.MACHINE, s.TERMINAL, s.PROGRAM, q.sql_text line,
                     'INSERT',
                    sys_context('userenv','ip_address')
                from v$sql q, v$session s
                where s.audsid=(select userenv('SESSIONID') from dual)
                 and s.prev_sql_addr=q.address
                 AND s.PREV_HASH_VALUE = q.hash_value;
        
     
        ELSIF updating then
            INSERT INTO  trig_sql
                 select sysdate,s.SID, s.SERIAL#, s.USERNAME, s.OSUSER,
                             s.MACHINE, s.TERMINAL, s.PROGRAM, q.sql_text line,
                             'UPDATE',
                             sys_context('userenv','ip_address')
                   from v$sql q, v$session s
                   where s.audsid=(select userenv('SESSIONID') from dual)
                   and s.prev_sql_addr=q.address
                   AND s.PREV_HASH_VALUE = q.hash_value;
   
        END IF;
   
   end if;
end tri_49;