PACKAGE BODY: APPS.OKI_LOAD_WBC_PUB

Source

1 PACKAGE BODY oki_load_wbc_pub AS
2 /* $Header: OKIPWBCB.pls 115.8 2002/12/01 17:53:31 rpotnuru noship $ */
3 
4 -- 26-NOV-2002 rpotnuru     NOCOPY Changes
5 --------------------------------------------------------------------------------
6   -- Procedure to create all the wip by customer records.
7 
8 --------------------------------------------------------------------------------
9   PROCEDURE crt_wip_by_cust
10   (   x_errbuf             OUT NOCOPY VARCHAR2
11     , x_retcode            OUT NOCOPY VARCHAR2
12     , p_period_set_name    IN  VARCHAR2
13     , p_period_type        IN  VARCHAR2
14     , p_summary_build_date IN  VARCHAR2
15   ) IS
16 
17 
18   -- Local variable declaration
19 
20   -- Effective date of the job run.
21   -- Also treated as "current date" for bin calculations (e.g., aging reports).
22   l_summary_build_date DATE := NULL ;
23 
24   BEGIN
25 
26     -- Convert the varchar2 date input to a date datatype
27     l_summary_build_date := fnd_conc_date.string_to_date(p_summary_build_date);
28 
29     -- Call procedure to create the WIP by customers
30     oki_load_wbc_pvt.crt_wip_by_cust (
31           p_period_set_name    => p_period_set_name
32         , p_period_type        => p_period_type
33         , p_summary_build_date => l_summary_build_date
34         , x_errbuf             => x_errbuf
35         , x_retcode            => x_retcode ) ;
36 
37   END crt_wip_by_cust ;
38 
39 END oki_load_wbc_pub ;