病案主页从表签名跟踪

create table 病案主页从表签名跟踪
(
  病人id NUMBER(18),
  主页id NUMBER(5),
  信息名  VARCHAR2(20),
  信息值  VARCHAR2(100),
  日期   DATE
)
tablespace USERS
  pctfree 10
  initrans 1
  maxtrans 255
  storage
  (
    initial 16
    next 8
    minextents 1
    maxextents unlimited
  );

grant select, insert,  update, delete,references,alter,index on 病案主页从表签名跟踪 to PUBLIC;

create or replace trigger 病案主页从表签名跟踪
  before INSERT OR UPDATE on 病案主页从表
  for each row
begin
  if :new.信息名 like '%科主任%' then
    insert into 病案主页从表签名跟踪
    values
      (:new.病人id, :new.主页id, :new.信息名, :new.信息值, sysdate);
  end if;
end;