PACKAGE BODY: APPS.ICX_CAT_POPULATE_ASL_GRP

Source

1 PACKAGE BODY ICX_CAT_POPULATE_ASL_GRP AS
2 /* $Header: ICXGPPAB.pls 120.3 2006/01/31 17:03:30 sbgeorge noship $*/
3 
4 -- Constants
5 G_PKG_NAME      CONSTANT VARCHAR2(30):='ICX_CAT_POPULATE_ASL_GRP';
6 
7 PROCEDURE populateOnlineASLs
8 (       p_api_version           IN              NUMBER                                  ,
9         p_commit                IN              VARCHAR2 := FND_API.G_FALSE             ,
10         p_init_msg_list         IN              VARCHAR2 := FND_API.G_FALSE             ,
11         p_validation_level      IN              VARCHAR2 := FND_API.G_VALID_LEVEL_FULL  ,
12         x_return_status         OUT NOCOPY      VARCHAR2                                ,
13         p_key                   IN              NUMBER
14 )
15 IS
16 l_api_name                      CONSTANT VARCHAR2(30)   := 'populateOnlineASLs';
17 l_api_version                   CONSTANT NUMBER         := 1.0;
18 l_err_loc			PLS_INTEGER;
19 l_start_date			DATE;
20 l_end_date			DATE;
21 l_log_string			VARCHAR2(2000);
22 
23 BEGIN
24   l_err_loc := 100;
25   x_return_status := FND_API.G_RET_STS_SUCCESS;
26 
27   -- Stubbed out as per ECO 4911859 in R12
28 
29 EXCEPTION
30   WHEN OTHERS THEN
31     x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
32 END populateOnlineASLs;
33 
34 PROCEDURE populateOnlineASLStatusRule
35 (       p_api_version           IN              NUMBER                                  ,
36         p_commit                IN              VARCHAR2 := FND_API.G_FALSE             ,
37         p_init_msg_list         IN              VARCHAR2 := FND_API.G_FALSE             ,
38         p_validation_level      IN              VARCHAR2 := FND_API.G_VALID_LEVEL_FULL  ,
39         x_return_status         OUT NOCOPY      VARCHAR2                                ,
40         p_key                   IN              NUMBER
41 )
42 IS
43 l_api_name                      CONSTANT VARCHAR2(30)   := 'populateOnlineASLStatusRule';
44 l_api_version                   CONSTANT NUMBER         := 1.0;
45 l_err_loc			PLS_INTEGER;
46 l_start_date			DATE;
47 l_end_date			DATE;
48 l_log_string			VARCHAR2(2000);
49 
50 BEGIN
51   l_err_loc := 100;
52   x_return_status := FND_API.G_RET_STS_SUCCESS;
53 
54   -- Stubbed out as per ECO 4911859 in R12
55 
56 EXCEPTION
57   WHEN OTHERS THEN
58     x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
59 END populateOnlineASLStatusRule;
60 
61 END ICX_CAT_POPULATE_ASL_GRP;