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
614: AND NVL(POH.closed_code, 'OPEN') <> 'FINALLY CLOSED'
615: AND NVL(POH.cancel_flag, 'N') <> 'Y';
616:
617: -- return a row violating the effective dates
618: x_result := FND_API.G_FALSE;
619: END IF;
620:
621: EXCEPTION
622: WHEN NO_DATA_FOUND THEN
619: END IF;
620:
621: EXCEPTION
622: WHEN NO_DATA_FOUND THEN
623: x_result := FND_API.G_TRUE; -- all line created within eff date
624: WHEN TOO_MANY_ROWS THEN
625: x_result := FND_API.G_FALSE; -- mult line created outside eff dates
626: WHEN OTHERS THEN
627: x_result := FND_API.G_FALSE;
621: EXCEPTION
622: WHEN NO_DATA_FOUND THEN
623: x_result := FND_API.G_TRUE; -- all line created within eff date
624: WHEN TOO_MANY_ROWS THEN
625: x_result := FND_API.G_FALSE; -- mult line created outside eff dates
626: WHEN OTHERS THEN
627: x_result := FND_API.G_FALSE;
628: RAISE;
629: END val_contract_eff_date;
623: x_result := FND_API.G_TRUE; -- all line created within eff date
624: WHEN TOO_MANY_ROWS THEN
625: x_result := FND_API.G_FALSE; -- mult line created outside eff dates
626: WHEN OTHERS THEN
627: x_result := FND_API.G_FALSE;
628: RAISE;
629: END val_contract_eff_date;
630:
631: --