1400: l_id_tbl num_tbl_type;
1401:
1402: l_salesrep_name jtf_rs_resource_extns_vl.resource_name%TYPE;
1403: l_org_name hr_all_organization_units.name%TYPE;
1404: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1405:
1406: BEGIN
1407:
1408: --log key input parameters
1575: IF (FND_LOG.level_event >= FND_LOG.g_current_runtime_level) THEN
1576: FND_LOG.message(FND_LOG.level_event, l_mod_name || '.org_id_match', FALSE);
1577: END IF;
1578: FND_MSG_PUB.add;
1579: x_return_status := OKC_API.g_ret_sts_warning;
1580: RETURN;
1581: END IF;
1582:
1583: --get the party role id, rle_code for vendor/merchant
1694: /*cgopinee Bug fix for 6882512*/
1695: OKC_CTC_PVT.update_contact_stecode(p_chr_id =>p_chr_id,
1696: x_return_status=>l_return_status);
1697:
1698: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1699: RAISE OKC_API.G_EXCEPTION_ERROR;
1700: END IF;
1701:
1702: --create sales credit for this salesperson
1695: OKC_CTC_PVT.update_contact_stecode(p_chr_id =>p_chr_id,
1696: x_return_status=>l_return_status);
1697:
1698: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1699: RAISE OKC_API.G_EXCEPTION_ERROR;
1700: END IF;
1701:
1702: --create sales credit for this salesperson
1703: l_prof_rev_type_dist := nvl(FND_PROFILE.VALUE('OKS_REVENUE_TYPE_DIST'), '0');
2250: EXIT WHEN (l_hdr_strlvl_tbl.count = 0);
2251:
2252: FOR i IN l_hdr_strlvl_tbl.first..l_hdr_strlvl_tbl.last LOOP
2253: l_sll_ctr := l_sll_ctr + 1;
2254: l_sllv_tbl(l_sll_ctr).id := OKC_API.g_miss_num;
2255: l_sllv_tbl(l_sll_ctr).chr_id := p_chr_id;
2256: l_sllv_tbl(l_sll_ctr).cle_id := null;
2257: l_sllv_tbl(l_sll_ctr).dnz_chr_id := p_chr_id;
2258: l_sllv_tbl(l_sll_ctr).sequence_no := l_hdr_strlvl_tbl(i).sequence_no;
3817: END IF;
3818:
3819: OKC_K_RENEW_ASMBLR_PVT.acn_assemble(
3820: p_api_version => 1,
3821: p_init_msg_list => OKC_API.G_FALSE,
3822: x_return_status => x_return_status,
3823: x_msg_count => x_msg_count,
3824: x_msg_data => x_msg_data,
3825: p_k_class => l_cls_code,
5396: RAISE FND_API.g_exc_error;
5397: END IF;
5398:
5399: --sales credit and copy are the 2 places we can return with a warning
5400: IF x_return_status = OKC_API.g_ret_sts_warning THEN -- 'W'
5401: l_warnings := TRUE;
5402: END IF;
5403: --end copy contract
5404:
5733: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.sales_credits', 'after call to process_sales_credit, x_return_status='||x_return_status);
5734: END IF;
5735:
5736: --sales credit and copy are the 2 places we can return with a warning
5737: IF x_return_status = OKC_API.g_ret_sts_warning THEN -- 'W'
5738: l_warnings := TRUE;
5739: END IF;
5740: --end of sales credits
5741:
5860: END IF;
5861: --end of update contract
5862:
5863: IF (l_warnings) THEN
5864: x_return_status := OKC_API.G_RET_STS_WARNING;
5865: END IF;
5866:
5867: --standard check of p_commit
5868: IF FND_API.to_boolean( p_commit ) THEN