84: FETCH C INTO Recinfo;
85: if (C%NOTFOUND) then
86: CLOSE C;
87: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED'); 88: APP_EXCEPTION.Raise_Exception; 89: end if;
90: CLOSE C;
91: if (
92: (Recinfo.Method_ID = X_Method_ID)
Line 99: APP_EXCEPTION.Raise_Exception;
95: AND (Recinfo.Rate = X_Rate)) then
96: return;
97: else
98: FND_MESSAGE.set_Name('FND', 'FORM_RECORD_CHANGED'); 99: APP_EXCEPTION.Raise_Exception; 100: end if;
101:
102: end LOCK_ROW;
103: