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,
499: p_end_date => l_end_date,
500: p_arrears => 'Y',
501: x_return_status => lx_return_status);
502:
503: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
504: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
505: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
506: RAISE OKL_API.G_EXCEPTION_ERROR;
507: END IF;
500: p_arrears => 'Y',
501: x_return_status => lx_return_status);
502:
503: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
504: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
505: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
506: RAISE OKL_API.G_EXCEPTION_ERROR;
507: END IF;
508:
501: x_return_status => lx_return_status);
502:
503: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
504: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
505: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
506: RAISE OKL_API.G_EXCEPTION_ERROR;
507: END IF;
508:
509: IF l_periodic_exp_id IS NULL THEN
502:
503: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
504: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
505: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
506: RAISE OKL_API.G_EXCEPTION_ERROR;
507: END IF;
508:
509: IF l_periodic_exp_id IS NULL THEN
510:
539: x_dependent_sty_name => l_sty_name);
540: END IF;
541: -- gboomina added for Bug 6763287 - End
542:
543: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
544: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
545: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
546: RAISE OKL_API.G_EXCEPTION_ERROR;
547: END IF;
540: END IF;
541: -- gboomina added for Bug 6763287 - End
542:
543: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
544: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
545: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
546: RAISE OKL_API.G_EXCEPTION_ERROR;
547: END IF;
548:
541: -- gboomina added for Bug 6763287 - End
542:
543: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
544: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
545: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
546: RAISE OKL_API.G_EXCEPTION_ERROR;
547: END IF;
548:
549: /*
542:
543: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
544: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
545: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
546: RAISE OKL_API.G_EXCEPTION_ERROR;
547: END IF;
548:
549: /*
550: okl_stream_generator_pvt.get_sty_details (p_sty_name => 'PERIODIC EXPENSE PAYABLE',
551: x_sty_id => l_periodic_exp_id,
552: x_sty_name => l_sty_name,
553: x_return_status => lx_return_status);
554:
555: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
556: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
557: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
558: RAISE OKL_API.G_EXCEPTION_ERROR;
559: END IF;
552: x_sty_name => l_sty_name,
553: x_return_status => lx_return_status);
554:
555: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
556: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
557: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
558: RAISE OKL_API.G_EXCEPTION_ERROR;
559: END IF;
560: */
553: x_return_status => lx_return_status);
554:
555: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
556: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
557: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
558: RAISE OKL_API.G_EXCEPTION_ERROR;
559: END IF;
560: */
561:
554:
555: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
556: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
557: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
558: RAISE OKL_API.G_EXCEPTION_ERROR;
559: END IF;
560: */
561:
562: END IF;
613: p_end_date => l_month_end,
614: p_arrears => 'Y',
615: x_return_status => lx_return_status);
616:
617: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
618: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
619: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
620: RAISE OKL_API.G_EXCEPTION_ERROR;
621: END IF;
614: p_arrears => 'Y',
615: x_return_status => lx_return_status);
616:
617: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
618: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
619: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
620: RAISE OKL_API.G_EXCEPTION_ERROR;
621: END IF;
622:
615: x_return_status => lx_return_status);
616:
617: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
618: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
619: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
620: RAISE OKL_API.G_EXCEPTION_ERROR;
621: END IF;
622:
623: l_selv_tbl(i).amount := okl_accounting_util.validate_amount(p_amount => l_days * l_daily_exp,
616:
617: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
618: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
619: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
620: RAISE OKL_API.G_EXCEPTION_ERROR;
621: END IF;
622:
623: l_selv_tbl(i).amount := okl_accounting_util.validate_amount(p_amount => l_days * l_daily_exp,
624: p_currency_code => p_currency_code);
640: p_selv_tbl => l_selv_tbl,
641: x_selv_tbl => lx_selv_tbl);
642:
643: IF (lx_return_status = G_RET_STS_UNEXP_ERROR) THEN
644: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
645: ELSIF (lx_return_status = G_RET_STS_ERROR) THEN
646: RAISE OKL_API.G_EXCEPTION_ERROR;
647: END IF;
648:
642:
643: IF (lx_return_status = G_RET_STS_UNEXP_ERROR) THEN
644: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
645: ELSIF (lx_return_status = G_RET_STS_ERROR) THEN
646: RAISE OKL_API.G_EXCEPTION_ERROR;
647: END IF;
648:
649: l_selv_tbl.DELETE;
650: l_selv_tbl := lx_selv_tbl;
658: p_selv_tbl => l_selv_tbl,
659: x_stmv_rec => lx_stmv_rec,
660: x_selv_tbl => lx_selv_tbl);
661:
662: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
663: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
664: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
665: RAISE OKL_API.G_EXCEPTION_ERROR;
666: END IF;
659: x_stmv_rec => lx_stmv_rec,
660: x_selv_tbl => lx_selv_tbl);
661:
662: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
663: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
664: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
665: RAISE OKL_API.G_EXCEPTION_ERROR;
666: END IF;
667:
660: x_selv_tbl => lx_selv_tbl);
661:
662: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
663: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
664: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
665: RAISE OKL_API.G_EXCEPTION_ERROR;
666: END IF;
667:
668: l_selv_tbl.DELETE;
661:
662: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
663: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
664: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
665: RAISE OKL_API.G_EXCEPTION_ERROR;
666: END IF;
667:
668: l_selv_tbl.DELETE;
669:
680: x_return_status := G_RET_STS_SUCCESS;
681:
682: EXCEPTION
683:
684: WHEN OKL_API.G_EXCEPTION_ERROR THEN
685:
686: x_return_status := G_RET_STS_ERROR;
687:
688: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
684: WHEN OKL_API.G_EXCEPTION_ERROR THEN
685:
686: x_return_status := G_RET_STS_ERROR;
687:
688: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
689:
690: x_return_status := G_RET_STS_UNEXP_ERROR;
691:
692: WHEN OTHERS THEN
690: x_return_status := G_RET_STS_UNEXP_ERROR;
691:
692: WHEN OTHERS THEN
693:
694: OKL_API.SET_MESSAGE (p_app_name => G_APP_NAME,
695: p_msg_name => G_DB_ERROR,
696: p_token1 => G_PROG_NAME_TOKEN,
697: p_token1_value => l_prog_name,
698: p_token2 => G_SQLCODE_TOKEN,
743: p_end_date => l_hdr.end_date,
744: p_deal_type => p_deal_type,
745: x_return_status => lx_return_status);
746:
747: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
748: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
749: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
750: RAISE OKL_API.G_EXCEPTION_ERROR;
751: END IF;
744: p_deal_type => p_deal_type,
745: x_return_status => lx_return_status);
746:
747: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
748: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
749: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
750: RAISE OKL_API.G_EXCEPTION_ERROR;
751: END IF;
752:
745: x_return_status => lx_return_status);
746:
747: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
748: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
749: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
750: RAISE OKL_API.G_EXCEPTION_ERROR;
751: END IF;
752:
753: generate_rec_exp(p_khr_id => p_khr_id,
746:
747: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
748: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
749: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
750: RAISE OKL_API.G_EXCEPTION_ERROR;
751: END IF;
752:
753: generate_rec_exp(p_khr_id => p_khr_id,
754: p_deal_type => p_deal_type,
755: p_purpose_code => p_purpose_code,
756: p_currency_code => l_hdr.currency_code,
757: x_return_status => lx_return_status);
758:
759: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
760: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
761: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
762: RAISE OKL_API.G_EXCEPTION_ERROR;
763: END IF;
756: p_currency_code => l_hdr.currency_code,
757: x_return_status => lx_return_status);
758:
759: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
760: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
761: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
762: RAISE OKL_API.G_EXCEPTION_ERROR;
763: END IF;
764:
757: x_return_status => lx_return_status);
758:
759: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
760: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
761: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
762: RAISE OKL_API.G_EXCEPTION_ERROR;
763: END IF;
764:
765: x_return_status := lx_return_status;
758:
759: IF lx_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
760: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
761: ELSIF lx_return_status = OKL_API.G_RET_STS_ERROR THEN
762: RAISE OKL_API.G_EXCEPTION_ERROR;
763: END IF;
764:
765: x_return_status := lx_return_status;
766:
765: x_return_status := lx_return_status;
766:
767: EXCEPTION
768:
769: WHEN OKL_API.G_EXCEPTION_ERROR THEN
770:
771: x_return_status := G_RET_STS_ERROR;
772:
773: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
769: WHEN OKL_API.G_EXCEPTION_ERROR THEN
770:
771: x_return_status := G_RET_STS_ERROR;
772:
773: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
774:
775: x_return_status := G_RET_STS_UNEXP_ERROR;
776:
777: WHEN OTHERS THEN
775: x_return_status := G_RET_STS_UNEXP_ERROR;
776:
777: WHEN OTHERS THEN
778:
779: OKL_API.SET_MESSAGE (p_app_name => G_APP_NAME,
780: p_msg_name => G_DB_ERROR,
781: p_token1 => G_PROG_NAME_TOKEN,
782: p_token1_value => l_prog_name,
783: p_token2 => G_SQLCODE_TOKEN,
784: p_token2_value => sqlcode,
785: p_token3 => G_SQLERRM_TOKEN,
786: p_token3_value => sqlerrm);
787:
788: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
789:
790: END generate_expense_streams;
791:
792: