587:
588: -- if contract is not created or no eff date is specified, there
589: -- is no need to check
590:
591: x_result := FND_API.G_TRUE;
592: ELSE
593:
594: -- SQL What: Return lines that reference the contract, but creation
595: -- date of their headers are not within effective dates
610: AND NVL(POH.closed_code, 'OPEN') <> 'FINALLY CLOSED'
611: AND NVL(POH.cancel_flag, 'N') <> 'Y';
612:
613: -- return a row violating the effective dates
614: x_result := FND_API.G_FALSE;
615: END IF;
616:
617: EXCEPTION
618: WHEN NO_DATA_FOUND THEN
615: END IF;
616:
617: EXCEPTION
618: WHEN NO_DATA_FOUND THEN
619: x_result := FND_API.G_TRUE; -- all line created within eff date
620: WHEN TOO_MANY_ROWS THEN
621: x_result := FND_API.G_FALSE; -- mult line created outside eff dates
622: WHEN OTHERS THEN
623: x_result := FND_API.G_FALSE;
617: EXCEPTION
618: WHEN NO_DATA_FOUND THEN
619: x_result := FND_API.G_TRUE; -- all line created within eff date
620: WHEN TOO_MANY_ROWS THEN
621: x_result := FND_API.G_FALSE; -- mult line created outside eff dates
622: WHEN OTHERS THEN
623: x_result := FND_API.G_FALSE;
624: RAISE;
625: END val_contract_eff_date;
619: x_result := FND_API.G_TRUE; -- all line created within eff date
620: WHEN TOO_MANY_ROWS THEN
621: x_result := FND_API.G_FALSE; -- mult line created outside eff dates
622: WHEN OTHERS THEN
623: x_result := FND_API.G_FALSE;
624: RAISE;
625: END val_contract_eff_date;
626:
627: --