29: X_LAST_UPDATE_DATE in DATE,
30: X_LAST_UPDATED_BY in NUMBER,
31: X_LAST_UPDATE_LOGIN in NUMBER
32: ) is
33: cursor C is select ROWID from AHL_VWP_STAGES_B
34: where STAGE_ID = X_STAGE_ID
35: ;
36: begin
37: insert into AHL_VWP_STAGES_B (
33: cursor C is select ROWID from AHL_VWP_STAGES_B
34: where STAGE_ID = X_STAGE_ID
35: ;
36: begin
37: insert into AHL_VWP_STAGES_B (
38: ATTRIBUTE3,
39: ATTRIBUTE4,
40: ATTRIBUTE5,
41: ATTRIBUTE6,
172: OBJECT_VERSION_NUMBER,
173: ATTRIBUTE_CATEGORY,
174: ATTRIBUTE1,
175: ATTRIBUTE2
176: from AHL_VWP_STAGES_B
177: where STAGE_ID = X_STAGE_ID
178: for update of STAGE_ID nowait;
179: recinfo c%rowtype;
180:
280: X_LAST_UPDATED_BY in NUMBER,
281: X_LAST_UPDATE_LOGIN in NUMBER
282: ) is
283: begin
284: update AHL_VWP_STAGES_B set
285: ATTRIBUTE3 = X_ATTRIBUTE3,
286: ATTRIBUTE4 = X_ATTRIBUTE4,
287: ATTRIBUTE5 = X_ATTRIBUTE5,
288: ATTRIBUTE6 = X_ATTRIBUTE6,
335: if (sql%notfound) then
336: raise no_data_found;
337: end if;
338:
339: delete from AHL_VWP_STAGES_B
340: where STAGE_ID = X_STAGE_ID;
341:
342: if (sql%notfound) then
343: raise no_data_found;
349: begin
350: delete from AHL_VWP_STAGES_TL T
351: where not exists
352: (select NULL
353: from AHL_VWP_STAGES_B B
354: where B.STAGE_ID = T.STAGE_ID
355: );
356:
357: update AHL_VWP_STAGES_TL T set (