1: PACKAGE BODY GCS_UTILITY_PKG as
2: /* $Header: gcsutilb.pls 120.5 2007/06/28 12:23:18 vkosuri noship $ */
3:
4: --
5: -- Procedure
23:
24: BEGIN
25:
26: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
27: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'gcs.plsql.gcs_utility_pkg.init_dimension_attr_info.begin', null);
28: END IF;
29:
30: SELECT ftcb.dimension_id,
31: fda.attribute_id,
91: END LOOP;
92:
93:
94: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
95: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'gcs.plsql.gcs_utility_pkg.init_dimension_attr_info.end', null);
96: END IF;
97:
98: END init_dimension_attr_info;
99:
132:
133: BEGIN
134:
135: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
136: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'gcs.plsql.gcs_utility_pkg.init_dimension_info.begin', null);
137: END IF;
138:
139: -- Start bugfix 5707630: Select the dimensions enabled for historical rates on the
140: -- processing keys page and store it into the record for use during translation
216: END LOOP;
217: END IF;
218:
219: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
220: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'gcs.plsql.gcs_utility_pkg.init_dimension_info.end', null);
221: END IF;
222:
223: EXCEPTION
224: WHEN inv_application_exception THEN
222:
223: EXCEPTION
224: WHEN inv_application_exception THEN
225: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
226: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'gcs.plsql.gcs_utility_pkg.init_dimension_info', 'Invalid Applications Context');
227: END IF;
228: FND_MESSAGE.SET_NAME('GCS','Invalid_App_Group');
229: app_exception.raise_exception;
230: WHEN inv_global_combo_exception THEN
228: FND_MESSAGE.SET_NAME('GCS','Invalid_App_Group');
229: app_exception.raise_exception;
230: WHEN inv_global_combo_exception THEN
231: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
232: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'gcs.plsql.gcs_utility_pkg.init_dimension_info', 'Invalid Global VS Combo');
233: END IF;
234: FND_MESSAGE.SET_NAME('GCS','Invalid_Global_Como');
235: app_exception.raise_exception;
236: WHEN NO_DATA_FOUND THEN
271:
272: BEGIN
273:
274: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
275: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'gcs.plsql.gcs_utility_pkg.get_cal_period_details.begin', null);
276: END IF;
277:
278: SELECT fcpb.calendar_id, fcpb.dimension_group_id,
279: fcpa_number.number_assign_value, fcpa_year.number_assign_value,
387: p_cal_period_record.cal_periods_per_year := l_periods_per_year;
388:
389:
390: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
391: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'gcs.plsql.gcs_utility_pkg.get_cal_period_details.end', null);
392: END IF;
393:
394: END get_cal_period_details;
395:
423:
424: BEGIN
425:
426: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
427: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'gcs.plsql.gcs_utility_pkg.get_entry_header.begin', null);
428: END IF;
429:
430: SELECT entity_name
431: INTO l_entity_name
470: p_entry_header.name := l_entry_header;
471: p_entry_header.description := l_entry_description;
472:
473: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
474: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'gcs.plsql.gcs_utility_pkg.get_entry_header.end', null);
475: END IF;
476:
477: END get_entry_header;
478:
484: -- Get whether or not this dimension is required. Return 'Y' or 'N'.
485: -- Arguments
486: -- p_dim_col Dimension column name
487: -- Example
488: -- GCS_UTILITY_PKG.Get_Dimension_Required
489: -- Notes
490: --
491: FUNCTION Get_Dimension_Required(p_dim_col VARCHAR2) RETURN VARCHAR2 IS
492: BEGIN
503: -- Get whether or not this dimension is required for FEM. Return 'Y' or 'N'.
504: -- Arguments
505: -- p_dim_col Dimension column name
506: -- Example
507: -- GCS_UTILITY_PKG.Get_Fem_Dim_Required
508: -- Notes
509: --
510: FUNCTION Get_Fem_Dim_Required(p_dim_col VARCHAR2) RETURN VARCHAR2 IS
511: BEGIN
522: -- Get whether or not this dimension is required for historical rates
523: -- Arguments
524: -- p_dim_col Dimension column name
525: -- Example
526: -- GCS_UTILITY_PKG.Get_Hrate_Dim_Required
527: -- Notes
528: --
529: FUNCTION Get_Hrate_Dim_Required(p_dim_col VARCHAR2) RETURN VARCHAR2 IS
530: BEGIN
543: -- Get default value for the dimension
544: -- Arguments
545: -- p_dim_col Dimension column name
546: -- Example
547: -- GCS_UTILITY_PKG.Get_Default_Value
548: -- Notes
549: --
550: FUNCTION Get_Default_Value(p_dim_col VARCHAR2) RETURN NUMBER IS
551: BEGIN
562: -- Get attribute_id for the dimension-attribute
563: -- Arguments
564: -- p_dim_attr Dimension attribute
565: -- Example
566: -- GCS_UTILITY_PKG.Get_Dimension_Attribute('CAL_PERIOD_ID-CAL_PERIOD_END_DATE')
567: -- Notes
568: --
569: FUNCTION Get_Dimension_Attribute(p_dim_attr VARCHAR2) RETURN NUMBER IS
570: BEGIN
582: -- Get org_id for the given entity.
583: -- Arguments
584: -- p_entity_id Entity Id
585: -- Example
586: -- GCS_UTILITY_PKG.Get_Org_Id
587: -- Notes
588: -- This is a private function, only called by the public Get_Org_Id().
589: -- History
590: -- 23-Jun-2004 J Huang BaseOrg enhancement. (Bug 3711204)
602: BEGIN
603:
604: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
605: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
606: 'gcs.plsql.GCS_UTILITY_PKG.GET_BASE_ORG_ID.begin',
607: TO_CHAR (SYSDATE, 'DD-MON-YYYY HH:MI:SS'));
608: END IF;
609:
610: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
608: END IF;
609:
610: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
611: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
612: 'gcs.plsql.GCS_UTILITY_PKG.GET_BASE_ORG_ID.bind',
613: 'ENTITY_ID: ' || p_entity_id);
614: END IF;
615:
616: OPEN getOrgId( p_entity_id);
626: END IF;
627:
628: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
629: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
630: 'gcs.plsql.GCS_UTILITY_PKG.GET_BASE_ORG_ID',
631: 'BASE_ORG_ID: ' || org_id);
632: END IF;
633:
634: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
632: END IF;
633:
634: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
635: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
636: 'gcs.plsql.GCS_UTILITY_PKG.GET_BASE_ORG_ID.end',
637: TO_CHAR (SYSDATE, 'DD-MON-YYYY HH:MI:SS'));
638: END IF;
639:
640: RETURN org_id;
656: -- p_entity_id Entity Id
657: -- p_hierarchy_id Hierarchy Id
658: -- p_relationship_id Relationship Id
659: -- Example
660: -- GCS_UTILITY_PKG.Get_Org_Id
661: -- Notes
662: --
663: -- History
664: -- 23-Jun-2004 J Huang BaseOrg enhancement. (Bug 3711204)
699:
700: BEGIN
701: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
702: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
703: 'gcs.plsql.GCS_UTILITY_PKG.GET_ORG_ID. begin',
704: TO_CHAR (SYSDATE, 'DD-MON-YYYY HH:MI:SS'));
705: END IF;
706:
707: l_entity_id:=p_entity_id;
708: c_entity_id:=p_entity_id;
709: l_hierarchy_id := p_hierarchy_id;
710: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
711: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
712: 'gcs.plsql.GCS_UTILITY_PKG.GET_ORG_ID.bind',
713: 'ENTITY_ID: '||l_entity_id
714: ||'; HIERARCHY_ID: '|| l_hierarchy_id);
715: END IF;
716:
724: AND value_set_id = g_gcs_dimension_info('ENTITY_ID').associated_value_set_id;
725:
726: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
727: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
728: 'gcs.plsql.GCS_UTILITY_PKG.GET_ORG_ID.get_entity_type',
729: 'ATTRIBUTE_ID: '|| g_dimension_attr_info('ENTITY_ID-ENTITY_TYPE_CODE').attribute_id
730: ||'; VERSION_ID: '|| g_dimension_attr_info('ENTITY_ID-ENTITY_TYPE_CODE').version_id
731: ||'; VALUE_SET_ID: '|| g_gcs_dimension_info('ENTITY_ID').associated_value_set_id
732: ||'; ENTITY_TYPE: '|| l_entity_type);
751: */
752:
753: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
754: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
755: 'gcs.plsql.GCS_UTILITY_PKG.GET_ORG_ID.get_consolidation_entity',
756: 'ATTRIBUTE_ID: '|| g_dimension_attr_info('ENTITY_ID-ELIMINATION_ENTITY').attribute_id
757: ||'; VERSION_ID: '|| g_dimension_attr_info('ENTITY_ID-ELIMINATION_ENTITY').version_id
758: ||'; ENTITY_ID: '|| l_entity_id);
759: END IF;
766: AND fea.dim_attribute_numeric_member = l_entity_id;
767:
768: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
769: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
770: 'gcs.plsql.GCS_UTILITY_PKG.GET_ORG_ID.get_consolidation_entity',
771: 'CONSOLIDATION ENTITY: '|| c_entity_id);
772: END IF;
773:
774: END IF; --IF entity_type = 'E'
784: l_org_id :=Get_Base_Org_Id(childRec.child_entity_id);
785: END IF;
786: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
787: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
788: 'gcs.plsql.GCS_UTILITY_PKG.GET_ORG_ID.bind',
789: 'Consolidation entity ENTITY_ID: ' || c_entity_id
790: ||'; Operating entity ENTITY_ID: ' || l_entity_id);
791: END IF;
792:
796: l_org_id := Get_Base_Org_Id(l_entity_id);
797:
798: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
799: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
800: 'gcs.plsql.GCS_UTILITY_PKG.GET_ORG_ID.bind',
801: 'Consolidation entity ENTITY_ID: ' || c_entity_id
802: ||'; Associated Operating entity ENTITY_ID: ' || l_entity_id);
803: END IF;
804: END IF; --If getOpEntityId%ROWCOUNT<1
807: END IF; --If entity_type ='O'
808:
809: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
810: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
811: 'gcs.plsql.GCS_UTILITY_PKG.GET_ORG_ID.end',
812: TO_CHAR (SYSDATE, 'DD-MON-YYYY HH:MI:SS'));
813: END IF;
814:
815: RETURN l_org_id;
843: -- p_cal_period_id Cal Period Id
844: -- P_errbuf Error Buffer
845: -- P_errcode Error Code
846: -- Example
847: -- GCS_UTILITY_PKG.Get_Conversion_Rate('EUR', 'USD',
848: -- 24528210000000000000061000200140,
849: -- l_errbuf,
850: -- l_errcode);
851: -- Notes
866:
867:
868: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
869: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
870: 'gcs.plsql.gcs_utility_pkg.get_conversion_rate. begin',
871: null);
872: END IF;
873: p_errbuf := 'SUCCESS';
874: -- Get the period end date.
874: -- Get the period end date.
875:
876: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
877: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
878: 'gcs.plsql.gcs_utility_pkg.get_conversion_rate.Get the period end date.'
879: , null);
880: END IF;
881:
882: SELECT DATE_ASSIGN_VALUE
883: INTO l_period_end_date
884: FROM fem_cal_periods_attr fcpa
885: WHERE fcpa.cal_period_id = p_cal_period_id
886: AND fcpa.attribute_id =
887: gcs_utility_pkg.g_dimension_attr_info ('CAL_PERIOD_ID-CAL_PERIOD_END_DATE').attribute_id
888: AND fcpa.version_id =
889: gcs_utility_pkg.g_dimension_attr_info ('CAL_PERIOD_ID-CAL_PERIOD_END_DATE').version_id;
890:
891:
885: WHERE fcpa.cal_period_id = p_cal_period_id
886: AND fcpa.attribute_id =
887: gcs_utility_pkg.g_dimension_attr_info ('CAL_PERIOD_ID-CAL_PERIOD_END_DATE').attribute_id
888: AND fcpa.version_id =
889: gcs_utility_pkg.g_dimension_attr_info ('CAL_PERIOD_ID-CAL_PERIOD_END_DATE').version_id;
890:
891:
892: BEGIN
893: -- Get the default currency treatment.
893: -- Get the default currency treatment.
894:
895: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
896: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
897: 'gcs.plsql.gcs_utility_pkg.'
898: ||'get_conversion_rate'
899: ||'Source Currency: '||P_source_currency
900: ||' Target Currency: '||P_Target_currency
901: ||' End Date: '||l_period_end_date,
903: END IF;
904:
905: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
906: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
907: 'gcs.plsql.gcs_utility_pkg.'
908: ||'get_conversion_rate.Get the default rate type',
909: null);
910: END IF;
911:
922: -- period end date combination.
923:
924: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
925: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
926: 'gcs.plsql.gcs_utility_pkg.get_conversion_rate.'
927: ||'Get the rate for default rate type and period '
928: ||'end date combination', null);
929: END IF;
930:
930:
931:
932: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
933: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
934: 'gcs.plsql.gcs_utility_pkg.'
935: ||'get_conversion_rate'
936: ||' Default Conversion Type: '||l_rate_type,
937: null);
938: END IF;
950:
951: WHEN OTHERS THEN
952:
953: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
954: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'gcs.plsql.gcs_utility_pkg.'
955: ||'get_conversion_rate'|| SUBSTR(SQLERRM, 1, 255), null);
956: END IF;
957:
958: l_conv_rate := 1;
963:
964: EXCEPTION
965: WHEN OTHERS THEN
966: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
967: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'gcs.plsql.gcs_utility_pkg.'
968: ||'get_conversion_rate'|| SUBSTR(SQLERRM, 1, 255), null);
969: END IF;
970:
971: -- Get the conversion Rate for 'Corporate' rate type and period
977: -- end date combination.
978:
979: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
980: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
981: 'gcs.plsql.gcs_utility_pkg.get_conversion_rate.'
982: ||'Get the rate for ''Corporate''rate type and period '
983: ||'end date combination', null);
984: END IF;
985:
1003: END; -- Default Rate Type Block End;
1004:
1005: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1006: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1007: gcs_utility_pkg.g_module_success
1008: || ' '
1009: || 'gcs.plsql.gcs_utility_pkg.'
1010: ||'get_conversion_rate'
1011: || '() '
1005: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1006: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1007: gcs_utility_pkg.g_module_success
1008: || ' '
1009: || 'gcs.plsql.gcs_utility_pkg.'
1010: ||'get_conversion_rate'
1011: || '() '
1012: || TO_CHAR (SYSDATE, 'DD-MON-YYYY HH:MI:SS'),
1013: null);
1022: WHEN OTHERS THEN
1023:
1024: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1025: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1026: gcs_utility_pkg.g_module_success
1027: || ' '
1028: || 'gcs.plsql.gcs_utility_pkg.'
1029: ||'get_conversion_rate'
1030: || '() '
1024: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1025: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1026: gcs_utility_pkg.g_module_success
1027: || ' '
1028: || 'gcs.plsql.gcs_utility_pkg.'
1029: ||'get_conversion_rate'
1030: || '() '
1031: || TO_CHAR (SYSDATE, 'DD-MON-YYYY HH:MI:SS'),
1032: null);
1055:
1056: IS
1057:
1058: l_data_exists NUMBER(15);
1059: l_cal_period_record gcs_utility_pkg.r_cal_period_info;
1060: l_period_num_attr NUMBER :=
1061: gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-GL_PERIOD_NUM').attribute_id;
1062: l_period_num_version NUMBER :=
1063: gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-GL_PERIOD_NUM').version_id;
1057:
1058: l_data_exists NUMBER(15);
1059: l_cal_period_record gcs_utility_pkg.r_cal_period_info;
1060: l_period_num_attr NUMBER :=
1061: gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-GL_PERIOD_NUM').attribute_id;
1062: l_period_num_version NUMBER :=
1063: gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-GL_PERIOD_NUM').version_id;
1064: l_period_year_attr NUMBER :=
1065: gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-ACCOUNTING_YEAR').attribute_id;
1059: l_cal_period_record gcs_utility_pkg.r_cal_period_info;
1060: l_period_num_attr NUMBER :=
1061: gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-GL_PERIOD_NUM').attribute_id;
1062: l_period_num_version NUMBER :=
1063: gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-GL_PERIOD_NUM').version_id;
1064: l_period_year_attr NUMBER :=
1065: gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-ACCOUNTING_YEAR').attribute_id;
1066: l_period_year_version NUMBER :=
1067: gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-ACCOUNTING_YEAR').version_id;
1061: gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-GL_PERIOD_NUM').attribute_id;
1062: l_period_num_version NUMBER :=
1063: gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-GL_PERIOD_NUM').version_id;
1064: l_period_year_attr NUMBER :=
1065: gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-ACCOUNTING_YEAR').attribute_id;
1066: l_period_year_version NUMBER :=
1067: gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-ACCOUNTING_YEAR').version_id;
1068:
1069: BEGIN
1063: gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-GL_PERIOD_NUM').version_id;
1064: l_period_year_attr NUMBER :=
1065: gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-ACCOUNTING_YEAR').attribute_id;
1066: l_period_year_version NUMBER :=
1067: gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-ACCOUNTING_YEAR').version_id;
1068:
1069: BEGIN
1070: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1071: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'gcs.plsql.gcs_utility_pkg.populate_calendar_map_details.begin', '<
1067: gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-ACCOUNTING_YEAR').version_id;
1068:
1069: BEGIN
1070: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1071: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'gcs.plsql.gcs_utility_pkg.populate_calendar_map_details.begin', '<
1073:
1074: delete from gcs_cal_period_maps_gt;
1075:
1072: END IF;
1073:
1074: delete from gcs_cal_period_maps_gt;
1075:
1076: gcs_utility_pkg.get_cal_period_details( p_cal_period_id,
1077: l_cal_period_record);
1078:
1079: --Insert one row where source and target are the same
1080: INSERT INTO gcs_cal_period_maps_gt
1194: 'FOLLOWING', l_cal_period_record.cal_period_year + 1);
1195: END IF;
1196:
1197: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1198: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'gcs.plsql.gcs_utility_pkg.init_dimension_attr_info.end', '<
1200:
1201: END;
1202:
1210: -- Get associated_value_set_id for the dimension
1211: -- Arguments
1212: -- p_dim_col Dimension
1213: -- Example
1214: -- GCS_UTILITY_PKG.Get_Associated_Value_Set_Id('LINE_ITEM_ID')
1215: -- Notes
1216: --
1217:
1218: FUNCTION Get_Associated_Value_Set_Id(p_dim_col VARCHAR2) RETURN NUMBER IS
1238: WHEN OTHERS THEN
1239: NULL;
1240: END;
1241:
1242: END GCS_UTILITY_PKG;
1243:
1244: