第一个简单的存储过程：

create or replace procedure update_sal(id number,name varchar2) is
v_sqlcode number;
v_sqlerrm varchar(1000);
begin
  insert into testa (id,name) values (id,name);
  commit;
exception
  WHEN OTHERS Then
    v_sqlcode := sqlcode;
    v_sqlerrm := sqlerrm;
    dbms_output.put_line
      ('写日志表错误: ' || to_char(sysdate,'YY-MM-DD HH24:MI:SS') || ' ' || ' ' || v_sqlcode || ' ' ||  v_sqlerrm);
end;

调用：

call update_sal(1,'123');
exec update_sql(1,'123');