1: package body IEU_UWQM_AUDIT_LOG_PKG as
2: /* $Header: IEUVUALB.pls 120.0 2005/06/02 15:54:02 appldev noship $ */
3: procedure INSERT_ROW (
4: P_ACTION_KEY IN VARCHAR2,
5: P_EVENT_KEY IN VARCHAR2,
71: WHEN OTHERS THEN
72: l_work_item_number := null;
73: END;
74:
75: insert into IEU_UWQM_AUDIT_LOG
76: ( AUDIT_LOG_ID,
77: OBJECT_VERSION_NUMBER,
78: CREATED_BY,
79: CREATION_DATE,
128: ERROR_CODE,
129: LOGGING_LEVEL)
130: values
131: (
132: IEU_UWQM_AUDIT_LOG_S1.NEXTVAL,
133: 1,
134: FND_GLOBAL.USER_ID,
135: SYSDATE,
136: FND_GLOBAL.USER_ID,
241: begin
242:
243: l_audit_log_val := FND_PROFILE.VALUE('IEU_WR_DIST_AUDIT_LOG');
244:
245: UPDATE IEU_UWQM_AUDIT_LOG
246: SET
247: CREATED_BY = FND_GLOBAL.USER_ID,
248: CREATION_DATE = SYSDATE,
249: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
468: procedure DELETE_ROW (
469: P_WS_CODE IN VARCHAR2
470: ) is
471: begin
472: delete from IEU_UWQM_AUDIT_LOG
473: where WS_CODE = P_WS_CODE;
474:
475: if (sql%notfound) then
476: raise no_data_found;
477: end if;
478:
479: end DELETE_ROW;
480:
481: end IEU_UWQM_AUDIT_LOG_PKG;