1 PACKAGE OKC_PURGE_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKCVPURS.pls 120.0 2005/05/25 19:47:43 appldev noship $ */
3
4 G_PKG_NAME VARCHAR2(30):= 'OKC_PURGE_PVT';
5
6 /*
7 -- PROCEDURE purge
8 -- Called by concurrent program to purge old data.
9 -- Parameter p_num_days is how far in the past to end the purge
10 -- p_purge_type is a lookup_code based on lookup_type OKC_PURGE_TYPE
11 -- indicating what kind of purge
12 */
13 PROCEDURE purge (
14 errbuf OUT NOCOPY VARCHAR2,
15 retcode OUT NOCOPY VARCHAR2,
16 p_purge_type IN VARCHAR2,
17 p_num_days IN NUMBER default 3);
18
19 END OKC_PURGE_PVT;