1 PACKAGE okl_subsidy_pool_approval_pvt AUTHID CURRENT_USER AS
2 /* $Header: OKLRSICS.pls 120.1 2005/10/30 03:17:07 appldev noship $ */
3
4 ---------------------------------------------------------------------------
5 -- GLOBAL EXCEPTIONS
6 ---------------------------------------------------------------------------
7 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
8
9 ---------------------------------------------------------------------------
10 -- GLOBAL VARIABLES
11 ---------------------------------------------------------------------------
12 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_SUBSIDY_POOL_APPROVAL_PVT';
13 G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
14 G_API_TYPE CONSTANT VARCHAR2(30) := '_PVT';
15 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
16 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
17
18 -------------------------------------------------------------------------------
19 -- PROCEDURE submit_pool_for_approval
20 -------------------------------------------------------------------------------
21 -- Start of comments
22 --
23 -- Procedure Name : submit_pool_for_approval
24 -- Description : This procedure is a wrapper that invokes a subsidy pool
25 -- : for initial pool approval
26 --
27 -- Business Rules : for initial pool to be approved, the pool should have exactly
28 -- one budget line of type ADDITION with a positive amount.
29 -- the pool and the line status should be NEW
30 --
31 -- Parameters : required parameters are p_subsidy_pool_id
32 -- Version : 1.0
33 -- History : 01-FEB-2005 SJALASUT created
34 -- End of comments
35
36 PROCEDURE submit_pool_for_approval(p_api_version IN NUMBER
37 ,p_init_msg_list IN VARCHAR2
38 ,x_return_status OUT NOCOPY VARCHAR2
39 ,x_msg_count OUT NOCOPY NUMBER
40 ,x_msg_data OUT NOCOPY VARCHAR2
41 ,p_subsidy_pool_id IN okl_subsidy_pools_b.id%TYPE
42 ,x_pool_status OUT NOCOPY okl_subsidy_pools_b.decision_status_code%TYPE
43 ,x_total_budgets OUT NOCOPY okl_subsidy_pools_b.total_budgets%TYPE);
44
45 -------------------------------------------------------------------------------
46 -- PROCEDURE submit_budget_for_approval
47 -------------------------------------------------------------------------------
48 -- Start of comments
49 --
50 -- Procedure Name : submit_budget_for_approval
51 -- Description : This procedure is a wrapper that invokes a subsidy pool
52 -- : budget line for approval after the pool has been approved
53 --
54 -- Business Rules : for the budget line to be approved, the pool must be in
55 -- status ACTIVE. the new budget line that is being submitted
56 -- for approval should be in status NEW. this api updates the
57 -- statuses appropriately
58 --
59 -- Parameters : required parameters are p_subsidy_pool_budget_id
60 -- Version : 1.0
61 -- History : 01-FEB-2005 SJALASUT created
62 -- End of comments
63
64 PROCEDURE submit_budget_for_approval(p_api_version IN NUMBER
65 ,p_init_msg_list IN VARCHAR2
66 ,x_return_status OUT NOCOPY VARCHAR2
67 ,x_msg_count OUT NOCOPY NUMBER
68 ,x_msg_data OUT NOCOPY VARCHAR2
69 ,p_subsidy_pool_budget_id IN okl_subsidy_pool_budgets_b.id%TYPE
70 ,x_pool_budget_status OUT NOCOPY okl_subsidy_pool_budgets_b.decision_status_code%TYPE);
71
72 END okl_subsidy_pool_approval_pvt;