113:
114: if (C%NOTFOUND) then
115: CLOSE C;
116: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
117: APP_EXCEPTION.Raise_Exception;
118: end if;
119: CLOSE C;
120:
121: if (
132: ) then
133: return;
134: else
135: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
136: APP_EXCEPTION.Raise_Exception;
137: end if;
138: END Lock_Row;
139:
140: PROCEDURE Update_Row( X_deprn_basis_rule_id NUMBER,