[Home] [Help]
The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT fvt.application_table_name INTO l_tab_name
FROM fnd_flex_validation_tables fvt,
fnd_flex_value_sets fvs
WHERE fvs.flex_value_set_id = X_vs_id
AND fvs.validation_type = 'F'
AND fvt.flex_value_set_id = fvs.flex_value_set_id;
select flex_value_set_name into l_vs_name
from fnd_flex_value_sets
where flex_value_set_id = p_vs_id;
select flex_value into l_flex_value
from fnd_flex_values
where flex_value_id = p_flex_value_id;
SELECT MASTER_VALUE_SET_ID, DBI_HIER_TOP_NODE,
DBI_HIER_TOP_NODE_ID,
DBI_ENABLED_FLAG
INTO G_MASTER_VALUE_SET_ID, G_TOP_NODE_VALUE,
G_TOP_NODE_ID, G_DBI_ENABLED_FLAG
FROM FII_FINANCIAL_DIMENSIONS
WHERE DIMENSION_SHORT_NAME = 'FII_COMPANIES';
select distinct child_flex_value_set_id
from FII_DIM_NORM_HIERARCHY
where parent_flex_value_set_id = G_MASTER_VALUE_SET_ID
and parent_flex_value_set_id <> child_flex_value_set_id
and child_flex_value_set_id IN
(select map.flex_value_set_id1
from fii_dim_mapping_rules map,
fii_slg_assignments sts,
fii_source_ledger_groups slg
where map.dimension_short_name = 'FII_COMPANIES'
and map.chart_of_accounts_id = sts.chart_of_accounts_id
and sts.source_ledger_group_id = slg.source_ledger_group_id
and slg.usage_code = 'DBI');
g_phase := 'insert records for the master value set';
Insert into FII_DIM_NORM_HIER_GT (
PARENT_FLEX_VALUE_SET_ID,
PARENT_FLEX_VALUE,
RANGE_ATTRIBUTE,
CHILD_FLEX_VALUE_SET_ID,
CHILD_FLEX_VALUE_LOW,
CHILD_FLEX_VALUE_HIGH)
Select
FLEX_VALUE_SET_ID,
PARENT_FLEX_VALUE,
RANGE_ATTRIBUTE,
FLEX_VALUE_SET_ID,
CHILD_FLEX_VALUE_LOW,
CHILD_FLEX_VALUE_HIGH
From FND_FLEX_VALUE_NORM_HIERARCHY
Where flex_value_set_id = G_MASTER_VALUE_SET_ID;
Insert into FII_DIM_NORM_HIER_GT (
PARENT_FLEX_VALUE_SET_ID,
PARENT_FLEX_VALUE,
RANGE_ATTRIBUTE,
CHILD_FLEX_VALUE_SET_ID,
CHILD_FLEX_VALUE_LOW,
CHILD_FLEX_VALUE_HIGH)
Select
PARENT_FLEX_VALUE_SET_ID,
PARENT_FLEX_VALUE,
RANGE_ATTRIBUTE,
CHILD_FLEX_VALUE_SET_ID,
CHILD_FLEX_VALUE_LOW,
CHILD_FLEX_VALUE_HIGH
From FII_DIM_NORM_HIERARCHY
Where PARENT_FLEX_VALUE_SET_ID <> CHILD_FLEX_VALUE_SET_ID
AND PARENT_FLEX_VALUE_SET_ID = G_MASTER_VALUE_SET_ID
And CHILD_FLEX_VALUE_SET_ID IN
(select map.flex_value_set_id1
from fii_dim_mapping_rules map,
fii_slg_assignments sts,
fii_source_ledger_groups slg
where map.dimension_short_name = 'FII_COMPANIES'
and map.chart_of_accounts_id = sts.chart_of_accounts_id
and sts.source_ledger_group_id = slg.source_ledger_group_id
and slg.usage_code = 'DBI');
g_phase := 'Insert records for all local (child) value sets';
Insert into FII_DIM_NORM_HIER_GT (
PARENT_FLEX_VALUE_SET_ID,
PARENT_FLEX_VALUE,
RANGE_ATTRIBUTE,
CHILD_FLEX_VALUE_SET_ID,
CHILD_FLEX_VALUE_LOW,
CHILD_FLEX_VALUE_HIGH)
Select
FLEX_VALUE_SET_ID,
PARENT_FLEX_VALUE,
RANGE_ATTRIBUTE,
FLEX_VALUE_SET_ID,
CHILD_FLEX_VALUE_LOW,
CHILD_FLEX_VALUE_HIGH
From FND_FLEX_VALUE_NORM_HIERARCHY
Where flex_value_set_id = l_vset_id;
SELECT count(parent_company_id) parents,
child_company_id flex_value_id
FROM FII_company_HIER_GT
WHERE next_level_company_id = child_company_id
AND parent_level = next_level - 1
GROUP BY child_company_id
HAVING count(parent_company_id) > 1;
SELECT parent_company_id,
parent_flex_value_set_id,
child_company_id,
child_flex_value_set_id
FROM FII_company_HIER_GT
WHERE child_company_id = p_child_value_id
AND next_level_company_id = child_company_id
AND parent_level = next_level - 1;
PROCEDURE INSERT_IMM_CHILD_NODES
(p_vset_id NUMBER, p_root_node VARCHAR2) IS
CURSOR direct_children_csr (p_parent_vs_id NUMBER, p_parent_node VARCHAR2)
IS
SELECT ffv.flex_value_id, ffv.flex_value, ffv.flex_value_set_id, attribute_sort_order sort_order
FROM FII_DIM_NORM_HIER_GT ffvnh,
fnd_flex_values ffv
WHERE ffvnh.child_flex_value_set_id = ffv.flex_value_set_id
AND (ffv.flex_value BETWEEN ffvnh.child_flex_value_low
AND ffvnh.child_flex_value_high)
AND ((ffvnh.range_attribute = 'P' and ffv.summary_flag = 'Y') OR
(ffvnh.range_attribute = 'C' and ffv.summary_flag = 'N'))
AND ffvnh.parent_flex_value = p_parent_node
AND ffvnh.parent_flex_value_set_id = p_parent_vs_id;
select flex_value_id, attribute_sort_order into l_flex_value_id, l_sort_order
from fnd_flex_values
where flex_value_set_id = p_vset_id
and flex_value = p_root_node;
/* Inserting parent in a gt table: FII_DIM_HIER_HELP_GT */
g_index := g_index+1;
insert into FII_DIM_HIER_HELP_GT
( IDX,
FLEX_VALUE_ID,
FLEX_VALUE_SET_ID,
NEXT_LEVEL_FLEX_VALUE_ID, SORT_ORDER)
values
( g_index,
l_flex_value_id,
l_flex_value_set_id,
l_flex_value_id, l_sort_order);
update FII_DIM_HIER_HELP_GT
set NEXT_LEVEL_FLEX_VALUE_ID= l_flex_value_id,
SORT_ORDER= l_sort_order
where IDX = g_index - 1;
/* Inserting record with all parents */
INSERT INTO fii_company_hier_gt (
parent_level,
parent_company_id,
child_company_id,
next_level,
child_level,
next_level_is_leaf_flag,
is_leaf_flag,
parent_flex_value_Set_id,
child_flex_value_set_id,
next_level_company_id,
next_level_company_sort_order)
SELECT pp.idx,
pp.flex_value_id,
direct_children_rec.flex_value_id,
pp.idx + 1,
g_index + 1,
'N',
'N',
pp.flex_value_set_id,
direct_children_rec.flex_value_set_id,
decode(pp.idx, g_index,
direct_children_rec.flex_value_id,
pp.next_level_flex_value_id),
decode(pp.idx, g_index,
direct_children_rec.sort_order,
pp.sort_order)
FROM FII_DIM_HIER_HELP_GT pp;
INSERT_IMM_CHILD_NODES (direct_children_rec.flex_value_set_id,
direct_children_rec.flex_value);
delete from FII_DIM_HIER_HELP_GT where idx = g_index;
FII_UTIL.Write_Log ('Insert Immediate child: No Data Found');
(func_name => 'FII_COM_MAINTAIN_PKG.Insert_Imm_Child_Nodes');
(func_name => 'FII_COM_MAINTAIN_PKG.INSERT_IMM_CHILD_NODES');
END INSERT_IMM_CHILD_NODES;
SELECT parent_level, parent_company_id, next_level, next_level_company_id,
child_level, child_company_id, child_flex_value_set_id,
parent_flex_value_set_id
FROM fii_company_hier_gt
ORDER BY parent_level, child_level;
SELECT flex_value_id INTO p_parent_id
FROM FND_FLEX_VALUES
WHERE flex_value_set_id = p_vset_id
AND flex_value = p_root_node;
g_phase := 'insert top node self row and invoke Ins_Imm_Child_nodes';
INSERT_IMM_CHILD_NODES (p_vset_id, p_root_node);
insert into fii_COMPANY_hier_gt (
parent_level,
parent_company_id,
next_level,
next_level_company_id,
child_level,
child_company_id,
child_flex_value_set_id,
parent_flex_value_set_id,
next_level_is_leaf_flag,
is_leaf_flag)
select
child_level,
child_company_id,
child_level,
child_company_id,
child_level,
child_company_id,
child_flex_value_set_id,
child_flex_value_set_id,
'N',
'N'
from (select distinct child_company_id,child_level,child_flex_value_set_id from fii_company_hier_gt);
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into fii_company_hier_gt');
INSERT INTO fii_COMPANY_hier_gt
(parent_level,
parent_company_id,
next_level,
next_level_company_id,
child_level,
child_company_id,
child_flex_value_set_id,
parent_flex_value_set_id,
next_level_is_leaf_flag,
is_leaf_flag)
VALUES
(1,
p_parent_id,
1,
p_parent_id,
1,
p_parent_id,
p_vset_id,
CODIM_parent_vset_id,
'N',
'N');
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into fii_company_hier_gt');
g_phase := 'Insert the UNASSIGNED to the hierarchy table';
INSERT INTO fii_COMPANY_hier_gt
(parent_level,
parent_company_id,
next_level,
next_level_company_id,
child_level,
child_company_id,
child_flex_value_set_id,
parent_flex_value_set_id,
next_level_is_leaf_flag,
is_leaf_flag)
VALUES (
1,
G_TOP_NODE_ID,
2,
G_UNASSIGNED_CO_ID,
2,
G_UNASSIGNED_CO_ID,
G_FII_INT_VALUE_SET_ID,
G_MASTER_VALUE_SET_ID,
'N',
'N');
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into fii_company_hier_gt');
INSERT INTO fii_COMPANY_hier_gt
(parent_level,
parent_company_id,
next_level,
next_level_company_id,
child_level,
child_company_id,
child_flex_value_set_id,
parent_flex_value_set_id,
next_level_is_leaf_flag,
is_leaf_flag)
VALUES (
2,
G_UNASSIGNED_CO_ID,
2,
G_UNASSIGNED_CO_ID,
2,
G_UNASSIGNED_CO_ID,
G_FII_INT_VALUE_SET_ID,
G_FII_INT_VALUE_SET_ID,
'N',
'N');
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into fii_company_hier_gt');
g_phase := 'Insert a dummy top node (-999) to the hierarchy table';
INSERT INTO fii_COMPANY_hier_gt
(parent_level,
parent_company_id,
next_level,
next_level_company_id,
child_level,
child_company_id,
child_flex_value_set_id,
parent_flex_value_set_id,
next_level_is_leaf_flag,
is_leaf_flag)
SELECT
0,
-999,
1,
G_TOP_NODE_ID,
child_level,
child_company_id,
child_flex_value_set_id,
-998,
'N',
'N'
FROM fii_COMPANY_hier_gt
WHERE child_company_id = parent_company_id;
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into fii_company_hier_gt');
CURSOR pre_dep_cur IS SELECT * FROM
( -- normalized parent-child relationship (one-level)
select parent_company_id pid
, child_company_id cid
, child_level clv
, child_flex_value_set_id cvs
, is_leaf_flag clf
from fii_company_hier_gt
where parent_level + 1 = child_level
--and child_flex_value_set_id = G_MASTER_VALUE_SET_ID
union all
select NULL, -999, 0, -998, 'N'
from dual
)
START WITH pid is null
CONNECT BY pid = PRIOR cid
ORDER siblings BY cid;
-- We want to update the newly introduced level columns for BI - 2006
----------------------------------------------------------------------
FOR pre_dep_rec IN pre_dep_cur LOOP
-- put (pop/push) the new child value on the stack
c_top := pre_dep_rec.clv;
update fii_company_hier_gt
set LEVEL2_COMPANY_ID = r_stack( least( p_top + 2, c_top+1 ) ).cid
, LEVEL3_COMPANY_ID = r_stack( least( p_top + 3, c_top+1 ) ).cid
, LEVEL4_COMPANY_ID = r_stack( least( p_top + 4, c_top+1 ) ).cid
, LEVEL5_COMPANY_ID = r_stack( least( p_top + 5, c_top+1 ) ).cid
where parent_company_id = r_stack( p_top+1 ).cid
and child_company_id = r_stack( c_top+1 ).cid;
g_phase := 'Delete FII_company_HIER_GT #1';
Delete from FII_COMPANY_HIER_GT
Where child_flex_value_set_id <> G_MASTER_VALUE_SET_ID
And child_flex_value_set_id <> G_FII_INT_VALUE_SET_ID;
FII_UTIL.Write_Log('Deleted ' || SQL%ROWCOUNT || ' rows form FII_COMPANY_HIER_GT');
g_phase := 'Update next_level_is_leaf_flag, is_leaf_flag';
Update fii_company_hier_gt tab1
Set next_level_is_leaf_flag = 'Y'
Where tab1.next_level_company_id = tab1.child_company_id
and tab1.next_level_company_id IN (
select /*+ ordered */ tab3.next_level_company_id
from fii_company_hier_gt tab3,
fii_company_hier_gt tab2
where tab2.parent_company_id = tab3.parent_company_id
and tab3.parent_company_id = tab3.child_company_id
group by tab3.next_level_company_id
having count(*) = 1);
FII_UTIL.Write_Log('Updated ' || SQL%ROWCOUNT || ' rows in FII_COMPANY_HIER_GT');
Update fii_COMPANY_hier_gt
Set is_leaf_flag = 'Y'
Where parent_company_id = child_company_id
and next_level_is_leaf_flag = 'Y';
FII_UTIL.Write_Log('Updated ' || SQL%ROWCOUNT || ' rows in FII_COMPANY_HIER_GT');
select count(*) into l_count from fii_full_company_hiers;
INSERT INTO FII_FULL_COMPANY_HIERS
(parent_level,
parent_company_id,
next_level,
next_level_company_id,
child_level,
child_company_id,
child_flex_value_set_id,
parent_flex_value_set_id,
next_level_is_leaf_flag,
is_leaf_flag,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login)
VALUES (
1,
G_UNASSIGNED_CO_ID,
1,
G_UNASSIGNED_CO_ID,
1,
G_UNASSIGNED_CO_ID,
G_FII_INT_VALUE_SET_ID,
G_FII_INT_VALUE_SET_ID,
'N',
'N',
SYSDATE,
FII_USER_ID,
SYSDATE,
FII_USER_ID,
FII_LOGIN_ID);
INSERT INTO FII_COMPANY_HIERARCHIES
(parent_level,
parent_company_id,
next_level,
next_level_company_id,
child_level,
child_company_id,
child_flex_value_set_id,
parent_flex_value_set_id,
next_level_is_leaf_flag,
is_leaf_flag,
aggregate_next_level_flag,
LEVEL2_COMPANY_ID,
LEVEL3_COMPANY_ID,
LEVEL4_COMPANY_ID ,
LEVEL5_COMPANY_ID,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login)
VALUES (
1,
G_UNASSIGNED_CO_ID,
1,
G_UNASSIGNED_CO_ID,
1,
G_UNASSIGNED_CO_ID,
G_FII_INT_VALUE_SET_ID,
G_FII_INT_VALUE_SET_ID,
'N',
'N',
'N',
G_UNASSIGNED_CO_ID,
G_UNASSIGNED_CO_ID,
G_UNASSIGNED_CO_ID,
G_UNASSIGNED_CO_ID,
SYSDATE,
FII_USER_ID,
SYSDATE,
FII_USER_ID,
FII_LOGIN_ID);
INSERT /*+ APPEND */ INTO FII_FULL_COMPANY_HIERS (
parent_level,
parent_company_id,
next_level,
next_level_company_id,
next_level_is_leaf_flag,
is_leaf_flag,
child_level,
child_company_id,
parent_flex_value_set_id,
child_flex_value_set_id,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login)
SELECT
parent_level,
parent_company_id,
next_level,
next_level_company_id,
next_level_is_leaf_flag,
is_leaf_flag,
child_level,
child_company_id,
parent_flex_value_set_id,
child_flex_value_set_id,
SYSDATE,
FII_USER_ID,
SYSDATE,
FII_USER_ID,
FII_LOGIN_ID
FROM FII_COMPANY_HIER_GT;
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows in FII_FULL_COMPANY_HIERS');
g_phase := 'Delete/Update FII_company_HIER_GT for pruned hierarchy table';
INSERT /*+ APPEND */ INTO FII_COMPANY_HIERARCHIES (
parent_level,
parent_company_id,
next_level,
next_level_company_id,
next_level_is_leaf_flag,
is_leaf_flag,
child_level,
child_company_id,
parent_flex_value_set_id,
child_flex_value_set_id,
NEXT_LEVEL_company_SORT_ORDER,
aggregate_next_level_flag,
LEVEL2_COMPANY_ID,
LEVEL3_COMPANY_ID,
LEVEL4_COMPANY_ID ,
LEVEL5_COMPANY_ID,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login)
SELECT
parent_level,
parent_company_id,
next_level,
next_level_company_id,
next_level_is_leaf_flag,
is_leaf_flag,
child_level,
child_company_id,
parent_flex_value_set_id,
child_flex_value_set_id,
NEXT_LEVEL_company_SORT_ORDER,
'N',
LEVEL2_COMPANY_ID,
LEVEL3_COMPANY_ID,
LEVEL4_COMPANY_ID ,
LEVEL5_COMPANY_ID,
SYSDATE,
FII_USER_ID,
SYSDATE,
FII_USER_ID,
FII_LOGIN_ID
FROM FII_COMPANY_HIER_GT;
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into FII_COMPANY_HIERARCHIES');
PROCEDURE Incre_Update (errbuf OUT NOCOPY VARCHAR2,
retcode OUT NOCOPY VARCHAR2) IS
ret_val BOOLEAN := FALSE;
FII_MESSAGE.Func_Ent(func_name => 'FII_COM_MAINTAIN_PKG.Incre_Update');
Insert into FII_FULL_COMPANY_HIERS (
parent_level,
parent_company_id,
next_level,
next_level_company_id,
next_level_is_leaf_flag,
is_leaf_flag,
child_level,
child_company_id,
parent_flex_value_set_id,
child_flex_value_set_id,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login)
SELECT parent_level,
parent_company_id,
next_level,
next_level_company_id,
next_level_is_leaf_flag,
is_leaf_flag,
child_level,
child_company_id,
parent_flex_value_set_id,
child_flex_value_set_id,
SYSDATE,
FII_USER_ID,
SYSDATE,
FII_USER_ID,
FII_LOGIN_ID
FROM FII_COMPANY_HIER_GT;
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into FII_FULL_COMPANY_HIERS');
g_phase := 'Delete/Update FII_company_HIER_GT for pruned hierarchy table';
DELETE FROM FII_COMPANY_HIERARCHIES
WHERE
(parent_level, parent_company_id, next_level,
next_level_company_id,
next_level_is_leaf_flag, is_leaf_flag, child_level,
child_company_id,
parent_flex_value_set_id,
child_flex_value_set_id,
NVL(next_level_company_sort_order, -92883), LEVEL2_COMPANY_ID
, LEVEL3_COMPANY_ID
, LEVEL4_COMPANY_ID
, LEVEL5_COMPANY_ID) IN
(SELECT parent_level, parent_company_id,
next_level, next_level_company_id,
next_level_is_leaf_flag, is_leaf_flag, child_level,
child_company_id,parent_flex_value_set_id,
child_flex_value_set_id, NVL(next_level_company_sort_order, -92883), LEVEL2_COMPANY_ID
, LEVEL3_COMPANY_ID
, LEVEL4_COMPANY_ID
, LEVEL5_COMPANY_ID
FROM FII_COMPANY_HIERARCHIES
MINUS
SELECT parent_level, parent_company_id,
next_level, next_level_company_id,
next_level_is_leaf_flag, is_leaf_flag,
child_level, child_company_id,
parent_flex_value_set_id,
child_flex_value_set_id, NVL(next_level_company_sort_order, -92883),LEVEL2_COMPANY_ID
, LEVEL3_COMPANY_ID
, LEVEL4_COMPANY_ID
, LEVEL5_COMPANY_ID
FROM fii_company_hier_gt);
FII_UTIL.Write_Log('Deleted ' || SQL%ROWCOUNT || ' rows from FII_COMPANY_HIERARCHIES');
Insert into FII_COMPANY_HIERARCHIES (
parent_level,
parent_company_id,
next_level,
next_level_company_id,
next_level_is_leaf_flag,
is_leaf_flag,
child_level,
child_company_id,
parent_flex_value_set_id,
child_flex_value_set_id,
aggregate_next_level_flag,
next_level_company_sort_order,
LEVEL2_COMPANY_ID ,
LEVEL3_COMPANY_ID ,
LEVEL4_COMPANY_ID ,
LEVEL5_COMPANY_ID,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login)
(SELECT parent_level,
parent_company_id,
next_level,
next_level_company_id,
next_level_is_leaf_flag,
is_leaf_flag,
child_level,
child_company_id,
parent_flex_value_set_id,
child_flex_value_set_id,
'N',
next_level_company_sort_order,
LEVEL2_COMPANY_ID ,
LEVEL3_COMPANY_ID ,
LEVEL4_COMPANY_ID ,
LEVEL5_COMPANY_ID,
SYSDATE,
FII_USER_ID,
SYSDATE,
FII_USER_ID,
FII_LOGIN_ID
FROM fii_company_hier_gt
MINUS
SELECT parent_level,
parent_company_id,
next_level,
next_level_company_id,
next_level_is_leaf_flag,
is_leaf_flag,
child_level,
child_company_id,
parent_flex_value_set_id,
child_flex_value_set_id,
'N',
next_level_company_sort_order,
LEVEL2_COMPANY_ID ,
LEVEL3_COMPANY_ID ,
LEVEL4_COMPANY_ID ,
LEVEL5_COMPANY_ID,
SYSDATE,
FII_USER_ID,
SYSDATE,
FII_USER_ID,
FII_LOGIN_ID
FROM FII_COMPANY_HIERARCHIES);
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into FII_COMPANY_HIERARCHIES');
FII_MESSAGE.Func_Succ(func_name => 'FII_COM_MAINTAIN_PKG.Incre_Update');
FII_UTIL.Write_Log ('FII_COM_MAINTAIN_PKG.Incre_Update'||
'User defined error');
FII_MESSAGE.Func_Fail(func_name => 'FII_COM_MAINTAIN_PKG.Incre_Update');
FII_UTIL.Write_Log ('FII_COM_MAINTAIN_PKG.Incre_Update: '||
'Diamond Shape Detected');
FII_MESSAGE.Func_Fail(func_name => 'FII_COM_MAINTAIN_PKG.Incre_Update');
FII_UTIL.Write_Log ('Incre_Update -> phase: '|| g_phase);
'Other error in FII_COM_MAINTAIN_PKG.Incre_Update: ' || substr(sqlerrm,1,180));
FII_MESSAGE.Func_Fail(func_name => 'FII_COM_MAINTAIN_PKG.Incre_Update');
END Incre_Update;