1: PACKAGE BODY XLA_PERIOD_CLOSE_EXP_PKG AS
2: -- $Header: xlarppcl.pkb 120.44.12020000.2 2012/07/23 07:08:17 vgopiset ship $
3: /*===========================================================================+
4: | Copyright (c) 2003 Oracle Corporation Belmont, California, USA |
5: | ALL rights reserved. |
7: | FILENAME |
8: | xlarppcl.pkb |
9: | |
10: | PACKAGE NAME |
11: | xla_period_close_exp_pkg |
12: | |
13: | DESCRIPTION |
14: | This package generates an XML extract for the Period Close Validation |
15: | program unit. A dynamic query is created based on the parameters that are |
54: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
55: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
56: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
57: C_DEFAULT_MODULE CONSTANT VARCHAR2(240)
58: := 'xla.plsql.xla_period_close_exp_pkg';
59:
60: g_log_level NUMBER;
61: g_log_enabled BOOLEAN;
62: g_use_ledger_security VARCHAR2(1) :=
97: WHEN xla_exceptions_pkg.application_exception THEN
98: RAISE;
99: WHEN OTHERS THEN
100: xla_exceptions_pkg.raise_message
101: (p_location => 'xla_period_close_exp_pkg.trace');
102: END trace;
103:
104: --=============================================================================
105: -- *********** public procedures and functions **********
182: EXCEPTION
183: WHEN OTHERS THEN
184:
185: xla_exceptions_pkg.raise_message
186: (p_location => 'xla_period_close_exp_pkg.run_report ');
187: END run_report;
188:
189:
190: --------------------------------------------------------------------
376: EXCEPTION
377: WHEN OTHERS THEN
378: -- trace mesg
379: xla_exceptions_pkg.raise_message
380: (p_location => 'xla_period_close_exp_pkg.param_list_sql');
381: END param_list_sql;
382:
383: PROCEDURE get_period_start_end_dates
384: ( p_ledger_id IN NUMBER
440: ,C_LEVEL_PROCEDURE, l_log_module);
441: END IF;
442: xla_exceptions_pkg.raise_message
443: (p_location =>
444: 'xla_period_close_exp_pkg.get_period_start_end_dates');
445: END get_period_start_end_dates ;
446:
447:
448: PROCEDURE build_xml_sql IS
649: ,C_LEVEL_PROCEDURE, l_log_module);
650: END IF;
651: xla_exceptions_pkg.raise_message
652: (p_location =>
653: 'xla_period_close_exp_pkg.build_xml_sql');
654: END build_xml_sql;
655:
656: --changed Function get_transaction_id returning varchar2 to a procedure preeti/6204675
657:
1084:
1085: EXCEPTION
1086: WHEN OTHERS THEN
1087: xla_exceptions_pkg.raise_message
1088: (p_location => 'xla_period_close_exp_pkg.get_transaction_id ');
1089:
1090: END get_transaction_id;
1091:
1092:
1196: RETURN l_ledger_ids;
1197: EXCEPTION
1198: WHEN OTHERS THEN
1199: xla_exceptions_pkg.raise_message
1200: (p_location => 'xla_period_close_exp_pkg.get_ledger_ids');
1201: END get_ledger_ids;
1202:
1203: PROCEDURE build_query_sql
1204: (p_application_id IN NUMBER
1386:
1387:
1388:
1389:
1390: xla_period_close_exp_pkg.p_ledger_ids := l_ledger_ids;
1391: xla_period_close_exp_pkg.p_event_filter := l_event_filter;
1392: xla_period_close_exp_pkg.p_header_filter := l_header_filter;
1393: xla_period_close_exp_pkg.p_je_source_filter := l_je_source_filter;
1394: xla_period_close_exp_pkg.p_object_type_code := p_object_type_code;
1387:
1388:
1389:
1390: xla_period_close_exp_pkg.p_ledger_ids := l_ledger_ids;
1391: xla_period_close_exp_pkg.p_event_filter := l_event_filter;
1392: xla_period_close_exp_pkg.p_header_filter := l_header_filter;
1393: xla_period_close_exp_pkg.p_je_source_filter := l_je_source_filter;
1394: xla_period_close_exp_pkg.p_object_type_code := p_object_type_code;
1395: xla_period_close_exp_pkg.p_je_source_name := p_je_source_name;
1388:
1389:
1390: xla_period_close_exp_pkg.p_ledger_ids := l_ledger_ids;
1391: xla_period_close_exp_pkg.p_event_filter := l_event_filter;
1392: xla_period_close_exp_pkg.p_header_filter := l_header_filter;
1393: xla_period_close_exp_pkg.p_je_source_filter := l_je_source_filter;
1394: xla_period_close_exp_pkg.p_object_type_code := p_object_type_code;
1395: xla_period_close_exp_pkg.p_je_source_name := p_je_source_name;
1396:
1389:
1390: xla_period_close_exp_pkg.p_ledger_ids := l_ledger_ids;
1391: xla_period_close_exp_pkg.p_event_filter := l_event_filter;
1392: xla_period_close_exp_pkg.p_header_filter := l_header_filter;
1393: xla_period_close_exp_pkg.p_je_source_filter := l_je_source_filter;
1394: xla_period_close_exp_pkg.p_object_type_code := p_object_type_code;
1395: xla_period_close_exp_pkg.p_je_source_name := p_je_source_name;
1396:
1397: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
1390: xla_period_close_exp_pkg.p_ledger_ids := l_ledger_ids;
1391: xla_period_close_exp_pkg.p_event_filter := l_event_filter;
1392: xla_period_close_exp_pkg.p_header_filter := l_header_filter;
1393: xla_period_close_exp_pkg.p_je_source_filter := l_je_source_filter;
1394: xla_period_close_exp_pkg.p_object_type_code := p_object_type_code;
1395: xla_period_close_exp_pkg.p_je_source_name := p_je_source_name;
1396:
1397: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
1398: trace('build_query_sql.End'
1391: xla_period_close_exp_pkg.p_event_filter := l_event_filter;
1392: xla_period_close_exp_pkg.p_header_filter := l_header_filter;
1393: xla_period_close_exp_pkg.p_je_source_filter := l_je_source_filter;
1394: xla_period_close_exp_pkg.p_object_type_code := p_object_type_code;
1395: xla_period_close_exp_pkg.p_je_source_name := p_je_source_name;
1396:
1397: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
1398: trace('build_query_sql.End'
1399: ,C_LEVEL_PROCEDURE, l_log_module);
1403: WHEN NO_DATA_FOUND THEN
1404: NULL;
1405: WHEN OTHERS THEN
1406: xla_exceptions_pkg.raise_message
1407: (p_location => 'xla_period_close_exp_pkg.build_query_sql');
1408: END build_query_sql ;
1409:
1410: FUNCTION check_period_close(p_application_id IN NUMBER
1411: ,p_period_name IN VARCHAR2
1586: RETURN l_unprocessed;
1587: EXCEPTION
1588: WHEN OTHERS THEN
1589: xla_exceptions_pkg.raise_message
1590: (p_location => 'xla_period_close_exp_pkg.check_period_close');
1591:
1592: END check_period_close;
1593:
1594: FUNCTION beforeReport RETURN BOOLEAN IS
1633: C_LEVEL_STATEMENT, l_log_module);
1634: END IF;
1635:
1636: run_report(p_errbuf => l_errbuf
1637: ,p_retcode => xla_period_close_exp_pkg.C_RETURN_CODE
1638: ,p_application_id => xla_period_close_exp_pkg.p_application_id
1639: ,p_ledger_id => xla_period_close_exp_pkg.p_ledger_id
1640: ,p_period_from => xla_period_close_exp_pkg.p_period_from
1641: ,p_period_to => xla_period_close_exp_pkg.p_period_to
1634: END IF;
1635:
1636: run_report(p_errbuf => l_errbuf
1637: ,p_retcode => xla_period_close_exp_pkg.C_RETURN_CODE
1638: ,p_application_id => xla_period_close_exp_pkg.p_application_id
1639: ,p_ledger_id => xla_period_close_exp_pkg.p_ledger_id
1640: ,p_period_from => xla_period_close_exp_pkg.p_period_from
1641: ,p_period_to => xla_period_close_exp_pkg.p_period_to
1642: ,p_event_class => xla_period_close_exp_pkg.p_event_class_code
1635:
1636: run_report(p_errbuf => l_errbuf
1637: ,p_retcode => xla_period_close_exp_pkg.C_RETURN_CODE
1638: ,p_application_id => xla_period_close_exp_pkg.p_application_id
1639: ,p_ledger_id => xla_period_close_exp_pkg.p_ledger_id
1640: ,p_period_from => xla_period_close_exp_pkg.p_period_from
1641: ,p_period_to => xla_period_close_exp_pkg.p_period_to
1642: ,p_event_class => xla_period_close_exp_pkg.p_event_class_code
1643: ,p_je_category => xla_period_close_exp_pkg.p_je_category_name
1636: run_report(p_errbuf => l_errbuf
1637: ,p_retcode => xla_period_close_exp_pkg.C_RETURN_CODE
1638: ,p_application_id => xla_period_close_exp_pkg.p_application_id
1639: ,p_ledger_id => xla_period_close_exp_pkg.p_ledger_id
1640: ,p_period_from => xla_period_close_exp_pkg.p_period_from
1641: ,p_period_to => xla_period_close_exp_pkg.p_period_to
1642: ,p_event_class => xla_period_close_exp_pkg.p_event_class_code
1643: ,p_je_category => xla_period_close_exp_pkg.p_je_category_name
1644: ,p_mode => xla_period_close_exp_pkg.p_mode);
1637: ,p_retcode => xla_period_close_exp_pkg.C_RETURN_CODE
1638: ,p_application_id => xla_period_close_exp_pkg.p_application_id
1639: ,p_ledger_id => xla_period_close_exp_pkg.p_ledger_id
1640: ,p_period_from => xla_period_close_exp_pkg.p_period_from
1641: ,p_period_to => xla_period_close_exp_pkg.p_period_to
1642: ,p_event_class => xla_period_close_exp_pkg.p_event_class_code
1643: ,p_je_category => xla_period_close_exp_pkg.p_je_category_name
1644: ,p_mode => xla_period_close_exp_pkg.p_mode);
1645:
1638: ,p_application_id => xla_period_close_exp_pkg.p_application_id
1639: ,p_ledger_id => xla_period_close_exp_pkg.p_ledger_id
1640: ,p_period_from => xla_period_close_exp_pkg.p_period_from
1641: ,p_period_to => xla_period_close_exp_pkg.p_period_to
1642: ,p_event_class => xla_period_close_exp_pkg.p_event_class_code
1643: ,p_je_category => xla_period_close_exp_pkg.p_je_category_name
1644: ,p_mode => xla_period_close_exp_pkg.p_mode);
1645:
1646: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
1639: ,p_ledger_id => xla_period_close_exp_pkg.p_ledger_id
1640: ,p_period_from => xla_period_close_exp_pkg.p_period_from
1641: ,p_period_to => xla_period_close_exp_pkg.p_period_to
1642: ,p_event_class => xla_period_close_exp_pkg.p_event_class_code
1643: ,p_je_category => xla_period_close_exp_pkg.p_je_category_name
1644: ,p_mode => xla_period_close_exp_pkg.p_mode);
1645:
1646: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
1647: trace('beforeReport.End'
1640: ,p_period_from => xla_period_close_exp_pkg.p_period_from
1641: ,p_period_to => xla_period_close_exp_pkg.p_period_to
1642: ,p_event_class => xla_period_close_exp_pkg.p_event_class_code
1643: ,p_je_category => xla_period_close_exp_pkg.p_je_category_name
1644: ,p_mode => xla_period_close_exp_pkg.p_mode);
1645:
1646: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
1647: trace('beforeReport.End'
1648: ,C_LEVEL_PROCEDURE, l_log_module);
1652:
1653: EXCEPTION
1654: WHEN OTHERS THEN
1655: xla_exceptions_pkg.raise_message
1656: (p_location => 'xla_period_close_exp_pkg.beforeReport ');
1657:
1658: END beforeReport;
1659:
1660: BEGIN
1666: IF NOT g_log_enabled THEN
1667: g_log_level := C_LEVEL_LOG_DISABLED;
1668: END IF;
1669:
1670: END xla_period_close_exp_pkg;