514: FETCH C INTO Recinfo;
515: If (C%NOTFOUND) then
516: CLOSE C;
517: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
518: APP_EXCEPTION.RAISE_EXCEPTION;
519: End If;
520: CLOSE C;
521: if (
522: ( ( Recinfo.PARTY_ID = x_PARTY_ID)
744: ) then
745: return;
746: else
747: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
748: APP_EXCEPTION.RAISE_EXCEPTION;
749: End If;
750: END Lock_Row;
751:
752: END FEM_PARTY_PROFITABILITY_PKG;