34: X_LAST_UPDATE_DATE in DATE,
35: X_LAST_UPDATED_BY in NUMBER,
36: X_LAST_UPDATE_LOGIN in NUMBER
37: ) is
38: cursor C is select ROWID from HR_FORM_CANVASES_B
39: where FORM_CANVAS_ID = X_FORM_CANVAS_ID
40: ;
41: begin
42: -- Added cursor check for Bug 5600334 to avoid unwanted inserts.
43: open c;
44: fetch c into X_ROWID;
45: if (c%notfound) then
46: close c;
47: insert into HR_FORM_CANVASES_B (
48: OBJECT_VERSION_NUMBER,
49: FORM_WINDOW_ID,
50: CANVAS_TYPE,
51: FORM_CANVAS_ID,
123: OBJECT_VERSION_NUMBER,
124: FORM_WINDOW_ID,
125: CANVAS_TYPE,
126: CANVAS_NAME
127: from HR_FORM_CANVASES_B
128: where FORM_CANVAS_ID = X_FORM_CANVAS_ID
129: for update of FORM_CANVAS_ID nowait;
130: recinfo c%rowtype;
131:
185: X_LAST_UPDATED_BY in NUMBER,
186: X_LAST_UPDATE_LOGIN in NUMBER
187: ) is
188: begin
189: update HR_FORM_CANVASES_B set
190: OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
191: FORM_WINDOW_ID = X_FORM_WINDOW_ID,
192: CANVAS_TYPE = X_CANVAS_TYPE,
193: CANVAS_NAME = X_CANVAS_NAME,
225: if (sql%notfound) then
226: raise no_data_found;
227: end if;
228:
229: delete from HR_FORM_CANVASES_B
230: where FORM_CANVAS_ID = X_FORM_CANVAS_ID;
231:
232: if (sql%notfound) then
233: raise no_data_found;
239: begin
240: delete from HR_FORM_CANVASES_TL T
241: where not exists
242: (select NULL
243: from HR_FORM_CANVASES_B B
244: where B.FORM_CANVAS_ID = T.FORM_CANVAS_ID
245: );
246:
247: update HR_FORM_CANVASES_TL T set (
341: and application_id = x_application_id;
342:
343: select hfc.form_canvas_id,hfw.form_window_id
344: into x_form_canvas_id,x_form_window_id
345: from hr_form_canvases_b hfc
346: ,hr_form_windows_b hfw
347: where hfc.canvas_name = x_canvas_name
348: and hfw.application_id = x_application_id
349: and hfw.form_id = x_form_id
411:
412: begin
413: select hfc.form_canvas_id
414: into x_form_canvas_id
415: from hr_form_canvases_b hfc
416: where hfc.canvas_name = x_canvas_name
417: and hfc.form_window_id = x_form_window_id;
418: exception
419: when no_data_found then
416: where hfc.canvas_name = x_canvas_name
417: and hfc.form_window_id = x_form_window_id;
418: exception
419: when no_data_found then
420: select hr_form_canvases_b_s.nextval
421: into x_form_canvas_id
422: from dual;
423: end;
424: