33: -------------------------------------------------------------------------------------------------
34:
35: PROCEDURE process_label_holder(
36: p_api_version IN NUMBER,
37: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
38: x_return_status OUT NOCOPY VARCHAR2,
39: x_msg_count OUT NOCOPY NUMBER,
40: x_msg_data OUT NOCOPY VARCHAR2,
41: p_rgpv_rec IN party_role_rec_type,
522: OPEN c_party_name(x_party_role_rec.party_id);
523: FETCH c_party_name INTO x_party_role_rec.party_name;
524: CLOSE c_party_name;
525:
526: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
527:
528: EXCEPTION
529: WHEN OKC_API.G_EXCEPTION_ERROR THEN
530: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
525:
526: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
527:
528: EXCEPTION
529: WHEN OKC_API.G_EXCEPTION_ERROR THEN
530: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
531: p_api_name => l_api_name,
532: p_pkg_name => g_pkg_name,
533: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
526: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
527:
528: EXCEPTION
529: WHEN OKC_API.G_EXCEPTION_ERROR THEN
530: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
531: p_api_name => l_api_name,
532: p_pkg_name => g_pkg_name,
533: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
534: x_msg_count => x_msg_count,
529: WHEN OKC_API.G_EXCEPTION_ERROR THEN
530: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
531: p_api_name => l_api_name,
532: p_pkg_name => g_pkg_name,
533: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
534: x_msg_count => x_msg_count,
535: x_msg_data => x_msg_data,
536: p_api_type => g_api_type);
537:
534: x_msg_count => x_msg_count,
535: x_msg_data => x_msg_data,
536: p_api_type => g_api_type);
537:
538: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
539: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
540: p_api_name => l_api_name,
541: p_pkg_name => g_pkg_name,
542: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
535: x_msg_data => x_msg_data,
536: p_api_type => g_api_type);
537:
538: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
539: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
540: p_api_name => l_api_name,
541: p_pkg_name => g_pkg_name,
542: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
543: x_msg_count => x_msg_count,
538: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
539: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
540: p_api_name => l_api_name,
541: p_pkg_name => g_pkg_name,
542: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
543: x_msg_count => x_msg_count,
544: x_msg_data => x_msg_data,
545: p_api_type => g_api_type);
546:
544: x_msg_data => x_msg_data,
545: p_api_type => g_api_type);
546:
547: WHEN OTHERS THEN
548: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
549: p_api_name => l_api_name,
550: p_pkg_name => g_pkg_name,
551: p_exc_name => 'OTHERS',
552: x_msg_count => x_msg_count,
640: x_msg_data => x_msg_data,
641: p_rgpv_rec => lp_lagrdt_rgpv_rec,
642: x_rgpv_rec => lx_lagrdt_rgpv_rec);
643:
644: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
645: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
646: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
647: RAISE OKC_API.G_EXCEPTION_ERROR;
648: END IF;
641: p_rgpv_rec => lp_lagrdt_rgpv_rec,
642: x_rgpv_rec => lx_lagrdt_rgpv_rec);
643:
644: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
645: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
646: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
647: RAISE OKC_API.G_EXCEPTION_ERROR;
648: END IF;
649:
642: x_rgpv_rec => lx_lagrdt_rgpv_rec);
643:
644: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
645: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
646: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
647: RAISE OKC_API.G_EXCEPTION_ERROR;
648: END IF;
649:
650: x_rgpv_rec.rgp_id := lx_lagrdt_rgpv_rec.id;
643:
644: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
645: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
646: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
647: RAISE OKC_API.G_EXCEPTION_ERROR;
648: END IF;
649:
650: x_rgpv_rec.rgp_id := lx_lagrdt_rgpv_rec.id;
651:
666: x_msg_data => x_msg_data,
667: p_rgpv_rec => lp_lagrdt_rgpv_rec,
668: x_rgpv_rec => lx_lagrdt_rgpv_rec);
669:
670: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
671: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
672: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
673: RAISE OKC_API.G_EXCEPTION_ERROR;
674: END IF;
667: p_rgpv_rec => lp_lagrdt_rgpv_rec,
668: x_rgpv_rec => lx_lagrdt_rgpv_rec);
669:
670: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
671: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
672: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
673: RAISE OKC_API.G_EXCEPTION_ERROR;
674: END IF;
675:
668: x_rgpv_rec => lx_lagrdt_rgpv_rec);
669:
670: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
671: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
672: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
673: RAISE OKC_API.G_EXCEPTION_ERROR;
674: END IF;
675:
676: x_rgpv_rec.rgp_id := lx_lagrdt_rgpv_rec.id;
669:
670: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
671: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
672: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
673: RAISE OKC_API.G_EXCEPTION_ERROR;
674: END IF;
675:
676: x_rgpv_rec.rgp_id := lx_lagrdt_rgpv_rec.id;
677:
700: x_msg_data => x_msg_data,
701: p_rulv_rec => lp_lagrnp_rulv_rec,
702: x_rulv_rec => lx_lagrnp_rulv_rec);
703:
704: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
705: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
706: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
707: RAISE OKC_API.G_EXCEPTION_ERROR;
708: END IF;
701: p_rulv_rec => lp_lagrnp_rulv_rec,
702: x_rulv_rec => lx_lagrnp_rulv_rec);
703:
704: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
705: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
706: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
707: RAISE OKC_API.G_EXCEPTION_ERROR;
708: END IF;
709:
702: x_rulv_rec => lx_lagrnp_rulv_rec);
703:
704: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
705: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
706: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
707: RAISE OKC_API.G_EXCEPTION_ERROR;
708: END IF;
709:
710: x_rgpv_rec.rul_lagrnp_id := lx_lagrnp_rulv_rec.id;
703:
704: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
705: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
706: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
707: RAISE OKC_API.G_EXCEPTION_ERROR;
708: END IF;
709:
710: x_rgpv_rec.rul_lagrnp_id := lx_lagrnp_rulv_rec.id;
711:
733: x_msg_data => x_msg_data,
734: p_rulv_rec => lp_lagrnp_rulv_rec,
735: x_rulv_rec => lx_lagrnp_rulv_rec);
736:
737: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
738: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
739: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
740: RAISE OKC_API.G_EXCEPTION_ERROR;
741: END IF;
734: p_rulv_rec => lp_lagrnp_rulv_rec,
735: x_rulv_rec => lx_lagrnp_rulv_rec);
736:
737: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
738: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
739: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
740: RAISE OKC_API.G_EXCEPTION_ERROR;
741: END IF;
742:
735: x_rulv_rec => lx_lagrnp_rulv_rec);
736:
737: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
738: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
739: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
740: RAISE OKC_API.G_EXCEPTION_ERROR;
741: END IF;
742:
743: x_rgpv_rec.rul_lagrnp_id := lx_lagrnp_rulv_rec.id;
736:
737: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
738: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
739: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
740: RAISE OKC_API.G_EXCEPTION_ERROR;
741: END IF;
742:
743: x_rgpv_rec.rul_lagrnp_id := lx_lagrnp_rulv_rec.id;
744:
766: x_msg_data => x_msg_data,
767: p_rulv_rec => lp_lagrnt_rulv_rec,
768: x_rulv_rec => lx_lagrnt_rulv_rec);
769:
770: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
771: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
772: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
773: RAISE OKC_API.G_EXCEPTION_ERROR;
774: END IF;
767: p_rulv_rec => lp_lagrnt_rulv_rec,
768: x_rulv_rec => lx_lagrnt_rulv_rec);
769:
770: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
771: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
772: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
773: RAISE OKC_API.G_EXCEPTION_ERROR;
774: END IF;
775:
768: x_rulv_rec => lx_lagrnt_rulv_rec);
769:
770: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
771: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
772: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
773: RAISE OKC_API.G_EXCEPTION_ERROR;
774: END IF;
775:
776: x_rgpv_rec.rul_lagrnt_id := lx_lagrnt_rulv_rec.id;
769:
770: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
771: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
772: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
773: RAISE OKC_API.G_EXCEPTION_ERROR;
774: END IF;
775:
776: x_rgpv_rec.rul_lagrnt_id := lx_lagrnt_rulv_rec.id;
777:
797: x_msg_data => x_msg_data,
798: p_rulv_rec => lp_lagrnt_rulv_rec,
799: x_rulv_rec => lx_lagrnt_rulv_rec);
800:
801: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
802: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
803: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
804: RAISE OKC_API.G_EXCEPTION_ERROR;
805: END IF;
798: p_rulv_rec => lp_lagrnt_rulv_rec,
799: x_rulv_rec => lx_lagrnt_rulv_rec);
800:
801: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
802: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
803: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
804: RAISE OKC_API.G_EXCEPTION_ERROR;
805: END IF;
806:
799: x_rulv_rec => lx_lagrnt_rulv_rec);
800:
801: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
802: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
803: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
804: RAISE OKC_API.G_EXCEPTION_ERROR;
805: END IF;
806:
807: x_rgpv_rec.rul_lagrnt_id := lx_lagrnt_rulv_rec.id;
800:
801: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
802: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
803: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
804: RAISE OKC_API.G_EXCEPTION_ERROR;
805: END IF;
806:
807: x_rgpv_rec.rul_lagrnt_id := lx_lagrnt_rulv_rec.id;
808: END IF;
897:
898: END IF;
899:
900:
901: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
902:
903: EXCEPTION
904: WHEN OKC_API.G_EXCEPTION_ERROR THEN
905: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
900:
901: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
902:
903: EXCEPTION
904: WHEN OKC_API.G_EXCEPTION_ERROR THEN
905: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
906: p_api_name => l_api_name,
907: p_pkg_name => g_pkg_name,
908: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
901: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
902:
903: EXCEPTION
904: WHEN OKC_API.G_EXCEPTION_ERROR THEN
905: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
906: p_api_name => l_api_name,
907: p_pkg_name => g_pkg_name,
908: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
909: x_msg_count => x_msg_count,
904: WHEN OKC_API.G_EXCEPTION_ERROR THEN
905: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
906: p_api_name => l_api_name,
907: p_pkg_name => g_pkg_name,
908: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
909: x_msg_count => x_msg_count,
910: x_msg_data => x_msg_data,
911: p_api_type => g_api_type);
912:
909: x_msg_count => x_msg_count,
910: x_msg_data => x_msg_data,
911: p_api_type => g_api_type);
912:
913: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
914: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
915: p_api_name => l_api_name,
916: p_pkg_name => g_pkg_name,
917: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
910: x_msg_data => x_msg_data,
911: p_api_type => g_api_type);
912:
913: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
914: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
915: p_api_name => l_api_name,
916: p_pkg_name => g_pkg_name,
917: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
918: x_msg_count => x_msg_count,
913: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
914: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
915: p_api_name => l_api_name,
916: p_pkg_name => g_pkg_name,
917: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
918: x_msg_count => x_msg_count,
919: x_msg_data => x_msg_data,
920: p_api_type => g_api_type);
921:
919: x_msg_data => x_msg_data,
920: p_api_type => g_api_type);
921:
922: WHEN OTHERS THEN
923: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
924: p_api_name => l_api_name,
925: p_pkg_name => g_pkg_name,
926: p_exc_name => 'OTHERS',
927: x_msg_count => x_msg_count,