[Home] [Help]
PACKAGE: APPS.OKL_LEASE_QUOTE_FEE_PVT
Source
1 PACKAGE OKL_LEASE_QUOTE_FEE_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLRQUFS.pls 120.4.12020000.2 2012/08/07 14:04:41 rpillay ship $ */
3
4 --------------------
5 -- PACKAGE CONSTANTS
6 --------------------
7 G_PKG_NAME CONSTANT VARCHAR2(30) := 'OKL_LEASE_QUOTE_FEE_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 fee_rec_type is okl_fee_pvt.feev_rec_type;
28 subtype assoc_asset_tbl_type is okl_lre_pvt.lrev_tbl_type;
29 subtype cashflow_hdr_rec_type is okl_lease_quote_cashflow_pvt.cashflow_header_rec_type;
30 subtype cashflow_level_tbl_type is okl_lease_quote_cashflow_pvt.cashflow_level_tbl_type;
31
32 subtype cf_object_rec_type is okl_cfo_pvt.cfov_rec_type;
33 subtype cf_header_rec_type is okl_caf_pvt.cafv_rec_type;
34 subtype cf_level_tbl_type is okl_cfl_pvt.cflv_tbl_type;
35
36 subtype lr_tbl_type is okl_lre_pvt.lrev_tbl_type;
37
38 TYPE line_relation_rec_type IS RECORD (
39 id okl_line_relationships_b.id%TYPE
40 ,object_version_number okl_line_relationships_b.object_version_number%TYPE
41 ,source_line_type okl_line_relationships_b.source_line_type%TYPE
42 ,source_line_id okl_line_relationships_b.source_line_id%TYPE
43 ,related_line_type okl_line_relationships_b.related_line_type%TYPE
44 ,related_line_id okl_line_relationships_b.related_line_id%TYPE
45 ,amount okl_line_relationships_b.amount%TYPE
46 ,short_description okl_line_relationships_tl.short_description%TYPE
47 ,description okl_line_relationships_tl.description%TYPE
48 ,comments okl_line_relationships_tl.comments%TYPE
49 ,record_mode varchar2(10)
50 --Added by jjuneja
51 ,origination_income okl_line_relationships_b.origination_income%TYPE);
52 --End of addition by jjuneja
53
54
55
56 TYPE line_relation_tbl_type IS TABLE OF line_relation_rec_type INDEX BY PLS_INTEGER;
57 ----------------
58 -- PROGRAM UNITS
59 ----------------
60 PROCEDURE create_fee (
61 p_api_version IN NUMBER
62 ,p_init_msg_list IN VARCHAR2
63 ,p_transaction_control IN VARCHAR2
64 ,p_fee_rec IN fee_rec_type
65 ,p_assoc_asset_tbl IN line_relation_tbl_type
66 ,p_payment_header_rec IN okl_lease_quote_cashflow_pvt.cashflow_header_rec_type
67 ,p_payment_level_tbl IN okl_lease_quote_cashflow_pvt.cashflow_level_tbl_type
68 ,p_expense_header_rec IN okl_lease_quote_cashflow_pvt.cashflow_header_rec_type
69 ,p_expense_level_tbl IN okl_lease_quote_cashflow_pvt.cashflow_level_tbl_type
70 ,x_fee_id OUT NOCOPY NUMBER
71 ,x_return_status OUT NOCOPY VARCHAR2
72 ,x_msg_count OUT NOCOPY NUMBER
73 ,x_msg_data OUT NOCOPY VARCHAR2
74 );
75
76 PROCEDURE update_fee (
77 p_api_version IN NUMBER
78 ,p_init_msg_list IN VARCHAR2
79 ,p_transaction_control IN VARCHAR2
80 ,p_fee_rec IN fee_rec_type
81 ,p_sync_fee_header IN VARCHAR2 DEFAULT 'Y'
82 ,p_sync_line_relations IN VARCHAR2 DEFAULT 'N'
83 ,x_return_status OUT NOCOPY VARCHAR2
84 ,x_msg_count OUT NOCOPY NUMBER
85 ,x_msg_data OUT NOCOPY VARCHAR2 );
86
87 PROCEDURE update_fee (
88 p_api_version IN NUMBER
89 ,p_init_msg_list IN VARCHAR2
90 ,p_transaction_control IN VARCHAR2
91 ,p_fee_rec IN fee_rec_type
92 ,p_assoc_asset_tbl IN line_relation_tbl_type
93 ,p_payment_header_rec IN okl_lease_quote_cashflow_pvt.cashflow_header_rec_type
94 ,p_payment_level_tbl IN okl_lease_quote_cashflow_pvt.cashflow_level_tbl_type
95 ,p_expense_header_rec IN okl_lease_quote_cashflow_pvt.cashflow_header_rec_type
96 ,p_expense_level_tbl IN okl_lease_quote_cashflow_pvt.cashflow_level_tbl_type
97 ,x_return_status OUT NOCOPY VARCHAR2
98 ,x_msg_count OUT NOCOPY NUMBER
99 ,x_msg_data OUT NOCOPY VARCHAR2
100 );
101
102
103 PROCEDURE duplicate_fee (
104 p_api_version IN NUMBER
105 ,p_init_msg_list IN VARCHAR2
106 ,p_transaction_control IN VARCHAR2
107 ,p_source_fee_id IN NUMBER
108 ,p_fee_rec IN fee_rec_type
109 ,p_assoc_asset_tbl IN line_relation_tbl_type
110 ,p_payment_header_rec IN okl_lease_quote_cashflow_pvt.cashflow_header_rec_type
111 ,p_payment_level_tbl IN okl_lease_quote_cashflow_pvt.cashflow_level_tbl_type
112 ,p_expense_header_rec IN okl_lease_quote_cashflow_pvt.cashflow_header_rec_type
113 ,p_expense_level_tbl IN okl_lease_quote_cashflow_pvt.cashflow_level_tbl_type
114 ,x_fee_id OUT NOCOPY NUMBER
115 ,x_return_status OUT NOCOPY VARCHAR2
116 ,x_msg_count OUT NOCOPY NUMBER
117 ,x_msg_data OUT NOCOPY VARCHAR2
118 );
119
120 PROCEDURE duplicate_fee (
121 p_api_version IN NUMBER
122 ,p_init_msg_list IN VARCHAR2
123 ,p_transaction_control IN VARCHAR2
124 ,p_source_fee_id IN NUMBER
125 ,p_target_quote_id IN NUMBER
126 ,x_fee_id OUT NOCOPY NUMBER
127 ,x_return_status OUT NOCOPY VARCHAR2
128 ,x_msg_count OUT NOCOPY NUMBER
129 ,x_msg_data OUT NOCOPY VARCHAR2
130 );
131
132
133 PROCEDURE delete_fee (
134 p_api_version IN NUMBER
135 ,p_init_msg_list IN VARCHAR2
136 ,p_transaction_control IN VARCHAR2
137 ,p_fee_id IN NUMBER
138 ,x_return_status OUT NOCOPY VARCHAR2
139 ,x_msg_count OUT NOCOPY NUMBER
140 ,x_msg_data OUT NOCOPY VARCHAR2
141 );
142
143 END OKL_LEASE_QUOTE_FEE_PVT;