DBA Data[Home] [Help]

APPS.OKC_CONTRACT_PVT dependencies on OKC_CONTRACT_PVT

Line 1: PACKAGE BODY OKC_CONTRACT_PVT AS

1: PACKAGE BODY OKC_CONTRACT_PVT AS
2: /* $Header: OKCCCHRB.pls 120.24 2011/10/25 10:06:10 spingali ship $ */
3:
4: l_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N');
5:

Line 463: OKC_CONTRACT_PVT.GENERATE_CONTRACT_NUMBER(

459: -- if contract number is null, polpulate default contract number
460: If (l_chrv_rec.contract_number = OKC_API.G_MISS_CHAR or
461: l_chrv_rec.contract_number is null)
462: Then
463: OKC_CONTRACT_PVT.GENERATE_CONTRACT_NUMBER(
464: p_scs_code => l_chrv_rec.scs_code,
465: p_modifier => l_chrv_rec.contract_number_modifier,
466: x_return_status => x_return_status,
467: x_contract_number => l_chrv_rec.contract_number);

Line 493: x_return_status := OKC_CONTRACT_PVT.Create_Version(x_chrv_rec.id);

489: End If;
490:
491: -- Create version
492: If (x_return_status = OKC_API.G_RET_STS_SUCCESS) Then
493: x_return_status := OKC_CONTRACT_PVT.Create_Version(x_chrv_rec.id);
494: End If;
495:
496: -- Create record in OKC_K_HISTORY tables
497: If (x_return_status = OKC_API.G_RET_STS_SUCCESS) Then

Line 1439: OKC_CONTRACT_PVT.Get_Contract_Id(

1435: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1436: l_chr_id NUMBER;
1437: BEGIN
1438: -- check whether the contract is updateable or not
1439: OKC_CONTRACT_PVT.Get_Contract_Id(
1440: p_clev_rec => p_clev_rec,
1441: x_chr_id => l_chr_id,
1442: x_return_status => l_return_status);
1443:

Line 1553: OKC_CONTRACT_PVT.Get_Contract_Id(

1549: --end npalepu
1550: where id = p_id;
1551: BEGIN
1552: -- check whether the contract is updateable or not
1553: OKC_CONTRACT_PVT.Get_Contract_Id(
1554: p_clev_rec => p_clev_rec,
1555: x_chr_id => l_chr_id,
1556: x_return_status => l_return_status);
1557:

Line 1818: OKC_CONTRACT_PVT.Get_Contract_Id(

1814:
1815:
1816: BEGIN
1817: -- check whether the contract is updateable or not
1818: OKC_CONTRACT_PVT.Get_Contract_Id(
1819: p_clev_rec => p_clev_rec,
1820: x_chr_id => l_chr_id,
1821: x_return_status => l_return_status);
1822:

Line 5104: okc_debug.log('2700: Leaving OKC_CONTRACT_PVT, one or more mandatory parameters missing :FND_API.G_EXC_ERROR');

5100: WHEN FND_API.G_EXC_ERROR THEN
5101: x_return_status := FND_API.G_RET_STS_ERROR;
5102:
5103: IF (l_debug = 'Y') THEN
5104: okc_debug.log('2700: Leaving OKC_CONTRACT_PVT, one or more mandatory parameters missing :FND_API.G_EXC_ERROR');
5105: END IF;
5106:
5107: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5108: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 5111: okc_debug.log('2710: Leaving OKC_CONTRACT_PVT: FND_API.G_EXC_UNEXPECTED_ERROR '|| SQLERRM);

5107: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5108: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5109:
5110: IF (l_debug = 'Y') THEN
5111: okc_debug.log('2710: Leaving OKC_CONTRACT_PVT: FND_API.G_EXC_UNEXPECTED_ERROR '|| SQLERRM);
5112: END IF;
5113:
5114: WHEN OTHERS THEN
5115: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 5118: okc_debug.log('2720: Leaving OKC_CONTRACT_PVT because of EXCEPTION: '||sqlerrm);

5114: WHEN OTHERS THEN
5115: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5116:
5117: IF (l_debug = 'Y') THEN
5118: okc_debug.log('2720: Leaving OKC_CONTRACT_PVT because of EXCEPTION: '||sqlerrm);
5119: END IF;
5120:
5121: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
5122: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name, SQLERRM );

Line 5370: END OKC_CONTRACT_PVT;

5366: );
5367: END Line_Renewal_links;
5368:
5369:
5370: END OKC_CONTRACT_PVT;