Finding the Compromise – the Adapter Framework - Applied SOA Patterns on the Oracle Platform - page 382

new_trgBasicEvent.v_transferred := SYSDATE;
new_trgBasicEvent.v_processed := SYSDATE;
new_trgBasicEvent.v_appuser_code := 1;
if inserting then
new_trgBasicEvent.v_objref_action :='1';
elsif updating then
new_trgBasicEvent.v_objref_action :='2';
elsif deleting then
new_trgBasicEvent.v_objref_action :='3';
new_trgBasicEvent.v_objref_data := :OLD.ADDDRESS_ID;
end if;
------------------------------------------------------------------------------
-- Composite events key registration
-- . . .
------------------------------------------------------------------------------
XXCU_EHS_EVENT_HANDLER.register_event(new_BasicEvent =>
new_trgBasicEvent);
EXCEPTION
WHEN OTHERS THEN
msgtype := 'ERR';
msgid := SQLCODE;
msgtext := SQLERRM (msgid);
msgsrc := 'XXCU_EHS_REGEVENT_TRG.register_event';
XXCU_COMMON_LOG_RT.msglog (msgtype,
msgtext,
msgid,
1,
msgsrc,
9999
);
END XXCU_EHS_REGEVENT_TRG;
/
We decided to put almost the complete code for several reasons; some are as follows:
• From declaration of the BasicEvent record, you can immediately understand
the structure of the Event Log table, which we will use for physically decoupling