PACKAGE BODY: APPS.OKI_LOAD_SGR_PUB

Source

1 PACKAGE BODY oki_load_sgr_pub AS
2 /* $Header: OKIPSGRB.pls 115.3 2002/06/06 11:34:37 pkm ship        $ */
3 --------------------------------------------------------------------------------
4 -- Modification History
5 -- 10-Oct-2001 mezra        Initial version
6 --
7 --------------------------------------------------------------------------------
8 
9 --------------------------------------------------------------------------------
10   -- Procedure to create all the sequential growth rate records.
11 
12 --------------------------------------------------------------------------------
13   PROCEDURE crt_seq_grw
14   (   x_errbuf                    OUT VARCHAR2
15     , x_retcode                   OUT VARCHAR2
16     , p_period_set_name           IN  VARCHAR2
17     , p_period_type               IN  VARCHAR2
18     , p_start_summary_build_date  IN  VARCHAR2
19     , p_end_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_start_summary_build_date  DATE := NULL ;
28   l_end_summary_build_date    DATE := NULL ;
29 
30 
31   BEGIN
32 
33     -- Convert the varchar2 date input to a date datatype
34     l_start_summary_build_date  :=
35                    fnd_conc_date.string_to_date(p_start_summary_build_date) ;
36     l_end_summary_build_date    :=
37                    fnd_conc_date.string_to_date(p_end_summary_build_date) ;
38 
39 
40     -- Call procedure to create the sequential growth rate
41     oki_load_sgr_pvt.crt_seq_grw (
42           p_period_set_name           => p_period_set_name
43         , p_period_type               => p_period_type
44         , p_start_summary_build_date  => l_start_summary_build_date
45         , p_end_summary_build_date    => l_end_summary_build_date
46         , x_errbuf                    => x_errbuf
47         , x_retcode                   => x_retcode ) ;
48 
49   END crt_seq_grw ;
50 
51 END oki_load_sgr_pub ;