[Home] [Help]
The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row( row_id IN OUT NOCOPY VARCHAR2,
structure_name VARCHAR2,
description VARCHAR2,
table_use_type_code VARCHAR2,
last_update_date DATE,
last_updated_by NUMBER,
last_update_login NUMBER,
creation_date DATE,
created_by NUMBER) IS
CURSOR struct_row IS
SELECT rowid
FROM gcs_lex_map_structs ms
WHERE ms.structure_name = insert_row.structure_name;
INSERT INTO gcs_lex_map_structs( structure_id,
structure_name,
description,
table_use_type_code,
last_update_date,
last_updated_by,
last_update_login,
creation_date,
created_by)
SELECT gcs_lex_map_structs_s.nextval,
structure_name,
description,
table_use_type_code,
last_update_date,
last_updated_by,
last_update_login,
creation_date,
created_by
FROM dual
WHERE NOT EXISTS
(SELECT 1
FROM gcs_lex_map_structs ms
WHERE ms.structure_name = insert_row.structure_name);
END Insert_Row;
PROCEDURE Update_Row( structure_name VARCHAR2,
description VARCHAR2,
table_use_type_code VARCHAR2,
last_update_date DATE,
last_updated_by NUMBER,
last_update_login NUMBER) IS
BEGIN
UPDATE gcs_lex_map_structs ms
SET description = update_row.description,
table_use_type_code = update_row.table_use_type_code,
last_update_date = update_row.last_update_date,
last_updated_by = update_row.last_updated_by,
last_update_login = update_row.last_update_login
WHERE ms.structure_name = update_row.structure_name;
END Update_Row;
last_update_date VARCHAR2,
description VARCHAR2,
table_use_type_code VARCHAR2,
custom_mode VARCHAR2) IS
row_id VARCHAR2(64);
f_ludate DATE; -- entity update date in file
db_ludate DATE; -- entity update date in db
f_ludate := nvl(to_date(last_update_date, 'YYYY/MM/DD'), sysdate);
SELECT ms.last_updated_by, ms.last_update_date
INTO db_luby, db_ludate
FROM GCS_LEX_MAP_STRUCTS ms
WHERE ms.structure_name = load_row.structure_name;
update_row( structure_name => structure_name,
description => description,
table_use_type_code => table_use_type_code,
last_update_date => f_ludate,
last_updated_by => f_luby,
last_update_login => 0);
insert_row( row_id => row_id,
structure_name => structure_name,
description => description,
table_use_type_code => table_use_type_code,
last_update_date => f_ludate,
last_updated_by => f_luby,
last_update_login => 0,
creation_date => f_ludate,
created_by => f_luby);
last_update_date VARCHAR2,
custom_mode VARCHAR2) IS
f_luby NUMBER; -- entity owner in file
f_ludate DATE; -- entity update date in file
db_ludate DATE; -- entity update date in db
f_ludate := nvl(to_date(last_update_date, 'YYYY/MM/DD'), sysdate);
SELECT ms.last_updated_by, ms.last_update_date
INTO db_luby, db_ludate
FROM GCS_LEX_MAP_STRUCTS ms
WHERE ms.structure_name = translate_row.structure_name;
UPDATE gcs_lex_map_structs ms
SET last_update_date = f_ludate,
last_updated_by = f_luby,
last_update_login = 0
WHERE ms.structure_name = translate_row.structure_name;