585: --p_clev_rec OKL_OKC_MIGRATION_PVT.clev_rec_type;
586: --p_klev_rec OKL_CONTRACT_PUB.klev_rec_type;
587: --x_clev_rec OKL_OKC_MIGRATION_PVT.clev_rec_type;
588: --x_klev_rec OKL_CONTRACT_PUB.klev_rec_type;
589: p_clev_tbl OKL_CREDIT_PUB.clev_tbl_type;
590: p_klev_tbl OKL_KLE_PVT.klev_tbl_type;
591: x_clev_tbl OKL_CREDIT_PUB.clev_tbl_type;
592: x_klev_tbl OKL_KLE_PVT.klev_tbl_type;
593:
587: --x_clev_rec OKL_OKC_MIGRATION_PVT.clev_rec_type;
588: --x_klev_rec OKL_CONTRACT_PUB.klev_rec_type;
589: p_clev_tbl OKL_CREDIT_PUB.clev_tbl_type;
590: p_klev_tbl OKL_KLE_PVT.klev_tbl_type;
591: x_clev_tbl OKL_CREDIT_PUB.clev_tbl_type;
592: x_klev_tbl OKL_KLE_PVT.klev_tbl_type;
593:
594: x_msg_data VARCHAR2(2000);
595: x_msg_count NUMBER := 0 ;
735: FETCH c_party_name INTO l_customer_name;
736: CLOSE c_party_name;
737:
738: -- 3. CREATE CREDIT LINE CONTRACT
739: OKL_CREDIT_PUB.create_credit(
740: p_api_version => l_api_version,
741: p_init_msg_list => OKC_API.G_TRUE,
742: x_return_status => x_return_status,
743: x_msg_count => x_msg_count,
856: p_klev_tbl(0).amount := l_credit_amount;
857: p_klev_tbl(0).credit_nature := 'NEW';
858: p_klev_tbl(0).OBJECT_VERSION_NUMBER := 1 ;
859:
860: OKL_CREDIT_PUB.create_credit_limit(
861: p_api_version => l_api_version,
862: p_init_msg_list => OKC_API.G_TRUE,
863: x_return_status => x_return_status,
864: x_msg_count => x_msg_count,