461: FETCH C INTO Recinfo;
462: if (C%NOTFOUND) then
463: CLOSE C;
464: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
465: APP_EXCEPTION.Raise_Exception;
466: end if;
467: CLOSE C;
468: if ((Recinfo.retirement_id = X_Retirement_Id)
469: AND (Recinfo.book_type_code = X_Book_Type_Code)
614: ) then
615: return;
616: else
617: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
618: APP_EXCEPTION.Raise_Exception;
619: end if;
620: END Lock_Row;
621:
622: