DBA Data[Home] [Help]

PACKAGE: APPS.OKL_CREATE_STREAMS_PVT

Source


1 PACKAGE Okl_Create_Streams_Pvt AUTHID CURRENT_USER AS
2  /* $Header: OKLRCSMS.pls 120.11 2005/11/25 08:42:44 kthiruva noship $ */
3 ------------------------------------------------------------------------------
4  -- Global Variables
5   G_EXC_NAME_ERROR  CONSTANT VARCHAR2(50) := 'OKL_API.G_RET_STS_ERROR';
6   G_EXC_NAME_UNEXP_ERROR CONSTANT VARCHAR2(50) := 'OKL_API.G_RET_STS_UNEXP_ERROR';
7   G_RET_STS_SUCCESS  CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
8   G_RET_STS_ERROR  CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_ERROR;
9   G_RET_STS_UNEXP_ERROR  CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_UNEXP_ERROR;
10   G_EXCEPTION_HALT_PROCESSING   EXCEPTION;
11   G_EXCEPTION_ERROR   EXCEPTION;
12   G_EXCEPTION_UNEXPECTED_ERROR  EXCEPTION;
13  G_APP_NAME             CONSTANT VARCHAR2(3)   :=  OKL_API.G_APP_NAME;
14  G_PKG_NAME             CONSTANT VARCHAR2(200) := 'OKL_CREATE_STREAMS_PVT';
15  G_OKC_APP              CONSTANT VARCHAR2(3)   :=  OKC_API.G_APP_NAME;
16  G_NO_DATA_FOUND        CONSTANT VARCHAR2(200) := 'OKL_NOT_FOUND';
17  G_REQUIRED_VALUE       CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
18  G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
19  G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
20  G_UNEXPECTED_ERROR     CONSTANT VARCHAR2(200) := 'OKL_CONTRACTS_UNEXPECTED_ERROR';
21  G_SQLERRM_TOKEN        CONSTANT VARCHAR2(200) := 'SQLERRM';
22  G_SQLCODE_TOKEN        CONSTANT VARCHAR2(200) := 'SQLCODE';
23  G_OKL_CSM_PENDING         CONSTANT VARCHAR2(15) := 'OKL_CSM_PENDING';
24  G_OKL_MULTIPLE_TARGET_VALUES CONSTANT VARCHAR2(26) := 'OKL_MULTIPLE_TARGET_VALUES';
25  G_SIS_HDR_INSERTED       CONSTANT VARCHAR2(20) := 'HDR_INSERTED';
26  G_SIS_DATA_ENTERED       CONSTANT VARCHAR2(20) := 'DATA_ENTERED';
27  G_SIS_PROCESS_COMPLETE   CONSTANT VARCHAR2(20) := 'PROCESS_COMPLETE';
28  G_SIS_PROCESSING_FAILED  CONSTANT VARCHAR2(20) := 'PROCESSING_FAILED';
29  G_SIS_PROCESSING_REQUEST CONSTANT VARCHAR2(20) := 'PROCESSING_REQUEST';
30  G_SIS_PROCESS_ABORTED    CONSTANT VARCHAR2(20) := 'PROCESS_ABORTED';
31  G_SIS_SERVER_NA          CONSTANT VARCHAR2(20) := 'SERVER_NA';
32  G_SIS_TIME_OUT           CONSTANT VARCHAR2(20) := 'TIME_OUT';
33  G_SIS_PROCESS_COMPLETE_ERRORS CONSTANT VARCHAR2(30) := 'PROCESS_COMPLETE_ERRORS';
34  G_SIS_RET_DATA_RECEIVED  CONSTANT VARCHAR2(30) := 'RET_DATA_RECEIVED';
35  G_CURRENT_STREAM         CONSTANT VARCHAR2(10) := 'CURR';
36  G_SFE_TYPE_ONE_OFF       CONSTANT VARCHAR2(30) :=  OKL_SFE_PVT.G_SFE_TYPE_ONE_OFF;
37  G_SFE_TYPE_PERIODIC_EXPENSE CONSTANT VARCHAR2(30) :=  OKL_SFE_PVT.G_SFE_TYPE_PERIODIC_EXPENSE;
38  G_SFE_TYPE_RENT          CONSTANT VARCHAR2(30) :=  OKL_SFE_PVT.G_SFE_TYPE_RENT;
39  G_SFE_TYPE_PERIODIC_INCOME CONSTANT VARCHAR2(30) :=  OKL_SFE_PVT.G_SFE_TYPE_PERIODIC_INCOME;
40  G_SFE_TYPE_LOAN CONSTANT VARCHAR2(30) :=  OKL_SFE_PVT.G_SFE_TYPE_LOAN;
41  --smahapat for fee type soln
42  G_SFE_TYPE_SECURITY_DEPOSIT CONSTANT VARCHAR2(30) := OKL_SFE_PVT.G_SFE_TYPE_SECURITY_DEPOSIT;
43  ---SGORANTL ADDED FOR SUBSIDY
44  G_SFE_TYPE_SUBSIDY CONSTANT VARCHAR2(30) := OKL_SFE_PVT.G_SFE_TYPE_SUBSIDY;
45  G_SIL_TYPE_LEASE CONSTANT VARCHAR2(10) :=  Okl_Sil_Pvt.G_SIL_TYPE_LEASE;
46  G_SIL_TYPE_LOAN CONSTANT VARCHAR2(10) :=  Okl_Sil_Pvt.G_SIL_TYPE_LOAN;
47   -- mvasudev , sno changes
48  G_SIY_TYPE_YIELD           CONSTANT VARCHAR2(3) := OKL_SIY_PVT.G_SIY_TYPE_YIELD;
49  G_SIY_TYPE_INTEREST_RATE   CONSTANT VARCHAR2(3) := OKL_SIY_PVT.G_SIY_TYPE_INTEREST_RATE;
50  G_EXPENSE  CONSTANT VARCHAR2(10) := 'EXPENSE';
51  G_INCOME  CONSTANT VARCHAR2(10) := 'INCOME';
52  G_ADVANCE  CONSTANT VARCHAR2(10) := 'ADVANCE';
53  G_ARREARS  CONSTANT VARCHAR2(10) := 'ARREARS';
54  G_FND_YES  CONSTANT VARCHAR2(1)  := 'Y';
55  G_FND_NO  CONSTANT VARCHAR2(1)  := 'N';
56  G_CSM_TRUE  CONSTANT VARCHAR2(10) := 'true';
57  G_CSM_FALSE  CONSTANT VARCHAR2(10) := 'false';
58  G_TRUE          CONSTANT VARCHAR2(1) := OKL_API.G_TRUE;
59  G_FALSE  CONSTANT VARCHAR2(1) := OKL_API.G_FALSE;
60  G_ORP_CODE_BOOKING        CONSTANT VARCHAR2(4) := 'AUTH';
61  G_ORP_CODE_RESTRUCTURE_AM CONSTANT VARCHAR2(4) := 'RSAM';
62  G_ORP_CODE_RESTRUCTURE_CS CONSTANT VARCHAR2(4) := 'RSCS';
63   -- mvasudev , sno, changed "QUOT" to "QUOTE"
64  G_ORP_CODE_QUOTE          CONSTANT VARCHAR2(4) := 'QUOT';
65  G_ORP_CODE_VARIABLE_INTEREST        CONSTANT VARCHAR2(4) := 'VIRP';
66  G_ORP_CODE_RENEWAL        CONSTANT VARCHAR2(4) := 'RENW';
67  -- 04/26/2002 -- mvasudev
68  /*
69  -- Commenting in favor of referring to OKL_INVOKE_PRICING_ENGINE_PVT directly
70  G_XMLG_TRX_TYPE              CONSTANT VARCHAR2(30)  := OKL_INVOKE_PRICING_ENGINE_PVT.G_XMLG_TRX_TYPE;
71  G_XMLG_TRX_SUBTYPE_LEASE_BOOK  CONSTANT VARCHAR2(30)  := OKL_INVOKE_PRICING_ENGINE_PVT.G_XMLG_TRX_SUBTYPE_LEASE_BOOK;
72  G_XMLG_TRX_SUBTYPE_LOAN_BOOK   CONSTANT VARCHAR2(30)  := OKL_INVOKE_PRICING_ENGINE_PVT.G_XMLG_TRX_SUBTYPE_LOAN_BOOK;
73  G_XMLG_TRX_SUBTYPE_LEASE_RESTR CONSTANT VARCHAR2(30)  := OKL_INVOKE_PRICING_ENGINE_PVT.G_XMLG_TRX_SUBTYPE_LEASE_RESTR;
74  G_XMLG_TRX_SUBTYPE_LOAN_RESTR  CONSTANT VARCHAR2(30)  := OKL_INVOKE_PRICING_ENGINE_PVT.G_XMLG_TRX_SUBTYPE_LOAN_RESTR;
75  */
76  -- end,04/26/2002 -- mvasudev
77  G_LOCK_AMOUNT  CONSTANT VARCHAR2(10) := 'AMOUNT';
78  G_LOCK_RATE         CONSTANT VARCHAR2(10) := 'RATE';
79  G_LOCK_BOTH         CONSTANT VARCHAR2(10) := 'BOTH';
80  G_MODE_LESSOR  CONSTANT VARCHAR2(10) := 'LESSOR';
81  G_MODE_LENDER  CONSTANT VARCHAR2(10) := 'LENDER';
82  G_MODE_BOTH        CONSTANT VARCHAR2(10) := 'BOTH';
83  G_SFE_LEVEL_PAYMENT CONSTANT VARCHAR2(7) :=  'PAYMENT';
84  G_SFE_LEVEL_INTEREST CONSTANT VARCHAR2(8) := 'INTEREST';
85  G_SFE_LEVEL_PRINCIPAL CONSTANT VARCHAR2(9) := 'PRINCIPAL';
86  G_SFE_LEVEL_FUNDING CONSTANT VARCHAR2(7) := 'FUNDING';
87  -- added akjain 07/26
88  G_ADJUST            CONSTANT VARCHAR2(10) := 'Rent';
89  -- changed smahapat bug 4170057
90  G_ADJUST_LOAN            CONSTANT VARCHAR2(30) := 'Loan: payments => rates';
91  G_ADJUSTMENT_METHOD CONSTANT VARCHAR2(20) := 'Proportional';
92  G_AK_REGION_NAME    CONSTANT VARCHAR2(40) := 'OKL_LP_CREATE_STREAMS';
93  -- smahapat multi-gaap 11/10/02 addition
94  G_PURPOSE_CODE_REPORT CONSTANT VARCHAR2(10) := 'REPORT';
95  ------------------------------------------------------------------------------
96  --kthiruva VR build
97   G_BALANCE_RATE              CONSTANT VARCHAR2(20) := 'BALANCE_RATE';
98   G_BALANCE_PAYMENT           CONSTANT VARCHAR2(20) := 'BALANCE_PAYMENT';
99   G_BALANCE_TERM              CONSTANT VARCHAR2(20) := 'BALANCE_TERM';
100   G_BALANCE_FUNDING           CONSTANT VARCHAR2(20) := 'BALANCE_FUNDING';
101   G_PAYDOWN_TYPE_PPD           CONSTANT VARCHAR2(20) := 'PPD';
102   G_PAYDOWN_TYPE_LPD           CONSTANT VARCHAR2(20) := 'LPD';
103 
104 --gboomina added for Bug 4659724
105   G_OKL_INT_PRIC_RESTR_NA CONSTANT VARCHAR2(30) := 'OKL_INT_PRICING_RESTR_QUOTE_NA' ;
106 
107  SUBTYPE sifv_rec_type IS Okl_Stream_Interfaces_Pub.sifv_rec_type;
108  SUBTYPE sifv_tbl_type IS Okl_Stream_Interfaces_Pub.sifv_tbl_type;
109  SUBTYPE silv_rec_type IS Okl_Sif_Lines_Pub.silv_rec_type;
110  SUBTYPE silv_tbl_type IS Okl_Sif_Lines_Pub.silv_tbl_type;
111  SUBTYPE sfev_rec_type IS Okl_Sif_Fees_Pub.sfev_rec_type;
112  SUBTYPE sfev_tbl_type IS Okl_Sif_Fees_Pub.sfev_tbl_type;
113  SUBTYPE siyv_rec_type IS Okl_Sif_Yields_Pub.siyv_rec_type;
114  SUBTYPE siyv_tbl_type IS Okl_Sif_Yields_Pub.siyv_tbl_type;
115  SUBTYPE sitv_rec_type IS Okl_Sif_Stream_Types_Pub.sitv_rec_type;
116  SUBTYPE sitv_tbl_type IS Okl_Sif_Stream_Types_Pub.sitv_tbl_type;
117  /* ONE OFF FEES */
118  /*
119  -- One-off Fees (Single or Multiple ) can occur both at Header as well as Line Levels
120  -- In the abscence of "KLE_ID" it is assumed to be in the Header
121  -- else it will be assigned to the corresponding KLE_ID / Line
122  */
123  TYPE csm_one_off_fee_rec_type IS RECORD(
124      description           OKL_SIF_FEES_V.description%TYPE := OKC_API.G_MISS_CHAR
125     ,income_or_expense     OKL_SIF_FEES_V.income_or_expense%TYPE := OKC_API.G_MISS_CHAR
126     ,amount                NUMBER := OKC_API.G_MISS_NUM
127     ,date_start            OKL_SIF_FEES_V.date_paid%TYPE := OKC_API.G_MISS_DATE --smahapat fee type solution
128     ,date_paid             OKL_SIF_FEES_V.date_paid%TYPE := OKC_API.G_MISS_DATE
129     ,idc_accounting_flag   OKL_SIF_FEES_V.idc_accounting_flag%TYPE := OKC_API.G_MISS_CHAR
130     ,advance_or_arrears    OKL_SIF_FEES_V.advance_or_arrears%TYPE := OKC_API.G_MISS_CHAR
131     ,kle_fee_id            NUMBER := OKC_API.G_MISS_NUM
132     ,fee_type              OKL_K_LINES_v.fee_type%TYPE := OKC_API.G_MISS_CHAR --SGORANTL ADDED FOR FINANCE FEES
133      -- Use ONLY in case this fees is for a Specific Line (Asset Line / Loan Line)
134     ,kle_asset_id          NUMBER := OKC_API.G_MISS_NUM
135     ,other_type_id         NUMBER := OKC_API.G_MISS_NUM --SGORANTL ADDED FOR subsidy
136     ,other_type            OKL_K_LINES_v.fee_type%TYPE := OKC_API.G_MISS_CHAR --SGORANTL ADDED FOR subsidy
137     ,rate                  NUMBER := OKC_API.G_MISS_NUM
138  );
139 
140  TYPE csm_one_off_fee_tbl_type IS TABLE OF csm_one_off_fee_rec_type
141         INDEX BY BINARY_INTEGER;
142  /* PERIODIC FEES  */
143  /*
144  -- Periodic Fees (Always Multiple) can occur both at Header as well as Line Levels
145  -- In the abscence of "KLE_ID" it is assumed to be in the Header
146  -- else it will be assigned to the corresponding KLE_ID / Line
147  */
148  TYPE csm_periodic_expenses_rec_type IS RECORD(
149        -- Common Details
150         description             OKL_SIF_FEES_V.description%TYPE := OKC_API.G_MISS_CHAR
151        ,date_start              OKL_SIF_FEES_V.date_start%TYPE := OKC_API.G_MISS_DATE --smahapat fee type soln interpreted as en accrual for stub payment
152        ,kle_fee_id              NUMBER := OKC_API.G_MISS_NUM
153        -- Use ONLY in case this fees is for a Specific Line (Asset Line / Loan Line)
154        ,kle_asset_id            NUMBER := OKC_API.G_MISS_NUM
155        -- Per-Record Details
156        ,level_index_number      NUMBER := OKC_API.G_MISS_NUM
157        ,level_type              OKL_SIF_FEES_V.level_type%TYPE := OKC_API.G_MISS_CHAR
158        ,number_of_periods       NUMBER := OKC_API.G_MISS_NUM
159        ,amount                  NUMBER := OKC_API.G_MISS_NUM
160        ,rate                    NUMBER := OKC_API.G_MISS_NUM
161        ,lock_level_step         OKL_SIF_FEES_V.lock_level_step%TYPE := OKC_API.G_MISS_CHAR
162        ,period                  OKL_SIF_FEES_V.period%TYPE := OKC_API.G_MISS_CHAR
163        ,advance_or_arrears      OKL_SIF_FEES_V.advance_or_arrears%TYPE := OKC_API.G_MISS_CHAR
164        ,income_or_expense       OKL_SIF_FEES_V.income_or_expense%TYPE := OKC_API.G_MISS_CHAR
165        ,fee_type                OKL_K_LINES_v.fee_type%TYPE := OKC_API.G_MISS_CHAR --SGORANTL ADDED FOR FINANCE FEES
166        -- 04/29/2002, mvasudev
167        -- added for "Restructure" requirements
168        ,query_level_yn          OKL_SIF_FEES_V.query_level_yn%TYPE := OKC_API.G_MISS_CHAR
169         -- 06/13/2002
170        ,structure               OKL_SIF_FEES_V.structure%TYPE := OKC_API.G_MISS_CHAR
171        ,cash_effect_yn          OKL_SIF_FEES_V.cash_effect_yn%TYPE := OKC_API.G_MISS_CHAR
172        ,tax_effect_yn           OKL_SIF_FEES_V.tax_effect_yn%TYPE := OKC_API.G_MISS_CHAR
173        ,days_in_month           OKL_SIF_FEES_V.days_in_month%TYPE :=OKC_API.G_MISS_CHAR
174        ,days_in_year            OKL_SIF_FEES_V.days_in_year%TYPE    :=OKC_API.G_MISS_CHAR
175        ,down_payment_amount     NUMBER := OKC_API.G_MISS_NUM
176  );
177  TYPE csm_periodic_expenses_tbl_type IS TABLE OF csm_periodic_expenses_rec_type
178         INDEX BY BINARY_INTEGER;
179  /* Stream Types*/
180  TYPE csm_yields_rec_type IS RECORD(
181     yield_name                     OKL_SIF_YIELDS_V.YIELD_NAME%TYPE := OKC_API.G_MISS_CHAR,
182     method                         OKL_SIF_YIELDS_V.METHOD%TYPE := OKC_API.G_MISS_CHAR,
183     array_type                     OKL_SIF_YIELDS_V.ARRAY_TYPE%TYPE := OKC_API.G_MISS_CHAR,
184     roe_type                       OKL_SIF_YIELDS_V.ROE_TYPE%TYPE := OKC_API.G_MISS_CHAR,
185     roe_base                       OKL_SIF_YIELDS_V.ROE_BASE%TYPE := OKC_API.G_MISS_CHAR,
186     compounded_method              OKL_SIF_YIELDS_V.COMPOUNDED_METHOD%TYPE := OKC_API.G_MISS_CHAR,
187     target_value                   NUMBER := OKC_API.G_MISS_NUM,
188     nominal_yn                     OKL_SIF_YIELDS_V.NOMINAL_YN%TYPE := OKC_API.G_MISS_CHAR,
189     -- 04/29/2002, mvasudev
190     -- added for "Restructure" requirements
191     pre_tax_yn                     OKL_SIF_YIELDS_V.PRE_TAX_YN%TYPE := OKC_API.G_MISS_CHAR,
192     -- 06/24/2002, mvasudev
193     -- added for "sno" requirements
194     siy_type                       OKL_SIF_YIELDS_V.SIY_TYPE%TYPE := OKC_API.G_MISS_CHAR
195  );
196  TYPE csm_yields_tbl_type IS TABLE OF csm_yields_rec_type
197         INDEX BY BINARY_INTEGER;
198  /* Stream Types*/
199  TYPE csm_stream_types_rec_type IS RECORD(
200         stream_type_id           NUMBER := OKC_API.G_MISS_NUM
201        ,kle_asset_id             NUMBER := OKC_API.G_MISS_NUM
202        ,kle_fee_id               NUMBER := OKC_API.G_MISS_NUM
203     ,pricing_name OKL_SIF_STREAM_TYPES_V.PRICING_NAME%type := OKC_API.G_MISS_CHAR
204  );
205  TYPE csm_stream_types_tbl_type IS TABLE OF csm_stream_types_rec_type
206         INDEX BY BINARY_INTEGER;
207  /* -- "Lease" Specific Definitions -- */
208  /* Line Level Details Record */
209  TYPE csm_line_details_rec_type IS RECORD(
210        kle_asset_id                     NUMBER := OKC_API.G_MISS_NUM
211        ,state_depre_dmnshing_value_rt   NUMBER := OKC_API.G_MISS_NUM
212        ,book_depre_dmnshing_value_rt    NUMBER := OKC_API.G_MISS_NUM
213        ,residual_guarantee_method       OKL_SIF_LINES_V.residual_guarantee_method%TYPE := OKC_API.G_MISS_CHAR
214        ,fed_depre_term                  NUMBER := OKC_API.G_MISS_NUM
215        ,fed_depre_dmnshing_value_rate   NUMBER := OKC_API.G_MISS_NUM
216        ,fed_depre_adr_conve             OKL_SIF_LINES_V.fed_depre_adr_conve%TYPE := OKC_API.G_MISS_CHAR
217        ,state_depre_basis_percent       NUMBER := OKC_API.G_MISS_NUM
218        ,state_depre_method              OKL_SIF_LINES_V.state_depre_method%TYPE := OKC_API.G_MISS_CHAR
219        ,purchase_option                 OKL_SIF_LINES_V.purchase_option%TYPE := OKC_API.G_MISS_CHAR
220        ,purchase_option_amount          NUMBER := OKC_API.G_MISS_NUM
221        ,asset_cost                      NUMBER := OKC_API.G_MISS_NUM
222        ,state_depre_term                NUMBER := OKC_API.G_MISS_NUM
223        ,state_depre_adr_convent         OKL_SIF_LINES_V.state_depre_adr_convent%TYPE := OKC_API.G_MISS_CHAR
224        ,fed_depre_method                OKL_SIF_LINES_V.fed_depre_method%TYPE := OKC_API.G_MISS_CHAR
225        ,residual_amount                 NUMBER := OKC_API.G_MISS_NUM
226        ,residual_date                   OKL_SIF_LINES_V.residual_date%TYPE := OKC_API.G_MISS_DATE
227        ,fed_depre_salvage               NUMBER := OKC_API.G_MISS_NUM
228        ,date_fed_depre                  OKL_SIF_LINES_V.date_fed_depre%TYPE := OKC_API.G_MISS_DATE
229        ,book_salvage                    NUMBER := OKC_API.G_MISS_NUM
230        ,book_adr_convention             OKL_SIF_LINES_V.book_adr_convention%TYPE := OKC_API.G_MISS_CHAR
231        ,state_depre_salvage             NUMBER := OKC_API.G_MISS_NUM
232        ,fed_depre_basis_percent         NUMBER := OKC_API.G_MISS_NUM
233        ,book_basis_percent              NUMBER := OKC_API.G_MISS_NUM
234        ,date_delivery                   OKL_SIF_LINES_V.date_delivery%TYPE := OKC_API.G_MISS_DATE
235        ,book_term                       NUMBER := OKC_API.G_MISS_NUM
236        ,residual_guarantee_amount       NUMBER := OKC_API.G_MISS_NUM
237        ,date_funding                    OKL_SIF_LINES_V.date_funding%TYPE := OKC_API.G_MISS_DATE
238        ,date_book                       OKL_SIF_LINES_V.date_book%TYPE := OKC_API.G_MISS_DATE
239        ,date_state_depre                OKL_SIF_LINES_V.date_state_depre%TYPE := OKC_API.G_MISS_DATE
240        ,book_method                     OKL_SIF_LINES_V.book_method%TYPE := OKC_API.G_MISS_CHAR
241        ,description                     OKL_SIF_LINES_V.description%TYPE := OKC_API.G_MISS_CHAR
242        -- stream_interface_attribute01 => guarantee_type
243        ,guarantee_type                  OKL_SIF_LINES_V.residual_guarantee_type%TYPE
244        ,down_payment_amount             NUMBER := OKC_API.G_MISS_NUM
245        ,capitalize_down_payment_yn      OKL_SIF_LINES_V.capitalize_down_payment_yn%TYPE := OKC_API.G_MISS_CHAR
246  );
247  TYPE csm_line_details_tbl_type IS TABLE OF csm_line_details_rec_type
248         INDEX BY BINARY_INTEGER;
249  /* Lease Type - Header */
250  TYPE csm_lease_rec_type IS RECORD(
251      -- Common Details
252         jtot_object1_code        OKL_STREAM_INTERFACES_V.jtot_object1_code%TYPE := OKC_API.G_MISS_CHAR
253        ,object1_id1              OKL_STREAM_INTERFACES_V.object1_id1%TYPE := OKC_API.G_MISS_CHAR
254        ,khr_id                   NUMBER := OKC_API.G_MISS_NUM
255        ,pdt_id                   NUMBER := OKC_API.G_MISS_NUM
256        ,sif_mode                 OKL_STREAM_INTERFACES_V.sif_mode%TYPE DEFAULT 'Lessor'
257        ,country                  OKL_STREAM_INTERFACES_V.country%TYPE := OKC_API.G_MISS_CHAR
258        ,orp_code                 OKL_STREAM_INTERFACES_V.orp_code%TYPE := OKC_API.G_MISS_CHAR
259        ,date_payments_commencement OKL_STREAM_INTERFACES_V.date_payments_commencement%TYPE := OKC_API.G_MISS_DATE
260        ,security_deposit_amount  NUMBER := OKC_API.G_MISS_NUM
261        ,date_sec_deposit_collected OKL_STREAM_INTERFACES_V.date_sec_deposit_collected%TYPE := OKC_API.G_MISS_DATE
262        ,fasb_acct_treatment_method OKL_STREAM_INTERFACES_V.fasb_acct_treatment_method%TYPE := OKC_API.G_MISS_CHAR
263        ,adjust                     OKL_STREAM_INTERFACES_V.adjust%TYPE
264        ,adjustment_method          OKL_STREAM_INTERFACES_V.adjustment_method%TYPE
265        ,term                       NUMBER := OKC_API.G_MISS_NUM
266        ,structure                  OKL_STREAM_INTERFACES_V.structure%TYPE := OKC_API.G_MISS_CHAR
267        -- Lease Type Details
268        ,irs_tax_treatment_method   OKL_STREAM_INTERFACES_V.irs_tax_treatment_method%TYPE := OKC_API.G_MISS_CHAR
269        ,date_delivery              OKL_STREAM_INTERFACES_V.date_delivery%TYPE := OKC_API.G_MISS_DATE
270        ,implicit_interest_rate     NUMBER DEFAULT NULL
271        ,rvi_yn                     OKL_STREAM_INTERFACES_V.rvi_yn%TYPE := OKC_API.G_MISS_CHAR
272        ,rvi_rate                   NUMBER := OKC_API.G_MISS_NUM
273     -- mvasudev, Bug#2650599
274        ,sif_id                     NUMBER := OKC_API.G_MISS_NUM
275        ,purpose_code               OKL_STREAM_INTERFACES_V.PURPOSE_CODE%TYPE := OKC_API.G_MISS_CHAR
276     -- end, mvasudev, Bug#2650599
277  );
278  -- 04/21/2002
279  /* Loan Lines */
280  TYPE csm_loan_line_rec_type IS RECORD(
281  	    kle_loan_id        NUMBER := OKC_API.G_MISS_NUM
282        --Added by kthiruva on 15-Nov-2005 for the Down Payment CR
283        --Bug 4738011 - Start of Changes
284        ,down_payment_amount             NUMBER := OKC_API.G_MISS_NUM
285        ,capitalize_down_payment_yn      OKL_SIF_LINES_V.capitalize_down_payment_yn%TYPE := OKC_API.G_MISS_CHAR
286        --Bug 4738011 - End of Changes
287  );
288  TYPE csm_loan_line_tbl_type IS TABLE OF csm_loan_line_rec_type
289         INDEX BY BINARY_INTEGER;
290  /* Loan Levels */
291  TYPE csm_loan_level_rec_type IS RECORD(
292        -- Common Details
293         description               OKL_SIF_FEES_V.description%TYPE := OKC_API.G_MISS_CHAR
294        ,date_start                OKL_SIF_FEES_V.date_start%TYPE := OKC_API.G_MISS_DATE
295        ,kle_loan_id               NUMBER := OKC_API.G_MISS_NUM
296        -- Per-Record Details
297        ,level_index_number        NUMBER := OKC_API.G_MISS_NUM
298        ,level_type                OKL_SIF_FEES_V.level_type%TYPE := OKC_API.G_MISS_CHAR
299        ,number_of_periods         NUMBER := OKC_API.G_MISS_NUM
300        ,amount                    NUMBER := OKC_API.G_MISS_NUM
301        ,lock_level_step           OKL_SIF_FEES_V.lock_level_step%TYPE := OKC_API.G_MISS_CHAR
302        ,rate                      NUMBER := OKC_API.G_MISS_NUM
303        ,period                    OKL_SIF_FEES_V.period%TYPE := OKC_API.G_MISS_CHAR
304        ,advance_or_arrears        OKL_SIF_FEES_V.advance_or_arrears%TYPE := OKC_API.G_MISS_CHAR
305        ,income_or_expense         OKL_SIF_FEES_V.income_or_expense%TYPE := OKC_API.G_MISS_CHAR
306         -- 06/13/2002
307        ,structure                 OKL_SIF_FEES_V.structure%TYPE := OKC_API.G_MISS_CHAR
308        -- added for "Restructure" requirements akjain 08/20/02
309        ,query_level_yn            OKL_SIF_FEES_V.query_level_yn%TYPE := OKC_API.G_MISS_CHAR
310        ,days_in_month             OKL_SIF_FEES_V.days_in_month%TYPE :=OKC_API.G_MISS_CHAR
311        ,days_in_year              OKL_SIF_FEES_V.days_in_year%TYPE    :=OKC_API.G_MISS_CHAR
312        ,balance_type_code         OKL_SIF_FEES_V.balance_type_code%TYPE     :=OKC_API.G_MISS_CHAR
313        ,payment_type              VARCHAR2(30)  :=OKC_API.G_MISS_CHAR
314  );
315  TYPE csm_loan_level_tbl_type IS TABLE OF csm_loan_level_rec_type
316         INDEX BY BINARY_INTEGER;
317  -- end,04/21/2002
318  /* Loan Type - Header */
319  TYPE csm_loan_rec_type IS RECORD(
320   -- Common Details
321         jtot_object1_code          OKL_STREAM_INTERFACES_V.jtot_object1_code%TYPE := OKC_API.G_MISS_CHAR
322        ,object1_id1                OKL_STREAM_INTERFACES_V.object1_id1%TYPE := OKC_API.G_MISS_CHAR
323        ,khr_id                     NUMBER := OKC_API.G_MISS_NUM
324        ,pdt_id                     NUMBER := OKC_API.G_MISS_NUM
325        ,sif_mode                   OKL_STREAM_INTERFACES_V.sif_mode%TYPE DEFAULT 'Lender'
326        ,country                    OKL_STREAM_INTERFACES_V.country%TYPE := OKC_API.G_MISS_CHAR
327        ,orp_code                   OKL_STREAM_INTERFACES_V.orp_code%TYPE := OKC_API.G_MISS_CHAR
328        ,date_payments_commencement OKL_STREAM_INTERFACES_V.date_payments_commencement%TYPE := OKC_API.G_MISS_DATE
329        ,security_deposit_amount    NUMBER := OKC_API.G_MISS_NUM
330        ,date_sec_deposit_collected OKL_STREAM_INTERFACES_V.date_sec_deposit_collected%TYPE := OKC_API.G_MISS_DATE
331         -- Loan Type Details
332        ,total_lending              NUMBER := OKC_API.G_MISS_NUM
333        ,date_start                 OKL_STREAM_INTERFACES_V.date_sec_deposit_collected%TYPE := OKC_API.G_MISS_DATE
334        ,lending_rate               NUMBER DEFAULT NULL
335        -- mvasudev, Bug#2650599
336        ,sif_id                     NUMBER := OKC_API.G_MISS_NUM
337        ,purpose_code               OKL_STREAM_INTERFACES_V.PURPOSE_CODE%TYPE := OKC_API.G_MISS_CHAR
338        -- end, mvasudev, Bug#2650599
339        -- added for Loan Quote requirements smahapat 10/30/03
340        ,adjust                     OKL_STREAM_INTERFACES_V.adjust%TYPE
341        ,adjustment_method          OKL_STREAM_INTERFACES_V.adjustment_method%TYPE
342  );
343  /* For Fees and Asset Index */
344 TYPE index_rec_type IS RECORD
345  (
346     id NUMBER,
347     idx NUMBER
348  );
349  TYPE index_tbl_type IS TABLE OF index_rec_type INDEX BY BINARY_INTEGER;
350  g_asset_ids index_tbl_type;
351  /* For Perioidic Expenses Index */
352 TYPE periodic_index_rec_type IS RECORD
353  (
354     description                   VARCHAR2(1995),
355     idx                           NUMBER
356  );
357  TYPE periodic_index_tbl_type IS TABLE OF periodic_index_rec_type INDEX BY BINARY_INTEGER;
358  g_periodic_expenses_indexes  periodic_index_tbl_type;
359  g_periodic_incomes_indexes   periodic_index_tbl_type;
360  g_rents_indexes              periodic_index_tbl_type;
361  g_siy_names periodic_index_tbl_type;
362  /* For Cross-Referencing SFE IDs with corresponding KLE Fee IDs*/
363 TYPE sfe_id_rec_type IS RECORD
364  (
365     kle_fee_id NUMBER,
366     sfe_id     NUMBER,
367  stream_type_id NUMBER  -- smahapat added for fee type solution
368  );
369  TYPE sfe_id_tbl_type IS TABLE OF sfe_id_rec_type INDEX BY BINARY_INTEGER;
370  g_sfe_ids   sfe_id_tbl_type;
371  /* For Cross-Referencing SIL IDs with corresponding KLE Asset IDs*/
372  TYPE sil_id_rec_type IS RECORD
373  (
374     kle_asset_id NUMBER,
375     sil_id       NUMBER
376  );
377  TYPE sil_id_tbl_type IS TABLE OF sil_id_rec_type INDEX BY BINARY_INTEGER;
378  g_sil_ids   sil_id_tbl_type;
379   -- Procedure to Create Streams for Lease Type Contract
380   PROCEDURE Create_Streams_Lease_Book (
381         p_api_version               IN  NUMBER
382        ,p_init_msg_list             IN  VARCHAR2 DEFAULT G_FALSE
383        ,p_skip_prc_engine           IN  VARCHAR2 DEFAULT G_FALSE
384        ,p_csm_lease_header          IN  csm_lease_rec_type
385        ,p_csm_one_off_fee_tbl       IN  csm_one_off_fee_tbl_type
386        ,p_csm_periodic_expenses_tbl IN  csm_periodic_expenses_tbl_type
387        ,p_csm_yields_tbl            IN  csm_yields_tbl_type
388        ,p_csm_stream_types_tbl      IN  csm_stream_types_tbl_type
389        ,p_csm_line_details_tbl      IN  csm_line_details_tbl_type
390        ,p_rents_tbl                 IN  csm_periodic_expenses_tbl_type
391        ,x_trans_id                  OUT NOCOPY NUMBER
392        ,x_trans_status              OUT NOCOPY VARCHAR2
393        ,x_return_status             OUT NOCOPY VARCHAR2
394        ,x_msg_count                 OUT NOCOPY NUMBER
395        ,x_msg_data                  OUT NOCOPY VARCHAR2
396        );
397   -- Procedure to Create Streams for Loan Type Contract
398   PROCEDURE Create_Streams_Loan_Book (
399         p_api_version               IN  NUMBER
400        ,p_init_msg_list             IN  VARCHAR2 DEFAULT G_FALSE
401        ,p_skip_prc_engine           IN  VARCHAR2 DEFAULT G_FALSE
402        ,p_csm_loan_header           IN  csm_loan_rec_type
403         -- 04/21/2002
404        ,p_csm_loan_lines_tbl        IN  csm_loan_line_tbl_type
405        ,p_csm_loan_levels_tbl       IN  csm_loan_level_tbl_type
406        ,p_csm_one_off_fee_tbl       IN  csm_one_off_fee_tbl_type
407        ,p_csm_periodic_expenses_tbl IN  csm_periodic_expenses_tbl_type
408        -- end, 04/21/2002
409        ,p_csm_yields_tbl            IN  csm_yields_tbl_type
410        ,p_csm_stream_types_tbl      IN  csm_stream_types_tbl_type
411        ,x_trans_id                  OUT NOCOPY NUMBER
412        ,x_trans_status              OUT NOCOPY VARCHAR2
413        ,x_return_status             OUT NOCOPY VARCHAR2
414        ,x_msg_count                 OUT NOCOPY NUMBER
415        ,x_msg_data                  OUT NOCOPY VARCHAR2
416 
417  );
418    PROCEDURE Invoke_Pricing_Engine(
419         p_api_version                    IN  NUMBER
420        ,p_init_msg_list                  IN  VARCHAR2 DEFAULT G_FALSE
421        ,p_sifv_rec                       IN  sifv_rec_type
422        ,x_sifv_rec                       OUT NOCOPY  sifv_rec_type
423        ,x_return_status                  OUT NOCOPY VARCHAR2
424        ,x_msg_count                      OUT NOCOPY NUMBER
425        ,x_msg_data                       OUT NOCOPY VARCHAR2
426    );
427 
428   -- 04/30/2002
429   -- Procedure to Create Streams for Lease Type Contract - Restructure
430   PROCEDURE Create_Streams_Lease_Restr (
431         p_api_version                    IN  NUMBER
432        ,p_init_msg_list                  IN  VARCHAR2 DEFAULT G_FALSE
433        ,p_skip_prc_engine                IN  VARCHAR2 DEFAULT G_FALSE
434        ,p_csm_lease_header               IN  csm_lease_rec_type
435        ,p_csm_one_off_fee_tbl            IN  csm_one_off_fee_tbl_type
436        ,p_csm_periodic_expenses_tbl      IN  csm_periodic_expenses_tbl_type
437        ,p_csm_yields_tbl                 IN  csm_yields_tbl_type
438        ,p_csm_stream_types_tbl           IN  csm_stream_types_tbl_type
439        ,p_csm_line_details_tbl           IN  csm_line_details_tbl_type
440        ,p_rents_tbl                      IN  csm_periodic_expenses_tbl_type
441        ,x_trans_id                       OUT NOCOPY NUMBER
442        ,x_trans_status                   OUT NOCOPY VARCHAR2
443        ,x_return_status                  OUT NOCOPY VARCHAR2
444        ,x_msg_count                      OUT NOCOPY NUMBER
445        ,x_msg_data                       OUT NOCOPY VARCHAR2
446        );
447   -- Procedure to Create Streams for Loan Type Contract
448 
449   PROCEDURE Create_Streams_Loan_Restr (
450         p_api_version                    IN  NUMBER
451        ,p_init_msg_list                  IN  VARCHAR2 DEFAULT G_FALSE
452        ,p_skip_prc_engine                IN  VARCHAR2 DEFAULT G_FALSE
453        ,p_csm_loan_header                IN  csm_loan_rec_type
454        ,p_csm_loan_lines_tbl             IN  csm_loan_line_tbl_type
455        ,p_csm_loan_levels_tbl            IN  csm_loan_level_tbl_type
456        ,p_csm_one_off_fee_tbl            IN  csm_one_off_fee_tbl_type
457        ,p_csm_periodic_expenses_tbl      IN  csm_periodic_expenses_tbl_type
458        ,p_csm_yields_tbl                 IN  csm_yields_tbl_type
459        ,p_csm_stream_types_tbl           IN  csm_stream_types_tbl_type
460        ,x_trans_id                       OUT NOCOPY NUMBER
461        ,x_trans_status                   OUT NOCOPY VARCHAR2
462        ,x_return_status                  OUT NOCOPY VARCHAR2
463        ,x_msg_count                      OUT NOCOPY NUMBER
464        ,x_msg_data                       OUT NOCOPY VARCHAR2
465  );
466   -- end, 04/30/2002
467   -- Procedure to Create Streams for Quote
468   PROCEDURE Create_Streams_Lease_Quote (
469         p_api_version                    IN  NUMBER
470        ,p_init_msg_list                  IN  VARCHAR2 DEFAULT G_FALSE
471        ,p_skip_prc_engine                IN  VARCHAR2 DEFAULT G_FALSE
472        ,p_csm_lease_header               IN  csm_lease_rec_type
473        ,p_csm_one_off_fee_tbl            IN  csm_one_off_fee_tbl_type
474        ,p_csm_periodic_expenses_tbl      IN  csm_periodic_expenses_tbl_type
475        ,p_csm_yields_tbl                 IN  csm_yields_tbl_type
476        ,p_csm_stream_types_tbl           IN  csm_stream_types_tbl_type
477        ,p_csm_line_details_tbl           IN  csm_line_details_tbl_type
478        ,p_rents_tbl                      IN  csm_periodic_expenses_tbl_type
479        ,x_trans_id                       OUT NOCOPY NUMBER
480        ,x_trans_status                   OUT NOCOPY VARCHAR2
481        ,x_return_status                  OUT NOCOPY VARCHAR2
482        ,x_msg_count                      OUT NOCOPY NUMBER
483        ,x_msg_data                       OUT NOCOPY VARCHAR2
484    );
485 
486 --kthiruva VR build
487  PROCEDURE add_balance_information(x_sfev_tbl        IN OUT NOCOPY sfev_tbl_type,
488                                    x_return_status   OUT NOCOPY VARCHAR2);
489 
490 END Okl_Create_Streams_Pvt;