1: PACKAGE BODY xla_accounting_err_pkg AS
2: -- $Header: xlaaperr.pkb 120.20 2006/04/12 21:45:20 wychan 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_accounting_err_pkg |
10: | |
11: | DESCRIPTION |
12: | This is the body of the package that handles errors for accounting |
13: | entries generated by Accounting Program and Mnaual Enteries. |
60: -- declaring private variables
61: -------------------------------------------------------------------------------
62: g_error_index PLS_INTEGER := 0;
63: g_client_id VARCHAR2(30);
64: g_accounting_errors xla_accounting_err_pkg.t_array_error;
65: g_error_source VARCHAR2(30);
66: g_request_id NUMBER;
67: g_application_id NUMBER;
68: -------------------------------------------------------------------------------
90: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
91: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
92:
93: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
94: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_accounting_err_pkg';
95:
96: g_log_level NUMBER;
97: g_log_enabled BOOLEAN;
98:
112: WHEN xla_exceptions_pkg.application_exception THEN
113: RAISE;
114: WHEN OTHERS THEN
115: xla_exceptions_pkg.raise_message
116: (p_location => 'xla_accounting_err_pkg.trace');
117: END trace;
118:
119:
120: --=============================================================================
272: ,p_module => l_log_module);
273: END IF;
274:
275: xla_exceptions_pkg.raise_message
276: (p_location => 'xla_accounting_err_pkg.build_message');
277: END build_message; -- end of procedure
278:
279:
280: --=============================================================================
413: ,p_module => l_log_module);
414: END IF;
415:
416: xla_exceptions_pkg.raise_message
417: (p_location => 'xla_accounting_err_pkg.build_message');
418: END build_message; -- end of procedure
419:
420:
421: --=============================================================================
574: ,p_module => l_log_module);
575: END IF;
576:
577: xla_exceptions_pkg.raise_message
578: (p_location => 'xla_accounting_err_pkg.build_message');
579: END build_message; -- end of procedure
580:
581:
582: --=============================================================================
755: ,p_module => l_log_module);
756: END IF;
757:
758: xla_exceptions_pkg.raise_message
759: (p_location => 'xla_accounting_err_pkg.build_message');
760: END build_message; -- end of procedure
761:
762:
763: --=============================================================================
956: ,p_module => l_log_module);
957: END IF;
958:
959: xla_exceptions_pkg.raise_message
960: (p_location => 'xla_accounting_err_pkg.build_message');
961: END build_message; -- end of procedure
962:
963:
964: --=============================================================================
1177: ,p_module => l_log_module);
1178: END IF;
1179:
1180: xla_exceptions_pkg.raise_message
1181: (p_location => 'xla_accounting_err_pkg.build_message');
1182: END build_message; -- end of procedure
1183:
1184:
1185:
1419: ,p_module => l_log_module);
1420: END IF;
1421:
1422: xla_exceptions_pkg.raise_message
1423: (p_location => 'xla_accounting_err_pkg.build_message');
1424: END build_message; -- end of procedure
1425:
1426:
1427: --=============================================================================
1461: WHEN xla_exceptions_pkg.application_exception THEN
1462: RAISE;
1463: WHEN OTHERS THEN
1464: xla_exceptions_pkg.raise_message
1465: (p_location => 'xla_accounting_err_pkg.get_total_error_count');
1466: END get_total_error_count; -- end of function
1467:
1468:
1469: --=============================================================================
1529: WHEN xla_exceptions_pkg.application_exception THEN
1530: RAISE;
1531: WHEN OTHERS THEN
1532: xla_exceptions_pkg.raise_message
1533: (p_location => 'xla_accounting_err_pkg.initialize');
1534: END initialize; -- end of procedure
1535:
1536:
1537: --=============================================================================
1622: WHEN xla_exceptions_pkg.application_exception THEN
1623: RAISE;
1624: WHEN OTHERS THEN
1625: xla_exceptions_pkg.raise_message
1626: (p_location => 'xla_accounting_err_pkg.insert_errors');
1627: END insert_errors; -- end of procedure
1628:
1629:
1630:
1691: WHEN xla_exceptions_pkg.application_exception THEN
1692: RAISE;
1693: WHEN OTHERS THEN
1694: xla_exceptions_pkg.raise_message
1695: (p_location => 'xla_accounting_err_pkg.set_options');
1696: END set_options; -- end of procedure
1697:
1698:
1699:
1911: ,p_module => l_log_module);
1912: END IF;
1913:
1914: xla_exceptions_pkg.raise_message
1915: (p_location => 'xla_accounting_err_pkg.stack_error');
1916: END stack_error; -- end of procedure
1917:
1918:
1919:
1950: WHEN xla_exceptions_pkg.application_exception THEN
1951: RAISE;
1952: WHEN OTHERS THEN
1953: xla_exceptions_pkg.raise_message
1954: (p_location => 'xla_accounting_err_pkg.reset');
1955: END reset; -- end of procedure
1956:
1957:
1958: --=============================================================================
1996: g_log_level := C_LEVEL_LOG_DISABLED;
1997: END IF;
1998: initialize;
1999:
2000: END xla_accounting_err_pkg;