The following lines contain the word 'select', 'insert', 'update' or 'delete':
e_insert_az_request_fail EXCEPTION;
e_az_insert_error EXCEPTION;
e_fem_insert_error EXCEPTION;
c_insert_fail_err CONSTANT
VARCHAR2(30):='fem_impexp_insert_fail_err';
SELECT A.dimension_group_display_code
INTO l_grp_display_code
FROM fem_dimension_grps_b A,
fem_dimensions_b B
WHERE A.DIMENSION_GROUP_ID = p_dimension_group_id
AND B.dimension_id = A.dimension_id
AND B.dimension_varchar_label = p_dimension_varchar_label;
SELECT A.dimension_group_display_code
INTO l_grp_display_code
FROM fem_dimension_grps_b A,
fem_dimensions_b B
WHERE A.DIMENSION_GROUP_ID = p_dimension_group_id
AND B.dimension_id = A.dimension_id
AND B.dimension_id = p_dimension_id;
SELECT A.DIMENSION_GROUP_ID
INTO l_dimension_group_id
FROM fem_dimension_grps_b A,
fem_dimensions_b B
WHERE A.DIMENSION_GROUP_DISPLAY_CODE = p_dim_group_display_code
AND B.dimension_id = A.dimension_id
AND B.dimension_varchar_label = p_dimension_varchar_label;
SELECT A.DIMENSION_GROUP_ID
INTO l_dimension_group_id
FROM fem_dimension_grps_b A,
fem_dimensions_b B
WHERE A.DIMENSION_GROUP_DISPLAY_CODE = p_dim_group_display_code
AND B.dimension_id = A.dimension_id
AND B.dimension_id = p_dimension_id;
SELECT B.DIMENSION_GROUP_DISPLAY_CODE
INTO l_dim_group_display_code
FROM fem_object_catalog_vl A,
fem_dimension_grps_b B,
fem_hier_dimension_grps C,
fem_dimensions_b D
WHERE D.dimension_varchar_label = p_dimension_varchar_label
AND D.DIMENSION_ID=B.DIMENSION_ID
AND A.OBJECT_NAME = p_hierarchy_name
AND B.DIMENSION_GROUP_DISPLAY_CODE = p_dim_group_display_code
AND A.OBJECT_ID=C.HIERARCHY_OBJ_ID
AND B.DIMENSION_GROUP_ID=C.DIMENSION_GROUP_ID ;
SELECT A.relative_dimension_group_seq,
C.relative_dimension_group_seq
INTO l_count_parent
,l_count_child
FROM fem_hier_dimension_grps A
,fem_object_catalog_vl B
,fem_hier_dimension_grps C
WHERE B.object_name = p_hierarchy_name
AND A.hierarchy_obj_id=B.object_id
AND A.dimension_group_id = l_parent_group_id
AND C.hierarchy_obj_id=B.object_id
AND C.dimension_group_id = l_child_group_id;
SELECT attribute_varchar_label
INTO l_attribute_varchar_label
FROM fem_dim_attributes_b
WHERE attribute_id=p_attribute_id;
SELECT B.attribute_id
INTO l_dim_attribute_id
FROM fem_dimensions_b A,
fem_dim_attributes_b B
WHERE a.dimension_varchar_label = p_dimension_varchar_label
AND B.dimension_id = A.dimension_id
AND B.attribute_varchar_label = p_dim_attribute_varchar_label;
SELECT attribute_id
INTO l_dim_attribute_id
FROM fem_dim_attributes_b
WHERE dimension_id = p_dimension_id
AND attribute_varchar_label = p_dim_attribute_varchar_label;
SELECT version_display_code
INTO l_attr_ver_display_code
FROM fem_dim_attr_versions_b
WHERE attribute_id = p_attribute_id
AND version_id = p_version_id;
SELECT a.version_display_code
INTO l_attr_ver_display_code
FROM fem_dim_attr_versions_b A,
fem_dim_attributes_b B
WHERE b.attribute_varchar_label = p_dim_attr_varchar_label
AND a.attribute_id = B.attribute_id
AND a.version_id = p_version_id ;
SELECT A.version_id
INTO l_dim_attr_version_id
FROM fem_dim_attr_versions_b A,
fem_dim_attributes_b B
WHERE B.attribute_varchar_label = p_dim_attr_varchar_label
AND A.attribute_id = B.attribute_id
AND A.version_display_code = p_dim_attr_ver_display_code;
SELECT version_id
INTO l_dim_attr_version_id
FROM fem_dim_attr_versions_b
WHERE attribute_id = p_dim_attribute_id
AND version_display_code = p_dim_attr_ver_display_code;
SELECT FEM_DIMENSION_UTIL_PKG.Get_Dim_Member_Display_Code(
XDIM.dimension_id
,p_member_id
,DECODE(XDIM.value_set_required_flag
,'Y',
FEM_DIMENSION_UTIL_PKG.Dimension_Value_Set_Id(XDIM.dimension_id)
,NULL)
)
INTO l_member_display_code
FROM fem_xdim_dimensions_vl XDIM
WHERE XDIM.dimension_id = p_dimension_id;
SELECT FEM_DIMENSION_UTIL_PKG.Get_Dim_Member_Display_Code(
XDIM.dimension_id
,p_member_id
,DECODE(XDIM.value_set_required_flag
,'Y'
,FEM_DIMENSION_UTIL_PKG.Dimension_Value_Set_Id(XDIM.dimension_id)
,NULL)
)
INTO l_member_display_code
FROM fem_xdim_dimensions_vl XDIM
WHERE XDIM.dimension_varchar_label = p_dimension_varchar_label;
SELECT DECODE(XDIM.value_set_required_flag
,'Y'
,FEM_DIMENSION_UTIL_PKG.Dimension_Value_Set_Id(XDIM.dimension_id)
,NULL
)
INTO l_value_set_id
FROM fem_xdim_dimensions_vl XDIM
WHERE XDIM.dimension_varchar_label = p_dimension_varchar_label;
SELECT value_set_display_code
INTO l_value_set_display_code
FROM fem_value_sets_b
WHERE value_set_id = l_value_set_id;
SELECT dimension_varchar_label
INTO l_dimension_varchar_label
FROM fem_xdim_dimensions_vl
WHERE dimension_id = p_dimension_id;
SELECT DECODE(XDIM.value_set_required_flag
,'Y'
,FEM_DIMENSION_UTIL_PKG.Dimension_Value_Set_Id(XDIM.dimension_id)
,NULL
)
INTO l_value_set_id
FROM fem_xdim_dimensions_vl XDIM
WHERE XDIM.dimension_id = p_dimension_id;
SELECT value_set_display_code
INTO l_value_set_display_code
FROM fem_value_sets_b
WHERE value_set_id = l_value_set_id;
SELECT value_set_display_code
INTO l_value_set_display_code
FROM fem_value_sets_b
WHERE value_set_id= p_value_set_id;
SELECT value_set_id
INTO l_value_set_id
FROM fem_value_sets_b
WHERE value_set_display_code= p_value_set_display_code;
SELECT CALP_ATTR.number_assign_value
INTO l_gl_period_num
FROM fem_cal_periods_attr calp_attr
,fem_dim_attributes_b ATTR
,fem_dim_attr_versions_b VER
,fem_xdim_dimensions_vl XDIM
WHERE XDIM.dimension_varchar_label = 'CAL_PERIOD'
AND ATTR.dimension_id = XDIM.dimension_id
AND ATTR.attribute_varchar_label = 'GL_PERIOD_NUM'
AND VER.attribute_id = ATTR.attribute_id
AND VER.default_version_flag = 'Y'
AND CALP_ATTR.cal_period_id = p_cal_period_id
AND CALP_ATTR.attribute_id = ATTR.attribute_id
AND CALP_ATTR.version_id = VER.version_id;
SELECT CALP_ATTR.date_assign_value
INTO l_cal_period_end_date
FROM fem_cal_periods_attr calp_attr
,fem_dim_attributes_b ATTR
,fem_dim_attr_versions_b VER
,fem_xdim_dimensions_vl XDIM
WHERE XDIM.dimension_varchar_label = 'CAL_PERIOD'
AND ATTR.dimension_id = XDIM.dimension_id
AND ATTR.attribute_varchar_label = 'CAL_PERIOD_END_DATE'
AND VER.attribute_id = ATTR.attribute_id
AND VER.default_version_flag = 'Y'
AND CALP_ATTR.cal_period_id = p_cal_period_id
AND CALP_ATTR.attribute_id = ATTR.attribute_id
AND CALP_ATTR.version_id = VER.version_id;
SELECT object_id
INTO l_object_id
FROM fem_object_definition_vl
WHERE object_definition_id = p_object_def_id;
SELECT dimension_id
INTO l_dimension_id
FROM fem_dimensions_vl
WHERE dimension_varchar_label = p_dimension_varchar_label;