DBA Data[Home] [Help]

APPS.OKL_AM_VENDOR_RES_SHARE_PVT dependencies on OKL_API

Line 84: G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;

80: -- *********************
81: -- GLOBAL VARIABLES
82: -- *********************
83: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_AM_VENDOR_RES_SHARE_PVT';
84: G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
85: G_APP_NAME_1 CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
86: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_UNEXP_ERROR;
87: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_ERROR;
88: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

Line 86: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_UNEXP_ERROR;

82: -- *********************
83: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_AM_VENDOR_RES_SHARE_PVT';
84: G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
85: G_APP_NAME_1 CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
86: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_UNEXP_ERROR;
87: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_ERROR;
88: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
89: G_API_VERSION CONSTANT NUMBER := 1;
90: G_MISS_CHAR CONSTANT VARCHAR2(1) := OKL_API.G_MISS_CHAR;

Line 87: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_ERROR;

83: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_AM_VENDOR_RES_SHARE_PVT';
84: G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
85: G_APP_NAME_1 CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
86: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_UNEXP_ERROR;
87: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_ERROR;
88: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
89: G_API_VERSION CONSTANT NUMBER := 1;
90: G_MISS_CHAR CONSTANT VARCHAR2(1) := OKL_API.G_MISS_CHAR;
91: G_MISS_NUM CONSTANT NUMBER := OKL_API.G_MISS_NUM;

Line 88: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

84: G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
85: G_APP_NAME_1 CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
86: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_UNEXP_ERROR;
87: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_ERROR;
88: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
89: G_API_VERSION CONSTANT NUMBER := 1;
90: G_MISS_CHAR CONSTANT VARCHAR2(1) := OKL_API.G_MISS_CHAR;
91: G_MISS_NUM CONSTANT NUMBER := OKL_API.G_MISS_NUM;
92: G_MISS_DATE CONSTANT DATE := OKL_API.G_MISS_DATE;

Line 90: G_MISS_CHAR CONSTANT VARCHAR2(1) := OKL_API.G_MISS_CHAR;

86: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_UNEXP_ERROR;
87: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_ERROR;
88: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
89: G_API_VERSION CONSTANT NUMBER := 1;
90: G_MISS_CHAR CONSTANT VARCHAR2(1) := OKL_API.G_MISS_CHAR;
91: G_MISS_NUM CONSTANT NUMBER := OKL_API.G_MISS_NUM;
92: G_MISS_DATE CONSTANT DATE := OKL_API.G_MISS_DATE;
93: G_TRUE CONSTANT VARCHAR2(1) := OKL_API.G_TRUE;
94: G_FALSE CONSTANT VARCHAR2(1) := OKL_API.G_FALSE;

Line 91: G_MISS_NUM CONSTANT NUMBER := OKL_API.G_MISS_NUM;

87: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_ERROR;
88: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
89: G_API_VERSION CONSTANT NUMBER := 1;
90: G_MISS_CHAR CONSTANT VARCHAR2(1) := OKL_API.G_MISS_CHAR;
91: G_MISS_NUM CONSTANT NUMBER := OKL_API.G_MISS_NUM;
92: G_MISS_DATE CONSTANT DATE := OKL_API.G_MISS_DATE;
93: G_TRUE CONSTANT VARCHAR2(1) := OKL_API.G_TRUE;
94: G_FALSE CONSTANT VARCHAR2(1) := OKL_API.G_FALSE;
95: G_YES CONSTANT VARCHAR2(1) := 'Y';

Line 92: G_MISS_DATE CONSTANT DATE := OKL_API.G_MISS_DATE;

88: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
89: G_API_VERSION CONSTANT NUMBER := 1;
90: G_MISS_CHAR CONSTANT VARCHAR2(1) := OKL_API.G_MISS_CHAR;
91: G_MISS_NUM CONSTANT NUMBER := OKL_API.G_MISS_NUM;
92: G_MISS_DATE CONSTANT DATE := OKL_API.G_MISS_DATE;
93: G_TRUE CONSTANT VARCHAR2(1) := OKL_API.G_TRUE;
94: G_FALSE CONSTANT VARCHAR2(1) := OKL_API.G_FALSE;
95: G_YES CONSTANT VARCHAR2(1) := 'Y';
96: G_NO CONSTANT VARCHAR2(1) := 'N';

Line 93: G_TRUE CONSTANT VARCHAR2(1) := OKL_API.G_TRUE;

