140: FETCH C INTO Recinfo;
141: if (C%NOTFOUND) then
142: CLOSE C;
143: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
144: APP_EXCEPTION.Raise_Exception;
145: end if;
146: CLOSE C;
147: if not (
148: ( (Recinfo.transaction_header_id = X_Transaction_Header_Id)
479: end if;
480: exception
481: WHEN RECORD_CHANGED then
482: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
483: APP_EXCEPTION.Raise_Exception;
484: WHEN OTHERS then
485: raise;
486: END Lock_Row;
487: