[Home] [Help]
37: X_LAST_UPDATE_LOGIN in NUMBER,
38: X_START_DATE in DATE,
39: X_PERIOD_NAME in VARCHAR2
40: ) is
41: cursor C is select ROWID from AMW_ASSESSMENTS_B
42: where ASSESSMENT_ID = X_ASSESSMENT_ID;
43:
44: l_start_date DATE;
45: begin
49: else
50: l_start_date := X_START_DATE;
51: end if;
52:
53: insert into AMW_ASSESSMENTS_B (
54: ATTRIBUTE15,
55: ATTRIBUTE8,
56: ATTRIBUTE9,
57: ATTRIBUTE10,
221: ATTRIBUTE1,
222: ATTRIBUTE2,
223: START_DATE,
224: PERIOD_NAME
225: from AMW_ASSESSMENTS_B
226: where ASSESSMENT_ID = X_ASSESSMENT_ID
227: for update of ASSESSMENT_ID nowait;
228: recinfo c%rowtype;
229:
361: else
362: l_start_date := X_START_DATE;
363: end if;
364:
365: update AMW_ASSESSMENTS_B set
366: ATTRIBUTE15 = X_ATTRIBUTE15,
367: ATTRIBUTE8 = X_ATTRIBUTE8,
368: ATTRIBUTE9 = X_ATTRIBUTE9,
369: ATTRIBUTE10 = X_ATTRIBUTE10,
424: if (sql%notfound) then
425: raise no_data_found;
426: end if;
427:
428: delete from AMW_ASSESSMENTS_B
429: where ASSESSMENT_ID = X_ASSESSMENT_ID;
430:
431: if (sql%notfound) then
432: raise no_data_found;
438: begin
439: delete from AMW_ASSESSMENTS_TL T
440: where not exists
441: (select NULL
442: from AMW_ASSESSMENTS_B B
443: where B.ASSESSMENT_ID = T.ASSESSMENT_ID
444: );
445:
446: update AMW_ASSESSMENTS_TL T set (