32: OPEN C;
33: FETCH C INTO Recinfo;
34: if (C%NOTFOUND) then
35: CLOSE C;
36: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
37: APP_EXCEPTION.Raise_Exception;
38: end if;
39: CLOSE C;
40:
93: AND (X_Attribute6 IS NULL)))
94: ) then
95: return;
96: else
97: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
98: APP_EXCEPTION.RAISE_EXCEPTION;
99: end if;
100:
101: END Lock2_Row;