[Home] [Help]
141: FETCH C INTO Recinfo;
142: IF (C%NOTFOUND) THEN
143: CLOSE C;
144: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
145: APP_EXCEPTION.Raise_Exception;
146: END IF;
147: CLOSE C;
148:
149: IF (
187: ) THEN
188: return;
189: ELSE
190: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
191: APP_EXCEPTION.Raise_Exception;
192: END IF;
193: END Lock_Row;
194:
195: BEGIN