78: --additonal parameter to obtain formula value.
79: l_flag BOOLEAN;
80: BEGIN
81: --message logging
82: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
83: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
84: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
85: ,'Begin (+)');
86: END IF;
79: l_flag BOOLEAN;
80: BEGIN
81: --message logging
82: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
83: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
84: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
85: ,'Begin (+)');
86: END IF;
87:
113: l_sty_id);
114:
115: IF l_sty_id IS NULL OR l_sty_id = OKL_API.G_MISS_NUM THEN
116: --message logging
117: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
118: FND_LOG.STRING(FND_LOG.LEVEL_ERROR
119: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
120: ,'OKL_STREAMS_UTIL.get_primary_stream_type returned no values');
121: END IF;
114:
115: IF l_sty_id IS NULL OR l_sty_id = OKL_API.G_MISS_NUM THEN
116: --message logging
117: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
118: FND_LOG.STRING(FND_LOG.LEVEL_ERROR
119: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
120: ,'OKL_STREAMS_UTIL.get_primary_stream_type returned no values');
121: END IF;
122:
129: END IF;
130:
131: IF p_asset_rec.p_amount IS NOT NULL THEN
132: --message logging
133: IF (FND_LOG.LEVEL_STATEMENT >=
134: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
135: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
136: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
137: ,'calling OKL_AM_UTIL_PVT.get_formula_value with'
130:
131: IF p_asset_rec.p_amount IS NOT NULL THEN
132: --message logging
133: IF (FND_LOG.LEVEL_STATEMENT >=
134: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
135: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
136: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
137: ,'calling OKL_AM_UTIL_PVT.get_formula_value with'
138: ||' formula name '||l_formula_name);
131: IF p_asset_rec.p_amount IS NOT NULL THEN
132: --message logging
133: IF (FND_LOG.LEVEL_STATEMENT >=
134: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
135: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
136: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
137: ,'calling OKL_AM_UTIL_PVT.get_formula_value with'
138: ||' formula name '||l_formula_name);
139: END IF;
151: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
152: RAISE OKL_API.G_EXCEPTION_ERROR;
153: END IF;
154: -- message logging
155: IF (FND_LOG.LEVEL_STATEMENT >=
156: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
157: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
158: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
159: ,'returning from OKL_AM_UTIL_PVT.get_formula_value'
152: RAISE OKL_API.G_EXCEPTION_ERROR;
153: END IF;
154: -- message logging
155: IF (FND_LOG.LEVEL_STATEMENT >=
156: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
157: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
158: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
159: ,'returning from OKL_AM_UTIL_PVT.get_formula_value'
160: ||', status is '
153: END IF;
154: -- message logging
155: IF (FND_LOG.LEVEL_STATEMENT >=
156: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
157: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
158: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
159: ,'returning from OKL_AM_UTIL_PVT.get_formula_value'
160: ||', status is '
161: ||l_return_status
189: l_selv_tbl(1).ACCRUED_YN := 'N';
190: l_selv_tbl(1).SE_LINE_NUMBER := 1;
191:
192: --message logging
193: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
194: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
195: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
196: ,'calling OKL_STREAMS_PUB.create_streams ');
197: END IF;
190: l_selv_tbl(1).SE_LINE_NUMBER := 1;
191:
192: --message logging
193: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
194: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
195: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
196: ,'calling OKL_STREAMS_PUB.create_streams ');
197: END IF;
198:
212: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
213: RAISE OKL_API.G_EXCEPTION_ERROR;
214: END IF;
215: --message logging
216: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
217: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
218: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
219: ,'returning from OKL_STREAMS_PUB.create_streams,'
220: ||' status is '||l_return_status);
213: RAISE OKL_API.G_EXCEPTION_ERROR;
214: END IF;
215: --message logging
216: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
217: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
218: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
219: ,'returning from OKL_STREAMS_PUB.create_streams,'
220: ||' status is '||l_return_status);
221: END IF;
221: END IF;
222: END IF;
223:
224: --message logging
225: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
226: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
227: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
228: ,'End (-)');
229: END IF;
222: END IF;
223:
224: --message logging
225: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
226: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
227: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
228: ,'End (-)');
229: END IF;
230:
238: CLOSE get_next_trx_val_csr;
239: END IF;
240:
241: --message logging
242: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
243: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
244: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
245: , 'Handled exception occured');
246: END IF;
239: END IF;
240:
241: --message logging
242: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
243: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
244: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
245: , 'Handled exception occured');
246: END IF;
247:
262: CLOSE get_next_trx_val_csr;
263: END IF;
264:
265: --message logging
266: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
267: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
268: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
269: , 'Expected exception occured');
270: END IF;
263: END IF;
264:
265: --message logging
266: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
267: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
268: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
269: , 'Expected exception occured');
270: END IF;
271:
286: CLOSE get_next_trx_val_csr;
287: END IF;
288:
289: --message logging
290: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
291: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
292: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
293: , 'When others exception occured');
294: END IF;
287: END IF;
288:
289: --message logging
290: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
291: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
292: ,'OKL_AM_SECURITIZATION_PVT.create_inv_khr_obligation'
293: , 'When others exception occured');
294: END IF;
295:
398: l_term_adj_amount NUMBER;
399:
400: BEGIN
401:
402: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
403: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
404: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments'
405: , 'START+');
406: END IF;
399:
400: BEGIN
401:
402: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
403: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
404: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments'
405: , 'START+');
406: END IF;
407:
429: p_primary_sty_purpose => 'INVESTOR_DISB_ADJUSTMENT',
430: x_return_status => l_return_status,
431: x_primary_sty_id => l_rbkadj_sty_id);
432:
433: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
434: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
435: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments'
436: , 'get_primary_stream_type INVESTOR_DISB_ADJUSTMENT returns '||l_return_status);
437: END IF;
430: x_return_status => l_return_status,
431: x_primary_sty_id => l_rbkadj_sty_id);
432:
433: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
434: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
435: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments'
436: , 'get_primary_stream_type INVESTOR_DISB_ADJUSTMENT returns '||l_return_status);
437: END IF;
438:
448: p_primary_sty_purpose => 'INVESTOR_RENT_DISB_BASIS',
449: x_return_status => l_return_status,
450: x_primary_sty_id => l_invdisbas_sty_id);
451:
452: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
453: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
454: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments'
455: , 'get_primary_stream_type INVESTOR_RENT_DISB_BASIS returns '||l_return_status);
456: END IF;
449: x_return_status => l_return_status,
450: x_primary_sty_id => l_invdisbas_sty_id);
451:
452: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
453: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
454: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments'
455: , 'get_primary_stream_type INVESTOR_RENT_DISB_BASIS returns '||l_return_status);
456: END IF;
457:
517: ,p_selv_tbl => l_selv_tbl
518: ,x_stmv_rec => x_stmv_rec
519: ,x_selv_tbl => x_selv_tbl);
520:
521: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
522: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
523: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments'
524: , 'create_streams returns '||l_return_status);
525: END IF;
518: ,x_stmv_rec => x_stmv_rec
519: ,x_selv_tbl => x_selv_tbl);
520:
521: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
522: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
523: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments'
524: , 'create_streams returns '||l_return_status);
525: END IF;
526:
537:
538: OKL_API.end_activity(x_msg_count => x_msg_count
539: ,x_msg_data => x_msg_data);
540:
541: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
542: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
543: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments'
544: , 'END-');
545: END IF;
538: OKL_API.end_activity(x_msg_count => x_msg_count
539: ,x_msg_data => x_msg_data);
540:
541: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
542: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
543: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments'
544: , 'END-');
545: END IF;
546:
559: CLOSE get_next_trx_val_csr;
560: END IF;
561:
562: --message logging
563: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
564: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
565: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments'
566: , 'Handled exception occured');
567: END IF;
560: END IF;
561:
562: --message logging
563: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
564: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
565: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments'
566: , 'Handled exception occured');
567: END IF;
568: x_return_status := OKC_API.HANDLE_EXCEPTIONS
589: CLOSE get_next_trx_val_csr;
590: END IF;
591:
592: --message logging
593: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
594: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
595: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments'
596: , 'Unexpected exception occured');
597: END IF;
590: END IF;
591:
592: --message logging
593: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
594: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
595: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments'
596: , 'Unexpected exception occured');
597: END IF;
598: x_return_status := OKC_API.HANDLE_EXCEPTIONS
619: CLOSE get_next_trx_val_csr;
620: END IF;
621:
622: --message logging
623: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
624: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
625: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments'
626: , 'When others exception occured');
627: END IF;
620: END IF;
621:
622: --message logging
623: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
624: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
625: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments'
626: , 'When others exception occured');
627: END IF;
628: OKL_API.set_message(p_app_name => g_app_name,
725: l_term_adj_amount NUMBER;
726:
727: BEGIN
728:
729: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
730: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
731: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments_loan'
732: , 'START+');
733: END IF;
726:
727: BEGIN
728:
729: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
730: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
731: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments_loan'
732: , 'START+');
733: END IF;
734:
756: p_primary_sty_purpose => 'INVESTOR_DISB_ADJUSTMENT',
757: x_return_status => l_return_status,
758: x_primary_sty_id => l_rbkadj_sty_id);
759:
760: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
761: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
762: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments_loan'
763: , 'get_primary_stream_type INVESTOR_DISB_ADJUSTMENT returns '||l_return_status);
764: END IF;
757: x_return_status => l_return_status,
758: x_primary_sty_id => l_rbkadj_sty_id);
759:
760: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
761: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
762: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments_loan'
763: , 'get_primary_stream_type INVESTOR_DISB_ADJUSTMENT returns '||l_return_status);
764: END IF;
765:
781: p_primary_sty_purpose => 'INVESTOR_INTEREST_DISB_BASIS',
782: x_return_status => l_return_status,
783: x_primary_sty_id => l_intdisbas_sty_id);
784:
785: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
786: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
787: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments_loan'
788: , 'get_primary_stream_type INVESTOR_RENT_DISB_BASIS returns '||l_return_status);
789: END IF;
782: x_return_status => l_return_status,
783: x_primary_sty_id => l_intdisbas_sty_id);
784:
785: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
786: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
787: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments_loan'
788: , 'get_primary_stream_type INVESTOR_RENT_DISB_BASIS returns '||l_return_status);
789: END IF;
790:
852: ,p_selv_tbl => l_selv_tbl
853: ,x_stmv_rec => x_stmv_rec
854: ,x_selv_tbl => x_selv_tbl);
855:
856: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
857: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
858: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments_loan'
859: , 'create_streams returns '||l_return_status);
860: END IF;
853: ,x_stmv_rec => x_stmv_rec
854: ,x_selv_tbl => x_selv_tbl);
855:
856: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
857: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
858: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments_loan'
859: , 'create_streams returns '||l_return_status);
860: END IF;
861:
872:
873: OKL_API.end_activity(x_msg_count => x_msg_count
874: ,x_msg_data => x_msg_data);
875:
876: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
877: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
878: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments_loan'
879: , 'END-');
880: END IF;
873: OKL_API.end_activity(x_msg_count => x_msg_count
874: ,x_msg_data => x_msg_data);
875:
876: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
877: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
878: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments_loan'
879: , 'END-');
880: END IF;
881:
894: CLOSE get_next_trx_val_csr;
895: END IF;
896:
897: --message logging
898: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
899: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
900: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments_loan'
901: , 'Handled exception occured');
902: END IF;
895: END IF;
896:
897: --message logging
898: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
899: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
900: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments_loan'
901: , 'Handled exception occured');
902: END IF;
903: x_return_status := OKC_API.HANDLE_EXCEPTIONS
924: CLOSE get_next_trx_val_csr;
925: END IF;
926:
927: --message logging
928: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
929: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
930: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments_loan'
931: , 'Unexpected exception occured');
932: END IF;
925: END IF;
926:
927: --message logging
928: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
929: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
930: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments_loan'
931: , 'Unexpected exception occured');
932: END IF;
933: x_return_status := OKC_API.HANDLE_EXCEPTIONS
954: CLOSE get_next_trx_val_csr;
955: END IF;
956:
957: --message logging
958: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
959: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
960: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments_loan'
961: , 'When others exception occured');
962: END IF;
955: END IF;
956:
957: --message logging
958: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
959: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
960: ,'OKL_AM_SECURITIZATION_PVT.do_disb_adjustments_loan'
961: , 'When others exception occured');
962: END IF;
963: OKL_API.set_message(p_app_name => g_app_name,
1203:
1204: BEGIN
1205:
1206: --message logging
1207: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1208: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
1209: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1210: ,'Begin (+)');
1211: END IF;
1204: BEGIN
1205:
1206: --message logging
1207: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1208: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
1209: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1210: ,'Begin (+)');
1211: END IF;
1212:
1210: ,'Begin (+)');
1211: END IF;
1212:
1213: --message logging
1214: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1215: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
1216: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1217: ,'calling Okl_Api.START_ACTIVITY');
1218: END IF;
1211: END IF;
1212:
1213: --message logging
1214: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1215: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
1216: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1217: ,'calling Okl_Api.START_ACTIVITY');
1218: END IF;
1219:
1227: p_api_type => G_API_TYPE,
1228: x_return_status => l_return_status);
1229:
1230: --message logging
1231: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1232: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
1233: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1234: ,'returning from Okl_Api.START_ACTIVITY, status is '
1235: ||l_return_status);
1228: x_return_status => l_return_status);
1229:
1230: --message logging
1231: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1232: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
1233: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1234: ,'returning from Okl_Api.START_ACTIVITY, status is '
1235: ||l_return_status);
1236: END IF;
1260: FETCH get_khr_id_csr INTO l_khr_id, l_partial, l_effective_from_date, l_acceptance_date;
1261: IF get_khr_id_csr%notfound THEN
1262: CLOSE get_khr_id_csr;
1263: --message logging
1264: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1265: FND_LOG.STRING(FND_LOG.LEVEL_ERROR
1266: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1267: ,'cursor get_khr_id_csr returned no values');
1268: END IF;
1261: IF get_khr_id_csr%notfound THEN
1262: CLOSE get_khr_id_csr;
1263: --message logging
1264: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1265: FND_LOG.STRING(FND_LOG.LEVEL_ERROR
1266: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1267: ,'cursor get_khr_id_csr returned no values');
1268: END IF;
1269:
1314: l_disb_type := 'RESIDUAL';
1315:
1316: ELSE
1317:
1318: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1319: FND_LOG.STRING(FND_LOG.LEVEL_ERROR
1320: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1321: ,'parameter p_quote_id is null or (p_kle_id and p_sale_price)'
1322: ||' are null');
1315:
1316: ELSE
1317:
1318: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1319: FND_LOG.STRING(FND_LOG.LEVEL_ERROR
1320: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1321: ,'parameter p_quote_id is null or (p_kle_id and p_sale_price)'
1322: ||' are null');
1323: END IF;
1339: FETCH get_khr_id_csr INTO l_khr_id, l_partial, l_effective_from_date, l_acceptance_date;
1340: IF get_khr_id_csr%notfound THEN
1341: CLOSE get_khr_id_csr;
1342: --message logging
1343: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1344: FND_LOG.STRING(FND_LOG.LEVEL_ERROR
1345: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1346: ,'cursor get_khr_id_csr returned no values');
1347: END IF;
1340: IF get_khr_id_csr%notfound THEN
1341: CLOSE get_khr_id_csr;
1342: --message logging
1343: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1344: FND_LOG.STRING(FND_LOG.LEVEL_ERROR
1345: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1346: ,'cursor get_khr_id_csr returned no values');
1347: END IF;
1348:
1366: FETCH get_rv_khr_id_csr INTO l_khr_id;
1367: IF get_rv_khr_id_csr%notfound THEN
1368: CLOSE get_rv_khr_id_csr;
1369: --message logging
1370: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1371: FND_LOG.STRING(FND_LOG.LEVEL_ERROR
1372: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1373: ,'cursor get_rv_khr_id_csr returned no values');
1374: END IF;
1367: IF get_rv_khr_id_csr%notfound THEN
1368: CLOSE get_rv_khr_id_csr;
1369: --message logging
1370: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1371: FND_LOG.STRING(FND_LOG.LEVEL_ERROR
1372: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1373: ,'cursor get_rv_khr_id_csr returned no values');
1374: END IF;
1375:
1399: END IF;
1400:
1401: IF (l_khr_id IS NOT NULL) THEN
1402: --message logging
1403: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1404: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
1405: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1406: ,'calling OKL_SECURITIZATION_PVT.check_khr_securitized');
1407: END IF;
1400:
1401: IF (l_khr_id IS NOT NULL) THEN
1402: --message logging
1403: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1404: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
1405: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1406: ,'calling OKL_SECURITIZATION_PVT.check_khr_securitized');
1407: END IF;
1408:
1433:
1434: END IF;
1435:
1436: --message logging
1437: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1438: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
1439: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1440: ,'returning from OKL_SECURITIZATION_PVT.check_khr_securitized'
1441: ||', status is '||l_return_status);
1434: END IF;
1435:
1436: --message logging
1437: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1438: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
1439: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1440: ,'returning from OKL_SECURITIZATION_PVT.check_khr_securitized'
1441: ||', status is '||l_return_status);
1442: END IF;
1640: l_loop_counter := l_loop_counter + 1;
1641:
1642: END LOOP; -- get_rv_streams_csr
1643: --message logging
1644: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1645: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
1646: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1647: ,'calling OKL_STREAMS_PUB.update_streams');
1648: END IF;
1641:
1642: END LOOP; -- get_rv_streams_csr
1643: --message logging
1644: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1645: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
1646: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1647: ,'calling OKL_STREAMS_PUB.update_streams');
1648: END IF;
1649:
1661: OKL_API.set_message( p_app_name => G_APP_NAME,
1662: p_msg_name => 'OKL_AM_ERR_UPD_STREAMS');
1663: END IF;
1664: --message logging
1665: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1666: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
1667: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1668: ,'returning from OKL_STREAMS_PUB.update_streams'
1669: ||', status is '||l_return_status);
1662: p_msg_name => 'OKL_AM_ERR_UPD_STREAMS');
1663: END IF;
1664: --message logging
1665: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1666: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
1667: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1668: ,'returning from OKL_STREAMS_PUB.update_streams'
1669: ||', status is '||l_return_status);
1670: END IF;
1768: END IF; -- mdokal Bug #3247596 End
1769: END IF;
1770:
1771: --message logging
1772: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1773: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
1774: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1775: ,'calling Okl_Api.END_ACTIVITY');
1776: END IF;
1769: END IF;
1770:
1771: --message logging
1772: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1773: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
1774: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1775: ,'calling Okl_Api.END_ACTIVITY');
1776: END IF;
1777:
1779: ,x_msg_data => x_msg_data);
1780:
1781: x_return_status := l_return_status;
1782: --message logging
1783: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1784: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
1785: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1786: ,' returning from Okl_Api.END_ACTIVITY, status is ||'
1787: ||x_return_status);
1780:
1781: x_return_status := l_return_status;
1782: --message logging
1783: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1784: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
1785: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1786: ,' returning from Okl_Api.END_ACTIVITY, status is ||'
1787: ||x_return_status);
1788: END IF;
1786: ,' returning from Okl_Api.END_ACTIVITY, status is ||'
1787: ||x_return_status);
1788: END IF;
1789: --message logging
1790: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1791: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
1792: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1793: , 'End (-)');
1794: END IF;
1787: ||x_return_status);
1788: END IF;
1789: --message logging
1790: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1791: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
1792: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1793: , 'End (-)');
1794: END IF;
1795:
1812: CLOSE get_rv_streams_csr;
1813: END IF;
1814:
1815: --message logging
1816: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1817: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
1818: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1819: , 'Handled exception occured');
1820: END IF;
1813: END IF;
1814:
1815: --message logging
1816: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1817: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
1818: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1819: , 'Handled exception occured');
1820: END IF;
1821: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1846: CLOSE get_rv_streams_csr;
1847: END IF;
1848:
1849: --message logging
1850: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1851: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
1852: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1853: , 'Unexpected exception occured');
1854: END IF;
1847: END IF;
1848:
1849: --message logging
1850: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1851: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
1852: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1853: , 'Unexpected exception occured');
1854: END IF;
1855: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1881: CLOSE get_rv_streams_csr;
1882: END IF;
1883:
1884: --message logging
1885: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1886: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
1887: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1888: , 'When others exception occured');
1889: END IF;
1882: END IF;
1883:
1884: --message logging
1885: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1886: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
1887: ,'OKL_AM_SECURITIZATION_PVT.process_securitized_streams'
1888: , 'When others exception occured');
1889: END IF;
1890: OKL_API.set_message(p_app_name => g_app_name,
1978: --additonal parameter to obtain formula value.
1979: l_flag BOOLEAN;
1980: BEGIN
1981: --message logging
1982: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1983: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
1984: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
1985: ,'Begin (+)');
1986: END IF;
1979: l_flag BOOLEAN;
1980: BEGIN
1981: --message logging
1982: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1983: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
1984: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
1985: ,'Begin (+)');
1986: END IF;
1987:
2015: l_sty_id);
2016:
2017: IF l_sty_id IS NULL OR l_sty_id = OKL_API.G_MISS_NUM THEN
2018: --message logging
2019: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2020: FND_LOG.STRING(FND_LOG.LEVEL_ERROR
2021: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2022: ,'OKL_STREAMS_UTIL.get_primary_stream_type returned no values');
2023: END IF;
2016:
2017: IF l_sty_id IS NULL OR l_sty_id = OKL_API.G_MISS_NUM THEN
2018: --message logging
2019: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2020: FND_LOG.STRING(FND_LOG.LEVEL_ERROR
2021: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2022: ,'OKL_STREAMS_UTIL.get_primary_stream_type returned no values');
2023: END IF;
2024:
2034: LOOP
2035: IF p_asset_tbl(l_loop_counter).p_amount IS NOT NULL
2036: THEN
2037: --message logging
2038: IF (FND_LOG.LEVEL_STATEMENT >=
2039: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2040: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2041: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2042: ,'calling OKL_AM_UTIL_PVT.get_formula_value with'
2035: IF p_asset_tbl(l_loop_counter).p_amount IS NOT NULL
2036: THEN
2037: --message logging
2038: IF (FND_LOG.LEVEL_STATEMENT >=
2039: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2040: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2041: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2042: ,'calling OKL_AM_UTIL_PVT.get_formula_value with'
2043: ||' formula name '||l_formula_name);
2036: THEN
2037: --message logging
2038: IF (FND_LOG.LEVEL_STATEMENT >=
2039: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2040: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2041: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2042: ,'calling OKL_AM_UTIL_PVT.get_formula_value with'
2043: ||' formula name '||l_formula_name);
2044: END IF;
2056: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
2057: RAISE OKL_API.G_EXCEPTION_ERROR;
2058: END IF;
2059: --message logging
2060: IF (FND_LOG.LEVEL_STATEMENT >=
2061: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2062: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2063: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2064: ,'returning from OKL_AM_UTIL_PVT.get_formula_value'
2057: RAISE OKL_API.G_EXCEPTION_ERROR;
2058: END IF;
2059: --message logging
2060: IF (FND_LOG.LEVEL_STATEMENT >=
2061: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2062: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2063: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2064: ,'returning from OKL_AM_UTIL_PVT.get_formula_value'
2065: ||', status is '
2058: END IF;
2059: --message logging
2060: IF (FND_LOG.LEVEL_STATEMENT >=
2061: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2062: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2063: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2064: ,'returning from OKL_AM_UTIL_PVT.get_formula_value'
2065: ||', status is '
2066: ||l_return_status
2097:
2098: -- create disbursement record
2099:
2100: --message logging
2101: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2102: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2103: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2104: ,'calling OKL_STREAMS_PUB.create_streams ');
2105: END IF;
2098: -- create disbursement record
2099:
2100: --message logging
2101: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2102: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2103: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2104: ,'calling OKL_STREAMS_PUB.create_streams ');
2105: END IF;
2106:
2120: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
2121: RAISE OKL_API.G_EXCEPTION_ERROR;
2122: END IF;
2123: --message logging
2124: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2125: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2126: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2127: ,'returning from OKL_STREAMS_PUB.create_streams,'
2128: ||' status is '||l_return_status);
2121: RAISE OKL_API.G_EXCEPTION_ERROR;
2122: END IF;
2123: --message logging
2124: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2125: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2126: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2127: ,'returning from OKL_STREAMS_PUB.create_streams,'
2128: ||' status is '||l_return_status);
2129: END IF;
2141: p_quote_eff_date => G_DATE_EFFECTIVE_FROM,
2142: x_return_status => l_return_status);
2143:
2144: --message logging
2145: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2146: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2147: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2148: ,'returning from do_disb_adjustments,'
2149: ||' status is '||l_return_status);
2142: x_return_status => l_return_status);
2143:
2144: --message logging
2145: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2146: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2147: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2148: ,'returning from do_disb_adjustments,'
2149: ||' status is '||l_return_status);
2150: END IF;
2157: -- gboomina Bug 4775555 - End
2158: END IF;
2159: END LOOP; -- p_asset_tbl
2160: --message logging
2161: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2162: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
2163: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2164: ,'End (-)');
2165: END IF;
2158: END IF;
2159: END LOOP; -- p_asset_tbl
2160: --message logging
2161: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2162: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
2163: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2164: ,'End (-)');
2165: END IF;
2166:
2174: CLOSE get_next_trx_val_csr;
2175: END IF;
2176:
2177: --message logging
2178: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2179: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
2180: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2181: , 'Handled exception occured');
2182: END IF;
2175: END IF;
2176:
2177: --message logging
2178: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2179: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
2180: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2181: , 'Handled exception occured');
2182: END IF;
2183:
2198: CLOSE get_next_trx_val_csr;
2199: END IF;
2200:
2201: --message logging
2202: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2203: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
2204: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2205: , 'Expected exception occured');
2206: END IF;
2199: END IF;
2200:
2201: --message logging
2202: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2203: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
2204: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2205: , 'Expected exception occured');
2206: END IF;
2207:
2222: CLOSE get_next_trx_val_csr;
2223: END IF;
2224:
2225: --message logging
2226: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2227: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
2228: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2229: , 'When others exception occured');
2230: END IF;
2223: END IF;
2224:
2225: --message logging
2226: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2227: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
2228: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rent'
2229: , 'When others exception occured');
2230: END IF;
2231:
2313: --additonal parameter to obtain formula value.
2314: l_flag BOOLEAN;
2315: BEGIN
2316: --message logging
2317: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2318: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
2319: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2320: ,'Begin (+)');
2321: END IF;
2314: l_flag BOOLEAN;
2315: BEGIN
2316: --message logging
2317: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2318: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
2319: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2320: ,'Begin (+)');
2321: END IF;
2322:
2350: l_sty_id);
2351:
2352: IF l_sty_id IS NULL OR l_sty_id = OKL_API.G_MISS_NUM THEN
2353: --message logging
2354: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2355: FND_LOG.STRING(FND_LOG.LEVEL_ERROR
2356: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2357: ,'OKL_STREAMS_UTIL.get_primary_stream_type returned no values');
2358: END IF;
2351:
2352: IF l_sty_id IS NULL OR l_sty_id = OKL_API.G_MISS_NUM THEN
2353: --message logging
2354: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2355: FND_LOG.STRING(FND_LOG.LEVEL_ERROR
2356: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2357: ,'OKL_STREAMS_UTIL.get_primary_stream_type returned no values');
2358: END IF;
2359:
2369: LOOP
2370: IF p_asset_tbl(l_loop_counter).p_amount IS NOT NULL
2371: THEN
2372: --message logging
2373: IF (FND_LOG.LEVEL_STATEMENT >=
2374: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2375: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2376: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2377: ,'calling OKL_AM_UTIL_PVT.get_formula_value with'
2370: IF p_asset_tbl(l_loop_counter).p_amount IS NOT NULL
2371: THEN
2372: --message logging
2373: IF (FND_LOG.LEVEL_STATEMENT >=
2374: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2375: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2376: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2377: ,'calling OKL_AM_UTIL_PVT.get_formula_value with'
2378: ||' formula name '||l_formula_name);
2371: THEN
2372: --message logging
2373: IF (FND_LOG.LEVEL_STATEMENT >=
2374: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2375: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2376: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2377: ,'calling OKL_AM_UTIL_PVT.get_formula_value with'
2378: ||' formula name '||l_formula_name);
2379: END IF;
2391: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
2392: RAISE OKL_API.G_EXCEPTION_ERROR;
2393: END IF;
2394: --message logging
2395: IF (FND_LOG.LEVEL_STATEMENT >=
2396: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2397: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2398: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2399: ,'returning from OKL_AM_UTIL_PVT.get_formula_value'
2392: RAISE OKL_API.G_EXCEPTION_ERROR;
2393: END IF;
2394: --message logging
2395: IF (FND_LOG.LEVEL_STATEMENT >=
2396: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2397: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2398: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2399: ,'returning from OKL_AM_UTIL_PVT.get_formula_value'
2400: ||', status is '
2393: END IF;
2394: --message logging
2395: IF (FND_LOG.LEVEL_STATEMENT >=
2396: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2397: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2398: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2399: ,'returning from OKL_AM_UTIL_PVT.get_formula_value'
2400: ||', status is '
2401: ||l_return_status
2432:
2433: -- create disbursement record
2434:
2435: --message logging
2436: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2437: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2438: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2439: ,'calling OKL_STREAMS_PUB.create_streams ');
2440: END IF;
2433: -- create disbursement record
2434:
2435: --message logging
2436: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2437: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2438: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2439: ,'calling OKL_STREAMS_PUB.create_streams ');
2440: END IF;
2441:
2455: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
2456: RAISE OKL_API.G_EXCEPTION_ERROR;
2457: END IF;
2458: --message logging
2459: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2460: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2461: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2462: ,'returning from OKL_STREAMS_PUB.create_streams,'
2463: ||' status is '||l_return_status);
2456: RAISE OKL_API.G_EXCEPTION_ERROR;
2457: END IF;
2458: --message logging
2459: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2460: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2461: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2462: ,'returning from OKL_STREAMS_PUB.create_streams,'
2463: ||' status is '||l_return_status);
2464: END IF;
2476: p_quote_eff_date => G_DATE_EFFECTIVE_FROM,
2477: x_return_status => l_return_status);
2478:
2479: --message logging
2480: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2481: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2482: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2483: ,'returning from do_disb_adjustments,'
2484: ||' status is '||l_return_status);
2477: x_return_status => l_return_status);
2478:
2479: --message logging
2480: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2481: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2482: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2483: ,'returning from do_disb_adjustments,'
2484: ||' status is '||l_return_status);
2485: END IF;
2492: -- gboomina Bug 4775555 - End
2493: END IF;
2494: END LOOP; -- p_asset_tbl
2495: --message logging
2496: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2497: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
2498: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2499: ,'End (-)');
2500: END IF;
2493: END IF;
2494: END LOOP; -- p_asset_tbl
2495: --message logging
2496: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2497: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
2498: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2499: ,'End (-)');
2500: END IF;
2501:
2509: CLOSE get_next_trx_val_csr;
2510: END IF;
2511:
2512: --message logging
2513: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2514: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
2515: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2516: , 'Handled exception occured');
2517: END IF;
2510: END IF;
2511:
2512: --message logging
2513: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2514: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
2515: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2516: , 'Handled exception occured');
2517: END IF;
2518:
2533: CLOSE get_next_trx_val_csr;
2534: END IF;
2535:
2536: --message logging
2537: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2538: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
2539: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2540: , 'Expected exception occured');
2541: END IF;
2534: END IF;
2535:
2536: --message logging
2537: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2538: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
2539: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2540: , 'Expected exception occured');
2541: END IF;
2542:
2557: CLOSE get_next_trx_val_csr;
2558: END IF;
2559:
2560: --message logging
2561: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2562: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
2563: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2564: , 'When others exception occured');
2565: END IF;
2558: END IF;
2559:
2560: --message logging
2561: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2562: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
2563: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_loan_payment'
2564: , 'When others exception occured');
2565: END IF;
2566:
2654: l_trx_id NUMBER;
2655:
2656: BEGIN
2657: --message logging
2658: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2659: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
2660: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2661: ,'Begin (+)');
2662: END IF;
2655:
2656: BEGIN
2657: --message logging
2658: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2659: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
2660: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2661: ,'Begin (+)');
2662: END IF;
2663: -- kle_id and sale_amount are used to determine the what and how much to
2664: -- disburse.
2665:
2666: IF (p_kle_id IS NOT NULL) AND (p_sale_price IS NOT NULL) THEN
2667: --message logging
2668: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2669: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2670: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2671: ,'calling OKL_AM_UTIL_PVT.get_formula_value with formula name '
2672: ||l_formula_name);
2665:
2666: IF (p_kle_id IS NOT NULL) AND (p_sale_price IS NOT NULL) THEN
2667: --message logging
2668: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2669: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2670: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2671: ,'calling OKL_AM_UTIL_PVT.get_formula_value with formula name '
2672: ||l_formula_name);
2673: END IF;
2685: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
2686: RAISE OKL_API.G_EXCEPTION_ERROR;
2687: END IF;
2688: --message logging
2689: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2690: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2691: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2692: ,'returning from OKL_AM_UTIL_PVT.get_formula_value, status is '
2693: ||l_return_status
2686: RAISE OKL_API.G_EXCEPTION_ERROR;
2687: END IF;
2688: --message logging
2689: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2690: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2691: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2692: ,'returning from OKL_AM_UTIL_PVT.get_formula_value, status is '
2693: ||l_return_status
2694: ||' and l_formula_amount is '
2705: l_stmv_rec.sty_id);
2706: IF l_stmv_rec.sty_id IS NULL OR l_stmv_rec.sty_id = OKL_API.G_MISS_NUM THEN
2707:
2708: --message logging
2709: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2710: FND_LOG.STRING(FND_LOG.LEVEL_ERROR
2711: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2712: ,' OKL_STREAMS_UTIL.get_primary_stream_type returned no values');
2713: END IF;
2706: IF l_stmv_rec.sty_id IS NULL OR l_stmv_rec.sty_id = OKL_API.G_MISS_NUM THEN
2707:
2708: --message logging
2709: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2710: FND_LOG.STRING(FND_LOG.LEVEL_ERROR
2711: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2712: ,' OKL_STREAMS_UTIL.get_primary_stream_type returned no values');
2713: END IF;
2714: -- smoduga +++++++++ User Defined Streams -- end ++++++++++++++++
2742: l_selv_tbl(1).ACCRUED_YN := 'N';
2743: l_selv_tbl(1).SE_LINE_NUMBER := 1;
2744:
2745: --message logging
2746: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2747: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2748: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2749: ,'calling OKL_STREAMS_PUB.create_streams ');
2750: END IF;
2743: l_selv_tbl(1).SE_LINE_NUMBER := 1;
2744:
2745: --message logging
2746: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2747: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2748: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2749: ,'calling OKL_STREAMS_PUB.create_streams ');
2750: END IF;
2751:
2766: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
2767: RAISE OKL_API.G_EXCEPTION_ERROR;
2768: END IF;
2769: --message logging
2770: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2771: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2772: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2773: ,'returning from OKL_STREAMS_PUB.create_streams, status is '
2774: ||l_return_status);
2767: RAISE OKL_API.G_EXCEPTION_ERROR;
2768: END IF;
2769: --message logging
2770: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2771: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2772: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2773: ,'returning from OKL_STREAMS_PUB.create_streams, status is '
2774: ||l_return_status);
2775: END IF;
2774: ||l_return_status);
2775: END IF;
2776: END IF;
2777: --message logging
2778: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2779: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
2780: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2781: ,'End (-)');
2782: END IF;
2775: END IF;
2776: END IF;
2777: --message logging
2778: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2779: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
2780: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2781: ,'End (-)');
2782: END IF;
2783:
2791: CLOSE get_next_trx_val_csr;
2792: END IF;
2793:
2794: --message logging
2795: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2796: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
2797: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2798: , 'Handled exception occured');
2799: END IF;
2792: END IF;
2793:
2794: --message logging
2795: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2796: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
2797: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2798: , 'Handled exception occured');
2799: END IF;
2800:
2815: CLOSE get_next_trx_val_csr;
2816: END IF;
2817:
2818: --message logging
2819: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2820: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
2821: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2822: , 'Unexpected exception occured');
2823: END IF;
2816: END IF;
2817:
2818: --message logging
2819: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2820: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
2821: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2822: , 'Unexpected exception occured');
2823: END IF;
2824:
2839: CLOSE get_next_trx_val_csr;
2840: END IF;
2841:
2842: --message logging
2843: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2844: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
2845: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2846: , 'When others exception occured');
2847: END IF;
2840: END IF;
2841:
2842: --message logging
2843: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2844: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
2845: ,'OKL_AM_SECURITIZATION_PVT.disburse_investor_rv'
2846: , 'When others exception occured');
2847: END IF;
2848:
2917: l_loop_counter NUMBER := 1;
2918:
2919: BEGIN
2920: --message logging
2921: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2922: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
2923: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
2924: ,'Begin (+)');
2925: END IF;
2918:
2919: BEGIN
2920: --message logging
2921: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2922: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
2923: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
2924: ,'Begin (+)');
2925: END IF;
2926:
2934:
2935: IF p_transaction_reason =
2936: OKL_SECURITIZATION_PVT.G_TRX_REASON_EARLY_TERMINATION THEN
2937: --message logging
2938: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2939: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2940: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
2941: ,'calling OKL_SECURITIZATION_PVT.MODIFY_POOL_CONTENTS'
2942: ||' with transaction reason '
2935: IF p_transaction_reason =
2936: OKL_SECURITIZATION_PVT.G_TRX_REASON_EARLY_TERMINATION THEN
2937: --message logging
2938: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2939: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2940: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
2941: ,'calling OKL_SECURITIZATION_PVT.MODIFY_POOL_CONTENTS'
2942: ||' with transaction reason '
2943: ||p_transaction_reason);
2968: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
2969: RAISE OKL_API.G_EXCEPTION_ERROR;
2970: END IF;
2971: --message logging
2972: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2973: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2974: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
2975: ,'returning from '
2976: ||'OKL_SECURITIZATION_PVT.MODIFY_POOL_CONTENTS, status is '
2969: RAISE OKL_API.G_EXCEPTION_ERROR;
2970: END IF;
2971: --message logging
2972: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2973: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2974: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
2975: ,'returning from '
2976: ||'OKL_SECURITIZATION_PVT.MODIFY_POOL_CONTENTS, status is '
2977: ||l_return_status);
2989:
2990: FOR l_loop_counter IN l_asset_table.FIRST..l_asset_table.LAST LOOP
2991: IF l_asset_table(l_loop_counter).p_khr_id IS NOT NULL THEN
2992: --message logging
2993: IF (FND_LOG.LEVEL_STATEMENT >=
2994: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2995: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2996: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
2997: ,'calling OKL_SECURITIZATION_PVT.MODIFY_POOL_'
2990: FOR l_loop_counter IN l_asset_table.FIRST..l_asset_table.LAST LOOP
2991: IF l_asset_table(l_loop_counter).p_khr_id IS NOT NULL THEN
2992: --message logging
2993: IF (FND_LOG.LEVEL_STATEMENT >=
2994: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2995: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2996: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
2997: ,'calling OKL_SECURITIZATION_PVT.MODIFY_POOL_'
2998: ||'CONTENTS with transaction reason '
2991: IF l_asset_table(l_loop_counter).p_khr_id IS NOT NULL THEN
2992: --message logging
2993: IF (FND_LOG.LEVEL_STATEMENT >=
2994: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2995: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
2996: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
2997: ,'calling OKL_SECURITIZATION_PVT.MODIFY_POOL_'
2998: ||'CONTENTS with transaction reason '
2999: ||p_transaction_reason);
3017: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
3018: RAISE OKL_API.G_EXCEPTION_ERROR;
3019: END IF;
3020: --message logging
3021: IF (FND_LOG.LEVEL_STATEMENT >=
3022: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3023: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
3024: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
3025: ,'returning from OKL_SECURITIZATION_PVT.'
3018: RAISE OKL_API.G_EXCEPTION_ERROR;
3019: END IF;
3020: --message logging
3021: IF (FND_LOG.LEVEL_STATEMENT >=
3022: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3023: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
3024: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
3025: ,'returning from OKL_SECURITIZATION_PVT.'
3026: ||'MODIFY_POOL_CONTENTS, status is '
3019: END IF;
3020: --message logging
3021: IF (FND_LOG.LEVEL_STATEMENT >=
3022: FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3023: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
3024: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
3025: ,'returning from OKL_SECURITIZATION_PVT.'
3026: ||'MODIFY_POOL_CONTENTS, status is '
3027: ||l_return_status);
3030: END LOOP; -- l_asset_table
3031: END IF; -- gboomina 07-Dec-05 - Added End if
3032: END IF;
3033: --message logging
3034: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3035: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
3036: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
3037: ,'End (-)');
3038: END IF;
3031: END IF; -- gboomina 07-Dec-05 - Added End if
3032: END IF;
3033: --message logging
3034: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3035: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE
3036: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
3037: ,'End (-)');
3038: END IF;
3039:
3042: EXCEPTION
3043: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3044:
3045: --message logging
3046: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3047: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
3048: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
3049: , 'Handled exception occured');
3050: END IF;
3043: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3044:
3045: --message logging
3046: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3047: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
3048: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
3049: , 'Handled exception occured');
3050: END IF;
3051:
3061:
3062: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3063:
3064: --message logging
3065: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3066: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
3067: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
3068: , 'Unexpected exception occured');
3069: END IF;
3062: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3063:
3064: --message logging
3065: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3066: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
3067: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
3068: , 'Unexpected exception occured');
3069: END IF;
3070:
3080:
3081: WHEN OTHERS THEN
3082:
3083: --message logging
3084: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3085: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
3086: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
3087: , 'When others exception occured');
3088: END IF;
3081: WHEN OTHERS THEN
3082:
3083: --message logging
3084: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3085: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION
3086: ,'OKL_AM_SECURITIZATION_PVT.create_pool_transaction'
3087: , 'When others exception occured');
3088: END IF;
3089: OKL_API.set_message(p_app_name => g_app_name,