[Home] [Help]
958:
959: -- This Source System Display Code was completly processed: Log
960: -- it in Data Locations as 'COMPLETE'.
961:
962: FEM_DIMENSION_UTIL_PKG.Register_Data_Location
963: (P_REQUEST_ID => pv_req_id,
964: P_OBJECT_ID => pv_rule_obj_id,
965: P_TABLE_NAME => 'FEM_BALANCES',
966: P_LEDGER_ID => pv_ledger_id,
991: -- The number remaining is less than the original number to be
992: -- processed: at least one row was processed for this Source
993: -- System Code, so log it in Data Locations as 'INCOMPLETE'.
994:
995: FEM_DIMENSION_UTIL_PKG.Register_Data_Location
996: (P_REQUEST_ID => pv_req_id,
997: P_OBJECT_ID => pv_rule_obj_id,
998: P_TABLE_NAME => 'FEM_BALANCES',
999: P_LEDGER_ID => pv_ledger_id,
1249:
1250: -- Set Value Set ID for each dimension based on the ledger
1251:
1252: pv_proc_keys(v).dim_vs_id :=
1253: FEM_DIMENSION_UTIL_PKG.Dimension_Value_Set_ID
1254: (p_Dimension_ID => pv_proc_keys(v).dimension_id,
1255: p_Ledger_ID => pv_ledger_id);
1256:
1257: IF pv_proc_keys(v).dim_vs_id = -1 THEN
1261: p_module => 'fem.plsql.fem_gl_post_process_pkg.' ||
1262: 'get_proc_key_info.' || p_process_slice,
1263: p_msg_text => 'raising Value_Set_ID_Error');
1264:
1265: pv_dim_name := FEM_DIMENSION_UTIL_PKG.Get_Dimension_Name
1266: (p_dim_id => pv_proc_keys(v).dimension_id);
1267:
1268: RAISE Value_Set_ID_Error;
1269:
1652: WHERE dimension_varchar_label = 'CAL_PERIOD';
1653:
1654: -- Set variables used in messaging upon failure.
1655:
1656: v_param_name := FEM_DIMENSION_UTIL_PKG.Get_Dimension_Name
1657: (p_dim_id => pv_cal_per_dim_id);
1658: IF v_param_name IS NULL THEN
1659: v_param_name := 'Calendar Period';
1660: END IF;
1670: FROM fem_cal_periods_b
1671: WHERE cal_period_id = pv_cal_period_id
1672: AND personal_flag = 'N';
1673:
1674: v_attr_name := FEM_DIMENSION_UTIL_PKG.Get_Dim_Attr_Name
1675: (p_dim_id => pv_cal_per_dim_id,
1676: p_attr_label => 'DIMENSION_GROUP_ID');
1677:
1678: IF v_attr_name IS NULL THEN
1710: BEGIN
1711:
1712: -- Get the CAL_PERIOD_END_DATE attribute of the Cal Period ID.
1713:
1714: v_attr_name := FEM_DIMENSION_UTIL_PKG.Get_Dim_Attr_Name
1715: (p_dim_id => pv_cal_per_dim_id,
1716: p_attr_label => 'CAL_PERIOD_END_DATE');
1717:
1718: IF v_attr_name IS NULL THEN
1718: IF v_attr_name IS NULL THEN
1719: v_attr_name := 'CAL_PERIOD_END_DATE';
1720: END IF;
1721:
1722: fem_dimension_util_pkg.get_dim_attr_id_ver_id
1723: (x_err_code => pv_API_return_code,
1724: x_attr_id => pv_dim_attr_id,
1725: x_ver_id => pv_dim_attr_ver_id,
1726: p_dim_id => pv_cal_per_dim_id,
1772:
1773: -- Get the Calendar Period Number from the GL_PERIOD_NUM attribute of the
1774: -- Cal Period ID.
1775:
1776: v_attr_name := FEM_DIMENSION_UTIL_PKG.Get_Dim_Attr_Name
1777: (p_dim_id => pv_cal_per_dim_id,
1778: p_attr_label => 'GL_PERIOD_NUM');
1779:
1780: IF v_attr_name IS NULL THEN
1780: IF v_attr_name IS NULL THEN
1781: v_attr_name := 'GL_PERIOD_NUM';
1782: END IF;
1783:
1784: fem_dimension_util_pkg.get_dim_attr_id_ver_id
1785: (x_err_code => pv_API_return_code,
1786: x_attr_id => pv_dim_attr_id,
1787: x_ver_id => pv_dim_attr_ver_id,
1788: p_dim_id => pv_cal_per_dim_id,
1842: WHERE dimension_varchar_label = 'LEDGER';
1843:
1844: -- Set variables used in messaging upon failure.
1845:
1846: v_param_name := FEM_DIMENSION_UTIL_PKG.Get_Dimension_Name
1847: (p_dim_id => pv_ledger_dim_id);
1848: IF v_param_name IS NULL THEN
1849: v_param_name := 'Ledger';
1850: END IF;
1896: WHERE dimension_varchar_label = 'DATASET';
1897:
1898: -- Set variables used in messaging upon failure.
1899:
1900: v_param_name := FEM_DIMENSION_UTIL_PKG.Get_Dimension_Name
1901: (p_dim_id => pv_dataset_dim_id);
1902: IF v_param_name IS NULL THEN
1903: v_param_name := 'Dataset';
1904: END IF;
1907: BEGIN
1908:
1909: -- Look up the Dataset attribute DATASET_BALANCE_TYPE_CODE
1910:
1911: v_attr_name := FEM_DIMENSION_UTIL_PKG.Get_Dim_Attr_Name
1912: (p_dim_id => pv_dataset_dim_id,
1913: p_attr_label => 'DATASET_BALANCE_TYPE_CODE');
1914:
1915: IF v_attr_name IS NULL THEN
1915: IF v_attr_name IS NULL THEN
1916: v_attr_name := 'DATASET_BALANCE_TYPE_CODE';
1917: END IF;
1918:
1919: fem_dimension_util_pkg.get_dim_attr_id_ver_id
1920: (x_err_code => pv_API_return_code,
1921: x_attr_id => pv_dim_attr_id,
1922: x_ver_id => pv_dim_attr_ver_id,
1923: p_dim_id => pv_dataset_dim_id,
1970: BEGIN
1971:
1972: -- Look up the Dataset Code BUDGET_ID attribute
1973:
1974: v_attr_name := FEM_DIMENSION_UTIL_PKG.Get_Dim_Attr_Name
1975: (p_dim_id => pv_dataset_dim_id,
1976: p_attr_label => 'BUDGET_ID');
1977:
1978: IF v_attr_name IS NULL THEN
1978: IF v_attr_name IS NULL THEN
1979: v_attr_name := 'BUDGET_ID';
1980: END IF;
1981:
1982: fem_dimension_util_pkg.get_dim_attr_id_ver_id
1983: (x_err_code => pv_API_return_code,
1984: x_attr_id => pv_dim_attr_id,
1985: x_ver_id => pv_dim_attr_ver_id,
1986: p_dim_id => pv_dataset_dim_id,
2036: INTO pv_budget_dim_id
2037: FROM fem_dimensions_b
2038: WHERE dimension_varchar_label = 'BUDGET';
2039:
2040: v_param_name := FEM_DIMENSION_UTIL_PKG.Get_Dimension_Name
2041: (p_dim_id => pv_budget_dim_id);
2042: IF v_param_name IS NULL THEN
2043: v_param_name := 'Budget';
2044: END IF;
2078: BEGIN
2079:
2080: -- Look up the Dataset Code ENCUMBRANCE_TYPE_ID attribute
2081:
2082: v_attr_name := FEM_DIMENSION_UTIL_PKG.Get_Dim_Attr_Name
2083: (p_dim_id => pv_dataset_dim_id,
2084: p_attr_label => 'ENCUMBRANCE_TYPE_ID');
2085:
2086: IF v_attr_name IS NULL THEN
2086: IF v_attr_name IS NULL THEN
2087: v_attr_name := 'ENCUMBRANCE_TYPE_ID';
2088: END IF;
2089:
2090: fem_dimension_util_pkg.get_dim_attr_id_ver_id
2091: (x_err_code => pv_API_return_code,
2092: x_attr_id => pv_dim_attr_id,
2093: x_ver_id => pv_dim_attr_ver_id,
2094: p_dim_id => pv_dataset_dim_id,
2144: INTO pv_enc_type_dim_id
2145: FROM fem_dimensions_b
2146: WHERE dimension_varchar_label = 'ENCUMBRANCE_TYPE';
2147:
2148: v_param_name := FEM_DIMENSION_UTIL_PKG.Get_Dimension_Name
2149: (p_dim_id => pv_enc_type_dim_id);
2150: IF v_param_name IS NULL THEN
2151: v_param_name := 'Encumbrance Type';
2152: END IF;
2510: -- and make sure it matches the Budget ID parameter.
2511:
2512: BEGIN
2513:
2514: fem_dimension_util_pkg.get_dim_attr_id_ver_id
2515: (x_err_code => pv_API_return_code,
2516: x_attr_id => pv_dim_attr_id,
2517: x_ver_id => pv_dim_attr_ver_id,
2518: p_dim_id => pv_dataset_dim_id,
2687:
2688: -- Retrieve the CAL_PERIOD_END_DATE attribute of the Cal Period ID
2689: -- and set it into a package variable.
2690:
2691: fem_dimension_util_pkg.get_dim_attr_id_ver_id
2692: (x_err_code => pv_API_return_code,
2693: x_attr_id => pv_dim_attr_id,
2694: x_ver_id => pv_dim_attr_ver_id,
2695: p_dim_id => pv_cal_per_dim_id,
2741:
2742: -- Get the Calendar Period Number from the GL_PERIOD_NUM attribute of the
2743: -- Cal Period ID and set it into a package variable.
2744:
2745: fem_dimension_util_pkg.get_dim_attr_id_ver_id
2746: (x_err_code => pv_API_return_code,
2747: x_attr_id => pv_dim_attr_id,
2748: x_ver_id => pv_dim_attr_ver_id,
2749: p_dim_id => pv_cal_per_dim_id,
2863: -- Look up the Dataset Code DATASET_BALANCE_TYPE_CODE attribute
2864:
2865: BEGIN
2866:
2867: fem_dimension_util_pkg.get_dim_attr_id_ver_id
2868: (x_err_code => pv_API_return_code,
2869: x_attr_id => pv_dim_attr_id,
2870: x_ver_id => pv_dim_attr_ver_id,
2871: p_dim_id => pv_dataset_dim_id,
3146: -- and make sure it matches the Encumbrance Type ID parameter.
3147:
3148: BEGIN
3149:
3150: fem_dimension_util_pkg.get_dim_attr_id_ver_id
3151: (x_err_code => pv_API_return_code,
3152: x_attr_id => pv_dim_attr_id,
3153: x_ver_id => pv_dim_attr_ver_id,
3154: p_dim_id => pv_dataset_dim_id,
3289:
3290: -- Get the Entered Currency Enable Flag attribute of the Ledger ID and store
3291: -- it as a package variable.
3292:
3293: fem_dimension_util_pkg.get_dim_attr_id_ver_id
3294: (x_err_code => pv_API_return_code,
3295: x_attr_id => pv_dim_attr_id,
3296: x_ver_id => pv_dim_attr_ver_id,
3297: p_dim_id => pv_ledger_dim_id,
3347:
3348: -- Get the Hierarchy Object Definition ID of the Time hierarchy assigned
3349: -- to the given ledger. It is stored as a row-based ledger attribute.
3350:
3351: fem_dimension_util_pkg.get_dim_attr_id_ver_id
3352: (x_err_code => pv_API_return_code,
3353: x_attr_id => pv_dim_attr_id,
3354: x_ver_id => pv_dim_attr_ver_id,
3355: p_dim_id => pv_ledger_dim_id,
3456:
3457: -- FEM-OGL Intg: Added to get the Ledger Functional Currency Code
3458: -- attribute of the Ledger ID and store it as a package variable.
3459:
3460: fem_dimension_util_pkg.get_dim_attr_id_ver_id
3461: (x_err_code => pv_API_return_code,
3462: x_attr_id => pv_dim_attr_id,
3463: x_ver_id => pv_dim_attr_ver_id,
3464: p_dim_id => pv_ledger_dim_id,
3514:
3515: -- FEM-OGL Intg: Added to get the Global Value Set Combination ID
3516: -- attribute of the Ledger ID and store it as a package variable.
3517:
3518: fem_dimension_util_pkg.get_dim_attr_id_ver_id
3519: (x_err_code => pv_API_return_code,
3520: x_attr_id => pv_dim_attr_id,
3521: x_ver_id => pv_dim_attr_ver_id,
3522: p_dim_id => pv_ledger_dim_id,
3735: -- --------------------------------------------------------------------
3736:
3737: BEGIN
3738:
3739: fem_dimension_util_pkg.get_dim_attr_id_ver_id
3740: (x_err_code => pv_API_return_code,
3741: x_attr_id => pv_dim_attr_id,
3742: x_ver_id => pv_dim_attr_ver_id,
3743: p_dim_id => pv_dataset_dim_id,
4070: -- Invalid Budget parameter: Value not found or
4071: -- Budget attribute "Budget Ledger" not set.
4072: ------------------------------------------------------------------
4073:
4074: v_dim_name1 := FEM_DIMENSION_UTIL_PKG.Get_Dimension_Name
4075: (p_dim_id => pv_budget_dim_id);
4076:
4077: IF v_dim_name1 IS NULL THEN
4078: v_dim_name1 := 'Budget';
4077: IF v_dim_name1 IS NULL THEN
4078: v_dim_name1 := 'Budget';
4079: END IF;
4080:
4081: v_attr_name := FEM_DIMENSION_UTIL_PKG.Get_Dim_Attr_Name
4082: (p_dim_id => pv_budget_dim_id,
4083: p_attr_label => 'BUDGET_LEDGER');
4084:
4085: IF v_attr_name IS NULL THEN
4131: -- Invalid Calendar Period parameter: Value not found or
4132: -- Calendar Period attributes not set.
4133: ------------------------------------------------------------------
4134:
4135: v_dim_name1 := FEM_DIMENSION_UTIL_PKG.Get_Dimension_Name
4136: (p_dim_id => pv_cal_per_dim_id);
4137:
4138: IF v_dim_name1 IS NULL THEN
4139: v_dim_name1 := 'Calendar Period';
4163: -- Invalid Dataset parameter: Value not found or Dataset
4164: -- attributes not set.
4165: ------------------------------------------------------------------
4166:
4167: v_dim_name1 := FEM_DIMENSION_UTIL_PKG.Get_Dimension_Name
4168: (p_dim_id => pv_dataset_dim_id);
4169:
4170: IF v_dim_name1 IS NULL THEN
4171: v_dim_name1 := 'Dataset';
4274: ------------------------------------------------------------------
4275: -- Invalid Encumbrance Type parameter: Value not found.
4276: ------------------------------------------------------------------
4277:
4278: v_dim_name1 := FEM_DIMENSION_UTIL_PKG.Get_Dimension_Name
4279: (p_dim_id => pv_enc_type_dim_id);
4280:
4281: IF v_dim_name1 IS NULL THEN
4282: v_dim_name1 := 'Encumbrance Type';
4338: ------------------------------------------------------------------
4339:
4340: -- FEM-OGL Intg: It should pass the ledger dim id instead of ledger id
4341: -- so replaced pv_ledger_id to pv_ledger_dim_id
4342: v_dim_name1 := FEM_DIMENSION_UTIL_PKG.Get_Dimension_Name
4343: (p_dim_id => pv_ledger_dim_id);
4344:
4345: IF v_dim_name1 IS NULL THEN
4346: v_dim_name1 := 'Ledger';
4364: p_value1 => v_dim_name1);
4365:
4366: ELSE
4367:
4368: v_attr_name := FEM_DIMENSION_UTIL_PKG.Get_Dim_Attr_Name
4369: (p_dim_id => pv_ledger_dim_id,
4370: p_attr_label => pv_attr_label);
4371:
4372: IF v_attr_name IS NULL THEN
5367: FROM GL_PERIOD_STATUSES per
5368: WHERE per.APPLICATION_ID = 101
5369: AND per.LEDGER_ID = pv_ledger_id
5370: AND FEM_DL_DIMENSIONS.CAL_PERIOD_ID =
5371: FEM_DIMENSION_UTIL_PKG.Get_Cal_Period_ID( pv_ledger_id
5372: , 'OGL_'||per.PERIOD_TYPE
5373: , per.PERIOD_NUM
5374: , per.PERIOD_YEAR)
5375: AND per.EFFECTIVE_PERIOD_NUM BETWEEN pv_from_period_eff_num
5417: )
5418: SELECT pv_dataset_code
5419: , per.EFFECTIVE_PERIOD_NUM
5420: , per.PERIOD_NAME
5421: , FEM_DIMENSION_UTIL_PKG.Get_Cal_Period_ID( pv_ledger_id
5422: , 'OGL_'||per.PERIOD_TYPE
5423: , per.PERIOD_NUM
5424: , per.PERIOD_YEAR)
5425: , pv_exec_mode
5452: SELECT bgetDS.OUTPUT_DATASET_CODE
5453: , bget.BUDGET_ID
5454: , per.EFFECTIVE_PERIOD_NUM
5455: , per.PERIOD_NAME
5456: , FEM_DIMENSION_UTIL_PKG.Get_Cal_Period_ID( pv_ledger_id
5457: , 'OGL_'||per.PERIOD_TYPE
5458: , per.PERIOD_NUM
5459: , per.PERIOD_YEAR)
5460: , pv_exec_mode
5506: SELECT encTypeDS.OUTPUT_DATASET_CODE
5507: , encType.ENCUMBRANCE_TYPE_ID
5508: , per.EFFECTIVE_PERIOD_NUM
5509: , per.PERIOD_NAME
5510: , FEM_DIMENSION_UTIL_PKG.Get_Cal_Period_ID( pv_ledger_id
5511: , 'OGL_'||per.PERIOD_TYPE
5512: , per.PERIOD_NUM
5513: , per.PERIOD_YEAR)
5514: , pv_exec_mode
5850: -- <<< Ledger not found or ledger attribute not set >>>
5851: x_completion_code := 2; -- Indicating fatal error
5852:
5853: -- Get the name for Ledger dimension
5854: v_dim_name := FEM_DIMENSION_UTIL_PKG.Get_Dimension_Name
5855: (p_dim_id => pv_ledger_dim_id);
5856:
5857: IF (v_dim_name IS NULL)
5858: THEN
5862: IF pv_attr_label IS NOT NULL
5863: THEN
5864: -- Failed to retrieve ledger attribute
5865: -- Get the attribute name
5866: v_attr_name := FEM_DIMENSION_UTIL_PKG.Get_Dim_Attr_Name
5867: (p_dim_id => pv_ledger_dim_id,
5868: p_attr_label => pv_attr_label);
5869:
5870: IF v_attr_name IS NULL
6181: AND LANGUAGE = USERENV('LANG');
6182:
6183: BEGIN
6184: -- Retrieve the First Load Cal Period GL_PERIOD_NUM attribute
6185: fem_dimension_util_pkg.get_dim_attr_id_ver_id
6186: (x_err_code => pv_API_return_code,
6187: x_attr_id => pv_dim_attr_id,
6188: x_ver_id => pv_dim_attr_ver_id,
6189: p_dim_id => pv_cal_per_dim_id,
6229: END;
6230:
6231: BEGIN
6232: -- Retrieve the First Load Cal Period ACCOUNTING_YEAR attribute
6233: fem_dimension_util_pkg.get_dim_attr_id_ver_id
6234: (x_err_code => pv_API_return_code,
6235: x_attr_id => pv_dim_attr_id,
6236: x_ver_id => pv_dim_attr_ver_id,
6237: p_dim_id => pv_cal_per_dim_id,
6308: AND LANGUAGE = USERENV('LANG');
6309:
6310: BEGIN
6311: -- Retrieve the Last Load Cal Period GL_PERIOD_NUM attribute
6312: fem_dimension_util_pkg.get_dim_attr_id_ver_id
6313: (x_err_code => pv_API_return_code,
6314: x_attr_id => pv_dim_attr_id,
6315: x_ver_id => pv_dim_attr_ver_id,
6316: p_dim_id => pv_cal_per_dim_id,
6356: END;
6357:
6358: BEGIN
6359: -- Retrieve the Last Load Cal Period ACCOUNTING_YEAR attribute
6360: fem_dimension_util_pkg.get_dim_attr_id_ver_id
6361: (x_err_code => pv_API_return_code,
6362: x_attr_id => pv_dim_attr_id,
6363: x_ver_id => pv_dim_attr_ver_id,
6364: p_dim_id => pv_cal_per_dim_id,
7044: -- <<< Cal Period attributes not set >>>
7045: x_completion_code := 2; -- Indicating fatal error
7046:
7047: -- Get the name for Calendar Period dimension
7048: v_dim_name := FEM_DIMENSION_UTIL_PKG.Get_Dimension_Name
7049: (p_dim_id => pv_cal_per_dim_id);
7050:
7051: IF (v_dim_name IS NULL)
7052: THEN
7055:
7056: -- Get the attribute name
7057: IF (pv_attr_label IS NOT NULL)
7058: THEN
7059: v_attr_name := FEM_DIMENSION_UTIL_PKG.Get_Dim_Attr_Name
7060: (p_dim_id => pv_cal_per_dim_id,
7061: p_attr_label => pv_attr_label);
7062:
7063: IF v_attr_name IS NULL
7609: -- This translated currency is for this Request, so register the data
7610: -- location for each translated currency found
7611: LOOP
7612: -- Register the data location for a translated currency
7613: FEM_DIMENSION_UTIL_PKG.Register_Data_Location
7614: (P_REQUEST_ID => v_req.request_id,
7615: P_OBJECT_ID => pv_rule_obj_id,
7616: P_TABLE_NAME => 'FEM_BALANCES',
7617: P_LEDGER_ID => pv_ledger_id,
7646: ELSE
7647: -- No translated currency is found for the output dataset code and
7648: -- cal period of this Request, so register the data location without
7649: -- passing any translated currency code
7650: FEM_DIMENSION_UTIL_PKG.Register_Data_Location
7651: (P_REQUEST_ID => v_req.request_id,
7652: P_OBJECT_ID => pv_rule_obj_id,
7653: P_TABLE_NAME => 'FEM_BALANCES',
7654: P_LEDGER_ID => pv_ledger_id,