DBA Data[Home] [Help]

PACKAGE: APPS.OKL_SECURITIZATION_PVT

Source


1 PACKAGE Okl_Securitization_Pvt AS
2 /* $Header: OKLRSZSS.pls 120.3 2005/11/17 01:37:31 fmiao noship $ */
3  ----------------------------------------------------------------------------
4  -- GLOBAL VARIABLES
5  ----------------------------------------------------------------------------
6   G_PKG_NAME                    CONSTANT VARCHAR2(200) := 'OKL_SECURTIZATION_PVT';
7   G_APP_NAME                    CONSTANT VARCHAR2(3)   :=  Okl_Api.G_APP_NAME;
8 
9   G_RET_STS_SUCCESS		  CONSTANT VARCHAR2(1) 	:= Okl_Api.G_RET_STS_SUCCESS;
10   G_RET_STS_UNEXP_ERROR		  CONSTANT VARCHAR2(1) 	:= Okl_Api.G_RET_STS_UNEXP_ERROR;
11   G_RET_STS_ERROR		        CONSTANT VARCHAR2(1) 	:= Okl_Api.G_RET_STS_ERROR;
12   G_EXCEPTION_ERROR		  EXCEPTION;
13   G_EXCEPTION_UNEXPECTED_ERROR  EXCEPTION;
14 
15   G_UNEXPECTED_ERROR            CONSTANT VARCHAR2(30) := 'OKL_UNEXPECTED_ERROR';
16   G_SQLERRM_TOKEN               CONSTANT VARCHAR2(30) := 'OKL_SQLERRM';
17   G_SQLCODE_TOKEN               CONSTANT VARCHAR2(30) := 'OKL_SQLCODE';
18 
19   G_STS_CODE_ACTIVE             CONSTANT VARCHAR2(10) := 'ACTIVE';
20   G_STS_CODE_BOOKED             CONSTANT VARCHAR2(10) := 'BOOKED';
21   G_PROCESS_AUTO_BACK_BACK      CONSTANT VARCHAR2(30) := 'AUTO_BACK_BACK';
22   G_PROCESS_NOT_ALLOWED         CONSTANT VARCHAR2(30) := 'NOT_ALLOWED';
23   G_PRIORITY_1                   CONSTANT NUMBER := 1;
24   G_PRIORITY_2                   CONSTANT NUMBER := 2;
25   G_PROCESS_RULE_CODE           CONSTANT VARCHAR2(30) := 'LASEPR';
26 
27  -- mvasudev
28   G_EXC_NAME_ERROR		CONSTANT VARCHAR2(50) := 'OKL_API.G_RET_STS_ERROR';
29   G_EXC_NAME_UNEXP_ERROR	CONSTANT VARCHAR2(50) := 'OKL_API.G_RET_STS_UNEXP_ERROR';
30   G_EXC_NAME_OTHERS	        CONSTANT VARCHAR2(6) := 'OTHERS';
31   G_API_TYPE	CONSTANT VARCHAR(4) := '_PVT';
32   G_TRX_TYPE_REMOVAL CONSTANT VARCHAR2(6) := 'REMOVE';
33   G_TRX_REASON_BUYBACK CONSTANT VARCHAR2(8) := 'BUY_BACK';
34 
35 -- cklee 08/11/03
36   G_GREATER_THAN             CONSTANT VARCHAR2(2) := '>';
37   G_LESS_THAN                CONSTANT VARCHAR2(2) := '<';
38   G_EQUAL_TO                 CONSTANT VARCHAR2(2) := '=';
39   G_LESS_THAN_EQUAL_TO       CONSTANT VARCHAR2(2) := '<=';
40   G_GREATER_THAN_EQUAL_TO    CONSTANT VARCHAR2(2) := '>=';
41 
42 
43 
44  ----------------------------------------------------------------------------
45  -- Data Structures
46  ----------------------------------------------------------------------------
47   TYPE inv_agmt_chr_id_rec_type IS RECORD (
48      khr_id         OKC_K_HEADERS_B.ID%TYPE            := Okc_Api.G_MISS_NUM
49     ,process_code   OKC_RULES_B.RULE_INFORMATION1%TYPE := Okc_Api.G_MISS_CHAR
50     );
51 
52   TYPE inv_agmt_chr_id_tbl_type IS TABLE OF inv_agmt_chr_id_rec_type
53         INDEX BY BINARY_INTEGER;
54 
55   -- mvasudev, for buyback apis
56   SUBTYPE pocv_rec_type IS Okl_Poc_Pvt.pocv_rec_type;
57   SUBTYPE pocv_tbl_type IS Okl_Poc_Pvt.pocv_tbl_type;
58   SUBTYPE poxv_rec_type IS Okl_Pox_Pvt.poxv_rec_type;
59   SUBTYPE poxv_tbl_type IS Okl_Pox_Pvt.poxv_tbl_type;
60 
61   -- mvasudev, for modify_poc apis
62   SUBTYPE cle_tbl_type IS Okl_Split_Asset_Pvt.cle_tbl_type;
63 
64 
65   G_TRX_TYPE_REPLACE CONSTANT VARCHAR2(10) := 'REPLACE';
66 
67   G_TRX_REASON_CONTRACT_REBOOK   CONSTANT VARCHAR2(20) := 'CONTRACT_REBOOK';
68   G_TRX_REASON_ASSET_SPLIT       CONSTANT VARCHAR2(20) := 'ASSET_SPLIT';
69   G_TRX_REASON_EARLY_TERMINATION CONSTANT VARCHAR2(20) := 'EARLY_TERMINATION';
70   G_TRX_REASON_ASSET_TERMINATION CONSTANT VARCHAR2(20) := 'ASSET_TERMINATION';
71   G_TRX_REASON_ASSET_DISPOSAL    CONSTANT VARCHAR2(20) := 'ASSET_DISPOSAL';
72   G_TRX_REASON_PURCHASE          CONSTANT VARCHAR2(20) := 'PURCHASE';
73   G_TRX_REASON_REPURCHASE        CONSTANT VARCHAR2(20) := 'REPURCHASE';
74   G_TRX_REASON_SCRAP             CONSTANT VARCHAR2(20) := 'SCRAP';
75   G_TRX_REASON_REMARKET          CONSTANT VARCHAR2(20) := 'REMARKET';
76   G_TRX_REASON_AGR_TERMINATION   CONSTANT VARCHAR2(25) := 'AGREEMENT_TERMINATION';
77 
78  ----------------------------------------------------------------------------
79  -- Global Exception
80  ----------------------------------------------------------------------------
81  G_EXCEPTION_HALT_VALIDATION	EXCEPTION;
82 
83  ----------------------------------------------------------------------------
84  -- Procedures and Functions
85  ------------------------------------------------------------------------------
86 -----------------------------------------------------------------------
87 -- Start of comments
88 --
89 -- Procedure Name  : check_khr_securitized
90 -- Description     : Checks if a contract is securitized on the given date
91 -- Business Rules  :
92 -- Parameters      :
93 --                 : x_value: OKL_API.G_TRUE: true, OKL_API.G_FALSE false,
94 -- Version         : 1.0
95 -- End of comments
96 -----------------------------------------------------------------------
97 PROCEDURE check_khr_securitized(
98     p_api_version                  IN NUMBER
99    ,p_init_msg_list                IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
100    ,x_return_status                OUT NOCOPY VARCHAR2
101    ,x_msg_count                    OUT NOCOPY NUMBER
102    ,x_msg_data                     OUT NOCOPY VARCHAR2
103    ,p_khr_id                       IN okc_k_headers_b.ID%TYPE
104    ,p_effective_date               IN DATE
105 -- cklee 08-08-2003 11.5.10
106    ,p_effective_date_operator      IN VARCHAR2 DEFAULT G_GREATER_THAN_EQUAL_TO
107    ,p_stream_type_subclass         IN okl_strm_type_b.stream_type_subclass%TYPE DEFAULT NULL
108 -- cklee 08-08-2003 11.5.10
109    ,x_value                        OUT NOCOPY VARCHAR2
110    ,x_inv_agmt_chr_id_tbl          OUT NOCOPY inv_agmt_chr_id_tbl_type
111  );
112 
113 ----------------------------------------------------------------------------------
114 -- Start of comments
115 --
116 -- Procedure Name  : is_khr_securitized
117 -- Description     : Checks if a contract is securitized on the given date
118 -- Business Rules  :
119 -- Parameters      :
120 --                 : return: OKL_API.G_TRUE: true, OKL_API.G_FALSE false,
121 --                   OKL_API.G_RET_STS_ERROR, OKL_API.G_RET_STS_UNEXP_ERROR
122 -- Version         : 1.0
123 -- End of comments
124 ----------------------------------------------------------------------------------
125 /*
126 -- mvasudev, 10/03/2003, de-comissioned
127  FUNCTION is_khr_securitized(
128    p_khr_id                        IN okc_k_headers_b.ID%TYPE
129    ,p_effective_date               IN DATE
130 -- cklee 08-08-2003 11.5.10
131    ,p_effective_date_operator      IN VARCHAR2 DEFAULT G_GREATER_THAN_EQUAL_TO
132    ,p_stream_type_subclass         IN okl_strm_type_b.stream_type_subclass%TYPE DEFAULT NULL
133 -- cklee 08-08-2003 11.5.10
134  ) RETURN VARCHAR;
135  PRAGMA RESTRICT_REFERENCES (is_khr_securitized, TRUST);
136 */
137 
138 -----------------------------------------------------------------------
139 -- Start of comments
140 --
141 -- Procedure Name  : check_kle_securitized
142 -- Description     : Checks if an Asset is securitized on the given date
143 -- Business Rules  :
144 -- Parameters      :
145 --                 : x_value: OKL_API.G_TRUE: true, OKL_API.G_FALSE false,
146 -- Version         : 1.0
147 -- End of comments
148 -----------------------------------------------------------------------
149  PROCEDURE check_kle_securitized(
150     p_api_version                  IN NUMBER
151    ,p_init_msg_list                IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
152    ,x_return_status                OUT NOCOPY VARCHAR2
153    ,x_msg_count                    OUT NOCOPY NUMBER
154    ,x_msg_data                     OUT NOCOPY VARCHAR2
155    ,p_kle_id                       IN okc_k_lines_b.ID%TYPE
156    ,p_effective_date               IN DATE
157 -- cklee 08-08-2003 11.5.10
158    ,p_effective_date_operator      IN VARCHAR2 DEFAULT G_GREATER_THAN_EQUAL_TO
159    ,p_stream_type_subclass         IN okl_strm_type_b.stream_type_subclass%TYPE DEFAULT NULL
160 -- cklee 08-08-2003 11.5.10
161    ,x_value                        OUT NOCOPY VARCHAR2
162    ,x_inv_agmt_chr_id_tbl          OUT NOCOPY inv_agmt_chr_id_tbl_type
163  );
164 ----------------------------------------------------------------------------------
165 -- Start of comments
166 --
167 -- Procedure Name  : is_kle_securitized
168 -- Description     : Checks if an Asset is securitized on the given date
169 -- Business Rules  :
170 -- Parameters      :
171 --                 : return: OKL_API.G_TRUE: true, OKL_API.G_FALSE false,
172 --                   OKL_API.G_RET_STS_ERROR, OKL_API.G_RET_STS_UNEXP_ERROR
173 -- Version         : 1.0
174 -- End of comments
175 ----------------------------------------------------------------------------------
176 /*
177 -- mvasudev, 10/03/2003, de-comissioned
178  FUNCTION is_kle_securitized(
179    p_kle_id                       IN okc_k_lines_b.ID%TYPE
180    ,p_effective_date               IN DATE
181 -- cklee 08-08-2003 11.5.10
182    ,p_effective_date_operator      IN VARCHAR2 DEFAULT G_GREATER_THAN_EQUAL_TO
183    ,p_stream_type_subclass         IN okl_strm_type_b.stream_type_subclass%TYPE DEFAULT NULL
184 -- cklee 08-08-2003 11.5.10
185  ) RETURN VARCHAR;
186  PRAGMA RESTRICT_REFERENCES (is_kle_securitized, TRUST);
187  */
188 
189 -----------------------------------------------------------------------
190 -- Start of comments
191 -- mvasudev, 10/03/2003
192 -- Procedure Name  : check_sty_securitized
193 -- Description     : Checks if a StreamType is securitized on the given date
194 -- Business Rules  :
195 -- Parameters      :
196 --                 : x_value: OKL_API.G_TRUE: true, OKL_API.G_FALSE false,
197 -- Version         : 1.0
198 -- End of comments
199 -----------------------------------------------------------------------
200  PROCEDURE check_sty_securitized(
201     p_api_version                  IN NUMBER
202    ,p_init_msg_list                IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
203    ,x_return_status                OUT NOCOPY VARCHAR2
204    ,x_msg_count                    OUT NOCOPY NUMBER
205    ,x_msg_data                     OUT NOCOPY VARCHAR2
206    ,p_khr_id                       IN okc_k_headers_b.ID%TYPE
207    ,p_effective_date               IN DATE
208    ,p_effective_date_operator      IN VARCHAR2 DEFAULT G_GREATER_THAN_EQUAL_TO
209    ,p_sty_id                       IN okl_strm_type_b.id%TYPE
210    ,x_value                        OUT NOCOPY VARCHAR2
211    ,x_inv_agmt_chr_id              OUT NOCOPY NUMBER
212  );
213 
214 ------------------------------------------------------------------------- Start of comments
215 --
216 -- Procedure Name  : check_stm_securitized
217 -- Description     : Checks if any of the Streams Element under a streams header is securitized
218 -- Business Rules  :
219 -- Parameters      :
220 --                 : x_value: OKL_API.G_TRUE: true, OKL_API.G_FALSE false,
221 -- Version         : 1.0
222 -- End of comments
223 -----------------------------------------------------------------------
224  PROCEDURE check_stm_securitized(
225     p_api_version                  IN NUMBER
226    ,p_init_msg_list                IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
227    ,x_return_status                OUT NOCOPY VARCHAR2
228    ,x_msg_count                    OUT NOCOPY NUMBER
229    ,x_msg_data                     OUT NOCOPY VARCHAR2
230    ,p_stm_id                       IN okl_streams.ID%TYPE
231    ,p_effective_date               IN DATE
232    ,x_value                        OUT NOCOPY VARCHAR2
233  );
234 ----------------------------------------------------------------------------------
235 -- Start of comments
236 --
237 -- Procedure Name  : is_stm_securitized
238 -- Description     : Checks if any of the Streams Element under a streams header is securitized
239 -- Business Rules  :
240 -- Parameters      :
241 --                 : return: OKL_API.G_TRUE: true, OKL_API.G_FALSE false,
242 --                   OKL_API.G_RET_STS_ERROR, OKL_API.G_RET_STS_UNEXP_ERROR
243 -- Version         : 1.0
244 -- End of comments
245 ----------------------------------------------------------------------------------
246 /*
247 -- mvasudev, 10/03/2003, de-comissioned
248  FUNCTION is_stm_securitized(
249    p_stm_id                       IN okl_streams.ID%TYPE
250    ,p_effective_date               IN DATE
251  ) RETURN VARCHAR;
252  PRAGMA RESTRICT_REFERENCES (is_stm_securitized, TRUST);
253  */
254 ------------------------------------------------------------------------- Start of comments
255 --
256 -- Procedure Name  : check_sel_securitized
257 -- Description     : Checks if a Stream Element is securitized
258 -- Business Rules  :
259 -- Parameters      :
260 --                 : x_value: OKL_API.G_TRUE: true, OKL_API.G_FALSE false,
261 -- Version         : 1.0
262 -- End of comments
263 -----------------------------------------------------------------------
264  PROCEDURE check_sel_securitized(
265     p_api_version                  IN NUMBER
266    ,p_init_msg_list                IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
267    ,x_return_status                OUT NOCOPY VARCHAR2
268    ,x_msg_count                    OUT NOCOPY NUMBER
269    ,x_msg_data                     OUT NOCOPY VARCHAR2
270    ,p_sel_id                       IN okl_strm_elements.ID%TYPE
271    ,p_effective_date               IN DATE
272    ,x_value                        OUT NOCOPY VARCHAR2
273  );
274 
275 
276 
277 ----------------------------------------------------------------------------------
278 -- Start of comments
279 --
280 -- Procedure Name  : is_sel_securitized
281 -- Description     : Checks if a Stream Element is securitized
282 -- Business Rules  :
283 -- Parameters      :
284 --                 : return: OKL_API.G_TRUE: true, OKL_API.G_FALSE false,
285 --                   OKL_API.G_RET_STS_ERROR, OKL_API.G_RET_STS_UNEXP_ERROR
286 -- Version         : 1.0
287 -- End of comments
288 ----------------------------------------------------------------------------------
289 /*
290 -- mvasudev, 10/03/2003, de-comissioned
291  FUNCTION is_sel_securitized(
292    p_sel_id                   IN okl_strm_elements.ID%TYPE
293    ,p_effective_date               IN DATE
294  ) RETURN VARCHAR;
295  PRAGMA RESTRICT_REFERENCES (is_sel_securitized, TRUST);
296  */
297 
298 ----------------------------------------------------------------------------------
299 -- Start of comments
300 --
301 -- Procedure Name  : buyback_asset
302 -- Description     : Automatically buy back stream elements based on passed in kle_id
303 -- Business Rules  :
304 -- Parameters      :
305 -- Version         : 1.0
306 -- End of comments
307 ----------------------------------------------------------------------------------
308  PROCEDURE buyback_asset(
309     p_api_version                  IN NUMBER
310    ,p_init_msg_list                IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
311    ,x_return_status                OUT NOCOPY VARCHAR2
312    ,x_msg_count                    OUT NOCOPY NUMBER
313    ,x_msg_data                     OUT NOCOPY VARCHAR2
314    ,p_kle_id                       IN okc_k_lines_b.ID%TYPE
315    ,p_effective_date               IN DATE
316 
317  );
318 
319  ----------------------------------------------------------------------------------
320  -- Start of comments
321  --
322  -- Procedure Name  : buyback_contract
323  -- Description     : Automatically buy back stream elements based on passed in khr_id
324  -- Business Rules  :
325  -- Parameters      :
326  -- Version         : 1.0
327  -- End of comments
328  ----------------------------------------------------------------------------------
329  PROCEDURE buyback_contract(
330     p_api_version                  IN NUMBER
331    ,p_init_msg_list                IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
332    ,x_return_status                OUT NOCOPY VARCHAR2
333    ,x_msg_count                    OUT NOCOPY NUMBER
334    ,x_msg_data                     OUT NOCOPY VARCHAR2
335    ,p_khr_id                       IN okc_k_headers_b.ID%TYPE
336    ,p_effective_date               IN DATE
337  );
338 
339 -------------------------------------------------------------------------------------------------------
340 -- Start of comments
341 --
342 -- Procedure Name  : process_khr_investor_rules
343 -- Description     : checks the Buyback rule at the Investor Agreement and performs Buyback if required
344 -- Business Rules  :
345 -- Parameters      :
346 --                  x_process_code: AUTO_BUY_BACK, NOT_ALLOWED
347 --                  x_inv_agmt_chr_id_tbl: associated investor agreement id and process code
348 -- Version         : 1.0
349 -- End of comments
350 ---------------------------------------------------------------------------------------------------------
351  PROCEDURE process_khr_investor_rules(
352     p_api_version                  IN NUMBER
353    ,p_init_msg_list                IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
354    ,x_return_status                OUT NOCOPY VARCHAR2
355    ,x_msg_count                    OUT NOCOPY NUMBER
356    ,x_msg_data                     OUT NOCOPY VARCHAR2
357    ,p_khr_id                       IN okc_k_headers_b.ID%TYPE
358    ,p_effective_date               IN DATE
359    ,p_rgd_code                     IN  VARCHAR2
360    ,p_rdf_code                     IN  VARCHAR2 DEFAULT NULL
361    ,x_process_code                 OUT NOCOPY VARCHAR2
362    ,x_inv_agmt_chr_id_tbl          OUT NOCOPY inv_agmt_chr_id_tbl_type
363  );
364 
365 
366 -------------------------------------------------------------------------------------------------------
367 -- Start of comments
368 --
369 -- Procedure Name  : process_kle_investor_rules
370 -- Description     : checks the Buyback rule at the Investor Agreement and performs Buyback if required
371 -- Business Rules  :
372 -- Parameters      :
373 --                  x_process_code: AUTO_BUY_BACK, NOT_ALLOWED
374 --                  x_inv_agmt_chr_id_tbl: associated investor agreement id and process code
375 -- Version         : 1.0
376 -- End of comments
377 ---------------------------------------------------------------------------------------------------------
378  PROCEDURE process_kle_investor_rules(
379     p_api_version                  IN NUMBER
380    ,p_init_msg_list                IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
381    ,x_return_status                OUT NOCOPY VARCHAR2
382    ,x_msg_count                    OUT NOCOPY NUMBER
383    ,x_msg_data                     OUT NOCOPY VARCHAR2
384    ,p_kle_id                       IN okc_k_lines_b.ID%TYPE
385    ,p_effective_date               IN DATE
386    ,p_rgd_code                     IN  VARCHAR2
387    ,p_rdf_code                     IN  VARCHAR2 DEFAULT NULL
388    ,x_process_code                 OUT NOCOPY VARCHAR2
389    ,x_inv_agmt_chr_id_tbl          OUT NOCOPY inv_agmt_chr_id_tbl_type
390  );
391 
392 -------------------------------------------------------------------------------------------------------
393 -- Start of comments
394 --
395 -- Procedure Name  : buyback_pool_contents
396 -- Description     : Performs Buyback on streams specified by the Stream_Type_SubClass
397 -- Business Rules  :
398 -- Parameters      :
399 -- Version         : 1.0
400 -- End of comments
401 ---------------------------------------------------------------------------------------------------------
402   PROCEDURE buyback_pool_contents(
403     p_api_version                  IN NUMBER
404    ,p_init_msg_list                IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
405    ,p_khr_id                       IN okc_k_headers_b.ID%TYPE
406    ,p_pol_id                       IN okl_pools.ID%TYPE
407    ,p_stream_type_subclass         IN okl_strm_type_b.stream_type_subclass%TYPE
408    ,p_effective_date               IN DATE
409    ,x_return_status                OUT NOCOPY VARCHAR2
410    ,x_msg_count                    OUT NOCOPY NUMBER
411    ,x_msg_data                     OUT NOCOPY VARCHAR2);
412 
413 
414  ----------------------------------------------------------------------------------
415  -- Start of comments
416  --
417  -- Procedure Name  : calculate_buyback_amount
418  -- Description     : Calculate BuyBack amount for a given Lease Contract, Pool,
419  --                   StreamType_Subclass
420  -- Business Rules  :
421  -- Parameters      :
422  -- Version         : 1.0
423  -- End of comments
424  ----------------------------------------------------------------------------------
425  PROCEDURE calculate_buyback_amount(
426     p_api_version                  IN  NUMBER
427    ,p_init_msg_list                IN  VARCHAR2 DEFAULT Okc_Api.G_FALSE
428    ,p_khr_id                       IN okc_k_headers_b.ID%TYPE
429    ,p_pol_id                       IN okl_pools.ID%TYPE
430    ,p_stream_type_subclass         IN okl_strm_type_b.stream_type_subclass%TYPE
431    ,x_buyback_amount               OUT NOCOPY NUMBER
432    ,x_return_status                OUT NOCOPY VARCHAR2
433    ,x_msg_count                    OUT NOCOPY NUMBER
434    ,x_msg_data                     OUT NOCOPY VARCHAR2
435  );
436 
437  ----------------------------------------------------------------------------------
438  -- Start of comments
439  --
440  -- Procedure Name  : modify_pool_contents
441  -- Description     : Gateway API for DownStream Lease Processes to Modify Pool
442  --                   Contents upon some regular changes.
443  -- Business Rules  :
444  -- Parameters      :
445  -- Version         : 1.0
446  -- End of comments
447  ----------------------------------------------------------------------------------
448  PROCEDURE modify_pool_contents(
449     p_api_version                  IN  NUMBER
450    ,p_init_msg_list                IN  VARCHAR2 DEFAULT Okc_Api.G_FALSE
451    ,p_transaction_reason           IN  VARCHAR2
452    ,p_khr_id                       IN okc_k_headers_b.ID%TYPE
453    ,p_kle_id                       IN OKC_K_LINES_B.ID%TYPE   DEFAULT NULL
454    ,p_stream_type_subclass         IN okl_strm_type_b.stream_type_subclass%TYPE DEFAULT NULL
455    ,p_transaction_date             IN DATE
456    ,p_effective_date               IN DATE
457    ,x_return_status                OUT NOCOPY VARCHAR2
458    ,x_msg_count                    OUT NOCOPY NUMBER
459    ,x_msg_data                     OUT NOCOPY VARCHAR2
460  );
461 
462  ----------------------------------------------------------------------------------
463  -- Start of comments
464  --
465  -- Procedure Name  : modify_pool_contents
466  -- Description     : Gateway API for DownStream Lease Processes to Modify Pool
467  --                   Contents upon Asset Split.
468  -- Business Rules  :
469  -- Parameters      :
470  -- Version         : 1.0
471  -- End of comments
472  ----------------------------------------------------------------------------------
473  PROCEDURE modify_pool_contents(
474     p_api_version                  IN  NUMBER
475    ,p_init_msg_list                IN  VARCHAR2 DEFAULT Okc_Api.G_FALSE
476    ,p_transaction_reason           IN  VARCHAR2
477    ,p_khr_id                       IN okc_k_headers_b.ID%TYPE
478    ,p_kle_id                       IN OKC_K_LINES_B.ID%TYPE
479    ,p_split_kle_ids                IN cle_tbl_type
480    ,p_transaction_date             IN DATE
481    ,p_effective_date               IN DATE
482    ,x_return_status                OUT NOCOPY VARCHAR2
483    ,x_msg_count                    OUT NOCOPY NUMBER
484    ,x_msg_data                     OUT NOCOPY VARCHAR2
485  );
486 
487  ----------------------------------------------------------------------------------
488  -- Start of comments
489  --
490  -- Procedure Name  : check_khr_ia_associated
491  -- Description     : Utility API for Accounting and rest of okl to check whether
492  --                   a contract is associated with investor agreement.
493  -- Business Rules  :
494  -- Parameters      :
495  -- Version         : 1.0
496  -- End of comments
497  ----------------------------------------------------------------------------------
498  PROCEDURE check_khr_ia_associated(
499     p_api_version                  IN  NUMBER
500    ,p_init_msg_list                IN  VARCHAR2 DEFAULT Okl_Api.G_FALSE
501    ,x_return_status                OUT NOCOPY VARCHAR2
502    ,x_msg_count                    OUT NOCOPY NUMBER
503    ,x_msg_data                     OUT NOCOPY VARCHAR2
504    ,p_khr_id                       IN  NUMBER
505    ,p_scs_code                     IN  okc_k_headers_b.scs_code%TYPE DEFAULT NULL
506    ,p_trx_date                     IN  DATE
507    ,x_fact_synd_code               OUT NOCOPY fnd_lookups.lookup_code%TYPE
508    ,x_inv_acct_code                OUT NOCOPY okc_rules_b.RULE_INFORMATION1%TYPE
509  );
510 
511 
512 
513 
514 END Okl_Securitization_Pvt;