The following lines contain the word 'select', 'insert', 'update' or 'delete':
select min(LEDGER_ID)
into x_ledger_id
from ZPB_BUSAREA_LEDGERS A,
ZPB_BUSAREA_VERSIONS B
where A.VERSION_ID = B.VERSION_ID
and B.BUSINESS_AREA_ID = x_business_area_id
and B.VERSION_TYPE = 'R';
select SNAPSHOT_OBJECT_ID
into x_snapshot_id
from ZPB_BUSINESS_AREAS
where BUSINESS_AREA_ID = x_business_area_id;
select distinct A.MEMBER_PRIV_TABLE_NAME,
A.MEMBER_B_TABLE_NAME,
A.MEMBER_COL,
B.ATTRIBUTE_ID,
B.ATTRIBUTE_VARCHAR_LABEL
from FEM_XDIM_DIMENSIONS A,
FEM_DIM_ATTRIBUTES_B B
where A.DIMENSION_ID = B.ATTRIBUTE_DIMENSION_ID
and B.DIMENSION_ID = 14
and B.ATTRIBUTE_VARCHAR_LABEL in
('DEFAULT_AGG_METHOD',
'TIME_AGG_METHOD', 'BETTER_FLAG', 'DEFAULT_NUMBER_FORMAT');
select distinct
B.ATTRIBUTE_ID,
B.ATTRIBUTE_VARCHAR_LABEL
from FEM_DIM_ATTRIBUTES_B B
where B.DIMENSION_ID = 1
and B.ATTRIBUTE_VARCHAR_LABEL in
('CAL_PERIOD_END_DATE', 'CAL_PERIOD_START_DATE');
select a.ATTRIBUTE_ID,
decode (b.DIMENSION_TYPE_CODE, 'LINE', 'L', to_char(a.DIMENSION_ID))
DIMENSION_ID
from FEM_DIM_ATTRIBUTES_B a,
FEM_XDIM_DIMENSIONS b
where a.ATTRIBUTE_DIMENSION_ID = p_dimension_id
and a.DIMENSION_ID = b.DIMENSION_ID ;
select USER_NAME
into l_user_name
from FND_USER
where USER_ID = l_shdw_id;
select
MEMBER_COL,
MEMBER_DISPLAY_CODE_COL,
MEMBER_B_TABLE_NAME,
MEMBER_TL_TABLE_NAME,
MEMBER_NAME_COL,
MEMBER_DESCRIPTION_COL,
ATTRIBUTE_TABLE_NAME,
PERSONAL_HIERARCHY_TABLE_NAME,
VALUE_SET_REQUIRED_FLAG,
MEMBER_PRIV_TABLE_NAME,
DIMENSION_TYPE_CODE
into
l_dim_column,
l_dim_disp_col,
l_dim_mbr_table,
l_dim_mbr_tl_table,
l_dim_name_col,
l_dim_desc_col,
l_dim_attr_table,
l_dim_hier_table,
l_dim_value_sets,
l_dim_table_name,
l_dim_type
from
FEM_XDIM_DIMENSIONS
where
DIMENSION_ID = p_dimension_id;
delete from FEM_DIM_ATTRIBUTES_PRIV where USER_ID = l_apps_id;
select A.VALUE_SET_ID
into l_value_set_id
from FEM_GLOBAL_VS_COMBO_DEFS A,
FEM_LEDGERS_ATTR C,
FEM_DIM_ATTRIBUTES_B D,
FEM_DIM_ATTR_VERSIONS_B E
where A.DIMENSION_ID = p_dimension_id
and A.GLOBAL_VS_COMBO_ID = C.DIM_ATTRIBUTE_NUMERIC_MEMBER
and D.ATTRIBUTE_VARCHAR_LABEL = 'GLOBAL_VS_COMBO'
and D.ATTRIBUTE_ID = E.ATTRIBUTE_ID
and E.DEFAULT_VERSION_FLAG = 'Y'
and C.ATTRIBUTE_ID = D.ATTRIBUTE_ID
and C.VERSION_ID = E.VERSION_ID
and C.LEDGER_ID = (select min(LEDGER_ID)
from ZPB_BUSAREA_LEDGERS A,
ZPB_BUSAREA_VERSIONS B
where A.VERSION_ID = B.VERSION_ID
and B.VERSION_TYPE = 'R'
and B.BUSINESS_AREA_ID = sys_context('ZPB_CONTEXT',
'business_area_id'));
l_command := 'delete from '||l_dim_table_name||' where USER_ID = '||
l_apps_id;
l_command := 'insert into '||l_dim_table_name||' (USER_ID, ';
'LAST_UPDATED_BY, LAST_UPDATE_DATE) select '||l_apps_id||', ';
select attribute_dimension_id
into l_attr_dim_id
from fem_dim_attributes_b
where attribute_id = l_fem_attr;
insert into FEM_DIM_ATTRIBUTES_PRIV
(USER_ID,
ATTRIBUTE_ID,
DIMENSION_ID,
CREATION_DATE,
CREATED_BY,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN)
values (l_apps_id,
l_fem_attr,
p_dimension_id,
sysdate,
l_apps_id,
l_apps_id,
sysdate,
fnd_global.login_id);
l_command := 'delete from '||each.MEMBER_PRIV_TABLE_NAME||
' where USER_ID = '||l_apps_id;
l_command := 'insert into '||each.MEMBER_PRIV_TABLE_NAME||
'(USER_ID, '||each.MEMBER_COL||',CREATION_DATE, CREATED_BY,'||
'LAST_UPDATED_BY,LAST_UPDATE_DATE,LAST_UPDATE_LOGIN) select '||
l_apps_id||','||each.MEMBER_COL||',sysdate,'||l_apps_id||', '||
l_apps_id||', sysdate, FND_GLOBAL.LOGIN_ID from '||
each.MEMBER_B_TABLE_NAME;
select count(*)
into i
from FEM_DIM_ATTRIBUTES_PRIV
where USER_ID = l_apps_id
and ATTRIBUTE_ID = each.ATTRIBUTE_ID;
insert into FEM_DIM_ATTRIBUTES_PRIV
(USER_ID,
ATTRIBUTE_ID,
DIMENSION_ID,
CREATION_DATE,
CREATED_BY,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN)
values
(l_apps_id,
each.ATTRIBUTE_ID,
14,
sysdate,
l_apps_id,
l_apps_id,
sysdate,
FND_GLOBAL.LOGIN_ID);
select count(*)
into i
from FEM_DIM_ATTRIBUTES_PRIV
where USER_ID = l_apps_id
and ATTRIBUTE_ID = each.ATTRIBUTE_ID;
insert into FEM_DIM_ATTRIBUTES_PRIV
(USER_ID,
ATTRIBUTE_ID,
DIMENSION_ID,
CREATION_DATE,
CREATED_BY,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN)
values
(l_apps_id,
each.ATTRIBUTE_ID,
1,
sysdate,
l_apps_id,
l_apps_id,
sysdate,
FND_GLOBAL.LOGIN_ID);
delete from FEM_DIMENSION_GRPS_PRIV where USER_ID = l_apps_id;
insert into FEM_DIMENSION_GRPS_PRIV
(USER_ID,
DIMENSION_GROUP_ID,
DIMENSION_ID,
CREATION_DATE,
CREATED_BY,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN)
select distinct l_apps_id,
to_number(OBJECT_AW_NAME),
p_dimension_id,
sysdate,
l_apps_id,
l_apps_id,
sysdate,
fnd_global.login_id
from ZPB_LAB_LEVELS_SCOPE_V
where DIMENSION = l_dim_data.ExpObj
and OBJECT_SHORT_LABEL not like '%LV_%';
select to_char(FEM_OBJECT_ID_SEQ.nextVal) into l_femHier from dual;
select to_char(FEM_OBJECT_DEFINITION_ID_SEQ.nextVal)
into l_femHierDef from dual;
FEM_OBJECT_CATALOG_PKG.INSERT_ROW
(l_value,
to_number(l_femHier),
'HIERARCHY',
l_folder,
null,
'W',
'USER',
1,
l_value2||' ('||l_user_name||')',
l_value2,
sysdate,
l_apps_id,
sysdate,
l_apps_id,
fnd_global.login_id);
select EFFECTIVE_START_DATE, EFFECTIVE_END_DATE
into l_startDate, l_endDate
from FEM_OBJECT_DEFINITION_B
where OBJECT_ID = to_number(l_hier)
and EFFECTIVE_START_DATE <= sysdate
and EFFECTIVE_END_DATE >= sysdate;
select EFFECTIVE_START_DATE, EFFECTIVE_END_DATE
into l_startDate, l_endDate
from FEM_OBJECT_DEFINITION_B
where OBJECT_DEFINITION_ID = m;
select EFFECTIVE_END_DATE
into l_endDate
from FEM_OBJECT_DEFINITION_B
where OBJECT_ID = to_number(l_femHier);
FEM_OBJECT_DEFINITION_PKG.INSERT_ROW
(l_value,
to_number(l_femHierDef),
1,
to_number(l_femHier),
l_startDate,
l_endDate,
'USER',
'NOT_APPLICABLE',
'N',
null,
null,
null,
l_value2,
l_value2,
sysdate,
l_apps_id,
sysdate,
l_apps_id,
fnd_global.login_id);
insert into FEM_HIER_DEFINITIONS
(HIERARCHY_OBJ_DEF_ID,
CREATION_DATE,
CREATED_BY,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
OBJECT_VERSION_NUMBER,
FLATTENED_ROWS_COMPLETION_CODE)
values
(to_number(l_femHierDef),
sysdate,
l_apps_id,
l_apps_id,
sysdate,
fnd_global.login_id,
1,
'COMPLETED');
'insert into FEM_HIER_VALUE_SETS
(HIERARCHY_OBJ_ID,
VALUE_SET_ID,
CREATION_DATE,
CREATED_BY,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
OBJECT_VERSION_NUMBER)
select distinct '||l_femHier||',
'||l_value_set_id||',
sysdate,
'||l_apps_id||',
'||l_apps_id||',
sysdate,
fnd_global.login_id,
1
from '||l_dim_view;
select
MULTI_TOP_FLAG,
CALENDAR_ID,
PERIOD_TYPE,
MULTI_VALUE_SET_FLAG
into l_multi_top,
l_calendar_id,
l_period_type,
l_multi_vs
from FEM_HIERARCHIES
where HIERARCHY_OBJ_ID = to_number(l_hier);
insert into FEM_HIERARCHIES
(HIERARCHY_OBJ_ID,
DIMENSION_ID,
HIERARCHY_TYPE_CODE,
GROUP_SEQUENCE_ENFORCED_CODE,
MULTI_TOP_FLAG,
FINANCIAL_CATEGORY_FLAG,
VALUE_SET_ID,
CALENDAR_ID,
PERIOD_TYPE,
PERSONAL_FLAG,
FLATTENED_ROWS_FLAG,
CREATION_DATE,
CREATED_BY,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
HIERARCHY_USAGE_CODE,
MULTI_VALUE_SET_FLAG,
OBJECT_VERSION_NUMBER)
values
(to_number(l_femHier),
p_dimension_id,
'OPEN',
l_hierType,
l_multi_top,
'N',
l_value_set_id,
l_calendar_id,
l_period_type,
'Y',
'N',
sysdate,
l_apps_id,
l_apps_id,
sysdate,
fnd_global.login_id,
'PLANNING',
l_multi_vs,
1);
l_command := 'select nvl(round(log(2, max('||l_dim_gid_col||
') + 1))+1,0) gid from '||l_dim_view;
l_command := 'delete from '||l_dim_hier_table||
' where HIERARCHY_OBJ_DEF_ID = '||to_number(l_femHierDef);
l_command := 'insert into '||l_dim_hier_table||'
(HIERARCHY_OBJ_DEF_ID,
PARENT_DEPTH_NUM,
PARENT_ID,
CHILD_ID,';
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
OBJECT_VERSION_NUMBER)
select '||to_number(l_femHierDef)||', '||
l_max_gid||' - round(log(2, '||l_dim_pgid_col||' + 1)), ';
l_command := 'insert into '||l_dim_hier_table||'
(HIERARCHY_OBJ_DEF_ID,
PARENT_DEPTH_NUM,
PARENT_ID,
CHILD_ID,';
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
OBJECT_VERSION_NUMBER)
select '||to_number(l_femHierDef)||', '||
l_max_gid||', ';
l_command := 'insert into '||l_dim_hier_table||'
(HIERARCHY_OBJ_DEF_ID,
PARENT_DEPTH_NUM,
PARENT_ID,
CHILD_ID,';
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
OBJECT_VERSION_NUMBER)
select '||to_number(l_femHierDef)||', 1, ';
l_command := 'insert into '||l_dim_mbr_table||'
('||l_dim_column||',
DIMENSION_GROUP_ID,
CALENDAR_ID,
ENABLED_FLAG,
PERSONAL_FLAG,
CREATION_DATE,
CREATED_BY,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
READ_ONLY_FLAG,
OBJECT_VERSION_NUMBER)
select '||l_dim_view_col||',
'||l_dim_lvlRel_col||',
nvl('||
zpb_metadata_names.get_dim_calendar_column(l_epb_dim_id)||',1),
''Y'',
''Y'',
sysdate, '||
l_apps_id||', '||
l_apps_id||',
sysdate, '||
fnd_global.login_id||',
''N'',
1 from '||l_dim_view||' where '||l_dim_view_col||
' in ('||l_dims||')';
l_command :='insert into '||l_dim_mbr_table||' ('||l_dim_column||', ';
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
READ_ONLY_FLAG,
OBJECT_VERSION_NUMBER)
select ';
l_command := 'insert into '||l_dim_mbr_tl_table||'
('||l_dim_column||', ';
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN)
select ';
select fem_time_dimension_group_key_s.nextval into
l_time_dim_grp_key from dual;
FEM_DIMENSION_GRPS_PKG.INSERT_ROW
(l_value,
l_level,
l_time_dim_grp_key,
p_dimension_id,
zpb_aw.interp('shw '||l_awQual||l_dim_ecm.LevelDepthVar),
l_level_type,
'N',
1,
'Y',
'Y',
zpb_aw.interp('shw '||l_awQual||l_dim_ecm.LevelSdscVar),
zpb_aw.interp('shw '||l_awQual||l_dim_ecm.LevelMdscVar),
zpb_aw.interp('shw '||l_awQual||l_dim_ecm.LevelLdscVar),
sysdate,
l_apps_id,
sysdate,
l_apps_id,
null);
insert into FEM_HIER_DIMENSION_GRPS
(DIMENSION_GROUP_ID,
HIERARCHY_OBJ_ID,
RELATIVE_DIMENSION_GROUP_SEQ,
CREATION_DATE,
CREATED_BY,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
OBJECT_VERSION_NUMBER)
values (l_level,
l_femHier,
zpb_aw.interp('shw '||l_awQual||
l_dim_ecm.LevelDepthVar) + 1,
sysdate,
l_apps_id,
l_apps_id,
sysdate,
fnd_global.login_id,
1);
l_dim_mbr_dlt_list VARCHAR2(3200); -- Dimension members to delete
select DIMENSION_GROUP_ID
from FEM_DIMENSION_GRPS_B
where PERSONAL_FLAG = 'Y'
and CREATED_BY = l_apps_id;
select DIMENSION_GROUP_ID
from FEM_HIER_DIMENSION_GRPS
where HIERARCHY_OBJ_ID =
zpb_aw.interp ('shw '||l_dim_ecm.HierFEMIDVar)
order by RELATIVE_DIMENSION_GROUP_SEQ;
select
MEMBER_COL,
MEMBER_DISPLAY_CODE_COL,
MEMBER_B_TABLE_NAME,
MEMBER_TL_TABLE_NAME,
MEMBER_NAME_COL,
MEMBER_DESCRIPTION_COL,
ATTRIBUTE_TABLE_NAME,
PERSONAL_HIERARCHY_TABLE_NAME,
VALUE_SET_REQUIRED_FLAG,
MEMBER_PRIV_TABLE_NAME,
DIMENSION_TYPE_CODE
into
l_dim_column,
l_dim_disp_col,
l_dim_mbr_table,
l_dim_mbr_tl_table,
l_dim_name_col,
l_dim_desc_col,
l_dim_attr_table,
l_dim_hier_table,
l_dim_value_sets,
l_dim_table_name,
l_dim_type
from
FEM_XDIM_DIMENSIONS
where
DIMENSION_ID = p_dimension_id;
l_command := 'select '||l_dim_view_col||' from '||l_dim_view||
' minus select to_char(';
''' ''mnt '||l_awQual||l_dim_data.ExpObj||' delete '||
l_dim_mbr_dlt_list||''')');
' delete values('||l_awQual||l_dim_ecm.LevelDim||')');
'select A.DIMENSION_GROUP_ID,
A.DIMENSION_GROUP_SEQ,
B.DIMENSION_GROUP_NAME,
B.DESCRIPTION,
A.DIMENSION_GROUP_DISPLAY_CODE
from FEM_DIMENSION_GRPS_B A,
FEM_DIMENSION_GRPS_TL B
where A.DIMENSION_ID = '||p_dimension_id||'
and A.PERSONAL_FLAG = ''Y''
and A.DIMENSION_GROUP_ID = B.DIMENSION_GROUP_ID
and A.CREATED_BY = '||l_apps_id||'
and A.LAST_UPDATE_DATE > '||l_upd_date||'
order by A.DIMENSION_GROUP_SEQ';
select B.NUMBER_ASSIGN_VALUE TIME_LVL_PERIODS
into l_num_periods_in_year
from FEM_DIMENSION_GRPS_B A,
FEM_TIME_GRP_TYPES_ATTR B,
FEM_DIM_ATTRIBUTES_B C,
FEM_DIM_ATTR_VERSIONS_B D
where A.DIMENSION_GROUP_ID = l_level
AND A.TIME_GROUP_TYPE_CODE = B.TIME_GROUP_TYPE_CODE(+)
AND B.ATTRIBUTE_ID = C.ATTRIBUTE_ID(+)
AND C.ATTRIBUTE_VARCHAR_LABEL(+) = 'PERIODS_IN_YEAR'
AND B.VERSION_ID = D.VERSION_ID(+)
AND B.ATTRIBUTE_ID = D.ATTRIBUTE_ID(+)
AND D.DEFAULT_VERSION_FLAG(+) = 'Y';
l_command := 'select A.VALUE_SET_ID||''_''||A.'||l_dim_column||', ';
l_command := 'select to_char(A.'||l_dim_column||'), ';
' and A.LAST_UPDATE_DATE > '||l_upd_date||
' order by 1';
'select distinct A.CHILD_VALUE_SET_ID||''_''||A.CHILD_ID';
l_command := 'select distinct to_char(A.CHILD_ID)';
l_command := 'select A.PARENT_VALUE_SET_ID||''_''||A.PARENT_ID, '||
'A.CHILD_VALUE_SET_ID||''_''||A.CHILD_ID, ';
l_command := 'select to_char(A.PARENT_ID), to_char(A.CHILD_ID), ';
select '999'||to_char(FEM_DIMENSION_GRPS_B_S.NEXTVAL)
into l_level from dual;
l_command := 'select D.VALUE_SET_ID||''_''||D.'||l_dim_column||', ';
l_command := 'select D.'||l_dim_column||', ';
(select A.ATTRIBUTE_ID, B.'||l_dim_column||'
from '||l_dim_attr_table||' A, '||l_dim_mbr_table||' B
where
(A.DIM_ATTRIBUTE_NUMERIC_MEMBER is not null OR
A.DIM_ATTRIBUTE_VALUE_SET_ID is not null OR
A.DIM_ATTRIBUTE_VARCHAR_MEMBER is not null OR
A.NUMBER_ASSIGN_VALUE is not null OR
A.VARCHAR_ASSIGN_VALUE is not null OR
A.DATE_ASSIGN_VALUE is not null)
and A.'||l_dim_column||' = B.'||l_dim_column||'
and B.PERSONAL_FLAG = ''Y''
and B.CREATED_BY = '||l_apps_id||')
order by C.ATTRIBUTE_ID';
l_command := 'select A.VALUE_SET_ID||''_''||A.'||l_dim_column||', ';
l_command := 'select A.'||l_dim_column||', ';
and A.LAST_UPDATE_DATE > '||l_upd_date||'
and A.ATTRIBUTE_ID = C.ATTRIBUTE_ID
order by A.ATTRIBUTE_ID';
select A.DIM_ATTRIBUTE_VARCHAR_MEMBER
into l_attr_var_mbr
from FEM_EXT_ACCT_TYPES_ATTR A,
FEM_DIM_ATTRIBUTES_B B
where A.ATTRIBUTE_ID = B.ATTRIBUTE_ID
and B.ATTRIBUTE_VARCHAR_LABEL = 'BASIC_ACCOUNT_TYPE_CODE'
and A.EXT_ACCOUNT_TYPE_CODE = l_attr_var_mbr
and A.AW_SNAPSHOT_FLAG = 'N';