如何在Oracle中开发after serverror触发器？

CREATE OR REPLACE PROCEDURE log_serverror (
    err_msg IN VARCHAR2,
    err_code IN NUMBER
) AS
BEGIN
    -- 在这里记录错误信息和错误代码
    INSERT INTO error_log (error_message, error_code) VALUES (err_msg, err_code);
    COMMIT;
END;

CREATE OR REPLACE TRIGGER log_serverror_trigger
AFTER SERVERERROR ON DATABASE
BEGIN
    log_serverror(SQLERRM, SQLCODE);
END;