[Home] [Help]
PACKAGE: APPS.OKL_LEASE_QUOTE_SUBPOOL_PVT
Source
1 PACKAGE OKL_LEASE_QUOTE_SUBPOOL_PVT AS
2 /* $Header: OKLRQUYS.pls 120.1 2006/04/18 16:02:42 asawanka noship $ */
3
4 --------------------
5 -- PACKAGE CONSTANTS
6 --------------------
7 G_PKG_NAME CONSTANT VARCHAR2(30) := 'OKL_LEASE_QUOTE_SUBSIDY_PVT';
8 G_APP_NAME CONSTANT VARCHAR2(30) := OKL_API.G_APP_NAME;
9 G_API_VERSION CONSTANT NUMBER := 1;
10 G_USER_ID CONSTANT NUMBER := FND_GLOBAL.USER_ID;
11 G_LOGIN_ID CONSTANT NUMBER := FND_GLOBAL.LOGIN_ID;
12 G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
13 G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
14 G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
15 G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
16 G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
17 G_DB_ERROR CONSTANT VARCHAR2(30) := 'OKL_DB_ERROR';
18 G_PKG_NAME_TOKEN CONSTANT VARCHAR2(30) := 'PKG_NAME';
19 G_PROG_NAME_TOKEN CONSTANT VARCHAR2(30) := 'PROG_NAME';
20 G_SQLCODE_TOKEN CONSTANT VARCHAR2(30) := 'SQLCODE';
21 G_SQLERRM_TOKEN CONSTANT VARCHAR2(30) := 'SQLERRM';
22
23
24 ------------------
25 -- DATA STRUCTURES
26 ------------------
27 subtype subsidy_pool_rec_type is okl_subsidy_pool_trx_pvt.sixv_rec_type;
28 subtype subsidy_pool_tbl_type is okl_subsidy_pool_trx_pvt.sixv_tbl_type;
29
30 subtype quote_sp_usage_rec_type is OKL_QUL_PVT.qulv_rec_type;
31 subtype quote_sp_usage_tbl_type is OKL_QUL_PVT.qulv_tbl_type;
32
33 ----------------
34 -- PROGRAM UNITS
35 ----------------
36 PROCEDURE process_quote_subsidy_pool (p_api_version IN NUMBER,
37 p_init_msg_list IN VARCHAR2,
38 p_transaction_control IN VARCHAR2,
39 p_quote_id IN NUMBER,
40 p_transaction_reason IN VARCHAR2,
41 x_return_status OUT NOCOPY VARCHAR2,
42 x_msg_count OUT NOCOPY NUMBER,
43 x_msg_data OUT NOCOPY VARCHAR2);
44
45 PROCEDURE process_leaseapp_subsidy_pool (p_api_version IN NUMBER,
46 p_init_msg_list IN VARCHAR2,
47 p_transaction_control IN VARCHAR2,
48 p_leaseapp_id IN NUMBER,
49 p_transaction_reason IN VARCHAR2,
50 p_quote_id IN NUMBER,
51 x_return_status OUT NOCOPY VARCHAR2,
52 x_msg_count OUT NOCOPY NUMBER,
53 x_msg_data OUT NOCOPY VARCHAR2);
54
55 PROCEDURE process_cancel_leaseopp (p_api_version IN NUMBER,
56 p_init_msg_list IN VARCHAR2,
57 p_transaction_control IN VARCHAR2,
58 p_parent_object_id IN NUMBER,
59 x_return_status OUT NOCOPY VARCHAR2,
60 x_msg_count OUT NOCOPY NUMBER,
61 x_msg_data OUT NOCOPY VARCHAR2);
62
63 PROCEDURE process_active_contract (p_api_version IN NUMBER,
64 p_init_msg_list IN VARCHAR2,
65 p_transaction_control IN VARCHAR2,
66 p_contract_id IN NUMBER,
67 x_return_status OUT NOCOPY VARCHAR2,
68 x_msg_count OUT NOCOPY NUMBER,
69 x_msg_data OUT NOCOPY VARCHAR2);
70
71
72 END OKL_LEASE_QUOTE_SUBPOOL_PVT;