[Home] [Help]
PACKAGE: APPS.OKL_SUBSIDY_PROCESS_PVT
Source
1 PACKAGE okl_subsidy_process_pvt AUTHID CURRENT_USER AS
2 /* $Header: OKLRSBPS.pls 120.3 2006/04/05 21:45:25 stmathew noship $ */
3
4 -- OKL_ASSET_SUBSIDIES_UV Record Spec
5 TYPE asbv_rec_type IS RECORD (
6 subsidy_id NUMBER := OKL_API.G_MISS_NUM,
7 subsidy_cle_id NUMBER := OKL_API.G_MISS_NUM,
8 name OKL_SUBSIDIES_B.NAME%TYPE := OKL_API.G_MISS_CHAR,
9 description OKL_SUBSIDIES_TL.SHORT_DESCRIPTION%TYPE := OKL_API.G_MISS_CHAR,
10 amount NUMBER := OKL_API.G_MISS_NUM,
11 stream_type_id NUMBER := OKL_API.G_MISS_NUM,
12 accounting_method_code OKL_SUBSIDIES_B.ACCOUNTING_METHOD_CODE%TYPE := OKL_API.G_MISS_CHAR,
13 maximum_term NUMBER := OKL_API.G_MISS_NUM,
14 subsidy_override_amount NUMBER := OKL_API.G_MISS_NUM,
15 dnz_chr_id NUMBER := OKL_API.G_MISS_NUM,
16 asset_cle_id NUMBER := OKL_API.G_MISS_NUM,
17 cpl_id NUMBER := OKL_API.G_MISS_NUM,
18 vendor_id NUMBER := OKL_API.G_MISS_NUM,
19 vendor_name PO_VENDORS.VENDOR_NAME%TYPE := OKL_API.G_MISS_CHAR,
20 pay_site_id NUMBER := OKL_API.G_MISS_NUM,
21 payment_term_id NUMBER := OKL_API.G_MISS_NUM,
22 payment_method_code FND_LOOKUPS.LOOKUP_CODE%TYPE := OKL_API.G_MISS_CHAR,
23 pay_group_code PO_VENDORS.PAY_GROUP_LOOKUP_CODE%TYPE := OKL_API.G_MISS_CHAR,
24 --extra attributes picked up from subsidy setup may be required downstream
25 start_date OKC_K_LINES_B.start_date%TYPE := OKL_API.G_MISS_DATE,
26 end_date OKC_K_LINES_B.end_date%TYPE := OKL_API.G_MISS_DATE,
27 expire_after_days NUMBER := OKL_API.G_MISS_NUM,
28 currency_code OKC_K_LINES_B.currency_code%TYPE := OKL_API.G_MISS_CHAR,
29 exclusive_yn OKL_SUBSIDIES_B.EXCLUSIVE_YN%TYPE := OKL_API.G_MISS_CHAR,
30 applicable_to_release_yn OKL_SUBSIDIES_B.APPLICABLE_TO_RELEASE_YN%TYPE := OKL_API.G_MISS_CHAR,
31 recourse_yn OKL_SUBSIDIES_B.RECOURSE_YN%TYPE := OKL_API.G_MISS_CHAR,
32 termination_refund_basis OKL_SUBSIDIES_B.termination_refund_basis%TYPE := OKL_API.G_MISS_CHAR,
33 refund_formula_id NUMBER := OKL_API.G_MISS_NUM,
34 receipt_method_code OKL_SUBSIDIES_B.receipt_method_code%TYPE := OKL_API.G_MISS_CHAR,
35 customer_visible_yn OKL_SUBSIDIES_B.customer_visible_yn%TYPE := OKL_API.G_MISS_CHAR
36 );
37
38 TYPE asbv_tbl_type IS TABLE OF asbv_rec_type
39 INDEX BY BINARY_INTEGER;
40
41
42 G_SUBLINE_LTY_CODE OKC_LINE_STYLES_V.LTY_CODE%TYPE := 'SUBSIDY';
43 G_STREAM_TYPE_CLASS OKL_STRM_TYPE_B.STREAM_TYPE_CLASS%TYPE := 'SUBSIDY';
44 ---------------------------------------------------------------------------
45 -- GLOBAL MESSAGE CONSTANTS
46 ---------------------------------------------------------------------------
47 G_FND_APP CONSTANT VARCHAR2(200) := OKL_API.G_FND_APP;
48 G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKL_API.G_FORM_UNABLE_TO_RESERVE_REC;
49 G_FORM_RECORD_DELETED CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_DELETED;
50 G_FORM_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_CHANGED;
51 G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKL_API.G_RECORD_LOGICALLY_DELETED;
52 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_REQUIRED_VALUE;
53 G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_INVALID_VALUE;
54 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
55 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_PARENT_TABLE_TOKEN;
56 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_CHILD_TABLE_TOKEN;
57 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_CONTRACTS_UNEXP_ERROR';
58 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLcode';
59 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLerrm';
60
61 ---------------------------------------------------------------------------
62 -- GLOBAL EXCEPTIONS
63 ---------------------------------------------------------------------------
64 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
65
66 ---------------------------------------------------------------------------
67 -- GLOBAL VARIABLES
68 ---------------------------------------------------------------------------
69 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_SUBSIDY_PROCESS_PVT';
70 G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
71
72
73 PROCEDURE is_contract_subsidized(
74 p_api_version IN NUMBER,
75 p_init_msg_list IN VARCHAR2,
76 x_return_status OUT NOCOPY VARCHAR2,
77 x_msg_count OUT NOCOPY NUMBER,
78 x_msg_data OUT NOCOPY VARCHAR2,
79 p_chr_id IN NUMBER,
80 x_subsidized OUT NOCOPY VARCHAR2);
81
82 PROCEDURE is_asset_subsidized(
83 p_api_version IN NUMBER,
84 p_init_msg_list IN VARCHAR2,
85 x_return_status OUT NOCOPY VARCHAR2,
86 x_msg_count OUT NOCOPY NUMBER,
87 x_msg_data OUT NOCOPY VARCHAR2,
88 p_asset_cle_id IN NUMBER,
89 x_subsidized OUT NOCOPY VARCHAR2);
90
91 PROCEDURE calculate_subsidy_amount(
92 p_api_version IN NUMBER,
93 p_init_msg_list IN VARCHAR2,
94 x_return_status OUT NOCOPY VARCHAR2,
95 x_msg_count OUT NOCOPY NUMBER,
96 x_msg_data OUT NOCOPY VARCHAR2,
97 p_subsidy_cle_id IN NUMBER,
98 x_subsidy_amount OUT NOCOPY NUMBER);
99
100 PROCEDURE get_subsidy_amount(
101 p_api_version IN NUMBER,
102 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
103 x_return_status OUT NOCOPY VARCHAR2,
104 x_msg_count OUT NOCOPY NUMBER,
105 x_msg_data OUT NOCOPY VARCHAR2,
106 p_subsidy_cle_id IN NUMBER,
107 x_asbv_rec OUT NOCOPY asbv_rec_type);
108
109 PROCEDURE get_subsidy_amount(
110 p_api_version IN NUMBER,
111 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
112 x_return_status OUT NOCOPY VARCHAR2,
113 x_msg_count OUT NOCOPY NUMBER,
114 x_msg_data OUT NOCOPY VARCHAR2,
115 p_subsidy_cle_id IN NUMBER,
116 x_subsidy_amount OUT NOCOPY NUMBER);
117
118
119 PROCEDURE get_asset_subsidy_amount(
120 p_api_version IN NUMBER,
121 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
122 x_return_status OUT NOCOPY VARCHAR2,
123 x_msg_count OUT NOCOPY NUMBER,
124 x_msg_data OUT NOCOPY VARCHAR2,
125 p_asset_cle_id IN NUMBER,
126 x_asbv_tbl OUT NOCOPY asbv_tbl_type);
127
128 PROCEDURE get_asset_subsidy_amount(
129 p_api_version IN NUMBER,
130 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
131 x_return_status OUT NOCOPY VARCHAR2,
132 x_msg_count OUT NOCOPY NUMBER,
133 x_msg_data OUT NOCOPY VARCHAR2,
134 p_asset_cle_id IN NUMBER,
135 p_accounting_method IN VARCHAR2 default NULL,
136 x_subsidy_amount OUT NOCOPY NUMBER);
137
138
139 PROCEDURE calculate_asset_subsidy(
140 p_api_version IN NUMBER,
141 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
142 x_return_status OUT NOCOPY VARCHAR2,
143 x_msg_count OUT NOCOPY NUMBER,
144 x_msg_data OUT NOCOPY VARCHAR2,
145 p_asset_cle_id IN NUMBER,
146 x_subsidy_amount OUT NOCOPY NUMBER);
147
148 PROCEDURE get_contract_subsidy_amount(
149 p_api_version IN NUMBER,
150 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
151 x_return_status OUT NOCOPY VARCHAR2,
152 x_msg_count OUT NOCOPY NUMBER,
153 x_msg_data OUT NOCOPY VARCHAR2,
154 p_chr_id IN NUMBER,
155 x_asbv_tbl OUT NOCOPY asbv_tbl_type);
156
157 PROCEDURE get_contract_subsidy_amount(
158 p_api_version IN NUMBER,
159 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
160 x_return_status OUT NOCOPY VARCHAR2,
161 x_msg_count OUT NOCOPY NUMBER,
162 x_msg_data OUT NOCOPY VARCHAR2,
163 p_chr_id IN NUMBER,
164 p_accounting_method IN VARCHAR2 default NULL,
165 x_subsidy_amount OUT NOCOPY NUMBER);
166
167 PROCEDURE calculate_contract_subsidy(
168 p_api_version IN NUMBER,
169 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
170 x_return_status OUT NOCOPY VARCHAR2,
171 x_msg_count OUT NOCOPY NUMBER,
172 x_msg_data OUT NOCOPY VARCHAR2,
173 p_chr_id IN NUMBER,
174 x_subsidy_amount OUT NOCOPY NUMBER);
175
176 PROCEDURE get_funding_subsidy_amount(
177 p_api_version IN NUMBER,
178 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
179 x_return_status OUT NOCOPY VARCHAR2,
180 x_msg_count OUT NOCOPY NUMBER,
181 x_msg_data OUT NOCOPY VARCHAR2,
182 p_chr_id IN NUMBER,
183 p_asset_cle_id IN NUMBER,
184 p_vendor_id IN NUMBER DEFAULT NULL,
185 x_subsidy_amount OUT NOCOPY NUMBER);
186
187 PROCEDURE get_partial_subsidy_amount(
188 p_api_version IN NUMBER,
189 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
190 x_return_status OUT NOCOPY VARCHAR2,
191 x_msg_count OUT NOCOPY NUMBER,
192 x_msg_data OUT NOCOPY VARCHAR2,
193 p_asset_cle_id IN NUMBER,
194 p_req_fund_amount IN NUMBER,
195 x_asbv_tbl OUT NOCOPY asbv_tbl_type);
196
197 PROCEDURE rebook_synchronize(
198 p_api_version IN NUMBER,
199 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
200 x_return_status OUT NOCOPY VARCHAR2,
201 x_msg_count OUT NOCOPY NUMBER,
202 x_msg_data OUT NOCOPY VARCHAR2,
203 p_rbk_chr_id in number,
204 p_orig_chr_id in number
205 );
206
207 Procedure Create_Billing_Trx
208 (p_api_version IN NUMBER,
209 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
210 x_return_status OUT NOCOPY VARCHAR2,
211 x_msg_count OUT NOCOPY NUMBER,
212 x_msg_data OUT NOCOPY VARCHAR2,
213 p_chr_id IN NUMBER);
214
215 --Bug# 3948361
216 Procedure get_relk_termn_basis
217 (p_api_version IN NUMBER,
218 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
219 x_return_status OUT NOCOPY VARCHAR2,
220 x_msg_count OUT NOCOPY NUMBER,
221 x_msg_data OUT NOCOPY VARCHAR2,
222 p_chr_id IN NUMBER,
223 p_subsidy_id IN NUMBER,
224 x_release_basis OUT NOCOPY varchar2);
225 END OKL_SUBSIDY_PROCESS_PVT;