DBA Data[Home] [Help]

PACKAGE: APPS.OKL_FUNDING_PVT

Source


1 PACKAGE OKL_FUNDING_PVT AS
2 /* $Header: OKLCFUNS.pls 120.17 2007/11/20 08:23:56 dcshanmu noship $ */
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      ;
53 
54  ----------------------------------------------------------------------------
55  -- Global Exception
56  ----------------------------------------------------------------------------
57  G_EXCEPTION_HALT_VALIDATION	EXCEPTION;
58 
59  ----------------------------------------------------------------------------
60  -- Procedures and Functions
61  ------------------------------------------------------------------------------
62 
63  PROCEDURE get_fund_summary(
64                 p_api_version       IN NUMBER,
65                 p_init_msg_list     IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
66                 x_return_status     OUT NOCOPY VARCHAR2,
67                 x_msg_count         OUT NOCOPY NUMBER,
68                 x_msg_data          OUT NOCOPY VARCHAR2,
69                 p_contract_id       IN NUMBER,
70 		x_fnd_rec           OUT NOCOPY fnd_rec_type
71                 );
72 
73  PROCEDURE create_funding_header(
74     p_api_version                  IN NUMBER
75    ,p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE
76    ,x_return_status                OUT NOCOPY VARCHAR2
77    ,x_msg_count                    OUT NOCOPY NUMBER
78    ,x_msg_data                     OUT NOCOPY VARCHAR2
79    ,p_tapv_rec                     IN tapv_rec_type
80    ,x_tapv_rec                     OUT NOCOPY tapv_rec_type
81  );
82 
83  PROCEDURE update_funding_header(
84     p_api_version                  IN NUMBER
85    ,p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE
86    ,x_return_status                OUT NOCOPY VARCHAR2
87    ,x_msg_count                    OUT NOCOPY NUMBER
88    ,x_msg_data                     OUT NOCOPY VARCHAR2
89    ,p_tapv_rec                     IN tapv_rec_type
90    ,x_tapv_rec                     OUT NOCOPY tapv_rec_type
91  );
92 
93  PROCEDURE create_funding_lines(
94     p_api_version                  IN NUMBER
95    ,p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE
96    ,x_return_status                OUT NOCOPY VARCHAR2
97    ,x_msg_count                    OUT NOCOPY NUMBER
98    ,x_msg_data                     OUT NOCOPY VARCHAR2
99    ,p_tplv_tbl                     IN tplv_tbl_type
100    ,x_tplv_tbl                     OUT NOCOPY tplv_tbl_type
101  );
102 
103  PROCEDURE create_funding_lines(
104     p_api_version                  IN NUMBER
105    ,p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE
106    ,x_return_status                OUT NOCOPY VARCHAR2
107    ,x_msg_count                    OUT NOCOPY NUMBER
108    ,x_msg_data                     OUT NOCOPY VARCHAR2
109    ,p_hdr_id				IN NUMBER
110    ,p_khr_id                     IN NUMBER
111    ,p_vendor_site_id		IN NUMBER
112    ,x_tplv_tbl                     OUT NOCOPY tplv_tbl_type
113  );
114 
115  PROCEDURE update_funding_lines(
116     p_api_version                  IN NUMBER
117    ,p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE
118    ,x_return_status                OUT NOCOPY VARCHAR2
119    ,x_msg_count                    OUT NOCOPY NUMBER
120    ,x_msg_data                     OUT NOCOPY VARCHAR2
121    ,p_tplv_tbl                     IN tplv_tbl_type
122    ,x_tplv_tbl                     OUT NOCOPY tplv_tbl_type
123  );
124 
125  PROCEDURE create_funding_assets(
126     p_api_version                  IN NUMBER
127    ,p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE
128    ,x_return_status                OUT NOCOPY VARCHAR2
129    ,x_msg_count                    OUT NOCOPY NUMBER
130    ,x_msg_data                     OUT NOCOPY VARCHAR2
131    ,p_fund_id                      IN NUMBER
132  );
133 
134  PROCEDURE SYNC_HEADER_AMOUNT(
135   p_api_version                  IN NUMBER
136  ,p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE
137  ,x_return_status                OUT NOCOPY VARCHAR2
138  ,x_msg_count                    OUT NOCOPY NUMBER
139  ,x_msg_data                     OUT NOCOPY VARCHAR2
140  ,p_tplv_tbl                     IN tplv_tbl_type
141  );
142 
143  PROCEDURE reverse_funding_requests(
144     p_api_version                  IN NUMBER
145    ,p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE
146    ,x_return_status                OUT NOCOPY VARCHAR2
147    ,x_msg_count                    OUT NOCOPY NUMBER
148    ,x_msg_data                     OUT NOCOPY VARCHAR2
149    ,p_contract_id                  IN NUMBER
150  );
151 
152 -- Total contract funded adjustments
153  FUNCTION get_chr_funded_adjs(
154   p_contract_id                       IN NUMBER                 -- contract hdr
155 -- 12-09-2003 cklee
156  ,p_vendor_site_id               IN NUMBER   DEFAULT OKL_API.G_MISS_NUM
157  ) RETURN NUMBER;
158  --PRAGMA RESTRICT_REFERENCES (get_chr_funded_adjs, TRUST);
159 ------------------
160 
161 -- Total contract allowable funded remaining
162  FUNCTION get_chr_canbe_funded_rem(
163   p_contract_id                       IN NUMBER                 -- contract hdr
164  ) RETURN NUMBER;
165  --PRAGMA RESTRICT_REFERENCES (get_chr_canbe_funded_rem, TRUST);
166 
167 -- Total contract can be funded : used for pre-funding only
168  FUNCTION get_chr_canbe_funded(
169   p_contract_id                       IN NUMBER                 -- contract hdr
170  ) RETURN NUMBER;
171  --PRAGMA RESTRICT_REFERENCES (get_chr_canbe_funded, TRUST);
172 
173 ------------------
174 -- Total contract allowable oec funded remaining
175  FUNCTION get_chr_oec_canbe_funded_rem(
176   p_contract_id                       IN NUMBER                 -- contract hdr
177  ) RETURN NUMBER;
178  --PRAGMA RESTRICT_REFERENCES (get_chr_oec_canbe_funded_rem, TRUST);
179 
180 -- Total contract can be funded oec amount
181  FUNCTION get_chr_oec_canbe_funded(
182   p_contract_id                       IN NUMBER                 -- contract hdr
183  ) RETURN NUMBER;
184  --PRAGMA RESTRICT_REFERENCES (get_chr_oec_canbe_funded, TRUST);
185 
186 -- Total contract has been funded oec amount
187  FUNCTION get_chr_oec_hasbeen_funded_amt(
188   p_contract_id                       IN NUMBER                 -- contract hdr
189  ,p_vendor_site_id               IN NUMBER   DEFAULT OKL_API.G_MISS_NUM
190  ) RETURN NUMBER;
191  --PRAGMA RESTRICT_REFERENCES (get_chr_oec_hasbeen_funded_amt, TRUST);
192 
193 ------------------
194 
195 -- Total contract allowable expnese funded remaining
196  FUNCTION get_chr_exp_canbe_funded_rem(
197   p_contract_id                       IN NUMBER                 -- contract hdr
198   ,p_vendor_site_id               IN NUMBER                 -- vendor_site_id
199  ) RETURN NUMBER;
200  --PRAGMA RESTRICT_REFERENCES (get_chr_exp_canbe_funded_rem, TRUST);
201 
202 -- Total contract has been funded expense amount
203  FUNCTION get_chr_exp_hasbeen_funded_amt(
204   p_contract_id                       IN NUMBER                 -- contract hdr
205   ,p_vendor_site_id               IN NUMBER                 -- vendor_site_id
206  ) RETURN NUMBER;
207  --PRAGMA RESTRICT_REFERENCES (get_chr_exp_hasbeen_funded_amt, TRUST);
208 
209 -- Total contract can be funded expense amount
210  FUNCTION get_chr_exp_canbe_funded_amt(
211   p_contract_id                       IN NUMBER                 -- contract hdr
212   ,p_vendor_site_id               IN NUMBER                 -- vendor_site_id
213  ,p_due_date                     IN date  default sysdate   --cklee added) RETURN NUMBER
214  ) RETURN NUMBER;
215  --PRAGMA RESTRICT_REFERENCES (get_chr_exp_canbe_funded_amt, TRUST);
216 
217 -- Total contract can be funded expense amount
218  FUNCTION get_chr_exp_canbe_funded_amt(
219   p_contract_id                       IN NUMBER                 -- contract hdr
220   ,p_due_date                         IN date  default sysdate  --cklee added
221  ) RETURN NUMBER;
222  --PRAGMA RESTRICT_REFERENCES (get_chr_exp_canbe_funded_amt, TRUST);
223 
224 -- Total contract has been funded expense amount
225  FUNCTION get_chr_exp_hasbeen_funded_amt(
226   p_contract_id                       IN NUMBER                 -- contract hdr
227  ) RETURN NUMBER;
228  --PRAGMA RESTRICT_REFERENCES (get_chr_exp_hasbeen_funded_amt, TRUST);
229 
230 ------------------
231 -- get line oec for contract funded
232  FUNCTION get_contract_line_amt(
233   p_khr_id                       IN NUMBER                 -- contract hdr
234  ,p_kle_id                       IN NUMBER   DEFAULT OKL_API.G_MISS_NUM              -- contract line
235  ,p_vendor_site_id               IN NUMBER   DEFAULT OKL_API.G_MISS_NUM
236  ) RETURN NUMBER;
237  --PRAGMA RESTRICT_REFERENCES (get_contract_line_amt, TRUST);
238 
239  FUNCTION get_contract_line_funded_amt(
240     p_khr_id                       IN NUMBER
241    ,p_kle_id                       IN NUMBER
242    ,p_ref_type_code                IN VARCHAR2 DEFAULT OKL_API.G_MISS_CHAR
243  ) RETURN NUMBER;
244  --PRAGMA RESTRICT_REFERENCES (get_contract_line_funded_amt, TRUST);
245 
246  FUNCTION get_contract_line_funded_amt(
247     p_fund_id                       IN NUMBER
248     ,p_fund_type                    IN VARCHAR2
249  ) RETURN NUMBER;
250  --PRAGMA RESTRICT_REFERENCES (get_contract_line_funded_amt, TRUST);
251 
252  FUNCTION is_funding_unique(
253   p_vendor_id                    IN NUMBER
254  ,p_fund_number                  IN VARCHAR2
255  ,p_org_id                       IN NUMBER  DEFAULT OKL_API.G_MISS_NUM
256  ) RETURN VARCHAR2;
257 
258  FUNCTION is_contract_line_unique(
259   p_kle_id                       IN NUMBER -- contract_line_id
260  ,p_fund_id                      IN NUMBER
261  ,p_fund_line_id                 IN NUMBER
262  ,p_mode                         IN VARCHAR2 DEFAULT 'C'
263  ,p_org_id                       IN NUMBER  DEFAULT OKL_API.G_MISS_NUM
264  ) RETURN VARCHAR2;
265 
266  FUNCTION is_kle_id_unique(
267     p_tplv_tbl                 IN tplv_tbl_type
268  ) RETURN VARCHAR2;
269 
270 -- Check to see if contract is legal to fund
271  FUNCTION is_chr_fundable_status(
272   p_contract_id                       IN NUMBER                 -- contract hdr
273  ) RETURN NUMBER;
274  --PRAGMA RESTRICT_REFERENCES (is_chr_fundable_status, TRUST);
275 
276 ------------------------------------------------------------------
277  FUNCTION get_amount_prefunded(
278  p_contract_id                   IN NUMBER
279  ,p_vendor_site_id               IN NUMBER   DEFAULT OKL_API.G_MISS_NUM
280  ) RETURN NUMBER;
281  --PRAGMA RESTRICT_REFERENCES (get_amount_prefunded, TRUST);
282 
283  FUNCTION get_total_funded(
284  p_contract_id                   IN NUMBER
285  ,p_contract_line_id             IN NUMBER  DEFAULT OKL_API.G_MISS_NUM
286  ) RETURN NUMBER;
287  --PRAGMA RESTRICT_REFERENCES (get_total_funded, TRUST);
288 
289  FUNCTION get_total_retention(
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_retention, TRUST);
294 
295 -- added for bug 2604862
296  FUNCTION get_amount_borrowerPay(
297  p_contract_id                   IN NUMBER
298  ,p_contract_line_id             IN NUMBER  DEFAULT OKL_API.G_MISS_NUM
299  ) RETURN NUMBER;
300  --PRAGMA RESTRICT_REFERENCES (get_amount_borrowerPay, TRUST);
301 
302  FUNCTION get_creditRem_by_chrid(
303   p_contract_id                       IN NUMBER                 -- contract hdr
304  ) RETURN NUMBER;
305  --PRAGMA RESTRICT_REFERENCES (get_creditRem_by_chrid, TRUST);
306 -- added for bug 2604862
307 
308   PROCEDURE CREATE_ACCOUNTING_DIST(p_api_version      IN  NUMBER,
309                               p_init_msg_list  IN  VARCHAR2 DEFAULT OKL_API.G_FALSE,
310                               x_return_status  OUT NOCOPY VARCHAR2,
311                               x_msg_count      OUT NOCOPY NUMBER,
312                               x_msg_data       OUT NOCOPY VARCHAR2,
313                               p_status         IN  OKL_TRX_AP_INVOICES_B.trx_status_code%TYPE,
314                               p_fund_id        IN  OKL_TRX_AP_INVOICES_B.ID%TYPE);--,| 21-May-2007 cklee    OKLR12B Accounting CR                                 |
315 --start:| 21-May-2007 cklee    OKLR12B Accounting CR                                 |
316 -- 11.5.10 cklee subsidy
317 --                              p_fund_line_id   IN  OKL_TXL_AP_INV_LNS_B.ID%TYPE DEFAULT NULL,
318 --                              p_subsidy_amt    IN  NUMBER DEFAULT NULL,
319 --                              p_sty_id         IN  NUMBER DEFAULT NULL);
320 --end:| 21-May-2007 cklee    OKLR12B Accounting CR                                 |
321 
322 -- added for 11.5.10 subsidy
323  FUNCTION get_funding_subsidy_amount(
324     p_chr_id                       IN  NUMBER,
325     p_asset_cle_id                 IN  NUMBER,
326     p_vendor_site_id               IN  NUMBER DEFAULT NULL
327  ) RETURN NUMBER;
328  --PRAGMA RESTRICT_REFERENCES (get_funding_subsidy_amount, TRUST);
329 
330  FUNCTION get_partial_subsidy_amount(
331     p_asset_cle_id                 IN  NUMBER,
332     p_req_fund_amount              IN  NUMBER
333  ) RETURN NUMBER;
334  --PRAGMA RESTRICT_REFERENCES (get_partial_subsidy_amount, TRUST);
335 
336  FUNCTION get_amount_subsidy(
337  p_contract_id                   IN NUMBER
338  ,p_contract_line_id             IN NUMBER  DEFAULT OKL_API.G_MISS_NUM  -- fixed asset ID
339  ) RETURN NUMBER;
340  --PRAGMA RESTRICT_REFERENCES (get_amount_subsidy, TRUST);
341 
342   PROCEDURE create_fund_asset_subsidies
343                              (p_api_version    IN  NUMBER,
344                               p_init_msg_list  IN  VARCHAR2 DEFAULT OKL_API.G_FALSE,
345                               x_return_status  OUT NOCOPY VARCHAR2,
346                               x_msg_count      OUT NOCOPY NUMBER,
347                               x_msg_data       OUT NOCOPY VARCHAR2,
348                               p_status         IN  OKL_TRX_AP_INVOICES_B.trx_status_code%TYPE,
349                               p_fund_id        IN  OKL_TRX_AP_INVOICES_B.ID%TYPE);
350 -- added for 11.5.10 subsidy
351 
352  PROCEDURE refresh_fund_chklst(
353     p_api_version                  IN NUMBER
354    ,p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE
355    ,x_return_status                OUT NOCOPY VARCHAR2
356    ,x_msg_count                    OUT NOCOPY NUMBER
357    ,x_msg_data                     OUT NOCOPY VARCHAR2
358    ,p_chr_id                       IN  okc_k_headers_b.id%type
359    ,p_MLA_id                       IN  okc_k_headers_b.id%type DEFAULT NULL
360    ,p_creditline_id                IN  okc_k_headers_b.id%type DEFAULT NULL
361  );
362 
363  FUNCTION get_amount_manu_disb(
364  p_contract_id                   IN NUMBER
365  ,p_contract_line_id             IN NUMBER  DEFAULT OKL_API.G_MISS_NUM  -- fixed asset ID
366  ) RETURN NUMBER;
367  --PRAGMA RESTRICT_REFERENCES (get_amount_manu_disb, TRUST);
368 
369 -- strat: T and A 11/04/2004
370 -- Total contract can be funded fee amount
371 ----------------------------------------------------------------------------------
372 -- Start of comments
373 --
374 -- Procedure Name  : Total contract can be funded fee amount
375 -- Description     : Total contract can be funded fee amount for a fee line
376 --                   by an given date
377 --                   IN: p_contract_id is the lease contract ID
378 --                   IN: p_fee_line_id is the lease contract fee line ID
379 --                   IN: p_effective_date is the effective date of the total fee amount
380 --                   OUT: x_value is the fee amount
381 -- Business Rules  : x_value will be 0 if fee line has not meet the following requirements
382 --                 : 1. Effective date greater than line start date
383 --                      (or contract start date if line start date is null)
384 --                   2. contract okc_k_headers_b.ste_code
385 --                      in ('ENTERED', 'ACTIVE','SIGNED')
386 --                   3. fee line is not passthrough
387 --                   4. fee line is associated with vendor
388 -- Business Rules  :
389 -- Parameters      :
390 -- Version         : 1.0
391 -- End of comments
392 ----------------------------------------------------------------------------------
393  PROCEDURE contract_fee_canbe_funded(
394     p_api_version                  IN NUMBER
395    ,p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE
396    ,x_return_status                OUT NOCOPY VARCHAR2
397    ,x_msg_count                    OUT NOCOPY NUMBER
398    ,x_msg_data                     OUT NOCOPY VARCHAR2
399    ,x_value                        OUT NOCOPY NUMBER
400    ,p_contract_id                  IN NUMBER
401    ,p_fee_line_id                  IN NUMBER
402    ,p_effective_date               IN DATE
403  );
404 
405  FUNCTION get_chr_fee_canbe_funded_amt(
406   p_contract_id                IN NUMBER                 -- contract hdr
407   ,p_fee_line_id               IN NUMBER
408   ,p_effective_date            IN DATE
409 ) RETURN NUMBER;
410 -- end: T and A 11/04/2004
411 
412 -- strat: T and A bug#4151222
413 ----------------------------------------------------------------------------------
414 -- Start of comments
415 --
416 -- Procedure Name  : Is contract fully funded
417 -- Description     : Is contract fully funded
418 --                   IN: p_contract_id is the lease contract ID
419 --                   OUT: x_value is the flag to indicate if contract is fully funded
420 -- Business Rules  : x_value will be false if error occurred
421 -- Parameters      :
422 -- Version         : 1.0
423 -- End of comments
424 ----------------------------------------------------------------------------------
425  PROCEDURE is_contract_fully_funded(
426     p_api_version                  IN NUMBER
427    ,p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE
428    ,x_return_status                OUT NOCOPY VARCHAR2
429    ,x_msg_count                    OUT NOCOPY NUMBER
430    ,x_msg_data                     OUT NOCOPY VARCHAR2
431    ,x_value                        OUT NOCOPY BOOLEAN
432    ,p_contract_id                  IN NUMBER
433  );
434 
435 --Added procedure get_checklist_source as part of bug 5912358, Funding OA Migration Issues
436  ----------------------------------------------------------------------------------
437 -- Start of comments
438 --
439 -- Procedure Name  : get_checklist_source
440 -- Description     : Returns checklist source details whether contract was originated from lease app, whether checklist exists or not and get source checklist template.
441 --                   IN: p_chr_id is the contract ID
442 --                   OUT: x_lease_app_found returns where contract was originated from leaseapp or not
443 --                   OUT: x_lease_app_list_found returns whether lease checklist exists or not
444 --                   OUT: x_funding_checklist_tpl returns source checklist template ID
445 --                   OUT: x_lease_app_id returns lease application id
446 --                   OUT: x_credit_id returns credit template id
447 -- Business Rules  :
448 -- Parameters      :
449 -- Version         : 1.0
450 -- End of comments
451 ----------------------------------------------------------------------------------
452  PROCEDURE get_checklist_source(
453     p_api_version                  IN NUMBER
454    ,p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE
455    ,x_return_status                OUT NOCOPY VARCHAR2
456    ,x_msg_count                    OUT NOCOPY NUMBER
457    ,x_msg_data                     OUT NOCOPY VARCHAR2
458    ,p_chr_id                        IN okc_k_headers_b.id%type
459    ,x_lease_app_found       OUT NOCOPY VARCHAR2
460    ,x_lease_app_list_found OUT NOCOPY VARCHAR2
461    ,x_funding_checklist_tpl OUT NOCOPY okc_rules_b.rule_information2%TYPE
462    ,x_lease_app_id          OUT NOCOPY NUMBER
463    ,x_credit_id                OUT NOCOPY NUMBER
464  );
465 
466  FUNCTION is_contract_fully_funded(
467   p_contract_id                IN NUMBER
468  ) RETURN boolean;
469 -- end: T and A bug#4151222
470 
471 -- start: 06-May-2005  cklee okl.h Lease App IA Authoring
472 ----------------------------------------------------------------------------------
473 -- Start of comments
474 --
475 -- Procedure Name  : update_checklist_function
476 -- Description     : This API will execute function for each item and
477 --                   update the execution results for the function.
478 -- Business Rules  :
479 -- Parameters      :
480 -- Version         : 1.0
481 -- End of comments
482 ----------------------------------------------------------------------------------
483  PROCEDURE update_checklist_function(
484     p_api_version                  IN NUMBER
485    ,p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE
486    ,x_return_status                OUT NOCOPY VARCHAR2
487    ,x_msg_count                    OUT NOCOPY NUMBER
488    ,x_msg_data                     OUT NOCOPY VARCHAR2
489    ,p_fund_req_id                  IN  NUMBER
490  );
491 -- end: 06-May-2005  cklee okl.h Lease App IA Authoring
492 
493 END OKL_FUNDING_PVT;