176: FETCH C INTO Recinfo;
177:
178: If (C%NOTFOUND) then
179: CLOSE C;
180: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
181: APP_EXCEPTION.RAISE_EXCEPTION;
182: End If;
183: CLOSE C;
184:
184:
185: If ( Recinfo.object_version_number = p_object_version_number ) then
186: return;
187: else
188: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
189: APP_EXCEPTION.RAISE_EXCEPTION;
190: End If;
191:
192: END Lock_Row;