1: package body OKC_CONTRACT_ITEM_PUB as
2: /* $Header: OKCPCIMB.pls 120.0 2005/05/26 09:28:05 appldev noship $ */
3: l_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N');
4:
5: G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
2: /* $Header: OKCPCIMB.pls 120.0 2005/05/26 09:28:05 appldev noship $ */
3: l_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N');
4:
5: G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
6: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKC_CONTRACT_ITEM_PUB';
7:
8: procedure reset(p_cimv_rec IN cimv_rec_type) is
9: begin
10: g_cimv_rec.id := p_cimv_rec.id;
681: exception
682: when others then NULL;
683: end validate_contract_item;
684:
685: end OKC_CONTRACT_ITEM_PUB;