The following lines contain the word 'select', 'insert', 'update' or 'delete':
X_LAST_UPDATE_DATE out nocopy DATE,
X_LAST_UPDATED_BY out nocopy NUMBER,
X_LAST_UPDATE_LOGIN out nocopy NUMBER
) is
begin
if X_OWNER = 'SEED' then
X_CREATED_BY := 1;
X_LAST_UPDATED_BY := 1;
X_LAST_UPDATED_BY := 0;
X_LAST_UPDATE_DATE := sysdate;
X_LAST_UPDATE_LOGIN := 0;
procedure INSERT_ROW (
X_ROWID in out nocopy VARCHAR2,
X_TEMPLATE_CANVAS_ID in NUMBER,
X_OBJECT_VERSION_NUMBER in NUMBER,
X_TEMPLATE_WINDOW_ID in NUMBER,
X_FORM_CANVAS_ID in NUMBER,
X_CREATION_DATE in DATE,
X_CREATED_BY in NUMBER,
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_LOGIN in NUMBER
) is
cursor C is select ROWID from HR_TEMPLATE_CANVASES_B
where TEMPLATE_CANVAS_ID = X_TEMPLATE_CANVAS_ID
;
insert into HR_TEMPLATE_CANVASES_B (
TEMPLATE_CANVAS_ID,
OBJECT_VERSION_NUMBER,
TEMPLATE_WINDOW_ID,
FORM_CANVAS_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
CREATED_BY,
CREATION_DATE
) values (
X_TEMPLATE_CANVAS_ID,
X_OBJECT_VERSION_NUMBER,
X_TEMPLATE_WINDOW_ID,
X_FORM_CANVAS_ID,
X_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY,
X_LAST_UPDATE_LOGIN,
X_CREATED_BY,
X_CREATION_DATE);
end INSERT_ROW;
cursor c1 is select
OBJECT_VERSION_NUMBER,
TEMPLATE_WINDOW_ID,
FORM_CANVAS_ID
from HR_TEMPLATE_CANVASES_B
where TEMPLATE_CANVAS_ID = X_TEMPLATE_CANVAS_ID
for update of TEMPLATE_CANVAS_ID nowait;
procedure UPDATE_ROW (
X_TEMPLATE_CANVAS_ID in NUMBER,
X_OBJECT_VERSION_NUMBER in NUMBER,
X_TEMPLATE_WINDOW_ID in NUMBER,
X_FORM_CANVAS_ID in NUMBER,
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_LOGIN in NUMBER
) is
begin
update HR_TEMPLATE_CANVASES_B set
OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
TEMPLATE_WINDOW_ID = X_TEMPLATE_WINDOW_ID,
FORM_CANVAS_ID = X_FORM_CANVAS_ID,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
where TEMPLATE_CANVAS_ID = X_TEMPLATE_CANVAS_ID;
end UPDATE_ROW;
procedure DELETE_ROW (
X_TEMPLATE_CANVAS_ID in NUMBER
) is
begin
delete from HR_TEMPLATE_CANVASES_B
where TEMPLATE_CANVAS_ID = X_TEMPLATE_CANVAS_ID;
end DELETE_ROW;
X_LAST_UPDATE_DATE DATE;
X_LAST_UPDATED_BY NUMBER;
X_LAST_UPDATE_LOGIN NUMBER;
X_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY,
X_LAST_UPDATE_LOGIN
);
select application_id
into x_application_id
from fnd_application
where application_short_name = x_application_short_name;
select form_id
into x_form_id
from fnd_form
where form_name = x_form_name
and application_id = x_application_id;
select form_window_id
into x_form_window_id
from hr_form_windows_b
where window_name = x_window_name
and application_id = x_application_id
and form_id = x_form_id;
select form_template_id
into x_form_template_id
from hr_form_templates_b
where ( (legislation_code is null and x_territory_short_name is null)
or (legislation_code = x_territory_short_name) )
and template_name = x_template_name
and application_id = x_application_id
and form_id = x_form_id;
select template_window_id
into x_template_window_id
from hr_template_windows_b
where form_template_id = x_form_template_id
and form_window_id = x_form_window_id;
select form_canvas_id
into x_form_canvas_id
from hr_form_canvases_b
where canvas_name = x_canvas_name
and form_window_id = x_form_window_id;
select template_canvas_id
into x_template_canvas_id
from hr_template_canvases_b
where form_canvas_id = x_form_canvas_id
and template_window_id = x_template_window_id;
select hr_template_canvases_b_s.nextval
into x_template_canvas_id
from dual;
UPDATE_ROW (
X_TEMPLATE_CANVAS_ID,
to_number(X_OBJECT_VERSION_NUMBER),
X_TEMPLATE_WINDOW_ID,
X_FORM_CANVAS_ID,
X_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY,
X_LAST_UPDATE_LOGIN
);
INSERT_ROW (
X_ROWID,
X_TEMPLATE_CANVAS_ID,
to_number(X_OBJECT_VERSION_NUMBER),
X_TEMPLATE_WINDOW_ID,
X_FORM_CANVAS_ID,
X_CREATION_DATE,
X_CREATED_BY,
X_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY,
X_LAST_UPDATE_LOGIN);