The following lines contain the word 'select', 'insert', 'update' or 'delete':
hrdyndbi.insert_user_entity
S.Doshi 31-MAR-1999 Flexible Dates Conversion
rem 110.1 19 jun 99 i harding added ; to exit
l_record_inserted BOOLEAN;
SELECT route_id
INTO l_route_id
FROM ff_routes
WHERE route_name = upper(p_route_name);
INSERT INTO ff_routes
(route_id,
route_name,
user_defined_flag,
description,
text,
last_update_date,
last_updated_by,
last_update_login,
created_by,
creation_date)
VALUES
(ff_routes_s.nextval,
upper(p_route_name),
'N',
p_route_description,
p_route_text,
sysdate,
0,
0,
0,
sysdate);
SELECT ff_routes_s.currval
INTO l_route_id
FROM dual;
INSERT INTO ff_route_context_usages
(route_id,
context_id,
sequence_no)
select l_route_id,
FFC.context_id,
1
from ff_contexts FFC
where context_name = p_context_name1;
INSERT INTO ff_route_context_usages
(route_id,
context_id,
sequence_no)
select l_route_id,
FFC.context_id,
2
from ff_contexts FFC
where context_name = p_context_name2;
INSERT INTO ff_route_context_usages
(route_id,
context_id,
sequence_no)
select l_route_id,
FFC.context_id,
3
from ff_contexts FFC
where context_name = p_context_name3;
INSERT INTO ff_route_context_usages
(route_id,
context_id,
sequence_no)
select l_route_id,
FFC.context_id,
4
from ff_contexts FFC
where context_name = p_context_name4;
INSERT INTO ff_route_parameters
(route_parameter_id,
route_id,
sequence_no,
parameter_name,
data_type)
VALUES
(ff_route_parameters_s.nextval,
l_route_id,
1,
p_param_name1,
p_param_type1);
INSERT INTO ff_route_parameters
(route_parameter_id,
route_id,
sequence_no,
parameter_name,
data_type)
VALUES
(ff_route_parameters_s.nextval,
l_route_id,
1,
p_param_name2,
p_param_type2);
SELECT user_entity_id
INTO l_user_entity_id
FROM ff_user_entities
WHERE user_entity_name = upper(p_user_entity_name);
hrdyndbi.insert_user_entity (
p_route_name => p_route_name,
p_user_entity_name => p_user_entity_name,
p_entity_description => p_user_entity_description,
p_not_found_flag => 'Y',
p_creator_type => 'SEH',
p_creator_id => 0,
p_business_group_id => NULL,
p_legislation_code => 'US',
p_created_by => 0,
p_last_login => 0,
p_record_inserted => l_record_inserted
);
SELECT user_entity_id
INTO l_user_entity_id
FROM ff_user_entities
WHERE user_entity_name = p_user_entity_name;
IF p_param_value1 is not null AND l_record_inserted THEN
--
INSERT into ff_route_parameter_values
(route_parameter_id,
user_entity_id,
value)
SELECT route_parameter_id,
l_user_entity_id,
p_param_value1
FROM ff_route_parameters
where route_id = l_route_id
and sequence_no = 1;
IF p_param_value2 is not null AND l_record_inserted THEN
--
INSERT into ff_route_parameter_values
(route_parameter_id,
user_entity_id,
value)
SELECT route_parameter_id,
l_user_entity_id,
p_param_value2
FROM ff_route_parameters
where route_id = l_route_id
and sequence_no = 2;
IF l_record_inserted THEN
insert into ff_database_items (
user_name,
user_entity_id,
data_type,
definition_text,
null_allowed_flag,
description,
last_update_date,
last_updated_by,
last_update_login,
created_by,
creation_date)
--
values (p_name,
l_user_entity_id,
p_data_type,
p_definition_text,
p_null_allowed,
p_description,
sysdate,
0,
0,
0,
sysdate);
SELECT column_name,
decode(data_type, 'CHAR', 'T',
'VARCHAR2', 'T',
'LONG', 'N',
'LONG RAW', 'N',
'NUMBER', 'N',
'DATE', 'D',
'ROWID', 'T', 'T'),
nullable
FROM user_tab_columns
WHERE table_name = p_tab_name;
* p_definition_text => We build as 'SELECT target.'||column_name
p_user_entity_name => Use table short name, serves as "root" for dbiname.
p_user_entity_desc => Use table name.
p_route_name => We have.
p_context_name1 => We have, as well as contexts 2,3,4 if needed.
p_param_value1 => NULL
p_param_name1 => NULL
p_param_type1 => NULL
Database item names should never exceed 80 characters since table and
column names are limited to 30 characters each.
Column information can be found in the table USER_TAB_COLUMNS.
*/
OPEN get_column_details (p_table_name);
l_defn_text := 'SELECT target.'||l_column_name;