1 PACKAGE OKL_FUNDING_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLCFUNS.pls 120.18.12020000.2 2013/03/08 05:17:46 racheruv ship $ */
3 ----------------------------------------------------------------------------
4 -- GLOBAL VARIABLES
5 ----------------------------------------------------------------------------
6 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_FUNDING_PVT';
7 G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
8 G_OKL_FUNDING_APPROVER CONSTANT VARCHAR2(200) := 'OKL_FUNDING_APPROVER';
9 G_TRANSACTION_TYPE CONSTANT VARCHAR2(200) := 'Funding'; -- okl_trx_types_tl.name
10 -- sjalasut, changed the constant value to point to OKL_TXL_AP_INV_LNS_B
11 -- changes made as part of OKLR12B disbursements project
12 G_OKL_FUNDING_SOURCE_TABLE CONSTANT VARCHAR2(200) := 'OKL_TXL_AP_INV_LNS_B';
13 G_OKL_SUBSIDY_SOURCE_TABLE CONSTANT VARCHAR2(200) := 'OKL_TXL_AP_INV_LNS_B';
14 G_STREAM_PREFUNDING CONSTANT VARCHAR2(200) := 'PRE-FUNDING';
15 G_STREAM_FUNDING CONSTANT VARCHAR2(200) := 'FUNDING';
16 G_STREAM_PRINCIPAL_B_PAYMENT CONSTANT VARCHAR2(200) := 'PRINCIPAL BALANCE';
17 G_PREFUNDING_TYPE_CODE CONSTANT VARCHAR2(200) := 'PREFUNDING';
18 G_SUPPLIER_RETENTION_TYPE_CODE CONSTANT VARCHAR2(200) := 'SUPPLIER_RETENTION';
19 G_BORROWER_PAYMENT_TYPE_CODE CONSTANT VARCHAR2(200) := 'BORROWER_PAYMENT';
20 G_TRANSACTION_FUNDING CONSTANT VARCHAR2(200) := 'Funding';
21 G_TRANSACTION_DEBIT_MEMO CONSTANT VARCHAR2(200) := 'Debit Memo';
22 G_TRANSACTION_DISBURSEMENT CONSTANT VARCHAR2(200) := 'Disbursement';
23 G_ASSET_SUBSIDY CONSTANT VARCHAR2(200) := 'ASSET_SUBSIDY';
24 G_ASSET_TYPE_CODE CONSTANT VARCHAR2(200) := 'ASSET';
25 G_APPROVED CONSTANT VARCHAR2(200) := 'APPROVED';
26
27 G_STANDARD CONSTANT VARCHAR2(200) := 'STANDARD';
28 G_MANUAL_DISB CONSTANT VARCHAR2(200) := 'MANUAL_DISB';
29 G_CREDIT CONSTANT VARCHAR2(200) := 'CREDIT';
30 G_EXPENSE CONSTANT VARCHAR2(200) := 'EXPENSE';
31 G_OKL_MANUAL_DISB_SOURCE_TABLE CONSTANT VARCHAR2(200) := 'OKL_TXL_AP_INV_LNS_B';
32
33
34 ----------------------------------------------------------------------------
35 -- Data Structures
36 ----------------------------------------------------------------------------
37 subtype tapv_rec_type is okl_tap_pvt.tapv_rec_type;
38 subtype tapv_tbl_type is okl_tap_pvt.tapv_tbl_type;
39 subtype tplv_rec_type is okl_tpl_pvt.tplv_rec_type;
40 subtype tplv_tbl_type is okl_tpl_pvt.tplv_tbl_type;
41 type fnd_rec_type is RECORD
42 (TOTAL_FUNDABLE_AMOUNT NUMBER,
43 TOTAL_PRE_FUNDED NUMBER,
44 TOTAL_ASSETS_FUNDED NUMBER,
45 TOTAL_EXPENSES_FUNDED NUMBER,
46 TOTAL_ADJUSTMENTS NUMBER,
47 TOTAL_REMAINING_TO_FUND NUMBER,
48 TOTAL_SUPPLIER_RETENTION NUMBER,
49 TOTAL_BORROWER_PAYMENTS NUMBER,
50 TOTAL_SUBSIDIES_FUNDED NUMBER,
51 TOTAL_MANUAL_DISBURSEMENT NUMBER,
52 --Bug# 15992711: This Variable will be used to display in UI Funding Summary section
53 --Start Modification 120.67.12010000.8 Pratrao 4-Mar-2013
54 TOTAL_RELEASE_ASSET_AMOUNT NUMBER
55 --Bug# 15992711 End Modification
56 )
57 ;
58
59 ----------------------------------------------------------------------------
60 -- Global Exception
61 ----------------------------------------------------------------------------
62 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
63
64 ----------------------------------------------------------------------------
65 -- Procedures and Functions
66 ------------------------------------------------------------------------------
67
68 PROCEDURE get_fund_summary(
69 p_api_version IN NUMBER,
70 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
71 x_return_status OUT NOCOPY VARCHAR2,
72 x_msg_count OUT NOCOPY NUMBER,
73 x_msg_data OUT NOCOPY VARCHAR2,
74 p_contract_id IN NUMBER,
75 x_fnd_rec OUT NOCOPY fnd_rec_type
76 );
77
78 PROCEDURE create_funding_header(
79 p_api_version IN NUMBER
80 ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
81 ,x_return_status OUT NOCOPY VARCHAR2
82 ,x_msg_count OUT NOCOPY NUMBER
83 ,x_msg_data OUT NOCOPY VARCHAR2
84 ,p_tapv_rec IN tapv_rec_type
85 ,x_tapv_rec OUT NOCOPY tapv_rec_type
86 );
87
88 PROCEDURE update_funding_header(
89 p_api_version IN NUMBER
90 ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
91 ,x_return_status OUT NOCOPY VARCHAR2
92 ,x_msg_count OUT NOCOPY NUMBER
93 ,x_msg_data OUT NOCOPY VARCHAR2
94 ,p_tapv_rec IN tapv_rec_type
95 ,x_tapv_rec OUT NOCOPY tapv_rec_type
96 );
97
98 PROCEDURE create_funding_lines(
99 p_api_version IN NUMBER
100 ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
101 ,x_return_status OUT NOCOPY VARCHAR2
102 ,x_msg_count OUT NOCOPY NUMBER
103 ,x_msg_data OUT NOCOPY VARCHAR2
104 ,p_tplv_tbl IN tplv_tbl_type
105 ,x_tplv_tbl OUT NOCOPY tplv_tbl_type
106 );
107
108 PROCEDURE create_funding_lines(
109 p_api_version IN NUMBER
110 ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
111 ,x_return_status OUT NOCOPY VARCHAR2
112 ,x_msg_count OUT NOCOPY NUMBER
113 ,x_msg_data OUT NOCOPY VARCHAR2
114 ,p_hdr_id IN NUMBER
115 ,p_khr_id IN NUMBER
116 ,p_vendor_site_id IN NUMBER
117 ,x_tplv_tbl OUT NOCOPY tplv_tbl_type
118 );
119
120 PROCEDURE update_funding_lines(
121 p_api_version IN NUMBER
122 ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
123 ,x_return_status OUT NOCOPY VARCHAR2
124 ,x_msg_count OUT NOCOPY NUMBER
125 ,x_msg_data OUT NOCOPY VARCHAR2
126 ,p_tplv_tbl IN tplv_tbl_type
127 ,x_tplv_tbl OUT NOCOPY tplv_tbl_type
128 );
129
130 PROCEDURE create_funding_assets(
131 p_api_version IN NUMBER
132 ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
133 ,x_return_status OUT NOCOPY VARCHAR2
134 ,x_msg_count OUT NOCOPY NUMBER
135 ,x_msg_data OUT NOCOPY VARCHAR2
136 ,p_fund_id IN NUMBER
137 );
138
139 PROCEDURE SYNC_HEADER_AMOUNT(
140 p_api_version IN NUMBER
141 ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_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_tplv_tbl IN tplv_tbl_type
146 );
147
148 PROCEDURE reverse_funding_requests(
149 p_api_version IN NUMBER
150 ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_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_contract_id IN NUMBER
155 );
156
157 -- Total contract funded adjustments
158 FUNCTION get_chr_funded_adjs(
159 p_contract_id IN NUMBER -- contract hdr
160 -- 12-09-2003 cklee
161 ,p_vendor_site_id IN NUMBER DEFAULT OKL_API.G_MISS_NUM
162 ) RETURN NUMBER;
163 --PRAGMA RESTRICT_REFERENCES (get_chr_funded_adjs, TRUST);
164 ------------------
165
166 -- Total contract allowable funded remaining
167 FUNCTION get_chr_canbe_funded_rem(
168 p_contract_id IN NUMBER -- contract hdr
169 ) RETURN NUMBER;
170 --PRAGMA RESTRICT_REFERENCES (get_chr_canbe_funded_rem, TRUST);
171
172 -- Total contract can be funded : used for pre-funding only
173 FUNCTION get_chr_canbe_funded(
174 p_contract_id IN NUMBER -- contract hdr
175 ) RETURN NUMBER;
176 --PRAGMA RESTRICT_REFERENCES (get_chr_canbe_funded, TRUST);
177
178 ------------------
179 -- Total contract allowable oec funded remaining
180 FUNCTION get_chr_oec_canbe_funded_rem(
181 p_contract_id IN NUMBER -- contract hdr
182 ) RETURN NUMBER;
183 --PRAGMA RESTRICT_REFERENCES (get_chr_oec_canbe_funded_rem, TRUST);
184
185 -- Total contract can be funded oec amount
186 FUNCTION get_chr_oec_canbe_funded(
187 p_contract_id IN NUMBER -- contract hdr
188 ) RETURN NUMBER;
189 --PRAGMA RESTRICT_REFERENCES (get_chr_oec_canbe_funded, TRUST);
190
191 -- Total contract has been funded oec amount
192 FUNCTION get_chr_oec_hasbeen_funded_amt(
193 p_contract_id IN NUMBER -- contract hdr
194 ,p_vendor_site_id IN NUMBER DEFAULT OKL_API.G_MISS_NUM
195 ) RETURN NUMBER;
196 --PRAGMA RESTRICT_REFERENCES (get_chr_oec_hasbeen_funded_amt, TRUST);
197
198 ------------------
199
200 -- Total contract allowable expnese funded remaining
201 FUNCTION get_chr_exp_canbe_funded_rem(
202 p_contract_id IN NUMBER -- contract hdr
203 ,p_vendor_site_id IN NUMBER -- vendor_site_id
204 ) RETURN NUMBER;
205 --PRAGMA RESTRICT_REFERENCES (get_chr_exp_canbe_funded_rem, TRUST);
206
207 -- Total contract has been funded expense amount
208 FUNCTION get_chr_exp_hasbeen_funded_amt(
209 p_contract_id IN NUMBER -- contract hdr
210 ,p_vendor_site_id IN NUMBER -- vendor_site_id
211 ) RETURN NUMBER;
212 --PRAGMA RESTRICT_REFERENCES (get_chr_exp_hasbeen_funded_amt, TRUST);
213
214 -- Total contract can be funded expense amount
215 FUNCTION get_chr_exp_canbe_funded_amt(
216 p_contract_id IN NUMBER -- contract hdr
217 ,p_vendor_site_id IN NUMBER -- vendor_site_id
218 ,p_due_date IN date default sysdate --cklee added) RETURN NUMBER
219 ) RETURN NUMBER;
220 --PRAGMA RESTRICT_REFERENCES (get_chr_exp_canbe_funded_amt, TRUST);
221
222 -- Total contract can be funded expense amount
223 FUNCTION get_chr_exp_canbe_funded_amt(
224 p_contract_id IN NUMBER -- contract hdr
225 ,p_due_date IN date default sysdate --cklee added
226 ) RETURN NUMBER;
227 --PRAGMA RESTRICT_REFERENCES (get_chr_exp_canbe_funded_amt, TRUST);
228
229 -- Total contract has been funded expense amount
230 FUNCTION get_chr_exp_hasbeen_funded_amt(
231 p_contract_id IN NUMBER -- contract hdr
232 ) RETURN NUMBER;
233 --PRAGMA RESTRICT_REFERENCES (get_chr_exp_hasbeen_funded_amt, TRUST);
234
235 ------------------
236 -- get line oec for contract funded
237 FUNCTION get_contract_line_amt(
238 p_khr_id IN NUMBER -- contract hdr
239 ,p_kle_id IN NUMBER DEFAULT OKL_API.G_MISS_NUM -- contract line
240 ,p_vendor_site_id IN NUMBER DEFAULT OKL_API.G_MISS_NUM
241 ) RETURN NUMBER;
242 --PRAGMA RESTRICT_REFERENCES (get_contract_line_amt, TRUST);
243
244 FUNCTION get_contract_line_funded_amt(
245 p_khr_id IN NUMBER
246 ,p_kle_id IN NUMBER
247 ,p_ref_type_code IN VARCHAR2 DEFAULT OKL_API.G_MISS_CHAR
248 ) RETURN NUMBER;
249 --PRAGMA RESTRICT_REFERENCES (get_contract_line_funded_amt, TRUST);
250
251 FUNCTION get_contract_line_funded_amt(
252 p_fund_id IN NUMBER
253 ,p_fund_type IN VARCHAR2
254 ) RETURN NUMBER;
255 --PRAGMA RESTRICT_REFERENCES (get_contract_line_funded_amt, TRUST);
256
257 FUNCTION is_funding_unique(
258 p_vendor_id IN NUMBER
259 ,p_fund_number IN VARCHAR2
260 ,p_org_id IN NUMBER DEFAULT OKL_API.G_MISS_NUM
261 ) RETURN VARCHAR2;
262
263 FUNCTION is_contract_line_unique(
264 p_kle_id IN NUMBER -- contract_line_id
265 ,p_fund_id IN NUMBER
266 ,p_fund_line_id IN NUMBER
267 ,p_mode IN VARCHAR2 DEFAULT 'C'
268 ,p_org_id IN NUMBER DEFAULT OKL_API.G_MISS_NUM
269 ) RETURN VARCHAR2;
270
271 FUNCTION is_kle_id_unique(
272 p_tplv_tbl IN tplv_tbl_type
273 ) RETURN VARCHAR2;
274
275 -- Check to see if contract is legal to fund
276 FUNCTION is_chr_fundable_status(
277 p_contract_id IN NUMBER -- contract hdr
278 ,p_funding_type_code IN VARCHAR2 DEFAULT NULL
279 ) RETURN NUMBER;
280 --PRAGMA RESTRICT_REFERENCES (is_chr_fundable_status, TRUST);
281
282 ------------------------------------------------------------------
283 FUNCTION get_amount_prefunded(
284 p_contract_id IN NUMBER
285 ,p_vendor_site_id IN NUMBER DEFAULT OKL_API.G_MISS_NUM
286 ) RETURN NUMBER;
287 --PRAGMA RESTRICT_REFERENCES (get_amount_prefunded, TRUST);
288
289 FUNCTION get_total_funded(
290 p_contract_id IN NUMBER
291 ,p_contract_line_id IN NUMBER DEFAULT OKL_API.G_MISS_NUM
292 ) RETURN NUMBER;
293 --PRAGMA RESTRICT_REFERENCES (get_total_funded, TRUST);
294
295 FUNCTION get_total_retention(
296 p_contract_id IN NUMBER
297 ,p_contract_line_id IN NUMBER DEFAULT OKL_API.G_MISS_NUM
298 ) RETURN NUMBER;
299 --PRAGMA RESTRICT_REFERENCES (get_total_retention, TRUST);
300
301 -- added for bug 2604862
302 FUNCTION get_amount_borrowerPay(
303 p_contract_id IN NUMBER
304 ,p_contract_line_id IN NUMBER DEFAULT OKL_API.G_MISS_NUM
305 ) RETURN NUMBER;
306 --PRAGMA RESTRICT_REFERENCES (get_amount_borrowerPay, TRUST);
307
308 FUNCTION get_creditRem_by_chrid(
309 p_contract_id IN NUMBER -- contract hdr
310 ) RETURN NUMBER;
311 --PRAGMA RESTRICT_REFERENCES (get_creditRem_by_chrid, TRUST);
312 -- added for bug 2604862
313
314 PROCEDURE CREATE_ACCOUNTING_DIST(p_api_version IN NUMBER,
315 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
316 x_return_status OUT NOCOPY VARCHAR2,
317 x_msg_count OUT NOCOPY NUMBER,
318 x_msg_data OUT NOCOPY VARCHAR2,
319 p_status IN OKL_TRX_AP_INVOICES_B.trx_status_code%TYPE,
320 p_fund_id IN OKL_TRX_AP_INVOICES_B.ID%TYPE);--,| 21-May-2007 cklee OKLR12B Accounting CR |
321 --start:| 21-May-2007 cklee OKLR12B Accounting CR |
322 -- 11.5.10 cklee subsidy
323 -- p_fund_line_id IN OKL_TXL_AP_INV_LNS_B.ID%TYPE DEFAULT NULL,
324 -- p_subsidy_amt IN NUMBER DEFAULT NULL,
325 -- p_sty_id IN NUMBER DEFAULT NULL);
326 --end:| 21-May-2007 cklee OKLR12B Accounting CR |
327
328 -- added for 11.5.10 subsidy
329 FUNCTION get_funding_subsidy_amount(
330 p_chr_id IN NUMBER,
331 p_asset_cle_id IN NUMBER,
332 p_vendor_site_id IN NUMBER DEFAULT NULL
333 ) RETURN NUMBER;
334 --PRAGMA RESTRICT_REFERENCES (get_funding_subsidy_amount, TRUST);
335
336 FUNCTION get_partial_subsidy_amount(
337 p_asset_cle_id IN NUMBER,
338 p_req_fund_amount IN NUMBER
339 ) RETURN NUMBER;
340 --PRAGMA RESTRICT_REFERENCES (get_partial_subsidy_amount, TRUST);
341
342 FUNCTION get_amount_subsidy(
343 p_contract_id IN NUMBER
344 ,p_contract_line_id IN NUMBER DEFAULT OKL_API.G_MISS_NUM -- fixed asset ID
345 ) RETURN NUMBER;
346 --PRAGMA RESTRICT_REFERENCES (get_amount_subsidy, TRUST);
347
348 PROCEDURE create_fund_asset_subsidies
349 (p_api_version IN NUMBER,
350 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
351 x_return_status OUT NOCOPY VARCHAR2,
352 x_msg_count OUT NOCOPY NUMBER,
353 x_msg_data OUT NOCOPY VARCHAR2,
354 p_status IN OKL_TRX_AP_INVOICES_B.trx_status_code%TYPE,
355 p_fund_id IN OKL_TRX_AP_INVOICES_B.ID%TYPE);
356 -- added for 11.5.10 subsidy
357
358 PROCEDURE refresh_fund_chklst(
359 p_api_version IN NUMBER
360 ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
361 ,x_return_status OUT NOCOPY VARCHAR2
362 ,x_msg_count OUT NOCOPY NUMBER
363 ,x_msg_data OUT NOCOPY VARCHAR2
364 ,p_chr_id IN okc_k_headers_b.id%type
365 ,p_MLA_id IN okc_k_headers_b.id%type DEFAULT NULL
366 ,p_creditline_id IN okc_k_headers_b.id%type DEFAULT NULL
367 );
368
369 FUNCTION get_amount_manu_disb(
370 p_contract_id IN NUMBER
371 ,p_contract_line_id IN NUMBER DEFAULT OKL_API.G_MISS_NUM -- fixed asset ID
372 ) RETURN NUMBER;
373 --PRAGMA RESTRICT_REFERENCES (get_amount_manu_disb, TRUST);
374
375 -- strat: T and A 11/04/2004
376 -- Total contract can be funded fee amount
377 ----------------------------------------------------------------------------------
378 -- Start of comments
379 --
380 -- Procedure Name : Total contract can be funded fee amount
381 -- Description : Total contract can be funded fee amount for a fee line
382 -- by an given date
383 -- IN: p_contract_id is the lease contract ID
384 -- IN: p_fee_line_id is the lease contract fee line ID
385 -- IN: p_effective_date is the effective date of the total fee amount
386 -- OUT: x_value is the fee amount
387 -- Business Rules : x_value will be 0 if fee line has not meet the following requirements
388 -- : 1. Effective date greater than line start date
389 -- (or contract start date if line start date is null)
390 -- 2. contract okc_k_headers_b.ste_code
391 -- in ('ENTERED', 'ACTIVE','SIGNED')
392 -- 3. fee line is not passthrough
393 -- 4. fee line is associated with vendor
394 -- Business Rules :
395 -- Parameters :
396 -- Version : 1.0
397 -- End of comments
398 ----------------------------------------------------------------------------------
399 PROCEDURE contract_fee_canbe_funded(
400 p_api_version IN NUMBER
401 ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
402 ,x_return_status OUT NOCOPY VARCHAR2
403 ,x_msg_count OUT NOCOPY NUMBER
404 ,x_msg_data OUT NOCOPY VARCHAR2
405 ,x_value OUT NOCOPY NUMBER
406 ,p_contract_id IN NUMBER
407 ,p_fee_line_id IN NUMBER
408 ,p_effective_date IN DATE
409 );
410
411 FUNCTION get_chr_fee_canbe_funded_amt(
412 p_contract_id IN NUMBER -- contract hdr
413 ,p_fee_line_id IN NUMBER
414 ,p_effective_date IN DATE
415 ) RETURN NUMBER;
416 -- end: T and A 11/04/2004
417
418 -- strat: T and A bug#4151222
419 ----------------------------------------------------------------------------------
420 -- Start of comments
421 --
422 -- Procedure Name : Is contract fully funded
423 -- Description : Is contract fully funded
424 -- IN: p_contract_id is the lease contract ID
425 -- OUT: x_value is the flag to indicate if contract is fully funded
426 -- Business Rules : x_value will be false if error occurred
427 -- Parameters :
428 -- Version : 1.0
429 -- End of comments
430 ----------------------------------------------------------------------------------
431 PROCEDURE is_contract_fully_funded(
432 p_api_version IN NUMBER
433 ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
434 ,x_return_status OUT NOCOPY VARCHAR2
435 ,x_msg_count OUT NOCOPY NUMBER
436 ,x_msg_data OUT NOCOPY VARCHAR2
437 ,x_value OUT NOCOPY BOOLEAN
438 ,p_contract_id IN NUMBER
439 );
440
441 --Added procedure get_checklist_source as part of bug 5912358, Funding OA Migration Issues
442 ----------------------------------------------------------------------------------
443 -- Start of comments
444 --
445 -- Procedure Name : get_checklist_source
446 -- Description : Returns checklist source details whether contract was originated from lease app, whether checklist exists or not and get source checklist template.
447 -- IN: p_chr_id is the contract ID
448 -- OUT: x_lease_app_found returns where contract was originated from leaseapp or not
449 -- OUT: x_lease_app_list_found returns whether lease checklist exists or not
450 -- OUT: x_funding_checklist_tpl returns source checklist template ID
451 -- OUT: x_lease_app_id returns lease application id
452 -- OUT: x_credit_id returns credit template id
453 -- Business Rules :
454 -- Parameters :
455 -- Version : 1.0
456 -- End of comments
457 ----------------------------------------------------------------------------------
458 PROCEDURE get_checklist_source(
459 p_api_version IN NUMBER
460 ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
461 ,x_return_status OUT NOCOPY VARCHAR2
462 ,x_msg_count OUT NOCOPY NUMBER
463 ,x_msg_data OUT NOCOPY VARCHAR2
464 ,p_chr_id IN okc_k_headers_b.id%type
465 ,x_lease_app_found OUT NOCOPY VARCHAR2
466 ,x_lease_app_list_found OUT NOCOPY VARCHAR2
467 ,x_funding_checklist_tpl OUT NOCOPY okc_rules_b.rule_information2%TYPE
468 ,x_lease_app_id OUT NOCOPY NUMBER
469 ,x_credit_id OUT NOCOPY NUMBER
470 );
471
472 FUNCTION is_contract_fully_funded(
473 p_contract_id IN NUMBER
474 ) RETURN boolean;
475 -- end: T and A bug#4151222
476
477 -- start: 06-May-2005 cklee okl.h Lease App IA Authoring
478 ----------------------------------------------------------------------------------
479 -- Start of comments
480 --
481 -- Procedure Name : update_checklist_function
482 -- Description : This API will execute function for each item and
483 -- update the execution results for the function.
484 -- Business Rules :
485 -- Parameters :
486 -- Version : 1.0
487 -- End of comments
488 ----------------------------------------------------------------------------------
489 PROCEDURE update_checklist_function(
490 p_api_version IN NUMBER
491 ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
492 ,x_return_status OUT NOCOPY VARCHAR2
493 ,x_msg_count OUT NOCOPY NUMBER
494 ,x_msg_data OUT NOCOPY VARCHAR2
495 ,p_fund_req_id IN NUMBER
496 );
497 -- end: 06-May-2005 cklee okl.h Lease App IA Authoring
498
499 --Bug# 15992711 :Added function get_released_asst_amt to add
500 -- field "Total Re-Lease Asset Amount" in funding summary screen
501 --Start Modification 120.67.12010000.8 Pratrao 1-Mar-2013
502
503 ----------------------------------------------------------------------------------
504 -- Start of comments
505 --
506 -- Procedure Name : get_released_asst_amt
507 -- Description : This function is used to display TOTAL_RELEASE_ASSET_AMOUNT
508 --
509 -- Business Rules :
510 -- Parameters :
511 -- Version : 1.0
512 -- End of comments
513 ----------------------------------------------------------------------------------
514
515 FUNCTION get_released_asst_amt(
516 p_khr_id IN NUMBER -- contract hdr
517 )
518 RETURN NUMBER;
519
520 --Bug# 15992711 End Modification
521 END OKL_FUNDING_PVT;