1: PACKAGE BODY cn_event_log_pkg AS
2: -- $Header: cnsyevlb.pls 115.5 2002/11/21 21:08:28 hlchen ship $
3:
4:
5: --
24: X_user_id := FND_GLOBAL.USER_ID ;
25:
26: -- Get Next Event Log sequence number.
27: -- This is returned to the caller for use in the Notify_Log call.
28: SELECT cn_event_log_s.NEXTVAL
29: INTO X_event_log_id
30: FROM sys.dual;
31:
32: -- Update Event Log with event information
29: INTO X_event_log_id
30: FROM sys.dual;
31:
32: -- Update Event Log with event information
33: INSERT INTO cn_event_log(
34: event_log_id,
35: event_log_date,
36: delete_date,
37: event_name,
178: END Comp_Plan_Event ;
179:
180:
181:
182: END cn_event_log_pkg;