CREATE TABLE SOMELOG (MESSAGE VARCHAR2(80), LOG_DATE DATE);

CREATE OR REPLACE PROCEDURE WRITE_LOG(pMessage VARCHAR2) AS
PRAGMA AUTONOMOUS_TRANSACTION;
BEGIN
   INSERT INTO SOMELOG VALUES (pMessage, SYSDATE);
   COMMIT;
END;
/

CREATE OR REPLACE PROCEDURE FAIL_PROC IS
BEGIN
   WRITE_LOG('START FAIL_PROC');
   
   RAISE NO_DATA_FOUND;

   WRITE_LOG('END FAIL_PROC');
END;
/


DEV1> EXEC FAIL_PROC;
BEGIN FAIL_PROC; END;

*
ERROR at line 1:
ORA-01403: no data found
ORA-06512: at "DMVPHX\BOILEAU_JEANP.FAIL_PROC", line 5
ORA-06512: at line 1


DEV1> SELECT * FROM SOMELOG;

MESSAGE
--------------------------------------------------------------------------------
LOG_DATE
---------
START FAIL_PROC
16-SEP-19