157:
158: OPEN price_diff_csr;
159:
160: -- Check if record is currently locked by someone else
161: -- ( APP_EXCEPTION.RECORD_LOCK_EXCEPTION will be thrown if fetch fails )
162: --
163: FETCH price_diff_csr INTO l_db_rec;
164:
165: -- Check if record exists
167: IF ( price_diff_csr%NOTFOUND )
168: THEN
169: CLOSE price_diff_csr;
170: FND_MESSAGE.set_name('FND','FORM_RECORD_DELETED');
171: APP_EXCEPTION.raise_exception;
172: END IF;
173:
174: -- Check if anybody has modified and committed the record from the time
175: -- the data was queried up in the form until now
197:
198: -- Data in the form is stale. Prompt user to requery data.
199: --
200: FND_MESSAGE.set_name('FND','FORM_RECORD_CHANGED');
201: APP_EXCEPTION.raise_exception;
202:
203: END IF;
204:
205: EXCEPTION