1: PACKAGE BODY xla_ae_code_combination_pkg AS
2: /* $Header: xlajecci.pkb 120.59.12010000.2 2008/08/06 21:10:29 sbhaskar ship $ */
3: /*===========================================================================+
4: | Copyright (c) 2001-2002 Oracle Corporation |
5: | Redwood Shores, CA, USA |
5: | Redwood Shores, CA, USA |
6: | All rights reserved. |
7: +============================================================================+
8: | PACKAGE NAME |
9: | xla_ae_code_combination_pkg |
10: | |
11: | DESCRIPTION |
12: | |
13: | |
198: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
199: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
200:
201: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
202: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_ae_code_combination_pkg';
203:
204: g_log_level NUMBER;
205: g_log_enabled BOOLEAN;
206:
219: WHEN xla_exceptions_pkg.application_exception THEN
220: RAISE;
221: WHEN OTHERS THEN
222: xla_exceptions_pkg.raise_message
223: (p_location => 'xla_ae_code_combination_pkg.trace');
224: END trace;
225:
226: /*======================================================================+
227: | |
286: WHEN xla_exceptions_pkg.application_exception THEN
287: RAISE;
288: WHEN OTHERS THEN
289: xla_exceptions_pkg.raise_message
290: (p_location => 'xla_ae_code_combination_pkg.dump_text');
291: END dump_text;
292:
293: --
294: --====================================================================
524: WHEN xla_exceptions_pkg.application_exception THEN
525: RETURN TO_CHAR(p_flex_application_id);
526: WHEN OTHERS THEN
527: xla_exceptions_pkg.raise_message
528: (p_location => 'xla_ae_code_combination_pkg.get_application_name');
529: END get_application_name;
530:
531: /*---------------------------------------------------------------+
532: | |
569: WHEN xla_exceptions_pkg.application_exception THEN
570: RETURN NULL;
571: WHEN OTHERS THEN
572: xla_exceptions_pkg.raise_message
573: (p_location => 'xla_ae_code_combination_pkg.get_flex_structure_name');
574: END get_flex_structure_name;
575:
576: /*---------------------------------------------------------------+
577: | |
729: WHEN xla_exceptions_pkg.application_exception THEN
730: RAISE;
731: WHEN OTHERS THEN
732: xla_exceptions_pkg.raise_message
733: (p_location => 'xla_ae_code_combination_pkg.cache_flex_qualifier');
734: END cache_flex_qualifier;
735:
736: /*------------------------------------------------------------------+
737: | |
803: WHEN xla_exceptions_pkg.application_exception THEN
804: RAISE;
805: WHEN OTHERS THEN
806: xla_exceptions_pkg.raise_message
807: (p_location => 'xla_ae_code_combination_pkg.cache_flex_segment');
808: END cache_flex_segment;
809:
810: /*------------------------------------------------------------------+
811: | |
906: WHEN xla_exceptions_pkg.application_exception THEN
907: RAISE;
908: WHEN OTHERS THEN
909: xla_exceptions_pkg.raise_message
910: (p_location => 'xla_ae_code_combination_pkg.cache_key_flexfield');
911: END cache_key_flexfield;
912:
913: /*---------------------------------------------------------+
914: | |
962: WHEN xla_exceptions_pkg.application_exception THEN
963: RAISE;
964: WHEN OTHERS THEN
965: xla_exceptions_pkg.raise_message
966: (p_location => 'xla_ae_code_combination_pkg.cache_coa');
967: END cache_coa;
968:
969: /*---------------------------------------------------------+
970: | |
1016: WHEN xla_exceptions_pkg.application_exception THEN
1017: RAISE;
1018: WHEN OTHERS THEN
1019: xla_exceptions_pkg.raise_message
1020: (p_location => 'xla_ae_code_combination_pkg.cache_coa');
1021: END cache_coa;
1022:
1023: /*---------------------------------------------------------+
1024: | |
1277: WHEN xla_exceptions_pkg.application_exception THEN
1278: RAISE;
1279: WHEN OTHERS THEN
1280: xla_exceptions_pkg.raise_message
1281: (p_location => 'xla_ae_code_combination_pkg.init_SegmentArray');
1282: END init_SegmentArray;
1283:
1284: /*---------------------------------------------------+
1285: | |
1574: WHEN xla_exceptions_pkg.application_exception THEN
1575: RAISE;
1576: WHEN OTHERS THEN
1577: xla_exceptions_pkg.raise_message
1578: (p_location => 'xla_ae_code_combination_pkg.cache_combination_id');
1579: END cache_combination_id;
1580:
1581: /*-----------------------------------------------------+
1582: | |
1686: WHEN xla_exceptions_pkg.application_exception THEN
1687: RAISE;
1688: WHEN OTHERS THEN
1689: xla_exceptions_pkg.raise_message
1690: (p_location => 'xla_ae_code_combination_pkg.get_account_value');
1691: END get_account_value;
1692:
1693: --======================================================================
1694: --
1883: WHEN xla_exceptions_pkg.application_exception THEN
1884: RAISE;
1885: WHEN OTHERS THEN
1886: xla_exceptions_pkg.raise_message
1887: (p_location => 'xla_ae_code_combination_pkg.get_segment_code');
1888: END get_segment_code;
1889:
1890:
1891: /*-------------------------------------------------------------+
2266: WHEN xla_exceptions_pkg.application_exception THEN
2267: RETURN NULL;
2268: WHEN OTHERS THEN
2269: xla_exceptions_pkg.raise_message
2270: (p_location => 'xla_ae_code_combination_pkg.get_flex_segment_value');
2271: END get_flex_segment_value;
2272:
2273: /*-------------------------------------------------------------+
2274: | |
2453: ,p_level => C_LEVEL_PROCEDURE
2454: ,p_module => l_log_module);
2455: END IF;
2456: xla_exceptions_pkg.raise_message
2457: (p_location => 'xla_ae_code_combination_pkg.get_flex_segment_desc');
2458: END get_flex_segment_desc;
2459:
2460:
2461: --======================================================================
2630: ,p_level => C_LEVEL_PROCEDURE
2631: ,p_module => l_log_module);
2632: END IF;
2633: xla_exceptions_pkg.raise_message
2634: (p_location => 'xla_ae_code_combination_pkg.build_events_message');
2635: END build_events_message;
2636:
2637: /*-------------------------------------------------------------+
2638: | |
2862: ,p_level => C_LEVEL_PROCEDURE
2863: ,p_module => l_log_module);
2864: END IF;
2865: xla_exceptions_pkg.raise_message
2866: (p_location => 'xla_ae_code_combination_pkg.get_ccid_errors');
2867: END get_ccid_errors;
2868:
2869: /*-------------------------------------------------------------+
2870: | |
3094: ,p_level => C_LEVEL_PROCEDURE
3095: ,p_module => l_log_module);
3096: END IF;
3097: xla_exceptions_pkg.raise_message
3098: (p_location => 'xla_ae_code_combination_pkg.GetCcid');
3099: END GetCcid;
3100:
3101: /*------------------------------------------------------------------+
3102: | |
3299: ,p_level => C_LEVEL_PROCEDURE
3300: ,p_module => l_log_module);
3301: END IF;
3302: xla_exceptions_pkg.raise_message
3303: (p_location => 'xla_ae_code_combination_pkg.validate_source_ccid');
3304: END validate_source_ccid;
3305:
3306: /*------------------------------------------------------------------+
3307: | |
3544: ,p_level => C_LEVEL_PROCEDURE
3545: ,p_module => l_log_module);
3546: END IF;
3547: xla_exceptions_pkg.raise_message
3548: (p_location => 'xla_ae_code_combination_pkg.override_ccid');
3549: END override_ccid;
3550:
3551: /*-----------------------------------------------------------------------+
3552: | |
3865: ,p_level => C_LEVEL_PROCEDURE
3866: ,p_module => l_log_module);
3867: END IF;
3868: xla_exceptions_pkg.raise_message
3869: (p_location => 'xla_ae_code_combination_pkg.create_ccid');
3870: END create_ccid;
3871:
3872: /*---------------------------------------------------------------+
3873: | |
3909: SET code_combination_id =
3910: CASE
3911: WHEN temp.code_combination_id IS NULL
3912: AND temp.balance_type_code <> 'X'
3913: THEN xla_ae_code_combination_pkg.GetCcid(
3914: temp.segment1
3915: ,temp.segment2
3916: ,temp.segment3
3917: ,temp.segment4
3958: CASE
3959: WHEN temp.alt_code_combination_id IS NULL
3960: AND temp.balance_type_code <> 'X'
3961: AND temp.gain_or_loss_flag = 'Y'
3962: THEN xla_ae_code_combination_pkg.GetCcid(
3963: temp.alt_segment1
3964: ,temp.alt_segment2
3965: ,temp.alt_segment3
3966: ,temp.alt_segment4
4057: ,p_level => C_LEVEL_PROCEDURE
4058: ,p_module => l_log_module);
4059: END IF;
4060: xla_exceptions_pkg.raise_message
4061: (p_location => 'xla_ae_code_combination_pkg.create_new_ccid');
4062: END create_new_ccid;
4063:
4064: /*---------------------------------------------------------------+
4065: | |
5013: ,p_level => C_LEVEL_PROCEDURE
5014: ,p_module => l_log_module);
5015: END IF;
5016: xla_exceptions_pkg.raise_message
5017: (p_location => 'xla_ae_code_combination_pkg.map_ccid');
5018: --
5019: END map_ccid;
5020:
5021:
5504: ,p_level => C_LEVEL_PROCEDURE
5505: ,p_module => l_log_module);
5506: END IF;
5507: xla_exceptions_pkg.raise_message
5508: (p_location => 'xla_ae_code_combination_pkg.map_segment_qualifier');
5509: END map_segment_qualifier;
5510:
5511: /*-----------------------------------------------------------------------+
5512: | |
5574: WHEN xla_exceptions_pkg.application_exception THEN
5575: RAISE;
5576: WHEN OTHERS THEN
5577: xla_exceptions_pkg.raise_message
5578: (p_location => 'xla_ae_code_combination_pkg.map_transaction_accounts');
5579: --
5580: END map_transaction_accounts;
5581:
5582: /*-----------------------------------------------------------------------+
5693: ,p_level => C_LEVEL_PROCEDURE
5694: ,p_module => l_log_module);
5695: END IF;
5696: xla_exceptions_pkg.raise_message
5697: (p_location => 'xla_ae_code_combination_pkg.BuildCcids');
5698: END BuildCcids;
5699: --
5700: --=============================================================================
5701: --
5734:
5735: IF NOT g_log_enabled THEN
5736: g_log_level := C_LEVEL_LOG_DISABLED;
5737: END IF;
5738: END xla_ae_code_combination_pkg; --