[Home] [Help]
The following lines contain the word 'select', 'insert', 'update' or 'delete':
select 1 into dummy from dual
where not exists
(select 1 from rg_report_display_sets
where name = X_name
and ((X_rowid IS NULL) OR (rowid <> X_rowid)));
select 1 into dummy from dual
where not exists
(select 1 from rg_reports
where report_display_set_id = X_report_display_set_id);
select 1 into dummy from dual
where not exists
(select 1
from rg_report_displays
where report_display_set_id = X_report_display_set_id);
select 1 into dummy from dual
where not exists
(select 1
from rg_report_displays dpo,
rg_report_display_groups dpg
where dpo.row_group_id = dpg.report_display_group_id
and dpo.report_display_set_id = X_report_display_set_id
and dpg.row_set_id = nvl(X_row_set_id_saved,-1)
and X_rowid IS NOT NULL);
select 1 into dummy from dual
where not exists
(select 1
from rg_reports
where report_display_set_id = X_report_display_set_id
and row_set_id = nvl(X_row_set_id_saved,row_set_id)
and row_set_id <> nvl(X_row_set_id,row_set_id)
and X_rowid IS NOT NULL);
select 1 into dummy from dual
where not exists
(select 1
from rg_report_displays dpo,
rg_report_display_groups dpg
where dpo.column_group_id = dpg.report_display_group_id
and dpo.report_display_set_id = X_report_display_set_id
and dpg.column_set_id = nvl(X_column_set_id_saved,-1)
and X_rowid IS NOT NULL);
select 1 into dummy from dual
where not exists
(select 1
from rg_reports
where report_display_set_id = X_report_display_set_id
and column_set_id = nvl(X_column_set_id_saved,column_set_id)
and column_set_id <> nvl(X_column_set_id,column_set_id)
and X_rowid IS NOT NULL);
select rg_report_display_sets_s.nextval
into next_id
from dual;
PROCEDURE insert_row(X_rowid IN OUT NOCOPY VARCHAR2,
X_report_display_set_id NUMBER,
X_name VARCHAR2,
X_description VARCHAR2,
X_row_set_id NUMBER,
X_column_set_id NUMBER,
X_creation_date DATE,
X_created_by NUMBER,
X_last_update_date DATE,
X_last_updated_by NUMBER,
X_last_update_login NUMBER,
X_context VARCHAR2,
X_attribute1 VARCHAR2,
X_attribute2 VARCHAR2,
X_attribute3 VARCHAR2,
X_attribute4 VARCHAR2,
X_attribute5 VARCHAR2,
X_attribute6 VARCHAR2,
X_attribute7 VARCHAR2,
X_attribute8 VARCHAR2,
X_attribute9 VARCHAR2,
X_attribute10 VARCHAR2,
X_attribute11 VARCHAR2,
X_attribute12 VARCHAR2,
X_attribute13 VARCHAR2,
X_attribute14 VARCHAR2,
X_attribute15 VARCHAR2) IS
CURSOR C IS SELECT rowid FROM rg_report_display_sets
WHERE report_display_set_id = X_report_display_set_id;
INSERT INTO rg_report_display_sets
(report_display_set_id ,
name ,
description ,
row_set_id ,
column_set_id ,
creation_date ,
created_by ,
last_update_date ,
last_updated_by ,
last_update_login ,
context ,
attribute1 ,
attribute2 ,
attribute3 ,
attribute4 ,
attribute5 ,
attribute6 ,
attribute7 ,
attribute8 ,
attribute9 ,
attribute10 ,
attribute11 ,
attribute12 ,
attribute13 ,
attribute14 ,
attribute15 )
VALUES
(X_report_display_set_id ,
X_name ,
X_description ,
X_row_set_id ,
X_column_set_id ,
X_creation_date ,
X_created_by ,
X_last_update_date ,
X_last_updated_by ,
X_last_update_login ,
X_context ,
X_attribute1 ,
X_attribute2 ,
X_attribute3 ,
X_attribute4 ,
X_attribute5 ,
X_attribute6 ,
X_attribute7 ,
X_attribute8 ,
X_attribute9 ,
X_attribute10 ,
X_attribute11 ,
X_attribute12 ,
X_attribute13 ,
X_attribute14 ,
X_attribute15 );
END insert_row;
SELECT *
FROM rg_report_display_sets
WHERE rowid = X_rowid
FOR UPDATE OF name NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
PROCEDURE update_row(X_rowid IN OUT NOCOPY VARCHAR2,
X_report_display_set_id NUMBER,
X_name VARCHAR2,
X_description VARCHAR2,
X_row_set_id NUMBER,
X_column_set_id NUMBER,
X_last_update_date DATE,
X_last_updated_by NUMBER,
X_last_update_login NUMBER,
X_context VARCHAR2,
X_attribute1 VARCHAR2,
X_attribute2 VARCHAR2,
X_attribute3 VARCHAR2,
X_attribute4 VARCHAR2,
X_attribute5 VARCHAR2,
X_attribute6 VARCHAR2,
X_attribute7 VARCHAR2,
X_attribute8 VARCHAR2,
X_attribute9 VARCHAR2,
X_attribute10 VARCHAR2,
X_attribute11 VARCHAR2,
X_attribute12 VARCHAR2,
X_attribute13 VARCHAR2,
X_attribute14 VARCHAR2,
X_attribute15 VARCHAR2) IS
BEGIN
UPDATE rg_report_display_sets
SET report_display_set_id = X_report_display_set_id ,
name = X_name ,
description = X_description ,
row_set_id = X_row_set_id ,
column_set_id = X_column_set_id ,
last_update_date = X_last_update_date ,
last_updated_by = X_last_updated_by ,
last_update_login = X_last_update_login ,
context = X_context ,
attribute1 = X_attribute1 ,
attribute2 = X_attribute2 ,
attribute3 = X_attribute3 ,
attribute4 = X_attribute4 ,
attribute5 = X_attribute5 ,
attribute6 = X_attribute6 ,
attribute7 = X_attribute7 ,
attribute8 = X_attribute8 ,
attribute9 = X_attribute9 ,
attribute10 = X_attribute10 ,
attribute11 = X_attribute11 ,
attribute12 = X_attribute12 ,
attribute13 = X_attribute13 ,
attribute14 = X_attribute14 ,
attribute15 = X_attribute15
WHERE rowid = X_rowid;
END update_row;
PROCEDURE delete_row(X_rowid VARCHAR2) IS
BEGIN
DELETE FROM rg_report_display_sets
WHERE rowid = X_rowid;
END delete_row;