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.15.12010000.2 2008/10/24 07:59:53 ssreekum 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 1381: OKC_CONTRACT_PVT.Get_Contract_Id(

1377: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1378: l_chr_id NUMBER;
1379: BEGIN
1380: -- check whether the contract is updateable or not
1381: OKC_CONTRACT_PVT.Get_Contract_Id(
1382: p_clev_rec => p_clev_rec,
1383: x_chr_id => l_chr_id,
1384: x_return_status => l_return_status);
1385:

Line 1495: OKC_CONTRACT_PVT.Get_Contract_Id(

1491: --end npalepu
1492: where id = p_id;
1493: BEGIN
1494: -- check whether the contract is updateable or not
1495: OKC_CONTRACT_PVT.Get_Contract_Id(
1496: p_clev_rec => p_clev_rec,
1497: x_chr_id => l_chr_id,
1498: x_return_status => l_return_status);
1499:

Line 1760: OKC_CONTRACT_PVT.Get_Contract_Id(

1756:
1757:
1758: BEGIN
1759: -- check whether the contract is updateable or not
1760: OKC_CONTRACT_PVT.Get_Contract_Id(
1761: p_clev_rec => p_clev_rec,
1762: x_chr_id => l_chr_id,
1763: x_return_status => l_return_status);
1764:

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

4938: WHEN FND_API.G_EXC_ERROR THEN
4939: x_return_status := FND_API.G_RET_STS_ERROR;
4940:
4941: IF (l_debug = 'Y') THEN
4942: okc_debug.log('2700: Leaving OKC_CONTRACT_PVT, one or more mandatory parameters missing :FND_API.G_EXC_ERROR');
4943: END IF;
4944:
4945: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4946: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

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

4945: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4946: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4947:
4948: IF (l_debug = 'Y') THEN
4949: okc_debug.log('2710: Leaving OKC_CONTRACT_PVT: FND_API.G_EXC_UNEXPECTED_ERROR '|| SQLERRM);
4950: END IF;
4951:
4952: WHEN OTHERS THEN
4953: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

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

4952: WHEN OTHERS THEN
4953: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4954:
4955: IF (l_debug = 'Y') THEN
4956: okc_debug.log('2720: Leaving OKC_CONTRACT_PVT because of EXCEPTION: '||sqlerrm);
4957: END IF;
4958:
4959: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4960: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name, SQLERRM );

Line 5208: END OKC_CONTRACT_PVT;

5204: );
5205: END Line_Renewal_links;
5206:
5207:
5208: END OKC_CONTRACT_PVT;