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 1 into l_count from fii_lob_assignments where rownum=1;
select FLEX_VALUE_SET_ID into G_FII_INT_VALUE_SET_ID
from fnd_flex_value_sets
where flex_value_set_name = 'Financials Intelligence Internal Value Set';
select flex_value_id into G_UNASSIGNED_LOB_ID
from fnd_flex_values
where flex_value_set_id = G_FII_INT_VALUE_SET_ID
and flex_value = 'UNASSIGNED';
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_LOB';
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_LOB'
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;
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into FII_DIM_NORM_HIER_GT');
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 -- Bug 4018002. Multiple dimensions may have same LVS.
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_LOB'
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');
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into FII_DIM_NORM_HIER_GT');
g_phase := 'Insert records for all local (child) value sets';
g_phase := 'Insert records for local value set ' || l_vset_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
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_lob_id) parents,
child_lob_id flex_value_id
FROM FII_LOB_HIER_GT
WHERE next_level_lob_id = child_lob_id
AND parent_level = next_level - 1
GROUP BY child_lob_id
HAVING count(parent_lob_id) > 1;
SELECT parent_lob_id,
parent_flex_value_set_id,
child_lob_id,
child_flex_value_set_id
FROM FII_LOB_HIER_GT
WHERE child_lob_id = p_child_value_id
AND next_level_lob_id = child_lob_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
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 into l_flex_value_id
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)
values
( g_index,
l_flex_value_id,
l_flex_value_set_id,
l_flex_value_id);
update FII_DIM_HIER_HELP_GT
set NEXT_LEVEL_FLEX_VALUE_ID = l_flex_value_id
where IDX = g_index - 1;
/* Inserting record with all parents */
INSERT INTO fii_lob_hier_gt (
parent_level,
parent_lob_id,
child_lob_id,
next_level,
child_level,
next_level_is_leaf,
is_leaf_flag,
parent_flex_value_Set_id,
child_flex_value_set_id,
next_level_lob_id)
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)
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_LOB_MAINTAIN_PKG.Insert_Imm_Child_Nodes');
(func_name => 'FII_LOB_MAINTAIN_PKG.INSERT_IMM_CHILD_NODES');
END INSERT_IMM_CHILD_NODES;
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;
INSERT_IMM_CHILD_NODES (p_vset_id, p_root_node);
g_phase := 'insert all self nodes';
insert into fii_lob_hier_gt (
parent_level,
parent_lob_id,
next_level,
next_level_lob_id,
child_level,
child_lob_id,
child_flex_value_set_id,
parent_flex_value_set_id,
next_level_is_leaf,
is_leaf_flag)
select
child_level,
child_lob_id,
child_level,
child_lob_id,
child_level,
child_lob_id,
child_flex_value_set_id,
child_flex_value_set_id,
'N',
'N'
from (select distinct child_lob_id,
child_level,
child_flex_value_set_id
from fii_lob_hier_gt);
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into fii_lob_hier_gt');
g_phase := 'Insert self node for the top node';
INSERT INTO fii_LOB_hier_gt
(parent_level,
parent_lob_id,
next_level,
next_level_lob_id,
child_level,
child_lob_id,
child_flex_value_set_id,
parent_flex_value_set_id,
next_level_is_leaf,
is_leaf_flag)
VALUES
(1,
G_TOP_NODE_ID,
1,
G_TOP_NODE_ID,
1,
G_TOP_NODE_ID,
G_MASTER_VALUE_SET_ID,
G_MASTER_VALUE_SET_ID,
'N',
'N');
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into fii_LOB_hier_gt');
g_phase := 'Insert a dummy top node (-999) to the hierarchy table';
INSERT INTO fii_lob_hier_gt
(parent_level,
parent_lob_id,
next_level,
next_level_lob_id,
child_level,
child_lob_id,
child_flex_value_set_id,
parent_flex_value_set_id,
next_level_is_leaf,
is_leaf_flag)
SELECT
0,
-999,
1,
G_TOP_NODE_ID,
child_level,
child_lob_id,
child_flex_value_set_id,
-998,
'N',
'N'
FROM fii_lob_hier_gt
WHERE next_level_lob_id = parent_lob_id
AND next_level_lob_id = child_lob_id;
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into fii_lob_hier_gt');
g_phase := 'Insert the UNASSIGNED to the hierarchy table';
INSERT INTO fii_lob_hier_gt
(parent_level,
parent_lob_id,
next_level,
next_level_lob_id,
child_level,
child_lob_id,
child_flex_value_set_id,
parent_flex_value_set_id,
next_level_is_leaf,
is_leaf_flag)
VALUES (
1,
G_TOP_NODE_ID,
2,
G_UNASSIGNED_LOB_ID,
2,
G_UNASSIGNED_LOB_ID,
G_FII_INT_VALUE_SET_ID,
G_MASTER_VALUE_SET_ID,
'N',
'N');
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into fii_lob_hier_gt');
g_phase := 'Insert self node for UNASSIGNED to the hierarchy table';
INSERT INTO fii_lob_hier_gt
(parent_level,
parent_lob_id,
next_level,
next_level_lob_id,
child_level,
child_lob_id,
child_flex_value_set_id,
parent_flex_value_set_id,
next_level_is_leaf,
is_leaf_flag)
VALUES (
2,
G_UNASSIGNED_LOB_ID,
2,
G_UNASSIGNED_LOB_ID,
2,
G_UNASSIGNED_LOB_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_lob_hier_gt');
g_phase := 'Insert (-999, TOP, UNASSIGNED) to the hierarchy table';
INSERT INTO fii_lob_hier_gt
(parent_level,
parent_lob_id,
next_level,
next_level_lob_id,
child_level,
child_lob_id,
child_flex_value_set_id,
parent_flex_value_set_id,
next_level_is_leaf,
is_leaf_flag)
VALUES (
0,
-999,
1,
G_TOP_NODE_ID,
2,
G_UNASSIGNED_LOB_ID,
G_FII_INT_VALUE_SET_ID,
-998,
'N',
'N');
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into fii_lob_hier_gt');
g_phase := 'Update the column next_level_is_leaf';
g_phase := 'Update the column is_leaf_flag';
g_phase := 'Update next_level_lob_sort_order for fii_lob_hier_gt ';
update fii_lob_hier_gt h
set h.next_level_lob_sort_order =
(select decode(TRANSLATE(HIERARCHY_LEVEL, 'A0123456789', 'A'), NULL,
to_number(HIERARCHY_LEVEL), to_number(NULL))
from fnd_flex_values ffv
where ffv.flex_value_set_id = G_MASTER_VALUE_SET_ID
and ffv.flex_value_id = h.next_level_lob_id);
FII_UTIL.Write_Log('Updated ' || SQL%ROWCOUNT || ' rows in fii_lob_hier_gt');
g_phase := 'Delete FII_LOB_HIER_GT #1';
Delete from FII_LOB_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 from FII_LOB_HIER_GT');
g_phase := 'Update next_level_is_leaf';
Update fii_lob_hier_gt tab1
Set next_level_is_leaf = 'Y'
Where tab1.next_level_lob_id = tab1.child_lob_id
and tab1.next_level_lob_id IN (
select /*+ ordered */ tab3.next_level_lob_id
from fii_lob_hier_gt tab3,
fii_lob_hier_gt tab2
where tab2.parent_lob_id = tab3.parent_lob_id
and tab3.parent_lob_id = tab3.child_lob_id
group by tab3.next_level_lob_id
having count(*) = 1);
FII_UTIL.Write_Log('Updated ' || SQL%ROWCOUNT || ' rows in fii_lob_hier_gt');
g_phase := 'Update is_leaf_flag';
Update fii_lob_hier_gt
Set is_leaf_flag = 'Y'
Where parent_lob_id = next_level_lob_id
and next_level_lob_id = child_lob_id
and next_level_is_leaf = 'Y';
FII_UTIL.Write_Log('Updated ' || SQL%ROWCOUNT || ' rows in fii_lob_hier_gt');
g_phase := 'INSERT INTO FII_FULL_LOB_HIERS';
INSERT INTO FII_FULL_LOB_HIERS
(parent_level,
parent_lob_id,
next_level,
next_level_lob_id,
child_level,
child_lob_id,
child_flex_value_set_id,
parent_flex_value_set_id,
next_level_is_leaf,
is_leaf_flag,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login)
VALUES (
1,
G_UNASSIGNED_LOB_ID,
1,
G_UNASSIGNED_LOB_ID,
1,
G_UNASSIGNED_LOB_ID,
G_FII_INT_VALUE_SET_ID,
G_FII_INT_VALUE_SET_ID,
'Y',
'Y',
SYSDATE,
FII_USER_ID,
SYSDATE,
FII_USER_ID,
FII_LOGIN_ID);
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into FII_FULL_LOB_HIERS');
g_phase := 'INSERT INTO FII_LOB_HIERARCHIES';
INSERT INTO FII_LOB_HIERARCHIES
(parent_level,
parent_lob_id,
next_level,
next_level_lob_id,
child_level,
child_lob_id,
child_flex_value_set_id,
parent_flex_value_set_id,
next_level_is_leaf,
is_leaf_flag,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login)
VALUES (
1,
G_UNASSIGNED_LOB_ID,
1,
G_UNASSIGNED_LOB_ID,
1,
G_UNASSIGNED_LOB_ID,
G_FII_INT_VALUE_SET_ID,
G_FII_INT_VALUE_SET_ID,
'Y',
'Y',
SYSDATE,
FII_USER_ID,
SYSDATE,
FII_USER_ID,
FII_LOGIN_ID);
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into FII_LOB_HIERARCHIES');
INSERT /*+ APPEND */ INTO FII_FULL_LOB_HIERS (
parent_level,
parent_lob_id,
next_level,
next_level_lob_id,
next_level_is_leaf,
is_leaf_flag,
child_level,
child_lob_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_lob_id,
next_level,
next_level_lob_id,
next_level_is_leaf,
is_leaf_flag,
child_level,
child_lob_id,
parent_flex_value_set_id,
child_flex_value_set_id,
SYSDATE,
FII_USER_ID,
SYSDATE,
FII_USER_ID,
FII_LOGIN_ID
FROM FII_LOB_HIER_GT;
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into FII_FULL_LOB_HIERS');
g_phase := 'Delete/Update FII_LOB_HIER_GT for pruned hierarchy table';
INSERT /*+ APPEND */ INTO FII_LOB_HIERARCHIES (
parent_level,
parent_lob_id,
next_level,
next_level_lob_id,
next_level_is_leaf,
is_leaf_flag,
child_level,
child_lob_id,
parent_flex_value_set_id,
child_flex_value_set_id,
next_level_lob_sort_order,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login)
SELECT
parent_level,
parent_lob_id,
next_level,
next_level_lob_id,
next_level_is_leaf,
is_leaf_flag,
child_level,
child_lob_id,
parent_flex_value_set_id,
child_flex_value_set_id,
next_level_lob_sort_order,
SYSDATE,
FII_USER_ID,
SYSDATE,
FII_USER_ID,
FII_LOGIN_ID
FROM FII_LOB_HIER_GT;
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into FII_LOB_HIERARCHIES');
PROCEDURE Incre_Update (errbuf OUT NOCOPY VARCHAR2,
retcode OUT NOCOPY VARCHAR2) IS
ret_val BOOLEAN := FALSE;
g_phase := 'DELETE FROM FII_FULL_LOB_HIERS';
DELETE FROM FII_FULL_LOB_HIERS
WHERE
(parent_level, parent_lob_id, next_level, next_level_lob_id,
next_level_is_leaf, is_leaf_flag, child_level, child_lob_id,
parent_flex_value_set_id, child_flex_value_set_id) IN
(SELECT parent_level, parent_lob_id, next_level, next_level_lob_id,
next_level_is_leaf, is_leaf_flag, child_level, child_lob_id,
parent_flex_value_set_id, child_flex_value_set_id
FROM FII_FULL_LOB_HIERS
MINUS
SELECT parent_level, parent_lob_id, next_level, next_level_lob_id,
next_level_is_leaf, is_leaf_flag, child_level, child_lob_id,
parent_flex_value_set_id, child_flex_value_set_id
FROM FII_LOB_HIER_GT);
FII_UTIL.Write_Log('Deleted ' || SQL%ROWCOUNT || ' rows from FII_FULL_LOB_HIERS');
g_phase := 'Insert into FII_FULL_LOB_HIERS';
Insert into FII_FULL_LOB_HIERS (
parent_level,
parent_lob_id,
next_level,
next_level_lob_id,
next_level_is_leaf,
is_leaf_flag,
child_level,
child_lob_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_lob_id,
next_level,
next_level_lob_id,
next_level_is_leaf,
is_leaf_flag,
child_level,
child_lob_id,
parent_flex_value_set_id,
child_flex_value_set_id,
SYSDATE,
FII_USER_ID,
SYSDATE,
FII_USER_ID,
FII_LOGIN_ID
FROM FII_LOB_HIER_GT
MINUS
SELECT parent_level,
parent_lob_id,
next_level,
next_level_lob_id,
next_level_is_leaf,
is_leaf_flag,
child_level,
child_lob_id,
parent_flex_value_set_id,
child_flex_value_set_id,
SYSDATE,
FII_USER_ID,
SYSDATE,
FII_USER_ID,
FII_LOGIN_ID
FROM FII_FULL_LOB_HIERS);
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into FII_FULL_LOB_HIERS');
g_phase := 'Delete/Update FII_LOB_HIER_GT for pruned hierarchy table';
g_phase := 'DELETE FROM FII_LOB_HIERARCHIES';
DELETE FROM FII_LOB_HIERARCHIES
WHERE
(parent_level, parent_lob_id, next_level, next_level_lob_id,
next_level_is_leaf, is_leaf_flag, child_level, child_lob_id,
parent_flex_value_set_id, child_flex_value_set_id,
NVL(next_level_lob_sort_order, -92883)) IN
(SELECT parent_level, parent_lob_id, next_level, next_level_lob_id,
next_level_is_leaf, is_leaf_flag, child_level, child_lob_id,
parent_flex_value_set_id, child_flex_value_set_id,
NVL(next_level_lob_sort_order, -92883)
FROM FII_LOB_HIERARCHIES
MINUS
SELECT parent_level, parent_lob_id, next_level, next_level_lob_id,
next_level_is_leaf, is_leaf_flag, child_level, child_lob_id,
parent_flex_value_set_id, child_flex_value_set_id,
NVL(next_level_lob_sort_order, -92883)
FROM FII_LOB_HIER_GT);
FII_UTIL.Write_Log('Deleted ' || SQL%ROWCOUNT || ' rows from FII_LOB_HIERARCHIES');
g_phase := 'Insert into FII_LOB_HIERARCHIES';
Insert into FII_LOB_HIERARCHIES (
parent_level,
parent_lob_id,
next_level,
next_level_lob_id,
next_level_is_leaf,
is_leaf_flag,
child_level,
child_lob_id,
parent_flex_value_set_id,
child_flex_value_set_id,
next_level_lob_sort_order,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login)
(SELECT parent_level,
parent_lob_id,
next_level,
next_level_lob_id,
next_level_is_leaf,
is_leaf_flag,
child_level,
child_lob_id,
parent_flex_value_set_id,
child_flex_value_set_id,
next_level_lob_sort_order,
SYSDATE,
FII_USER_ID,
SYSDATE,
FII_USER_ID,
FII_LOGIN_ID
FROM FII_LOB_HIER_GT
MINUS
SELECT parent_level,
parent_lob_id,
next_level,
next_level_lob_id,
next_level_is_leaf,
is_leaf_flag,
child_level,
child_lob_id,
parent_flex_value_set_id,
child_flex_value_set_id,
next_level_lob_sort_order,
SYSDATE,
FII_USER_ID,
SYSDATE,
FII_USER_ID,
FII_LOGIN_ID
FROM FII_LOB_HIERARCHIES);
FII_UTIL.Write_Log('Inserted ' || SQL%ROWCOUNT || ' rows into FII_LOB_HIERARCHIES');
FII_UTIL.Write_Log ('Incre_Update -> phase: '|| g_phase);
FII_UTIL.Write_Log ('FII_LOB_MAINTAIN_PKG.Incre_Update'||
'User defined error');
FII_MESSAGE.Func_Fail(func_name => 'FII_LOB_MAINTAIN_PKG.Incre_Update');
FII_UTIL.Write_Log ('Incre_Update -> phase: '|| g_phase);
FII_UTIL.Write_Log ('FII_LOB_MAINTAIN_PKG.Incre_Update: '||
'Diamond Shape Detected');
FII_MESSAGE.Func_Fail(func_name => 'FII_LOB_MAINTAIN_PKG.Incre_Update');
FII_UTIL.Write_Log ('Incre_Update -> phase: '|| g_phase);
FII_UTIL.Write_Log ('Incre_Update -> phase: '|| g_phase);
'Other error in FII_LOB_MAINTAIN_PKG.Incre_Update: ' || substr(sqlerrm,1,180));
FII_MESSAGE.Func_Fail(func_name => 'II_LOB_MAINTAIN_PKG.Incre_Update');
END Incre_Update;