473:
474: l_exists varchar2(1) default 'N';
475:
476: BEGIN
477: x_return_status := OKL_API.G_RET_STS_SUCCESS;
478: IF (p_payout_basis = OKL_API.G_MISS_CHAR OR
479: p_payout_basis IS NULL)
480: THEN
481: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'payout_basis');
474: l_exists varchar2(1) default 'N';
475:
476: BEGIN
477: x_return_status := OKL_API.G_RET_STS_SUCCESS;
478: IF (p_payout_basis = OKL_API.G_MISS_CHAR OR
479: p_payout_basis IS NULL)
480: THEN
481: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'payout_basis');
482: x_return_status := OKC_API.G_RET_STS_ERROR;
480: THEN
481: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'payout_basis');
482: x_return_status := OKC_API.G_RET_STS_ERROR;
483: RAISE G_EXCEPTION_HALT_VALIDATION;
484: ELSIF (p_payout_basis <> OKL_API.G_MISS_CHAR AND p_payout_basis is NOT NULL) then
485: l_exists := 'N';
486: Open l_payout_basis_csr (p_payout_basis => p_payout_basis);
487: Fetch l_payout_basis_csr into l_exists;
488: If l_payout_basis_csr%NOTFOUND then
489: Null;
490: End If;
491: Close l_payout_basis_csr;
492: IF l_exists = 'N' then
493: OKL_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'Payout Basis');
494: x_return_status := OKL_API.G_RET_STS_ERROR;
495: RAISE G_EXCEPTION_HALT_VALIDATION;
496: END IF;
497:
490: End If;
491: Close l_payout_basis_csr;
492: IF l_exists = 'N' then
493: OKL_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'Payout Basis');
494: x_return_status := OKL_API.G_RET_STS_ERROR;
495: RAISE G_EXCEPTION_HALT_VALIDATION;
496: END IF;
497:
498: END IF;
502: WHEN OTHERS THEN
503: If l_payout_basis_csr%ISOPEN then
504: close l_payout_basis_csr;
505: End If;
506: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME
507: ,p_msg_name => G_UNEXPECTED_ERROR
508: ,p_token1 => G_SQLCODE_TOKEN
509: ,p_token1_value => SQLCODE
510: ,p_token2 => G_SQLERRM_TOKEN
508: ,p_token1 => G_SQLCODE_TOKEN
509: ,p_token1_value => SQLCODE
510: ,p_token2 => G_SQLERRM_TOKEN
511: ,p_token2_value => SQLERRM);
512: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
513: END validate_payout_basis;
514:
515: ---------------------------------------------------------------------------
516: -- FUNCTION Validate_Attributes