160: x_dependent_sty_name => l_sty_name);
161:
162: END IF;
163:
164: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
165: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
166: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
167: RAISE OKL_API.G_EXCEPTION_ERROR;
168: END IF;
161:
162: END IF;
163:
164: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
165: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
166: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
167: RAISE OKL_API.G_EXCEPTION_ERROR;
168: END IF;
169:
162: END IF;
163:
164: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
165: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
166: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
167: RAISE OKL_API.G_EXCEPTION_ERROR;
168: END IF;
169:
170: i := 0;
163:
164: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
165: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
166: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
167: RAISE OKL_API.G_EXCEPTION_ERROR;
168: END IF;
169:
170: i := 0;
171: FOR l_k_income IN c_k_income(p_sty_name => l_sty_name) LOOP
194: x_sty_id => l_amortized_exp_id,
195: x_sty_name => l_name,
196: x_return_status => lx_return_status);
197:
198: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
199: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
200: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
201: RAISE OKL_API.G_EXCEPTION_ERROR;
202: END IF;
195: x_sty_name => l_name,
196: x_return_status => lx_return_status);
197:
198: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
199: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
200: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
201: RAISE OKL_API.G_EXCEPTION_ERROR;
202: END IF;
203:
196: x_return_status => lx_return_status);
197:
198: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
199: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
200: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
201: RAISE OKL_API.G_EXCEPTION_ERROR;
202: END IF;
203:
204: */
197:
198: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
199: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
200: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
201: RAISE OKL_API.G_EXCEPTION_ERROR;
202: END IF;
203:
204: */
205:
217: x_dependent_sty_id => l_amortized_exp_id,
218: x_dependent_sty_name => l_name);
219:
220:
221: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
222: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
223: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
224: RAISE OKL_API.G_EXCEPTION_ERROR;
225: END IF;
218: x_dependent_sty_name => l_name);
219:
220:
221: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
222: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
223: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
224: RAISE OKL_API.G_EXCEPTION_ERROR;
225: END IF;
226:
219:
220:
221: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
222: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
223: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
224: RAISE OKL_API.G_EXCEPTION_ERROR;
225: END IF;
226:
227: END IF;
220:
221: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
222: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
223: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
224: RAISE OKL_API.G_EXCEPTION_ERROR;
225: END IF;
226:
227: END IF;
228:
266: p_selv_tbl => l_selv_tbl,
267: x_selv_tbl => lx_selv_tbl);
268:
269: IF (lx_return_status = G_RET_STS_UNEXP_ERROR) THEN
270: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
271: ELSIF (lx_return_status = G_RET_STS_ERROR) THEN
272: RAISE OKL_API.G_EXCEPTION_ERROR;
273: END IF;
274:
268:
269: IF (lx_return_status = G_RET_STS_UNEXP_ERROR) THEN
270: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
271: ELSIF (lx_return_status = G_RET_STS_ERROR) THEN
272: RAISE OKL_API.G_EXCEPTION_ERROR;
273: END IF;
274:
275: l_selv_tbl.DELETE;
276: l_selv_tbl := lx_selv_tbl;
285: p_selv_tbl => l_selv_tbl,
286: x_stmv_rec => lx_stmv_rec,
287: x_selv_tbl => lx_selv_tbl);
288:
289: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
290: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
291: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
292: RAISE OKL_API.G_EXCEPTION_ERROR;
293: END IF;
286: x_stmv_rec => lx_stmv_rec,
287: x_selv_tbl => lx_selv_tbl);
288:
289: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
290: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
291: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
292: RAISE OKL_API.G_EXCEPTION_ERROR;
293: END IF;
294:
287: x_selv_tbl => lx_selv_tbl);
288:
289: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
290: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
291: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
292: RAISE OKL_API.G_EXCEPTION_ERROR;
293: END IF;
294:
295: l_selv_tbl.DELETE;
288:
289: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
290: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
291: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
292: RAISE OKL_API.G_EXCEPTION_ERROR;
293: END IF;
294:
295: l_selv_tbl.DELETE;
296:
305: x_return_status := G_RET_STS_SUCCESS;
306:
307: EXCEPTION
308:
309: WHEN OKL_API.G_EXCEPTION_ERROR THEN
310:
311: x_return_status := G_RET_STS_ERROR;
312:
313: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
309: WHEN OKL_API.G_EXCEPTION_ERROR THEN
310:
311: x_return_status := G_RET_STS_ERROR;
312:
313: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
314:
315: x_return_status := G_RET_STS_UNEXP_ERROR;
316:
317: WHEN OTHERS THEN
315: x_return_status := G_RET_STS_UNEXP_ERROR;
316:
317: WHEN OTHERS THEN
318:
319: OKL_API.SET_MESSAGE (p_app_name => G_APP_NAME,
320: p_msg_name => G_DB_ERROR,
321: p_token1 => G_PROG_NAME_TOKEN,
322: p_token1_value => l_prog_name,
323: p_token2 => G_SQLCODE_TOKEN,
497: p_end_date => l_end_date,
498: p_arrears => 'Y',
499: x_return_status => lx_return_status);
500:
501: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
502: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
503: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
504: RAISE OKL_API.G_EXCEPTION_ERROR;
505: END IF;
498: p_arrears => 'Y',
499: x_return_status => lx_return_status);
500:
501: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
502: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
503: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
504: RAISE OKL_API.G_EXCEPTION_ERROR;
505: END IF;
506:
499: x_return_status => lx_return_status);
500:
501: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
502: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
503: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
504: RAISE OKL_API.G_EXCEPTION_ERROR;
505: END IF;
506:
507: IF l_periodic_exp_id IS NULL THEN
500:
501: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
502: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
503: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
504: RAISE OKL_API.G_EXCEPTION_ERROR;
505: END IF;
506:
507: IF l_periodic_exp_id IS NULL THEN
508:
532: x_dependent_sty_name => l_sty_name);
533: END IF;
534: -- gboomina added for Bug 6763287 - End
535:
536: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
537: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
538: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
539: RAISE OKL_API.G_EXCEPTION_ERROR;
540: END IF;
533: END IF;
534: -- gboomina added for Bug 6763287 - End
535:
536: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
537: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
538: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
539: RAISE OKL_API.G_EXCEPTION_ERROR;
540: END IF;
541:
534: -- gboomina added for Bug 6763287 - End
535:
536: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
537: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
538: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
539: RAISE OKL_API.G_EXCEPTION_ERROR;
540: END IF;
541:
542: /*
535:
536: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
537: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
538: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
539: RAISE OKL_API.G_EXCEPTION_ERROR;
540: END IF;
541:
542: /*
543: okl_stream_generator_pvt.get_sty_details (p_sty_name => 'PERIODIC EXPENSE PAYABLE',
544: x_sty_id => l_periodic_exp_id,
545: x_sty_name => l_sty_name,
546: x_return_status => lx_return_status);
547:
548: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
549: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
550: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
551: RAISE OKL_API.G_EXCEPTION_ERROR;
552: END IF;
545: x_sty_name => l_sty_name,
546: x_return_status => lx_return_status);
547:
548: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
549: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
550: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
551: RAISE OKL_API.G_EXCEPTION_ERROR;
552: END IF;
553: */
546: x_return_status => lx_return_status);
547:
548: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
549: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
550: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
551: RAISE OKL_API.G_EXCEPTION_ERROR;
552: END IF;
553: */
554:
547:
548: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
549: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
550: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
551: RAISE OKL_API.G_EXCEPTION_ERROR;
552: END IF;
553: */
554:
555: END IF;
606: p_end_date => l_month_end,
607: p_arrears => 'Y',
608: x_return_status => lx_return_status);
609:
610: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
611: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
612: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
613: RAISE OKL_API.G_EXCEPTION_ERROR;
614: END IF;
607: p_arrears => 'Y',
608: x_return_status => lx_return_status);
609:
610: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
611: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
612: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
613: RAISE OKL_API.G_EXCEPTION_ERROR;
614: END IF;
615:
608: x_return_status => lx_return_status);
609:
610: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
611: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
612: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
613: RAISE OKL_API.G_EXCEPTION_ERROR;
614: END IF;
615:
616: l_selv_tbl(i).amount := okl_accounting_util.validate_amount(p_amount => l_days * l_daily_exp,
609:
610: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
611: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
612: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
613: RAISE OKL_API.G_EXCEPTION_ERROR;
614: END IF;
615:
616: l_selv_tbl(i).amount := okl_accounting_util.validate_amount(p_amount => l_days * l_daily_exp,
617: p_currency_code => p_currency_code);
633: p_selv_tbl => l_selv_tbl,
634: x_selv_tbl => lx_selv_tbl);
635:
636: IF (lx_return_status = G_RET_STS_UNEXP_ERROR) THEN
637: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
638: ELSIF (lx_return_status = G_RET_STS_ERROR) THEN
639: RAISE OKL_API.G_EXCEPTION_ERROR;
640: END IF;
641:
635:
636: IF (lx_return_status = G_RET_STS_UNEXP_ERROR) THEN
637: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
638: ELSIF (lx_return_status = G_RET_STS_ERROR) THEN
639: RAISE OKL_API.G_EXCEPTION_ERROR;
640: END IF;
641:
642: l_selv_tbl.DELETE;
643: l_selv_tbl := lx_selv_tbl;
651: p_selv_tbl => l_selv_tbl,
652: x_stmv_rec => lx_stmv_rec,
653: x_selv_tbl => lx_selv_tbl);
654:
655: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
656: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
657: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
658: RAISE OKL_API.G_EXCEPTION_ERROR;
659: END IF;
652: x_stmv_rec => lx_stmv_rec,
653: x_selv_tbl => lx_selv_tbl);
654:
655: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
656: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
657: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
658: RAISE OKL_API.G_EXCEPTION_ERROR;
659: END IF;
660:
653: x_selv_tbl => lx_selv_tbl);
654:
655: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
656: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
657: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
658: RAISE OKL_API.G_EXCEPTION_ERROR;
659: END IF;
660:
661: l_selv_tbl.DELETE;
654:
655: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
656: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
657: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
658: RAISE OKL_API.G_EXCEPTION_ERROR;
659: END IF;
660:
661: l_selv_tbl.DELETE;
662:
673: x_return_status := G_RET_STS_SUCCESS;
674:
675: EXCEPTION
676:
677: WHEN OKL_API.G_EXCEPTION_ERROR THEN
678:
679: x_return_status := G_RET_STS_ERROR;
680:
681: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
677: WHEN OKL_API.G_EXCEPTION_ERROR THEN
678:
679: x_return_status := G_RET_STS_ERROR;
680:
681: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
682:
683: x_return_status := G_RET_STS_UNEXP_ERROR;
684:
685: WHEN OTHERS THEN
683: x_return_status := G_RET_STS_UNEXP_ERROR;
684:
685: WHEN OTHERS THEN
686:
687: OKL_API.SET_MESSAGE (p_app_name => G_APP_NAME,
688: p_msg_name => G_DB_ERROR,
689: p_token1 => G_PROG_NAME_TOKEN,
690: p_token1_value => l_prog_name,
691: p_token2 => G_SQLCODE_TOKEN,
736: p_end_date => l_hdr.end_date,
737: p_deal_type => p_deal_type,
738: x_return_status => lx_return_status);
739:
740: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
741: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
742: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
743: RAISE OKL_API.G_EXCEPTION_ERROR;
744: END IF;
737: p_deal_type => p_deal_type,
738: x_return_status => lx_return_status);
739:
740: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
741: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
742: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
743: RAISE OKL_API.G_EXCEPTION_ERROR;
744: END IF;
745:
738: x_return_status => lx_return_status);
739:
740: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
741: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
742: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
743: RAISE OKL_API.G_EXCEPTION_ERROR;
744: END IF;
745:
746: generate_rec_exp(p_khr_id => p_khr_id,
739:
740: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
741: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
742: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
743: RAISE OKL_API.G_EXCEPTION_ERROR;
744: END IF;
745:
746: generate_rec_exp(p_khr_id => p_khr_id,
747: p_deal_type => p_deal_type,
748: p_purpose_code => p_purpose_code,
749: p_currency_code => l_hdr.currency_code,
750: x_return_status => lx_return_status);
751:
752: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
753: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
754: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
755: RAISE OKL_API.G_EXCEPTION_ERROR;
756: END IF;
749: p_currency_code => l_hdr.currency_code,
750: x_return_status => lx_return_status);
751:
752: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
753: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
754: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
755: RAISE OKL_API.G_EXCEPTION_ERROR;
756: END IF;
757:
750: x_return_status => lx_return_status);
751:
752: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
753: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
754: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
755: RAISE OKL_API.G_EXCEPTION_ERROR;
756: END IF;
757:
758: x_return_status := lx_return_status;
751:
752: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
753: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
754: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
755: RAISE OKL_API.G_EXCEPTION_ERROR;
756: END IF;
757:
758: x_return_status := lx_return_status;
759:
758: x_return_status := lx_return_status;
759:
760: EXCEPTION
761:
762: WHEN OKL_API.G_EXCEPTION_ERROR THEN
763:
764: x_return_status := G_RET_STS_ERROR;
765:
766: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
762: WHEN OKL_API.G_EXCEPTION_ERROR THEN
763:
764: x_return_status := G_RET_STS_ERROR;
765:
766: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
767:
768: x_return_status := G_RET_STS_UNEXP_ERROR;
769:
770: WHEN OTHERS THEN
768: x_return_status := G_RET_STS_UNEXP_ERROR;
769:
770: WHEN OTHERS THEN
771:
772: OKL_API.SET_MESSAGE (p_app_name => G_APP_NAME,
773: p_msg_name => G_DB_ERROR,
774: p_token1 => G_PROG_NAME_TOKEN,
775: p_token1_value => l_prog_name,
776: p_token2 => G_SQLCODE_TOKEN,
777: p_token2_value => sqlcode,
778: p_token3 => G_SQLERRM_TOKEN,
779: p_token3_value => sqlerrm);
780:
781: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
782:
783: END generate_expense_streams;
784:
785: