The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT child_display_code
FROM gcs_hier_members_t
WHERE parent_display_code = child_display_code
AND sequence_num = p_sequence_num;
DELETE FROM GCS_EPB_LEVELS_GT;
INSERT INTO GCS_EPB_LEVELS_GT
( dim_display_code, dim_value_set_display_code, dim_group_display_code, dim_group_level)
SELECT DISTINCT hier.parent_display_code, hier.parent_vs_display_code, p_dimension || level*100, level*100
FROM GCS_HIER_MEMBERS_T hier
WHERE hier.sequence_num = p_sequence_num
START WITH hier.parent_display_code = parent
AND hier.child_display_code <> parent
CONNECT BY PRIOR hier.child_display_code = hier.parent_display_code;
SELECT max(dim_group_level) + 100
INTO max_depth
FROM GCS_EPB_LEVELS_GT;
INSERT INTO GCS_EPB_LEVELS_GT
( dim_display_code, dim_value_set_display_code, dim_group_display_code, dim_group_level )
SELECT DISTINCT hier.child_display_code, hier.child_vs_display_code, p_dimension || max_depth, max_depth
FROM GCS_HIER_MEMBERS_T hier
WHERE hier.sequence_num = p_sequence_num
AND child_display_code NOT IN
( SELECT parent_display_code
FROM GCS_HIER_MEMBERS_T
WHERE sequence_num = p_sequence_num );
SELECT dimension_id
INTO l_dim_id
FROM FEM_DIMENSIONS_B
WHERE dimension_varchar_label = p_dimension;
DELETE FROM fem_dimension_grps_b_t
WHERE dimension_varchar_label = p_dimension
AND dimension_group_display_code IN
( SELECT dimension_group_display_code FROM GCS_EPB_LEVELS_GT );
DELETE FROM fem_dimension_grps_tl_t
WHERE dimension_varchar_label = p_dimension
AND dimension_group_display_code IN
( SELECT dimension_group_display_code FROM GCS_EPB_LEVELS_GT );
INSERT INTO fem_dimension_grps_b_t
(dimension_group_display_code,
dimension_varchar_label,
dimension_group_seq,
status)
SELECT DISTINCT
dim_group_display_code,
p_dimension,
dim_group_level,
'LOAD'
FROM GCS_EPB_LEVELS_GT;
INSERT INTO fem_dimension_grps_tl_t
(dimension_group_display_code,
language,
dimension_group_name,
description,
status,
dimension_varchar_label)
SELECT DISTINCT
dim_group_display_code,
userenv('LANG'),
dim_group_display_code,
dim_group_display_code,
'LOAD',
p_dimension
FROM GCS_EPB_LEVELS_GT;
stmt := 'SELECT count(*)
FROM ' || l_btable || ' dimb, fem_dimension_grps_b dimgrpb, gcs_epb_levels_gt tempsp, fem_value_sets_b val
WHERE nvl(dimb.dimension_group_id, dimgrpb.dimension_group_id) <> dimgrpb.dimension_group_id
AND tempsp.dim_group_display_code = dimgrpb.dimension_group_display_code
AND tempsp.dim_display_code = dimb.' || l_displaycol || ' AND dimb.value_set_id = val.value_set_id AND val.value_set_display_code = tempsp.dim_value_set_display_code ';
DELETE FROM fem_hier_dim_grps_t
WHERE hierarchy_object_name = p_hierarchy_name
AND dimension_group_display_code IN
( SELECT dimension_group_display_code FROM GCS_EPB_LEVELS_GT );
INSERT INTO fem_hier_dim_grps_t (
hierarchy_object_name,
language,
status,
dimension_group_display_code)
SELECT DISTINCT p_hierarchy_name,
USERENV('LANG'),
'LOAD',
levelgt.dim_group_display_code
FROM GCS_EPB_LEVELS_GT levelgt;
stmt := 'UPDATE ' || l_btable || ' dimb SET dimb.dimension_group_id =
(SELECT grp.dimension_group_id
FROM GCS_EPB_LEVELS_GT hier, FEM_VALUE_SETS_B val, FEM_DIMENSION_GRPS_B grp
WHERE grp.dimension_group_display_code = hier.dim_group_display_code
AND hier.dim_value_set_display_code = val.value_set_display_code
AND val.value_set_id = dimb.value_set_id
AND hier.dim_display_code = dimb.' || l_displaycol || ')
WHERE dimb.' || l_displaycol || ' IN
( SELECT dim_display_code FROM GCS_EPB_LEVELS_GT)
AND dimb.value_set_id IN
( SELECT val2.value_set_id
FROM GCS_EPB_LEVELS_GT hier2, FEM_VALUE_SETS_B val2
WHERE hier2.dim_value_set_display_code = val2.value_set_display_code) ';
FND_FILE.PUT_LINE(FND_FILE.LOG, 'Gcs_Create_Levels : Update rows = ' || to_char(SQL%ROWCOUNT));