161: WHERE rowid = X_Rowid
162: FOR UPDATE of Cobra_Coverage_Benefit_Id NOWAIT;
163: Recinfo C%ROWTYPE;
164: BEGIN
165: -- hr_utility.trace_on;
166: hr_utility.set_location('ccb on lock', 1);
167: OPEN C;
168: hr_utility.set_location('ccb on lock', 2);
169: FETCH C INTO Recinfo;
162: FOR UPDATE of Cobra_Coverage_Benefit_Id NOWAIT;
163: Recinfo C%ROWTYPE;
164: BEGIN
165: -- hr_utility.trace_on;
166: hr_utility.set_location('ccb on lock', 1);
167: OPEN C;
168: hr_utility.set_location('ccb on lock', 2);
169: FETCH C INTO Recinfo;
170: if (C%NOTFOUND) then
164: BEGIN
165: -- hr_utility.trace_on;
166: hr_utility.set_location('ccb on lock', 1);
167: OPEN C;
168: hr_utility.set_location('ccb on lock', 2);
169: FETCH C INTO Recinfo;
170: if (C%NOTFOUND) then
171: CLOSE C;
172: hr_utility.set_location('ccb on lock', 3);
168: hr_utility.set_location('ccb on lock', 2);
169: FETCH C INTO Recinfo;
170: if (C%NOTFOUND) then
171: CLOSE C;
172: hr_utility.set_location('ccb on lock', 3);
173: RAISE NO_DATA_FOUND;
174: end if;
175: hr_utility.set_location('ccb on lock', 4);
176: CLOSE C;
171: CLOSE C;
172: hr_utility.set_location('ccb on lock', 3);
173: RAISE NO_DATA_FOUND;
174: end if;
175: hr_utility.set_location('ccb on lock', 4);
176: CLOSE C;
177: --
178: -- Ensure that we're not tricked into thinking the record has
179: -- changed if the user has inserted using sqlplus leaving trailing spaces
294: AND ( (Recinfo.attribute20 = X_Attribute20)
295: OR ( (Recinfo.attribute20 IS NULL)
296: AND (X_Attribute20 IS NULL)))
297: ) then
298: hr_utility.set_location('ccb on lock', 5);
299: return;
300: else
301: hr_utility.set_location('ccb on lock', 6);
302: hr_utility.set_message(0, 'FORM_RECORD_CHANGED');
297: ) then
298: hr_utility.set_location('ccb on lock', 5);
299: return;
300: else
301: hr_utility.set_location('ccb on lock', 6);
302: hr_utility.set_message(0, 'FORM_RECORD_CHANGED');
303: hr_utility.raise_error;
304: end if;
305: END Lock_Row;
298: hr_utility.set_location('ccb on lock', 5);
299: return;
300: else
301: hr_utility.set_location('ccb on lock', 6);
302: hr_utility.set_message(0, 'FORM_RECORD_CHANGED');
303: hr_utility.raise_error;
304: end if;
305: END Lock_Row;
306:
299: return;
300: else
301: hr_utility.set_location('ccb on lock', 6);
302: hr_utility.set_message(0, 'FORM_RECORD_CHANGED');
303: hr_utility.raise_error;
304: end if;
305: END Lock_Row;
306:
307: PROCEDURE Update_Row(X_Rowid VARCHAR2,