[Home] [Help]
7:
8: -- The API name
9: g_pkg_name CONSTANT VARCHAR2(30) := 'gcs.plsql.GCS_CONS_MONITOR_PKG';
10:
11: g_cal_period_end_date_attr NUMBER := gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-CAL_PERIOD_END_DATE')
12: .attribute_id;
13: g_cal_period_end_date_version NUMBER := gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-CAL_PERIOD_END_DATE')
14: .version_id;
15: g_entity_ledger_attr NUMBER := gcs_utility_pkg.g_dimension_attr_info('ENTITY_ID-LEDGER_ID')
9: g_pkg_name CONSTANT VARCHAR2(30) := 'gcs.plsql.GCS_CONS_MONITOR_PKG';
10:
11: g_cal_period_end_date_attr NUMBER := gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-CAL_PERIOD_END_DATE')
12: .attribute_id;
13: g_cal_period_end_date_version NUMBER := gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-CAL_PERIOD_END_DATE')
14: .version_id;
15: g_entity_ledger_attr NUMBER := gcs_utility_pkg.g_dimension_attr_info('ENTITY_ID-LEDGER_ID')
16: .attribute_id;
17: g_entity_ledger_version NUMBER := gcs_utility_pkg.g_dimension_attr_info('ENTITY_ID-LEDGER_ID')
11: g_cal_period_end_date_attr NUMBER := gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-CAL_PERIOD_END_DATE')
12: .attribute_id;
13: g_cal_period_end_date_version NUMBER := gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-CAL_PERIOD_END_DATE')
14: .version_id;
15: g_entity_ledger_attr NUMBER := gcs_utility_pkg.g_dimension_attr_info('ENTITY_ID-LEDGER_ID')
16: .attribute_id;
17: g_entity_ledger_version NUMBER := gcs_utility_pkg.g_dimension_attr_info('ENTITY_ID-LEDGER_ID')
18: .version_id;
19: g_ledger_currency_attr NUMBER := gcs_utility_pkg.g_dimension_attr_info('LEDGER_ID-LEDGER_FUNCTIONAL_CRNCY_CODE')
13: g_cal_period_end_date_version NUMBER := gcs_utility_pkg.g_dimension_attr_info('CAL_PERIOD_ID-CAL_PERIOD_END_DATE')
14: .version_id;
15: g_entity_ledger_attr NUMBER := gcs_utility_pkg.g_dimension_attr_info('ENTITY_ID-LEDGER_ID')
16: .attribute_id;
17: g_entity_ledger_version NUMBER := gcs_utility_pkg.g_dimension_attr_info('ENTITY_ID-LEDGER_ID')
18: .version_id;
19: g_ledger_currency_attr NUMBER := gcs_utility_pkg.g_dimension_attr_info('LEDGER_ID-LEDGER_FUNCTIONAL_CRNCY_CODE')
20: .attribute_id;
21: g_ledger_currency_version NUMBER := gcs_utility_pkg.g_dimension_attr_info('LEDGER_ID-LEDGER_FUNCTIONAL_CRNCY_CODE')
15: g_entity_ledger_attr NUMBER := gcs_utility_pkg.g_dimension_attr_info('ENTITY_ID-LEDGER_ID')
16: .attribute_id;
17: g_entity_ledger_version NUMBER := gcs_utility_pkg.g_dimension_attr_info('ENTITY_ID-LEDGER_ID')
18: .version_id;
19: g_ledger_currency_attr NUMBER := gcs_utility_pkg.g_dimension_attr_info('LEDGER_ID-LEDGER_FUNCTIONAL_CRNCY_CODE')
20: .attribute_id;
21: g_ledger_currency_version NUMBER := gcs_utility_pkg.g_dimension_attr_info('LEDGER_ID-LEDGER_FUNCTIONAL_CRNCY_CODE')
22: .version_id;
23: g_entity_type_attr NUMBER := gcs_utility_pkg.g_dimension_attr_info('ENTITY_ID-ENTITY_TYPE_CODE')
17: g_entity_ledger_version NUMBER := gcs_utility_pkg.g_dimension_attr_info('ENTITY_ID-LEDGER_ID')
18: .version_id;
19: g_ledger_currency_attr NUMBER := gcs_utility_pkg.g_dimension_attr_info('LEDGER_ID-LEDGER_FUNCTIONAL_CRNCY_CODE')
20: .attribute_id;
21: g_ledger_currency_version NUMBER := gcs_utility_pkg.g_dimension_attr_info('LEDGER_ID-LEDGER_FUNCTIONAL_CRNCY_CODE')
22: .version_id;
23: g_entity_type_attr NUMBER := gcs_utility_pkg.g_dimension_attr_info('ENTITY_ID-ENTITY_TYPE_CODE')
24: .attribute_id;
25: g_entity_type_version NUMBER := gcs_utility_pkg.g_dimension_attr_info('ENTITY_ID-ENTITY_TYPE_CODE')
19: g_ledger_currency_attr NUMBER := gcs_utility_pkg.g_dimension_attr_info('LEDGER_ID-LEDGER_FUNCTIONAL_CRNCY_CODE')
20: .attribute_id;
21: g_ledger_currency_version NUMBER := gcs_utility_pkg.g_dimension_attr_info('LEDGER_ID-LEDGER_FUNCTIONAL_CRNCY_CODE')
22: .version_id;
23: g_entity_type_attr NUMBER := gcs_utility_pkg.g_dimension_attr_info('ENTITY_ID-ENTITY_TYPE_CODE')
24: .attribute_id;
25: g_entity_type_version NUMBER := gcs_utility_pkg.g_dimension_attr_info('ENTITY_ID-ENTITY_TYPE_CODE')
26: .version_id;
27:
21: g_ledger_currency_version NUMBER := gcs_utility_pkg.g_dimension_attr_info('LEDGER_ID-LEDGER_FUNCTIONAL_CRNCY_CODE')
22: .version_id;
23: g_entity_type_attr NUMBER := gcs_utility_pkg.g_dimension_attr_info('ENTITY_ID-ENTITY_TYPE_CODE')
24: .attribute_id;
25: g_entity_type_version NUMBER := gcs_utility_pkg.g_dimension_attr_info('ENTITY_ID-ENTITY_TYPE_CODE')
26: .version_id;
27:
28: --
29: -- PRIVATE PROCEDURES
139: BEGIN
140: IF fnd_log.g_current_runtime_level <= fnd_log.level_procedure THEN
141: fnd_log.STRING(fnd_log.level_procedure,
142: g_pkg_name || '.' || l_api_name,
143: gcs_utility_pkg.g_module_enter || ' p_entity_id = ' ||
144: p_entity_id || ' p_hierarchy_id = ' || p_hierarchy_id ||
145: ' p_cal_period_id = ' || p_cal_period_id ||
146: ' p_balance_type_code = ' || p_balance_type_code ||
147: ' p_end_date = ' || p_end_date || ' ' ||
146: ' p_balance_type_code = ' || p_balance_type_code ||
147: ' p_end_date = ' || p_end_date || ' ' ||
148: TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS'));
149: END IF;
150: gcs_utility_pkg.populate_calendar_map_details(p_cal_period_id,
151: 'N',
152: 'N');
153:
154: -- count how many non-elim children this entity has
320: BEGIN
321: IF fnd_log.g_current_runtime_level <= fnd_log.level_procedure THEN
322: fnd_log.STRING(fnd_log.level_procedure,
323: g_pkg_name || '.' || l_api_name,
324: gcs_utility_pkg.g_module_enter || ' p_entity_id = ' ||
325: p_entity_id || ' p_hierarchy_id = ' || p_hierarchy_id || ' ' ||
326: ' p_start_date = ' || p_start_date || ' ' ||
327: TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS'));
328: END IF;
354: FETCH c_entity_period
355: INTO l_cal_period_id, l_bal_type_code;
356: EXIT WHEN(c_entity_period%NOTFOUND);
357:
358: gcs_utility_pkg.populate_calendar_map_details(l_cal_period_id,
359: 'Y',
360: 'N');
361:
362: OPEN c_parent_entities(p_start_date, p_hierarchy_id, p_entity_id);
438: -- Write the appropriate information to the execution report
439: IF fnd_log.g_current_runtime_level <= fnd_log.level_error THEN
440: fnd_log.STRING(fnd_log.level_error,
441: g_pkg_name || '.' || l_api_name,
442: gcs_utility_pkg.g_module_failure || ' ' || x_errbuf ||
443: TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS'));
444: END IF;
445: WHEN OTHERS THEN
446: ROLLBACK TO gcs_lock_results_start;
450: -- Write the appropriate information to the execution report
451: IF fnd_log.g_current_runtime_level <= fnd_log.level_error THEN
452: fnd_log.STRING(fnd_log.level_error,
453: g_pkg_name || '.' || l_api_name,
454: gcs_utility_pkg.g_module_failure || ' ' || x_errbuf ||
455: TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS'));
456: END IF;
457: END lock_results;
458:
566: BEGIN
567: IF fnd_log.g_current_runtime_level <= fnd_log.level_procedure THEN
568: fnd_log.STRING(fnd_log.level_procedure,
569: g_pkg_name || '.' || l_api_name,
570: gcs_utility_pkg.g_module_enter || ' p_load_id = ' ||
571: p_load_id || ', p_cons_rel_id = ' || p_cons_rel_id ||
572: ', p_hierarchy_id = ' || p_hierarchy_id ||
573: ', p_transaction_type = ' || p_transaction_type ||
574: TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS'));
583: INTO l_cal_period_id
584: FROM gcs_data_sub_dtls
585: WHERE load_id = l_load_id;
586:
587: gcs_utility_pkg.populate_calendar_map_details(l_cal_period_id,
588: 'Y',
589: 'N');
590:
591: OPEN c_load_data(l_load_id);
685:
686: IF fnd_log.g_current_runtime_level <= fnd_log.level_procedure THEN
687: fnd_log.STRING(fnd_log.level_procedure,
688: g_pkg_name || '.' || l_api_name,
689: gcs_utility_pkg.g_module_success || ' ' ||
690: TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS'));
691: END IF;
692:
693: EXCEPTION
696: WHEN OTHERS THEN
697: IF fnd_log.g_current_runtime_level <= fnd_log.level_error THEN
698: fnd_log.STRING(fnd_log.level_error,
699: g_pkg_name || '.' || l_api_name,
700: gcs_utility_pkg.g_module_failure || ' ' || SQLERRM ||
701: TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS'));
702: END IF;
703:
704: RAISE;
743:
744: IF fnd_log.g_current_runtime_level <= fnd_log.level_procedure THEN
745: fnd_log.STRING(fnd_log.level_procedure,
746: g_pkg_name || '.' || l_api_name,
747: gcs_utility_pkg.g_module_enter ||
748: ', p_hierarchy_id = ' || p_hierarchy_id ||
749: TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS'));
750: END IF;
751:
767:
768: IF fnd_log.g_current_runtime_level <= fnd_log.level_procedure THEN
769: fnd_log.STRING(fnd_log.level_procedure,
770: g_pkg_name || '.' || l_api_name,
771: gcs_utility_pkg.g_module_success || ' ' ||
772: TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS'));
773: END IF;
774:
775: GCS_FEM_HIER_SYNC_PKG.synchronize_hierarchy(p_hierarchy_id => p_hierarchy_id,
790:
791: IF fnd_log.g_current_runtime_level <= fnd_log.level_error THEN
792: fnd_log.STRING(fnd_log.level_error,
793: g_pkg_name || '.' || l_api_name,
794: gcs_utility_pkg.g_module_failure || ' ' || SQLERRM ||
795: TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS'));
796: END IF;
797:
798: END hierarchy_init;
820:
821: IF fnd_log.g_current_runtime_level <= fnd_log.level_procedure THEN
822: fnd_log.STRING(fnd_log.level_procedure,
823: g_pkg_name || '.' || l_api_name,
824: gcs_utility_pkg.g_module_enter || ' p_load_id = ' ||
825: p_load_id || ', p_cons_rel_id = ' || p_cons_rel_id ||
826: ', p_hierarchy_id = ' || p_hierarchy_id ||
827: ', p_transaction_type = ' || p_transaction_type ||
828: TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS'));
847:
848: IF fnd_log.g_current_runtime_level <= fnd_log.level_procedure THEN
849: fnd_log.STRING(fnd_log.level_procedure,
850: g_pkg_name || '.' || l_api_name,
851: gcs_utility_pkg.g_module_success || ' ' ||
852: TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS'));
853: END IF;
854:
855: EXCEPTION
858: WHEN OTHERS THEN
859: IF fnd_log.g_current_runtime_level <= fnd_log.level_error THEN
860: fnd_log.STRING(fnd_log.level_error,
861: g_pkg_name || '.' || l_api_name,
862: gcs_utility_pkg.g_module_failure || ' ' || SQLERRM ||
863: TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MI:SS'));
864: END IF;
865:
866: RAISE;