105: END IF;
106: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
107: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,l_proc_name);
108: END IF;
109: x_return_status := OKC_API.G_RET_STS_SUCCESS;
110:
111: OPEN rebook_csr(p_rebook_reason_code);
112: FETCH rebook_csr INTO l_dummy;
113: IF rebook_csr%NOTFOUND THEN
124: G_INVALID_VALUE,
125: 'COL_NAME',
126: 'REBOOK REASON'
127: );
128: x_return_status := OKC_API.G_RET_STS_ERROR;
129:
130: END validate_rebook_reason;
131:
132: ------------------------------------------------------------------------------
180: END IF;
181: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
182: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,l_proc_name);
183: END IF;
184: x_return_status := OKC_API.G_RET_STS_SUCCESS;
185:
186: OPEN con_header_csr(p_chr_id);
187: FETCH con_header_csr INTO l_currency_code,
188: l_org_id;
267: IF con_header_csr%ISOPEN THEN
268: CLOSE con_header_csr;
269: END IF;
270:
271: x_return_status := OKC_API.G_RET_STS_ERROR;
272:
273: WHEN OTHERS THEN
274: okl_api.set_message(
275: G_APP_NAME,
278: SQLCODE,
279: 'OKL_SQLERRM',
280: SQLERRM || ': '||G_PKG_NAME||'.'||l_proc_name
281: );
282: x_return_status := OKC_API.G_RET_STS_ERROR;
283:
284: END populate_transaction_rec;
285:
286: ------------------------------------------------------------------------------
320: IF (G_DEBUG_ENABLED = 'Y') THEN
321: G_IS_DEBUG_STATEMENT_ON := OKL_DEBUG_PUB.CHECK_LOG_ON(G_MODULE, FND_LOG.LEVEL_STATEMENT);
322: END IF;
323:
324: x_return_status := OKC_API.G_RET_STS_SUCCESS;
325: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
326: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,l_proc_name);
327: END IF;
328: -- call START_ACTIVITY to create savepoint, check compatibility
326: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,l_proc_name);
327: END IF;
328: -- call START_ACTIVITY to create savepoint, check compatibility
329: -- and initialize message list
330: x_return_status := OKC_API.START_ACTIVITY(
331: p_api_name => l_api_name,
332: p_pkg_name => G_PKG_NAME,
333: p_init_msg_list => p_init_msg_list,
334: l_api_version => l_api_version,
336: p_api_type => G_API_TYPE,
337: x_return_status => x_return_status);
338:
339: -- check if activity started successfully
340: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
341: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
342: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
343: RAISE OKC_API.G_EXCEPTION_ERROR;
344: END IF;
337: x_return_status => x_return_status);
338:
339: -- check if activity started successfully
340: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
341: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
342: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
343: RAISE OKC_API.G_EXCEPTION_ERROR;
344: END IF;
345:
338:
339: -- check if activity started successfully
340: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
341: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
342: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
343: RAISE OKC_API.G_EXCEPTION_ERROR;
344: END IF;
345:
346: FOR trx_rec IN trx_csr(p_chr_id)
339: -- check if activity started successfully
340: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
341: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
342: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
343: RAISE OKC_API.G_EXCEPTION_ERROR;
344: END IF;
345:
346: FOR trx_rec IN trx_csr(p_chr_id)
347: LOOP
358: p_tcnv_rec => l_tcnv_rec,
359: x_tcnv_rec => x_tcnv_rec
360: );
361:
362: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
363: RAISE Okc_Api.G_EXCEPTION_ERROR;
364: END IF;
365:
366: --++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
359: x_tcnv_rec => x_tcnv_rec
360: );
361:
362: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
363: RAISE Okc_Api.G_EXCEPTION_ERROR;
364: END IF;
365:
366: --++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
367: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
367: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
368: x_msg_data => x_msg_data);
369:
370: EXCEPTION
371: WHEN OKC_API.G_EXCEPTION_ERROR THEN
372: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
373: p_api_name => l_api_name,
374: p_pkg_name => G_PKG_NAME,
375: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
368: x_msg_data => x_msg_data);
369:
370: EXCEPTION
371: WHEN OKC_API.G_EXCEPTION_ERROR THEN
372: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
373: p_api_name => l_api_name,
374: p_pkg_name => G_PKG_NAME,
375: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
376: x_msg_count => x_msg_count,
371: WHEN OKC_API.G_EXCEPTION_ERROR THEN
372: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
373: p_api_name => l_api_name,
374: p_pkg_name => G_PKG_NAME,
375: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
376: x_msg_count => x_msg_count,
377: x_msg_data => x_msg_data,
378: p_api_type => G_API_TYPE);
379:
376: x_msg_count => x_msg_count,
377: x_msg_data => x_msg_data,
378: p_api_type => G_API_TYPE);
379:
380: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
381: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
382: p_api_name => l_api_name,
383: p_pkg_name => G_PKG_NAME,
384: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
377: x_msg_data => x_msg_data,
378: p_api_type => G_API_TYPE);
379:
380: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
381: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
382: p_api_name => l_api_name,
383: p_pkg_name => G_PKG_NAME,
384: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
385: x_msg_count => x_msg_count,
380: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
381: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
382: p_api_name => l_api_name,
383: p_pkg_name => G_PKG_NAME,
384: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
385: x_msg_count => x_msg_count,
386: x_msg_data => x_msg_data,
387: p_api_type => G_API_TYPE);
388:
386: x_msg_data => x_msg_data,
387: p_api_type => G_API_TYPE);
388:
389: WHEN OTHERS THEN
390: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
391: p_api_name => l_api_name,
392: p_pkg_name => G_PKG_NAME,
393: p_exc_name => 'OTHERS',
394: x_msg_count => x_msg_count,
433: END IF;
434:
435: okl_securitization_pvt.check_khr_securitized(
436: p_api_version => 1.0,
437: p_init_msg_list => OKC_API.G_FALSE,
438: x_return_status => x_return_status,
439: x_msg_count => x_msg_count,
440: x_msg_data => x_msg_data,
441: p_khr_id => p_chr_id,
457: RETURN;
458:
459: EXCEPTION
460: WHEN OTHERS THEN
461: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
462: p_api_name => l_api_name,
463: p_pkg_name => G_PKG_NAME,
464: p_exc_name => 'OTHERS',
465: x_msg_count => x_msg_count,
534: RETURN;
535:
536: EXCEPTION
537: WHEN OTHERS THEN
538: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
539: p_api_name => l_api_name,
540: p_pkg_name => G_PKG_NAME,
541: p_exc_name => 'OTHERS',
542: x_msg_count => x_msg_count,
656:
657:
658: BEGIN -- main process begins here
659:
660: x_return_status := OKC_API.G_RET_STS_SUCCESS;
661: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
662: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,l_proc_name);
663: END IF;
664: -- call START_ACTIVITY to create savepoint, check compatibility
662: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,l_proc_name);
663: END IF;
664: -- call START_ACTIVITY to create savepoint, check compatibility
665: -- and initialize message list
666: x_return_status := OKC_API.START_ACTIVITY(
667: p_api_name => l_api_name,
668: p_pkg_name => G_PKG_NAME,
669: p_init_msg_list => p_init_msg_list,
670: l_api_version => l_api_version,
672: p_api_type => G_API_TYPE,
673: x_return_status => x_return_status);
674:
675: -- check if activity started successfully
676: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
677: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
678: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
679: RAISE OKC_API.G_EXCEPTION_ERROR;
680: END IF;
673: x_return_status => x_return_status);
674:
675: -- check if activity started successfully
676: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
677: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
678: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
679: RAISE OKC_API.G_EXCEPTION_ERROR;
680: END IF;
681:
674:
675: -- check if activity started successfully
676: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
677: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
678: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
679: RAISE OKC_API.G_EXCEPTION_ERROR;
680: END IF;
681:
682: IF (p_trx_type NOT IN ('REBOOK','SPLIT')) THEN
675: -- check if activity started successfully
676: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
677: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
678: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
679: RAISE OKC_API.G_EXCEPTION_ERROR;
680: END IF;
681:
682: IF (p_trx_type NOT IN ('REBOOK','SPLIT')) THEN
683: okl_api.set_message(
685: G_LLA_INVALID_TRX_TYPE,
686: 'TRX_TYPE',
687: p_trx_type
688: );
689: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
690: END IF;
691:
692: IF (p_trx_type = 'SPLIT') THEN
693: --
703: p_trx_date => p_trx_date
704: );
705:
706: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
707: RAISE OKC_API.G_EXCEPTION_ERROR;
708: END IF;
709: END IF;
710:
711: IF (p_trx_type = 'REBOOK') THEN
728: 'CONTRACT_NUMBER',
729: l_contract_number
730: );
731:
732: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
733: END IF;
734: --akrangan end
735: validate_rebook_reason(
736: x_return_status => x_return_status,
738: x_msg_data => x_msg_data,
739: p_rebook_reason_code => p_reason_code
740: );
741:
742: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
743: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
744: END IF;
745: END IF;
746:
739: p_rebook_reason_code => p_reason_code
740: );
741:
742: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
743: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
744: END IF;
745: END IF;
746:
747: --
751: okl_api.set_message(
752: G_APP_NAME,
753: G_LLA_MISSING_TRX_DATE
754: );
755: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
756: END IF;
757:
758: --
759: -- Transaction date should be within contract effectivity
780: l_con_start_date,
781: 'END_DATE',
782: l_con_end_date
783: );
784: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
785: END IF;
786:
787: /* Bug 4766555 : Code commented here and moved to
788: -- smadhava Bug# 4542290 - 24-Aug-2005 - Added - Start
795: , x_msg_count => x_msg_count
796: , x_msg_data => x_msg_data
797: , p_chr_id => p_chr_id
798: , p_rebook_date => p_trx_date);
799: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
800: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
801: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
802: RAISE OKC_API.G_EXCEPTION_ERROR;
803: END IF;
796: , x_msg_data => x_msg_data
797: , p_chr_id => p_chr_id
798: , p_rebook_date => p_trx_date);
799: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
800: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
801: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
802: RAISE OKC_API.G_EXCEPTION_ERROR;
803: END IF;
804: END IF; -- end of check for rebook transaction
797: , p_chr_id => p_chr_id
798: , p_rebook_date => p_trx_date);
799: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
800: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
801: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
802: RAISE OKC_API.G_EXCEPTION_ERROR;
803: END IF;
804: END IF; -- end of check for rebook transaction
805: -- smadhava Bug# 4542290 - 24-Aug-2005 - Added - End
798: , p_rebook_date => p_trx_date);
799: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
800: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
801: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
802: RAISE OKC_API.G_EXCEPTION_ERROR;
803: END IF;
804: END IF; -- end of check for rebook transaction
805: -- smadhava Bug# 4542290 - 24-Aug-2005 - Added - End
806: */
817: p_trx_type => p_trx_type,
818: x_tcnv_rec => l_tcnv_rec
819: );
820:
821: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
822: RAISE OKC_API.G_EXCEPTION_ERROR;
823: END IF;
824:
825: -- Create Transaction Header only
818: x_tcnv_rec => l_tcnv_rec
819: );
820:
821: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
822: RAISE OKC_API.G_EXCEPTION_ERROR;
823: END IF;
824:
825: -- Create Transaction Header only
826: okl_trx_contracts_pub.create_trx_contracts(
832: p_tcnv_rec => l_tcnv_rec,
833: x_tcnv_rec => l_out_tcnv_rec
834: );
835:
836: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
837: RAISE OKC_API.G_EXCEPTION_ERROR;
838: END IF;
839:
840: -- smadhava Bug# 4542290 - 24-Aug-2005 - Added - Start
833: x_tcnv_rec => l_out_tcnv_rec
834: );
835:
836: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
837: RAISE OKC_API.G_EXCEPTION_ERROR;
838: END IF;
839:
840: -- smadhava Bug# 4542290 - 24-Aug-2005 - Added - Start
841: -- apaul 4766555. Code moved here.
848: , x_msg_count => x_msg_count
849: , x_msg_data => x_msg_data
850: , p_chr_id => p_chr_id
851: , p_rebook_date => p_trx_date);
852: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
853: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
854: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
855: RAISE OKC_API.G_EXCEPTION_ERROR;
856: END IF;
849: , x_msg_data => x_msg_data
850: , p_chr_id => p_chr_id
851: , p_rebook_date => p_trx_date);
852: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
853: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
854: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
855: RAISE OKC_API.G_EXCEPTION_ERROR;
856: END IF;
857: END IF; -- end of check for rebook transaction
850: , p_chr_id => p_chr_id
851: , p_rebook_date => p_trx_date);
852: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
853: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
854: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
855: RAISE OKC_API.G_EXCEPTION_ERROR;
856: END IF;
857: END IF; -- end of check for rebook transaction
858: -- smadhava Bug# 4542290 - 24-Aug-2005 - Added - End
851: , p_rebook_date => p_trx_date);
852: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
853: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
854: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
855: RAISE OKC_API.G_EXCEPTION_ERROR;
856: END IF;
857: END IF; -- end of check for rebook transaction
858: -- smadhava Bug# 4542290 - 24-Aug-2005 - Added - End
859:
879: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
880: x_msg_data => x_msg_data);
881:
882: EXCEPTION
883: WHEN OKC_API.G_EXCEPTION_ERROR THEN
884: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
885: p_api_name => l_api_name,
886: p_pkg_name => G_PKG_NAME,
887: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
880: x_msg_data => x_msg_data);
881:
882: EXCEPTION
883: WHEN OKC_API.G_EXCEPTION_ERROR THEN
884: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
885: p_api_name => l_api_name,
886: p_pkg_name => G_PKG_NAME,
887: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
888: x_msg_count => x_msg_count,
883: WHEN OKC_API.G_EXCEPTION_ERROR THEN
884: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
885: p_api_name => l_api_name,
886: p_pkg_name => G_PKG_NAME,
887: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
888: x_msg_count => x_msg_count,
889: x_msg_data => x_msg_data,
890: p_api_type => G_API_TYPE);
891:
888: x_msg_count => x_msg_count,
889: x_msg_data => x_msg_data,
890: p_api_type => G_API_TYPE);
891:
892: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
893: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
894: p_api_name => l_api_name,
895: p_pkg_name => G_PKG_NAME,
896: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
889: x_msg_data => x_msg_data,
890: p_api_type => G_API_TYPE);
891:
892: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
893: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
894: p_api_name => l_api_name,
895: p_pkg_name => G_PKG_NAME,
896: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
897: x_msg_count => x_msg_count,
892: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
893: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
894: p_api_name => l_api_name,
895: p_pkg_name => G_PKG_NAME,
896: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
897: x_msg_count => x_msg_count,
898: x_msg_data => x_msg_data,
899: p_api_type => G_API_TYPE);
900:
898: x_msg_data => x_msg_data,
899: p_api_type => G_API_TYPE);
900:
901: WHEN OTHERS THEN
902: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
903: p_api_name => l_api_name,
904: p_pkg_name => G_PKG_NAME,
905: p_exc_name => 'OTHERS',
906: x_msg_count => x_msg_count,
959: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
960: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'BEFORE call ....');
961: END IF;
962:
963: x_return_status := OKC_API.G_RET_STS_SUCCESS;
964: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
965: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,l_proc_name);
966: END IF;
967: -- call START_ACTIVITY to create savepoint, check compatibility
965: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,l_proc_name);
966: END IF;
967: -- call START_ACTIVITY to create savepoint, check compatibility
968: -- and initialize message list
969: x_return_status := OKC_API.START_ACTIVITY(
970: p_api_name => l_api_name,
971: p_pkg_name => G_PKG_NAME,
972: p_init_msg_list => p_init_msg_list,
973: l_api_version => l_api_version,
975: p_api_type => G_API_TYPE,
976: x_return_status => x_return_status);
977:
978: -- check if activity started successfully
979: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
980: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
981: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
982: RAISE OKC_API.G_EXCEPTION_ERROR;
983: END IF;
976: x_return_status => x_return_status);
977:
978: -- check if activity started successfully
979: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
980: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
981: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
982: RAISE OKC_API.G_EXCEPTION_ERROR;
983: END IF;
984:
977:
978: -- check if activity started successfully
979: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
980: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
981: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
982: RAISE OKC_API.G_EXCEPTION_ERROR;
983: END IF;
984:
985: LOOP
978: -- check if activity started successfully
979: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
980: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
981: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
982: RAISE OKC_API.G_EXCEPTION_ERROR;
983: END IF;
984:
985: LOOP
986: i := i + 1;
1002: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1003: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'AFTER Trx UPDATE status: '|| x_return_status);
1004: END IF;
1005:
1006: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1007: RAISE OKC_API.G_EXCEPTION_ERROR;
1008: END IF;
1009:
1010: --akrangan ebtax rebook impacts starts
1003: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'AFTER Trx UPDATE status: '|| x_return_status);
1004: END IF;
1005:
1006: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1007: RAISE OKC_API.G_EXCEPTION_ERROR;
1008: END IF;
1009:
1010: --akrangan ebtax rebook impacts starts
1011: IF ( p_source_trx_id IS NULL ) AND ( p_source_trx_name IS NULL ) THEN
1034: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1035: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'AFTER Cancel Pre-Rebook transaction status: '|| x_return_status);
1036: END IF;
1037:
1038: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
1039: RAISE Okc_Api.G_EXCEPTION_ERROR;
1040: END IF;
1041: END IF;
1042: ELSE
1035: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'AFTER Cancel Pre-Rebook transaction status: '|| x_return_status);
1036: END IF;
1037:
1038: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
1039: RAISE Okc_Api.G_EXCEPTION_ERROR;
1040: END IF;
1041: END IF;
1042: ELSE
1043: l_source_trx_id := NULL;
1060: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1061: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'AFTER Canel Document Tax status: '|| x_return_status);
1062: END IF;
1063:
1064: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1065: RAISE OKC_API.G_EXCEPTION_ERROR;
1066: END IF;
1067: END IF;
1068: --akrangan ebtax rebook impacts ends
1061: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'AFTER Canel Document Tax status: '|| x_return_status);
1062: END IF;
1063:
1064: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1065: RAISE OKC_API.G_EXCEPTION_ERROR;
1066: END IF;
1067: END IF;
1068: --akrangan ebtax rebook impacts ends
1069:
1080: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1081: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'AFTER Contract Header UPDATE status: '|| x_return_status);
1082: END IF;
1083:
1084: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1085: RAISE OKC_API.G_EXCEPTION_ERROR;
1086: END IF;
1087:
1088: okl_contract_status_pub.cascade_lease_status(
1081: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'AFTER Contract Header UPDATE status: '|| x_return_status);
1082: END IF;
1083:
1084: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1085: RAISE OKC_API.G_EXCEPTION_ERROR;
1086: END IF;
1087:
1088: okl_contract_status_pub.cascade_lease_status(
1089: p_api_version => l_api_version,
1096: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1097: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'AFTER Contract Line UPDATE status: '|| x_return_status);
1098: END IF;
1099:
1100: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1101: RAISE OKC_API.G_EXCEPTION_ERROR;
1102: END IF;
1103:
1104:
1097: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'AFTER Contract Line UPDATE status: '|| x_return_status);
1098: END IF;
1099:
1100: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1101: RAISE OKC_API.G_EXCEPTION_ERROR;
1102: END IF;
1103:
1104:
1105: EXIT WHEN (i >= l_rev_tbl.last);
1109: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
1110: x_msg_data => x_msg_data);
1111:
1112: EXCEPTION
1113: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1114: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1115: p_api_name => l_api_name,
1116: p_pkg_name => G_PKG_NAME,
1117: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1110: x_msg_data => x_msg_data);
1111:
1112: EXCEPTION
1113: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1114: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1115: p_api_name => l_api_name,
1116: p_pkg_name => G_PKG_NAME,
1117: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1118: x_msg_count => x_msg_count,
1113: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1114: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1115: p_api_name => l_api_name,
1116: p_pkg_name => G_PKG_NAME,
1117: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1118: x_msg_count => x_msg_count,
1119: x_msg_data => x_msg_data,
1120: p_api_type => G_API_TYPE);
1121:
1118: x_msg_count => x_msg_count,
1119: x_msg_data => x_msg_data,
1120: p_api_type => G_API_TYPE);
1121:
1122: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1123: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1124: p_api_name => l_api_name,
1125: p_pkg_name => G_PKG_NAME,
1126: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1119: x_msg_data => x_msg_data,
1120: p_api_type => G_API_TYPE);
1121:
1122: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1123: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1124: p_api_name => l_api_name,
1125: p_pkg_name => G_PKG_NAME,
1126: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1127: x_msg_count => x_msg_count,
1122: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1123: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1124: p_api_name => l_api_name,
1125: p_pkg_name => G_PKG_NAME,
1126: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1127: x_msg_count => x_msg_count,
1128: x_msg_data => x_msg_data,
1129: p_api_type => G_API_TYPE);
1130:
1128: x_msg_data => x_msg_data,
1129: p_api_type => G_API_TYPE);
1130:
1131: WHEN OTHERS THEN
1132: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1133: p_api_name => l_api_name,
1134: p_pkg_name => G_PKG_NAME,
1135: p_exc_name => 'OTHERS',
1136: x_msg_count => x_msg_count,
1190: IF (G_DEBUG_ENABLED = 'Y') THEN
1191: G_IS_DEBUG_STATEMENT_ON := OKL_DEBUG_PUB.CHECK_LOG_ON(G_MODULE, FND_LOG.LEVEL_STATEMENT);
1192: END IF;
1193:
1194: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1195: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1196: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,l_proc_name);
1197: END IF;
1198: -- call START_ACTIVITY to create savepoint, check compatibility
1196: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,l_proc_name);
1197: END IF;
1198: -- call START_ACTIVITY to create savepoint, check compatibility
1199: -- and initialize message list
1200: x_return_status := OKC_API.START_ACTIVITY(
1201: p_api_name => l_api_name,
1202: p_pkg_name => G_PKG_NAME,
1203: p_init_msg_list => p_init_msg_list,
1204: l_api_version => l_api_version,
1206: p_api_type => G_API_TYPE,
1207: x_return_status => x_return_status);
1208:
1209: -- check if activity started successfully
1210: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1211: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1212: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1213: RAISE OKC_API.G_EXCEPTION_ERROR;
1214: END IF;
1207: x_return_status => x_return_status);
1208:
1209: -- check if activity started successfully
1210: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1211: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1212: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1213: RAISE OKC_API.G_EXCEPTION_ERROR;
1214: END IF;
1215:
1208:
1209: -- check if activity started successfully
1210: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1211: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1212: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1213: RAISE OKC_API.G_EXCEPTION_ERROR;
1214: END IF;
1215:
1216: l_tcnv_rec := NULL;
1209: -- check if activity started successfully
1210: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1211: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1212: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1213: RAISE OKC_API.G_EXCEPTION_ERROR;
1214: END IF;
1215:
1216: l_tcnv_rec := NULL;
1217: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1224: okl_api.set_message(
1225: G_APP_NAME,
1226: G_LLA_MISSING_TRX_DATE
1227: );
1228: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1229: END IF;
1230:
1231: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1232: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Afer DATE CHECK');
1292: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1293: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'AFTER calling okl_trx_contracts_pub.create_trx_contracts');
1294: END IF;
1295:
1296: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1297: RAISE OKC_API.G_EXCEPTION_ERROR;
1298: END IF;
1299:
1300: x_tcnv_rec := l_out_tcnv_rec;
1293: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'AFTER calling okl_trx_contracts_pub.create_trx_contracts');
1294: END IF;
1295:
1296: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1297: RAISE OKC_API.G_EXCEPTION_ERROR;
1298: END IF;
1299:
1300: x_tcnv_rec := l_out_tcnv_rec;
1301:
1314: CLOSE try_csr;
1315: END IF;
1316: x_return_status := OKL_API.G_RET_STS_ERROR;
1317:
1318: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1319: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1320: p_api_name => l_api_name,
1321: p_pkg_name => G_PKG_NAME,
1322: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1315: END IF;
1316: x_return_status := OKL_API.G_RET_STS_ERROR;
1317:
1318: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1319: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1320: p_api_name => l_api_name,
1321: p_pkg_name => G_PKG_NAME,
1322: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1323: x_msg_count => x_msg_count,
1318: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1319: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1320: p_api_name => l_api_name,
1321: p_pkg_name => G_PKG_NAME,
1322: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1323: x_msg_count => x_msg_count,
1324: x_msg_data => x_msg_data,
1325: p_api_type => G_API_TYPE);
1326:
1323: x_msg_count => x_msg_count,
1324: x_msg_data => x_msg_data,
1325: p_api_type => G_API_TYPE);
1326:
1327: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1328: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1329: p_api_name => l_api_name,
1330: p_pkg_name => G_PKG_NAME,
1331: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1324: x_msg_data => x_msg_data,
1325: p_api_type => G_API_TYPE);
1326:
1327: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1328: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1329: p_api_name => l_api_name,
1330: p_pkg_name => G_PKG_NAME,
1331: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1332: x_msg_count => x_msg_count,
1327: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1328: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1329: p_api_name => l_api_name,
1330: p_pkg_name => G_PKG_NAME,
1331: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1332: x_msg_count => x_msg_count,
1333: x_msg_data => x_msg_data,
1334: p_api_type => G_API_TYPE);
1335:
1333: x_msg_data => x_msg_data,
1334: p_api_type => G_API_TYPE);
1335:
1336: WHEN OTHERS THEN
1337: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1338: p_api_name => l_api_name,
1339: p_pkg_name => G_PKG_NAME,
1340: p_exc_name => 'OTHERS',
1341: x_msg_count => x_msg_count,
1395: IF (G_DEBUG_ENABLED = 'Y') THEN
1396: G_IS_DEBUG_STATEMENT_ON := OKL_DEBUG_PUB.CHECK_LOG_ON(G_MODULE, FND_LOG.LEVEL_STATEMENT);
1397: END IF;
1398:
1399: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1400: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1401: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,l_proc_name);
1402: END IF;
1403: -- call START_ACTIVITY to create savepoint, check compatibility
1401: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,l_proc_name);
1402: END IF;
1403: -- call START_ACTIVITY to create savepoint, check compatibility
1404: -- and initialize message list
1405: x_return_status := OKC_API.START_ACTIVITY(
1406: p_api_name => l_api_name,
1407: p_pkg_name => G_PKG_NAME,
1408: p_init_msg_list => p_init_msg_list,
1409: l_api_version => l_api_version,
1411: p_api_type => G_API_TYPE,
1412: x_return_status => x_return_status);
1413:
1414: -- check if activity started successfully
1415: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1416: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1417: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1418: RAISE OKC_API.G_EXCEPTION_ERROR;
1419: END IF;
1412: x_return_status => x_return_status);
1413:
1414: -- check if activity started successfully
1415: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1416: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1417: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1418: RAISE OKC_API.G_EXCEPTION_ERROR;
1419: END IF;
1420:
1413:
1414: -- check if activity started successfully
1415: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1416: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1417: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1418: RAISE OKC_API.G_EXCEPTION_ERROR;
1419: END IF;
1420:
1421: l_tcnv_rec := NULL;
1414: -- check if activity started successfully
1415: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1416: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1417: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1418: RAISE OKC_API.G_EXCEPTION_ERROR;
1419: END IF;
1420:
1421: l_tcnv_rec := NULL;
1422: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1429: okl_api.set_message(
1430: G_APP_NAME,
1431: G_LLA_MISSING_TRX_DATE
1432: );
1433: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1434: END IF;
1435:
1436: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1437: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Afer DATE CHECK');
1498: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
1499: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'AFTER calling okl_trx_contracts_pub.create_trx_contracts');
1500: END IF;
1501:
1502: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1503: RAISE OKC_API.G_EXCEPTION_ERROR;
1504: END IF;
1505:
1506: x_tcnv_rec := l_out_tcnv_rec;
1499: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'AFTER calling okl_trx_contracts_pub.create_trx_contracts');
1500: END IF;
1501:
1502: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1503: RAISE OKC_API.G_EXCEPTION_ERROR;
1504: END IF;
1505:
1506: x_tcnv_rec := l_out_tcnv_rec;
1507:
1520: CLOSE try_csr;
1521: END IF;
1522: x_return_status := OKL_API.G_RET_STS_ERROR;
1523:
1524: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1525: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1526: p_api_name => l_api_name,
1527: p_pkg_name => G_PKG_NAME,
1528: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1521: END IF;
1522: x_return_status := OKL_API.G_RET_STS_ERROR;
1523:
1524: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1525: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1526: p_api_name => l_api_name,
1527: p_pkg_name => G_PKG_NAME,
1528: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1529: x_msg_count => x_msg_count,
1524: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1525: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1526: p_api_name => l_api_name,
1527: p_pkg_name => G_PKG_NAME,
1528: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1529: x_msg_count => x_msg_count,
1530: x_msg_data => x_msg_data,
1531: p_api_type => G_API_TYPE);
1532:
1529: x_msg_count => x_msg_count,
1530: x_msg_data => x_msg_data,
1531: p_api_type => G_API_TYPE);
1532:
1533: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1534: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1535: p_api_name => l_api_name,
1536: p_pkg_name => G_PKG_NAME,
1537: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1530: x_msg_data => x_msg_data,
1531: p_api_type => G_API_TYPE);
1532:
1533: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1534: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1535: p_api_name => l_api_name,
1536: p_pkg_name => G_PKG_NAME,
1537: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1538: x_msg_count => x_msg_count,
1533: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1534: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1535: p_api_name => l_api_name,
1536: p_pkg_name => G_PKG_NAME,
1537: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1538: x_msg_count => x_msg_count,
1539: x_msg_data => x_msg_data,
1540: p_api_type => G_API_TYPE);
1541:
1539: x_msg_data => x_msg_data,
1540: p_api_type => G_API_TYPE);
1541:
1542: WHEN OTHERS THEN
1543: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1544: p_api_name => l_api_name,
1545: p_pkg_name => G_PKG_NAME,
1546: p_exc_name => 'OTHERS',
1547: x_msg_count => x_msg_count,