6: RETCODE OUT NOCOPY VARCHAR2,
7: DATE_OFFSET IN NUMBER := 1
8: ) AS
9: BEGIN
10: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Start purging the km session attribute values for the previous day.');
11:
12: delete from cs_kb_session_attrs where attribute_type = 'EXTERNAL' and creation_date < ( trunc(sysdate) - DATE_OFFSET );
13:
14: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Completed purging the km session attribute.');
10: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Start purging the km session attribute values for the previous day.');
11:
12: delete from cs_kb_session_attrs where attribute_type = 'EXTERNAL' and creation_date < ( trunc(sysdate) - DATE_OFFSET );
13:
14: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Completed purging the km session attribute.');
15:
16: EXCEPTION
17: WHEN OTHERS THEN
18: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Unhandled exception in CS_PURGE_KM_SESSION_ATTRS_PKG');
14: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Completed purging the km session attribute.');
15:
16: EXCEPTION
17: WHEN OTHERS THEN
18: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Unhandled exception in CS_PURGE_KM_SESSION_ATTRS_PKG');
19: ERRBUF:='Please review Log for details';
20: RETCODE:='2';
21: END start_program;
22: END CS_PURGE_KM_SESSION_ATTRS_PKG;