PACKAGE BODY: APPS.OKI_LOAD_RAG_PUB

Source

1 PACKAGE BODY oki_load_rag_pub AS
2 /* $Header: OKIPRAGB.pls 115.4 2002/12/01 17:53:49 rpotnuru noship $ */
3 --------------------------------------------------------------------------------
4 -- Modification History
5 -- 19-Sep-2001  mezra        Initial version
6 -- 26-NOV-2002 rpotnuru     NOCOPY Changes
7 --
8 --------------------------------------------------------------------------------
9 
10 --------------------------------------------------------------------------------
11   -- Procedure to create all the renewal aging records.
12 
13 --------------------------------------------------------------------------------
14   PROCEDURE crt_rnwl_aging
15   (   x_errbuf             OUT NOCOPY VARCHAR2
16     , x_retcode            OUT NOCOPY VARCHAR2
17     , p_period_set_name    IN  VARCHAR2
18     , p_period_type        IN  VARCHAR2
19     , p_summary_build_date IN  VARCHAR2
20   ) IS
21 
22 
23   -- Local variable declaration
24 
25   -- Effective date of the job run.
26   -- Also treated as "current DATE" for bin calculations (e.g., aging reports).
27   l_summary_build_date DATE := NULL ;
28 
29 
30   BEGIN
31 
32     -- Convert the varchar2 date input to a date datatype
33     l_summary_build_date := fnd_conc_date.string_to_date(p_summary_build_date);
34 
35 
36     -- Call procedure to create the renewal aging
37     oki_load_rag_pvt.crt_rnwl_aging (
38           p_period_set_name    => p_period_set_name
39         , p_period_type        => p_period_type
40         , p_summary_build_date => l_summary_build_date
41         , x_errbuf             => x_errbuf
42         , x_retcode            => x_retcode ) ;
43 
44   END crt_rnwl_aging ;
45 
46 END oki_load_rag_pub ;