89: G_API_VERSION CONSTANT NUMBER := 1;
90: G_MISS_CHAR CONSTANT VARCHAR2(1) := OKL_API.G_MISS_CHAR;
91: G_MISS_NUM CONSTANT NUMBER := OKL_API.G_MISS_NUM;
92: G_MISS_DATE CONSTANT DATE := OKL_API.G_MISS_DATE;
93: G_TRUE CONSTANT VARCHAR2(1) := OKL_API.G_TRUE;
94: G_FALSE CONSTANT VARCHAR2(1) := OKL_API.G_FALSE;
95: G_YES CONSTANT VARCHAR2(1) := 'Y';
96: G_NO CONSTANT VARCHAR2(1) := 'N';
97: G_FIRST CONSTANT NUMBER := FND_MSG_PUB.G_FIRST;

Line 94: G_FALSE CONSTANT VARCHAR2(1) := OKL_API.G_FALSE;

90: G_MISS_CHAR CONSTANT VARCHAR2(1) := OKL_API.G_MISS_CHAR;
91: G_MISS_NUM CONSTANT NUMBER := OKL_API.G_MISS_NUM;
92: G_MISS_DATE CONSTANT DATE := OKL_API.G_MISS_DATE;
93: G_TRUE CONSTANT VARCHAR2(1) := OKL_API.G_TRUE;
94: G_FALSE CONSTANT VARCHAR2(1) := OKL_API.G_FALSE;
95: G_YES CONSTANT VARCHAR2(1) := 'Y';
96: G_NO CONSTANT VARCHAR2(1) := 'N';
97: G_FIRST CONSTANT NUMBER := FND_MSG_PUB.G_FIRST;
98: G_NEXT CONSTANT NUMBER := FND_MSG_PUB.G_NEXT;

Line 133: lx_error_rec OKL_API.error_rec_type;

129: PROCEDURE fnd_output (
130: p_kle_rec IN kle_rec_type,
131: p_control_flag IN VARCHAR2 ) IS
132:
133: lx_error_rec OKL_API.error_rec_type;
134: l_msg_idx INTEGER := G_FIRST;
135:
136: BEGIN
137:

