80: e_no_calendar EXCEPTION;
81: e_unexp EXCEPTION;
82:
83: v_ledger_dim_id FEM_DIMENSIONS_B.dimension_id%TYPE;
84: v_calp_hier_attr_id FEM_LEDGERS_ATTR.attribute_id%TYPE;
85: v_calp_hier_vrs_id FEM_LEDGERS_ATTR.version_id%TYPE;
86: v_calp_hier_obj_def_id FEM_LEDGERS_ATTR.dim_attribute_numeric_member%TYPE;
87:
88:
81: e_unexp EXCEPTION;
82:
83: v_ledger_dim_id FEM_DIMENSIONS_B.dimension_id%TYPE;
84: v_calp_hier_attr_id FEM_LEDGERS_ATTR.attribute_id%TYPE;
85: v_calp_hier_vrs_id FEM_LEDGERS_ATTR.version_id%TYPE;
86: v_calp_hier_obj_def_id FEM_LEDGERS_ATTR.dim_attribute_numeric_member%TYPE;
87:
88:
89: BEGIN
82:
83: v_ledger_dim_id FEM_DIMENSIONS_B.dimension_id%TYPE;
84: v_calp_hier_attr_id FEM_LEDGERS_ATTR.attribute_id%TYPE;
85: v_calp_hier_vrs_id FEM_LEDGERS_ATTR.version_id%TYPE;
86: v_calp_hier_obj_def_id FEM_LEDGERS_ATTR.dim_attribute_numeric_member%TYPE;
87:
88:
89: BEGIN
90:
161:
162: -- Identify the cal period hier for the ledger
163: SELECT dim_attribute_numeric_member
164: INTO v_calp_hier_obj_def_id
165: FROM fem_ledgers_attr
166: WHERE ledger_id = p_ledger_id
167: AND attribute_id = v_calp_hier_attr_id
168: AND version_id = v_calp_hier_vrs_id;
169: