APPS.OKL_FXL_PVT dependencies on OKC_API

Line 870: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

866: ----------------------------------------------------
867: PROCEDURE validate_supplier(
868: x_return_status OUT NOCOPY VARCHAR2,
869: p_asset_vendor_id IN NUMBER) IS
870: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
871: l_asset_vendor_id VARCHAR2(1);
872: l_row_not_found BOOLEAN := FALSE;
873: CURSOR c1(p_asset_vendor_id NUMBER) IS
874: SELECT '1'

Line 880: x_return_status := OKC_API.G_RET_STS_SUCCESS;

876: WHERE vendor_id = p_asset_vendor_id ;
877: BEGIN
878: IF ( p_asset_vendor_id IS NOT NULL) THEN
879: -- initialize return status
880: x_return_status := OKC_API.G_RET_STS_SUCCESS;
881: OPEN c1(p_asset_vendor_id );
882: FETCH c1 INTO l_asset_vendor_id;
883: l_row_not_found := c1%NOTFOUND;
884: CLOSE c1;

Line 886: OKC_API.set_message('OKL',G_INVALID_VALUE , G_COL_NAME_TOKEN, 'asset_vendor_id');

882: FETCH c1 INTO l_asset_vendor_id;
883: l_row_not_found := c1%NOTFOUND;
884: CLOSE c1;
885: IF l_row_not_found THEN
886: OKC_API.set_message('OKL',G_INVALID_VALUE , G_COL_NAME_TOKEN, 'asset_vendor_id');
887: x_return_status := OKC_API.G_RET_STS_ERROR;
888: END IF;
889: END IF;
890: EXCEPTION

Line 887: x_return_status := OKC_API.G_RET_STS_ERROR;

883: l_row_not_found := c1%NOTFOUND;
884: CLOSE c1;
885: IF l_row_not_found THEN
886: OKC_API.set_message('OKL',G_INVALID_VALUE , G_COL_NAME_TOKEN, 'asset_vendor_id');
887: x_return_status := OKC_API.G_RET_STS_ERROR;
888: END IF;
889: END IF;
890: EXCEPTION
891: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 898: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

894: NULL;
895:
896: WHEN OTHERS THEN
897: -- store SQL error message on message stack for caller
898: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
899:
900: p_msg_name => g_unexpected_error,
901: p_token1 => g_sqlcode_token,
902: p_token1_value => SQLCODE,

Line 907: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

903: p_token2 => g_sqlerrm_token,
904: p_token2_value => SQLERRM);
905:
906: -- notify caller of an UNEXPECTED error
907: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
908: END validate_supplier;
909: ---------------------------------------------------------------------------
910: -- FUNCTION Validate_Attributes
911: ---------------------------------------------------------------------------