Line 193: OKL_API.set_message(

189: EXCEPTION
190:
191: WHEN OTHERS THEN
192: -- Set the oracle error message
193: OKL_API.set_message(
194: p_app_name => G_APP_NAME_1,
195: p_msg_name => G_UNEXPECTED_ERROR,
196: p_token1 => G_SQLCODE_TOKEN,
197: p_token1_value => SQLCODE,

Line 472: OKL_API.set_message(

468: EXCEPTION
469:
470: WHEN OTHERS THEN
471: -- Set the oracle error message
472: OKL_API.set_message(
473: p_app_name => G_APP_NAME_1,
474: p_msg_name => G_UNEXPECTED_ERROR,
475: p_token1 => G_SQLCODE_TOKEN,
476: p_token1_value => SQLCODE,

Line 507: l_msg_count NUMBER := OKL_API.G_MISS_NUM;

503: l_rulv_tbl okl_rule_pub.rulv_tbl_type;
504: l_rulv_rec okl_rule_pub.rulv_rec_type;
505:
506: l_api_version CONSTANT NUMBER := g_api_version;
507: l_msg_count NUMBER := OKL_API.G_MISS_NUM;
508: l_msg_data VARCHAR2(2000);
509:
510: l_rg_count NUMBER;
511: l_rule_count NUMBER;

Line 527: p_init_msg_list => OKL_API.G_FALSE,

523:
524: -- get rule data
525: OKL_RULE_APIS_PUB.get_contract_rgs (
526: p_api_version => l_api_version,
527: p_init_msg_list => OKL_API.G_FALSE,
528: p_chr_id => p_kle_rec.vpa_id,
529: p_cle_id => NULL,
530: p_rgd_code => 'VGLRS',
531: x_return_status => l_return_status,

Line 537: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

533: x_msg_data => l_msg_data,
534: x_rgpv_tbl => l_rgpv_tbl,
535: x_rg_count => l_rg_count);
536:
537: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
538: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
539: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
540: RAISE OKL_API.G_EXCEPTION_ERROR;
541: ELSIF (NVL (l_rg_count, 0) <> 1) THEN

Line 538: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

534: x_rgpv_tbl => l_rgpv_tbl,
535: x_rg_count => l_rg_count);
536:
537: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
538: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
539: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
540: RAISE OKL_API.G_EXCEPTION_ERROR;
541: ELSIF (NVL (l_rg_count, 0) <> 1) THEN
542:

Line 539: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

535: x_rg_count => l_rg_count);
536:
537: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
538: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
539: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
540: RAISE OKL_API.G_EXCEPTION_ERROR;
541: ELSIF (NVL (l_rg_count, 0) <> 1) THEN
542:
543: -- Unable to complete process due to missing

Line 540: RAISE OKL_API.G_EXCEPTION_ERROR;

536:
537: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
538: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
539: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
540: RAISE OKL_API.G_EXCEPTION_ERROR;
541: ELSIF (NVL (l_rg_count, 0) <> 1) THEN
542:
543: -- Unable to complete process due to missing
544: -- information (RULE rule in GROUP group)

Line 545: OKL_API.set_message (

541: ELSIF (NVL (l_rg_count, 0) <> 1) THEN
542:
543: -- Unable to complete process due to missing
544: -- information (RULE rule in GROUP group)
545: OKL_API.set_message (
546: p_app_name => OKL_API.G_APP_NAME,
547: p_msg_name => 'OKL_AM_VRS_NO_RULE_DATA',
548: p_token1 => 'GROUP',
549: p_token1_value => 'VGLRS',

Line 546: p_app_name => OKL_API.G_APP_NAME,

542:
543: -- Unable to complete process due to missing
544: -- information (RULE rule in GROUP group)
545: OKL_API.set_message (
546: p_app_name => OKL_API.G_APP_NAME,
547: p_msg_name => 'OKL_AM_VRS_NO_RULE_DATA',
548: p_token1 => 'GROUP',
549: p_token1_value => 'VGLRS',
550: p_token2 => 'RULE',

Line 559: p_init_msg_list => OKL_API.G_FALSE,

555:
556: -- Get vendor share party details -- multiple records
557: OKL_RULE_APIS_PUB.get_contract_rules (
558: p_api_version => l_api_version,
559: p_init_msg_list => OKL_API.G_FALSE,
560: p_rgpv_rec => l_rgpv_tbl(1),
561: p_rdf_code => 'VGLRSP',
562: x_return_status => l_return_status,
563: x_msg_count => l_msg_count,

Line 568: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

564: x_msg_data => l_msg_data,
565: x_rulv_tbl => l_rulv_tbl,
566: x_rule_count => l_rule_count);
567:
568: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
569: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
570: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
571: RAISE OKL_API.G_EXCEPTION_ERROR;
572: ELSIF (NVL (l_rule_count, 0) = 0 ) THEN

Line 569: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

565: x_rulv_tbl => l_rulv_tbl,
566: x_rule_count => l_rule_count);
567:
568: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
569: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
570: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
571: RAISE OKL_API.G_EXCEPTION_ERROR;
572: ELSIF (NVL (l_rule_count, 0) = 0 ) THEN
573:

Line 570: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

566: x_rule_count => l_rule_count);
567:
568: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
569: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
570: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
571: RAISE OKL_API.G_EXCEPTION_ERROR;
572: ELSIF (NVL (l_rule_count, 0) = 0 ) THEN
573:
574: -- Unable to complete process due to missing

Line 571: RAISE OKL_API.G_EXCEPTION_ERROR;

567:
568: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
569: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
570: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
571: RAISE OKL_API.G_EXCEPTION_ERROR;
572: ELSIF (NVL (l_rule_count, 0) = 0 ) THEN
573:
574: -- Unable to complete process due to missing
575: -- information (RULE rule in GROUP group)

Line 576: OKL_API.set_message (

572: ELSIF (NVL (l_rule_count, 0) = 0 ) THEN
573:
574: -- Unable to complete process due to missing
575: -- information (RULE rule in GROUP group)
576: OKL_API.set_message (
577: p_app_name => OKL_API.G_APP_NAME,
578: p_msg_name => 'OKL_AM_VRS_NO_RULE_DATA',
579: p_token1 => 'GROUP',
580: p_token1_value => 'VGLRS',

Line 577: p_app_name => OKL_API.G_APP_NAME,

573:
574: -- Unable to complete process due to missing
575: -- information (RULE rule in GROUP group)
576: OKL_API.set_message (
577: p_app_name => OKL_API.G_APP_NAME,
578: p_msg_name => 'OKL_AM_VRS_NO_RULE_DATA',
579: p_token1 => 'GROUP',
580: p_token1_value => 'VGLRS',
581: p_token2 => 'RULE',

Line 599: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

595: x_return_status => l_return_status,
596: x_msg_count => l_msg_count,
597: x_msg_data => l_msg_data);
598:
599: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
600: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
601: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
602: RAISE OKL_API.G_EXCEPTION_ERROR;
603: END IF;

Line 600: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

596: x_msg_count => l_msg_count,
597: x_msg_data => l_msg_data);
598:
599: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
600: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
601: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
602: RAISE OKL_API.G_EXCEPTION_ERROR;
603: END IF;
604:

Line 601: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

597: x_msg_data => l_msg_data);
598:
599: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
600: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
601: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
602: RAISE OKL_API.G_EXCEPTION_ERROR;
603: END IF;
604:
605: -- set return status

Line 602: RAISE OKL_API.G_EXCEPTION_ERROR;

598:
599: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
600: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
601: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
602: RAISE OKL_API.G_EXCEPTION_ERROR;
603: END IF;
604:
605: -- set return status
606: x_return_status := l_return_status;

Line 620: x_return_status := OKL_API.G_RET_STS_ERROR;

616: EXCEPTION
617:
618: WHEN l_no_rule_data THEN
619:
620: x_return_status := OKL_API.G_RET_STS_ERROR;
621:
622: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
623: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
624: 'OKL_AM_VENDOR_RES_SHARE_PVT.get_residual_share_terms.',

Line 630: x_return_status := OKL_API.G_RET_STS_ERROR;

626: END IF;
627:
628: WHEN G_EXCEPTION_ERROR THEN
629:
630: x_return_status := OKL_API.G_RET_STS_ERROR;
631:
632: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
633: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
634: 'OKL_AM_VENDOR_RES_SHARE_PVT.get_residual_share_terms.',

Line 640: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

636: END IF;
637:
638: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
639:
640: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
641:
642: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
643: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
644: 'OKL_AM_VENDOR_RES_SHARE_PVT.get_residual_share_terms.',

Line 650: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

646: END IF;
647:
648: WHEN OTHERS THEN
649:
650: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
651:
652: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
653: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
654: 'OKL_AM_VENDOR_RES_SHARE_PVT.get_residual_share_terms.',

Line 672: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

668: --
669: -- End of comments
670: PROCEDURE vendor_share(
671: p_api_version IN NUMBER,
672: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
673: x_return_status OUT NOCOPY VARCHAR2,
674: x_msg_count OUT NOCOPY NUMBER,
675: x_msg_data OUT NOCOPY VARCHAR2,
676: p_kle_rec IN kle_rec_type,

Line 739: l_msg_count NUMBER := OKL_API.G_MISS_NUM;

735: l_residual_shr_try_id NUMBER;
736: l_document_category VARCHAR2(100):= 'OKL Lease Pay Invoices';
737: lx_dbseqnm VARCHAR2(2000):= '';
738: lx_dbseqid NUMBER := NULL;
739: l_msg_count NUMBER := OKL_API.G_MISS_NUM;
740: l_msg_data VARCHAR2(2000);
741: l_pay_to_site_id NUMBER;
742: l_share_percent NUMBER;
743: l_party_role VARCHAR2(350);

Line 788: l_return_status := OKL_API.start_activity(

784: /*
785: -- *************
786: -- Check API version, initialize message list and create savepoint
787: -- *************
788: l_return_status := OKL_API.start_activity(
789: p_api_name => l_api_name,
790: p_pkg_name => G_PKG_NAME,
791: p_init_msg_list => p_init_msg_list,
792: l_api_version => l_api_version,

Line 820: IF l_return_status <> OKL_API.G_RET_STS_SUCCESS THEN

816: p_kle_rec => l_kle_rec,
817: x_share_formula => l_share_formula,
818: x_share_tbl => l_share_tbl);
819:
820: IF l_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
821:
822: -- Message:
823: OKL_API.set_message(
824: p_app_name => G_APP_NAME,

Line 823: OKL_API.set_message(

819:
820: IF l_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
821:
822: -- Message:
823: OKL_API.set_message(
824: p_app_name => G_APP_NAME,
825: p_msg_name => 'OKL_AM_VRS_SHARE_TERMS');
826:
827: RAISE G_EXCEPTION_ERROR;

Line 841: ,p_init_msg_list => OKL_API.G_FALSE

837:
838: -- rmunjulu 4622198 SPECIAL_ACCNT Get special accounting details
839: OKL_SECURITIZATION_PVT.check_khr_ia_associated(
840: p_api_version => p_api_version
841: ,p_init_msg_list => OKL_API.G_FALSE
842: ,x_return_status => l_return_status
843: ,x_msg_count => x_msg_count
844: ,x_msg_data => x_msg_data
845: ,p_khr_id => p_kle_rec.khr_id

Line 886: OKL_API.set_message(

882: OPEN c_app_info ;
883: FETCH c_app_info INTO l_app_id;
884: IF(c_app_info%NOTFOUND) THEN
885: -- Message:
886: OKL_API.set_message(
887: p_app_name => G_APP_NAME,
888: p_msg_name => 'OKL_AM_VRS_APPS_INFO');
889: CLOSE c_app_info ;
890: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 890: RAISE OKL_API.G_EXCEPTION_ERROR;

886: OKL_API.set_message(
887: p_app_name => G_APP_NAME,
888: p_msg_name => 'OKL_AM_VRS_APPS_INFO');
889: CLOSE c_app_info ;
890: RAISE OKL_API.G_EXCEPTION_ERROR;
891: END IF ;
892: CLOSE c_app_info;
893:
894: -- get Disbursement transaction type

Line 900: IF l_return_status <> OKL_API.G_RET_STS_SUCCESS THEN

896: p_try_name => 'Disbursement',
897: x_return_status => l_return_status,
898: x_try_id => l_trx_type_id);
899:
900: IF l_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
901:
902: l_trans_meaning := OKL_AM_UTIL_PVT.get_lookup_meaning(
903: p_lookup_type => 'OKL_ACCOUNTING_EVENT_TYPE',
904: p_lookup_code => 'DISBURSEMENT',

Line 907: OKL_API.set_message(

903: p_lookup_type => 'OKL_ACCOUNTING_EVENT_TYPE',
904: p_lookup_code => 'DISBURSEMENT',
905: p_validate_yn => 'Y');
906:
907: OKL_API.set_message(
908: p_app_name => 'OKL',
909: p_msg_name => 'OKL_AM_NO_TRX_TYPE_FOUND',
910: p_token1 => 'TRY_NAME',
911: p_token1_value => l_trans_meaning);

Line 913: RAISE OKL_API.G_EXCEPTION_ERROR;

909: p_msg_name => 'OKL_AM_NO_TRX_TYPE_FOUND',
910: p_token1 => 'TRY_NAME',
911: p_token1_value => l_trans_meaning);
912:
913: RAISE OKL_API.G_EXCEPTION_ERROR;
914: END IF ;
915:
916: -- get vendor residual share transaction type
917: OKL_AM_UTIL_PVT.get_transaction_id (

Line 922: IF l_return_status <> OKL_API.G_RET_STS_SUCCESS THEN

918: p_try_name => 'Vendor Residual Share',
919: x_return_status => l_return_status,
920: x_try_id => l_residual_shr_try_id);
921:
922: IF l_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
923:
924: l_trans_meaning := OKL_AM_UTIL_PVT.get_lookup_meaning(
925: p_lookup_type => 'OKL_ACCOUNTING_EVENT_TYPE',
926: p_lookup_code => 'VENDOR RESIDUAL SHARE',

Line 929: OKL_API.set_message(

925: p_lookup_type => 'OKL_ACCOUNTING_EVENT_TYPE',
926: p_lookup_code => 'VENDOR RESIDUAL SHARE',
927: p_validate_yn => 'Y');
928:
929: OKL_API.set_message(
930: p_app_name => 'OKL',
931: p_msg_name => 'OKL_AM_NO_TRX_TYPE_FOUND',
932: p_token1 => 'TRY_NAME',
933: p_token1_value => l_trans_meaning);

Line 935: RAISE OKL_API.G_EXCEPTION_ERROR;

931: p_msg_name => 'OKL_AM_NO_TRX_TYPE_FOUND',
932: p_token1 => 'TRY_NAME',
933: p_token1_value => l_trans_meaning);
934:
935: RAISE OKL_API.G_EXCEPTION_ERROR;
936: END IF ;
937:
938: -- get program info
939: OPEN get_program_info_csr;

Line 985: OKL_API.set_message(

981:
982: IF (l_return_status <> G_RET_STS_SUCCESS) THEN
983:
984: -- Message:
985: OKL_API.set_message(
986: p_app_name => G_APP_NAME,
987: p_msg_name => 'OKL_AM_VRS_SHARE_FORMULA');
988:
989: END IF;

Line 1000: OKL_API.set_message(

996:
997: IF (to_number(l_share_amount) = 0 ) THEN
998:
999: -- Message:
1000: OKL_API.set_message(
1001: p_app_name => G_APP_NAME,
1002: p_msg_name => 'OKL_AM_VRS_SHARE_FORMULA_ZERO');
1003:
1004: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 1004: RAISE OKL_API.G_EXCEPTION_ERROR;

1000: OKL_API.set_message(
1001: p_app_name => G_APP_NAME,
1002: p_msg_name => 'OKL_AM_VRS_SHARE_FORMULA_ZERO');
1003:
1004: RAISE OKL_API.G_EXCEPTION_ERROR;
1005: END IF;
1006:
1007: -- create header transaction record in okl_trx_assets
1008: lp_thpv_rec.tas_type := 'VRS'; -- new lookup seeded

Line 1015: p_init_msg_list => OKL_API.G_FALSE,

1011: lp_thpv_rec.date_trans_occurred := sysdate;
1012:
1013: OKL_TRX_ASSETS_PUB.create_trx_ass_h_def(
1014: p_api_version => p_api_version,
1015: p_init_msg_list => OKL_API.G_FALSE,
1016: x_return_status => l_return_status,
1017: x_msg_count => x_msg_count,
1018: x_msg_data => x_msg_data,
1019: p_thpv_rec => lp_thpv_rec,

Line 1049: OKL_API.set_message(

1045:
1046: IF l_pay_to_site_id IS NULL THEN
1047:
1048: -- Message: No Pay site defined for Vendor VENDOR_NAME.
1049: OKL_API.set_message(
1050: p_app_name => G_APP_NAME,
1051: p_msg_name => 'OKL_AM_VRS_PAY_SITE_ERROR',
1052: p_token1 => 'VENDOR',
1053: p_token1_value => l_party_name);

Line 1055: RAISE OKL_API.G_EXCEPTION_ERROR;

1051: p_msg_name => 'OKL_AM_VRS_PAY_SITE_ERROR',
1052: p_token1 => 'VENDOR',
1053: p_token1_value => l_party_name);
1054:
1055: RAISE OKL_API.G_EXCEPTION_ERROR;
1056: END IF;
1057:
1058: -- get share amount for the party based on share percent
1059: l_share_amount_for_party := to_number(l_share_amount) * l_share_percent/100;

Line 1118: ,p_init_msg_list => OKL_API.G_FALSE

1114:
1115: l_tplv_tbl(0) := l_tplv_rec;
1116:
1117: OKL_CREATE_DISB_TRANS_PVT.create_disb_trx(p_api_version
1118: ,p_init_msg_list => OKL_API.G_FALSE
1119: ,x_return_status => l_return_status
1120: ,x_msg_count => x_msg_count
1121: ,x_msg_data => x_msg_data
1122: ,p_tapv_rec => l_tapv_rec

Line 1157: p_init_msg_list => OKL_API.G_FALSE,

1153:
1154: -- insert record in txl lines table
1155: OKL_TXL_ASSETS_PUB.create_txl_asset_def(
1156: p_api_version => p_api_version,
1157: p_init_msg_list => OKL_API.G_FALSE,
1158: x_return_status => l_return_status,
1159: x_msg_count => x_msg_count,
1160: x_msg_data => x_msg_data,
1161: p_tlpv_rec => lp_tlpv_rec,

Line 1180: --OKL_API.end_activity (x_msg_count, x_msg_data);

1176: -- set return status
1177: x_return_status := l_return_status;
1178:
1179: -- End Activity
1180: --OKL_API.end_activity (x_msg_count, x_msg_data);
1181:
1182: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1183: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1184: 'OKL_AM_VENDOR_RES_SHARE_PVT.vendor_share.',

Line 1192: x_return_status := OKL_API.handle_exceptions(

1188: EXCEPTION
1189:
1190: WHEN G_EXCEPTION_ERROR THEN
1191: /*
1192: x_return_status := OKL_API.handle_exceptions(
1193: p_api_name => l_api_name,
1194: p_pkg_name => G_PKG_NAME,
1195: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1196: x_msg_count => x_msg_count,

Line 1195: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

1191: /*
1192: x_return_status := OKL_API.handle_exceptions(
1193: p_api_name => l_api_name,
1194: p_pkg_name => G_PKG_NAME,
1195: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1196: x_msg_count => x_msg_count,
1197: x_msg_data => x_msg_data,
1198: */
1199: rollback to vend_res_share;

Line 1208: x_return_status := OKL_API.handle_exceptions(

1204: END IF;
1205:
1206: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
1207: /*
1208: x_return_status := OKL_API.handle_exceptions(
1209: p_api_name => l_api_name,
1210: p_pkg_name => G_PKG_NAME,
1211: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1212: x_msg_count => x_msg_count,

Line 1211: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

1207: /*
1208: x_return_status := OKL_API.handle_exceptions(
1209: p_api_name => l_api_name,
1210: p_pkg_name => G_PKG_NAME,
1211: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1212: x_msg_count => x_msg_count,
1213: x_msg_data => x_msg_data,
1214: p_api_type => '_PVT');
1215: */

Line 1225: x_return_status := OKL_API.handle_exceptions(

1221: END IF;
1222:
1223: WHEN OTHERS THEN
1224: /*
1225: x_return_status := OKL_API.handle_exceptions(
1226: p_api_name => l_api_name,
1227: p_pkg_name => G_PKG_NAME,
1228: p_exc_name => 'OTHERS',
1229: x_msg_count => x_msg_count,

Line 1260: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1256: --
1257: -- End of comments
1258: PROCEDURE do_vendor_share(
1259: p_api_version IN NUMBER,
1260: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1261: x_return_status OUT NOCOPY VARCHAR2,
1262: x_msg_count OUT NOCOPY NUMBER,
1263: x_msg_data OUT NOCOPY VARCHAR2,
1264: p_control_flag IN VARCHAR2 DEFAULT NULL) IS

Line 1349: l_is_securitized VARCHAR2(3) := OKL_API.G_FALSE;

1345: l_kle_tbl kle_tbl_type;
1346: i NUMBER;
1347: l_api_name VARCHAR2(30) := 'do_vendor_share';
1348: l_inv_agmt_chr_id_tbl OKL_SECURITIZATION_PVT.inv_agmt_chr_id_tbl_type;
1349: l_is_securitized VARCHAR2(3) := OKL_API.G_FALSE;
1350: l_residual_sty_id NUMBER;
1351: l_inv_agmt_chr_id NUMBER;
1352: l_residual_stm_id NUMBER;
1353: l_assets_found VARCHAR2(3) := 'N';

Line 1401: IF l_return_status = OKL_API.G_RET_STS_SUCCESS

1397: l_residual_sty_id);
1398: FETCH get_residual_value_stm_id INTO l_residual_stm_id;
1399: CLOSE get_residual_value_stm_id;
1400:
1401: IF l_return_status = OKL_API.G_RET_STS_SUCCESS
1402: AND l_residual_stm_id IS NOT NULL
1403: AND l_residual_stm_id <> OKL_API.G_MISS_NUM THEN
1404:
1405: -- Check KLE RESIDUAL Stream HDR securitized

Line 1403: AND l_residual_stm_id <> OKL_API.G_MISS_NUM THEN

1399: CLOSE get_residual_value_stm_id;
1400:
1401: IF l_return_status = OKL_API.G_RET_STS_SUCCESS
1402: AND l_residual_stm_id IS NOT NULL
1403: AND l_residual_stm_id <> OKL_API.G_MISS_NUM THEN
1404:
1405: -- Check KLE RESIDUAL Stream HDR securitized
1406: OKL_SECURITIZATION_PVT.check_stm_securitized(
1407: p_api_version => p_api_version,

Line 1408: p_init_msg_list => OKL_API.G_FALSE,

1404:
1405: -- Check KLE RESIDUAL Stream HDR securitized
1406: OKL_SECURITIZATION_PVT.check_stm_securitized(
1407: p_api_version => p_api_version,
1408: p_init_msg_list => OKL_API.G_FALSE,
1409: x_return_status => l_return_status,
1410: x_msg_count => x_msg_count,
1411: x_msg_data => x_msg_data,
1412: p_stm_id => l_residual_stm_id,

Line 1420: IF l_return_status = OKL_API.G_RET_STS_SUCCESS

1416: END IF;
1417:
1418:
1419: -- DO NOT DO VENDOR SHARE IF RESIDUAL SECURITIZED
1420: IF l_return_status = OKL_API.G_RET_STS_SUCCESS
1421: AND nvl(l_is_securitized,OKL_API.G_FALSE)= OKL_API.G_FALSE THEN
1422:
1423: l_assets_found := 'Y';
1424:

Line 1421: AND nvl(l_is_securitized,OKL_API.G_FALSE)= OKL_API.G_FALSE THEN

1417:
1418:
1419: -- DO NOT DO VENDOR SHARE IF RESIDUAL SECURITIZED
1420: IF l_return_status = OKL_API.G_RET_STS_SUCCESS
1421: AND nvl(l_is_securitized,OKL_API.G_FALSE)= OKL_API.G_FALSE THEN
1422:
1423: l_assets_found := 'Y';
1424:
1425: okl_api.init_msg_list(OKL_API.G_TRUE);

Line 1425: okl_api.init_msg_list(OKL_API.G_TRUE);

1421: AND nvl(l_is_securitized,OKL_API.G_FALSE)= OKL_API.G_FALSE THEN
1422:
1423: l_assets_found := 'Y';
1424:
1425: okl_api.init_msg_list(OKL_API.G_TRUE);
1426:
1427: -- vendor share
1428: vendor_share(
1429: p_api_version => p_api_version,

Line 1430: p_init_msg_list => OKL_API.G_FALSE,

1426:
1427: -- vendor share
1428: vendor_share(
1429: p_api_version => p_api_version,
1430: p_init_msg_list => OKL_API.G_FALSE,
1431: x_return_status => l_return_status,
1432: x_msg_count => x_msg_count,
1433: x_msg_data => x_msg_data,
1434: p_kle_rec => l_kle_rec,

Line 1439: IF l_return_status = OKL_API.G_RET_STS_SUCCESS THEN

1435: p_share_tbl => l_share_tbl,
1436: p_sys_date => l_sys_date,
1437: p_control_flag => p_control_flag);
1438:
1439: IF l_return_status = OKL_API.G_RET_STS_SUCCESS THEN
1440: fnd_output (
1441: p_kle_rec => l_kle_rec,
1442: p_control_flag => 'PROCESSED');
1443: ELSE

Line 1470: OKL_API.end_activity (x_msg_count, x_msg_data);

1466: -- set return status
1467: x_return_status := l_return_status;
1468:
1469: -- End Activity
1470: OKL_API.end_activity (x_msg_count, x_msg_data);
1471:
1472: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1473: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1474: 'OKL_AM_VENDOR_RES_SHARE_PVT.do_vendor_share.',

Line 1482: x_return_status := OKL_API.handle_exceptions(

1478: EXCEPTION
1479:
1480: WHEN G_EXCEPTION_ERROR THEN
1481:
1482: x_return_status := OKL_API.handle_exceptions(
1483: p_api_name => l_api_name,
1484: p_pkg_name => G_PKG_NAME,
1485: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1486: x_msg_count => x_msg_count,

Line 1485: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

1481:
1482: x_return_status := OKL_API.handle_exceptions(
1483: p_api_name => l_api_name,
1484: p_pkg_name => G_PKG_NAME,
1485: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
1486: x_msg_count => x_msg_count,
1487: x_msg_data => x_msg_data,
1488: p_api_type => '_PVT');
1489:

Line 1498: x_return_status := OKL_API.handle_exceptions(

1494: END IF;
1495:
1496: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
1497:
1498: x_return_status := OKL_API.handle_exceptions(
1499: p_api_name => l_api_name,
1500: p_pkg_name => G_PKG_NAME,
1501: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1502: x_msg_count => x_msg_count,

Line 1501: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

1497:
1498: x_return_status := OKL_API.handle_exceptions(
1499: p_api_name => l_api_name,
1500: p_pkg_name => G_PKG_NAME,
1501: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
1502: x_msg_count => x_msg_count,
1503: x_msg_data => x_msg_data,
1504: p_api_type => '_PVT');
1505:

Line 1514: x_return_status := OKL_API.handle_exceptions(

1510: END IF;
1511:
1512: WHEN OTHERS THEN
1513:
1514: x_return_status := OKL_API.handle_exceptions(
1515: p_api_name => l_api_name,
1516: p_pkg_name => G_PKG_NAME,
1517: p_exc_name => 'OTHERS',
1518: x_msg_count => x_msg_count,

Line 1544: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1540: PROCEDURE concurrent_vend_res_share_prg(
1541: errbuf OUT NOCOPY VARCHAR2,
1542: retcode OUT NOCOPY VARCHAR2,
1543: p_api_version IN VARCHAR2,
1544: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1545: p_kle_id IN VARCHAR2 DEFAULT NULL) IS
1546:
1547:
1548:

Line 1557: OKL_API.init_msg_list('T');

1553:
1554: BEGIN
1555:
1556: -- Initialize message list
1557: OKL_API.init_msg_list('T');
1558:
1559: l_api_version := TO_NUMBER(p_api_version);
1560:
1561: -- Do Vendor Share

Line 1574: OKL_API.set_message(

1570: EXCEPTION
1571:
1572: WHEN OTHERS THEN
1573: -- Set the oracle error message
1574: OKL_API.set_message(
1575: p_app_name => G_APP_NAME_1,
1576: p_msg_name => G_UNEXPECTED_ERROR,
1577: p_token1 => G_SQLCODE_TOKEN,
1578: p_token1_value => SQLCODE,

Line 1749: OKL_API.set_message(

1745: EXCEPTION
1746:
1747: WHEN OTHERS THEN
1748: -- Set the oracle error message
1749: OKL_API.set_message(
1750: p_app_name => G_APP_NAME_1,
1751: p_msg_name => G_UNEXPECTED_ERROR,
1752: p_token1 => G_SQLCODE_TOKEN,
1753: p_token1_value => SQLCODE,

Line 1773: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1769: PROCEDURE concurrent_vend_res_share_rpt(
1770: errbuf OUT NOCOPY VARCHAR2,
1771: retcode OUT NOCOPY VARCHAR2,
1772: p_api_version IN VARCHAR2,
1773: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1774: p_asset_number IN VARCHAR2 DEFAULT NULL,
1775: p_disp_date_from IN VARCHAR2 DEFAULT NULL,
1776: p_disp_date_to IN VARCHAR2 DEFAULT NULL,
1777: p_vpa_number IN VARCHAR2 DEFAULT NULL,

Line 1865: OKL_API.init_msg_list('T');

1861: -- bad -----> EXECUTE IMMEDIATE 'DELETE FROM dept WHERE deptno = ' || to_char (my_deptno);
1862: -- good ----> EXECUTE IMMEDIATE 'DELETE FROM dept WHERE deptno = :1' USING my_deptno;
1863:
1864: -- Initialize message list
1865: OKL_API.init_msg_list('T');
1866:
1867: l_api_version := TO_NUMBER(p_api_version);
1868:
1869: l_select_sql_1 := ' SELECT VPA.contract_number PROGRAM_AGREEMENT,CLE.name ASSET_NUMBER,CLE.item_description ASSET_DESCRIPTION,CHR.contract_number CONTRACT_NUMBER, ';

Line 1950: OKL_API.set_message(

1946: EXCEPTION
1947:
1948: WHEN OTHERS THEN
1949: -- Set the oracle error message
1950: OKL_API.set_message(
1951: p_app_name => G_APP_NAME_1,
1952: p_msg_name => G_UNEXPECTED_ERROR,
1953: p_token1 => G_SQLCODE_TOKEN,
1954: p_token1_value => SQLCODE,