134: c_gl_transfer_mode_no CONSTANT VARCHAR2 (30) := 'N';
135: g_log_level NUMBER;
136: g_log_enabled BOOLEAN;
137: g_msg_mode VARCHAR2 (200)
138: DEFAULT xla_exceptions_pkg.c_standard_message;
139:
140: ----------------------------------------------------------------------------
141: -- FOLLOWING IS FOR FND LOG.
142: ----------------------------------------------------------------------------
150: THEN
151: fnd_log.STRING (p_level, p_module, p_msg);
152: END IF;
153: EXCEPTION
154: WHEN xla_exceptions_pkg.application_exception
155: THEN
156: RAISE;
157: WHEN OTHERS
158: THEN
155: THEN
156: RAISE;
157: WHEN OTHERS
158: THEN
159: xla_exceptions_pkg.raise_message (p_location => 'XLA_FSAH_INT_PVT.TRACE'
160: );
161: END TRACE;
162:
163: --=============================================================================
286: CLOSE c_header;
287:
288: IF (l_info.ledger_id IS NULL)
289: THEN
290: xla_exceptions_pkg.raise_message (p_appli_s_name => 'XLA',
291: p_msg_name => 'XLA_MJE_INVALID_HEADER_ID',
292: p_msg_mode => p_msg_mode
293: );
294: END IF;
301: );
302: END IF;
303: RETURN l_info;
304: EXCEPTION
305: WHEN xla_exceptions_pkg.application_exception
306: THEN
307: IF (c_header%ISOPEN)
308: THEN
309: CLOSE c_header;
316: THEN
317: CLOSE c_header;
318: END IF;
319:
320: xla_exceptions_pkg.raise_message (p_location => 'XLA_FSAH_INT_PVT.GET_HEADER_INFO'
321: );
322: END get_header_info;
323:
324: ------------------------------------------------------------------------------------
408: );
409: END IF;
410: -------------------------
411: EXCEPTION
412: WHEN xla_exceptions_pkg.application_exception
413: THEN
414: RAISE;
415: WHEN OTHERS
416: THEN
413: THEN
414: RAISE;
415: WHEN OTHERS
416: THEN
417: xla_exceptions_pkg.raise_message (p_location => 'XLA_FSAH_INT_PVT.CREATE_REVERSAL_DISTR_LINK'
418: );
419: END create_reversal_distr_link;
420:
421: --=============================================================================
473: END IF;
474:
475: RETURN l_period_name;
476: EXCEPTION
477: WHEN xla_exceptions_pkg.application_exception
478: THEN
479: IF (c%ISOPEN)
480: THEN
481: CLOSE c;
488: THEN
489: CLOSE c;
490: END IF;
491:
492: xla_exceptions_pkg.raise_message (p_location => 'XLA_FSAH_INT_PVT.GET_PERIOD_NAME'
493: );
494: END get_period_name;
495:
496: --=============================================================================
502: p_info IN t_je_info,
503: p_reversal_method IN VARCHAR2,
504: p_gl_date IN DATE,
505: p_msg_mode IN VARCHAR2
506: DEFAULT xla_exceptions_pkg.c_standard_message,
507: p_rev_header_id OUT NOCOPY INTEGER,
508: p_rev_event_id OUT NOCOPY INTEGER
509: )
510: IS
567: p_module => l_log_module
568: );
569: END IF;
570:
571: xla_exceptions_pkg.raise_message (p_appli_s_name => 'XLA',
572: p_msg_name => 'XLA_AP_INVALID_GL_DATE',
573: p_msg_mode => p_msg_mode
574: );
575: END IF;
812: );
813: END IF;
814: -------------------------
815: EXCEPTION
816: WHEN xla_exceptions_pkg.application_exception
817: THEN
818: ROLLBACK;
819: RAISE;
820: WHEN OTHERS
819: RAISE;
820: WHEN OTHERS
821: THEN
822: ROLLBACK;
823: xla_exceptions_pkg.raise_message (p_location => 'XLA_FSAH_INT_PVT.CREATE_REVERSAL_ENTRY'
824: );
825: END create_reversal_entry;
826:
827: /*=== LOGIC ====================================================================
1476: x_return_status := fnd_api.g_ret_sts_unexp_error;
1477: fnd_msg_pub.count_and_get (p_count => x_msg_count,
1478: p_data => x_msg_data
1479: );
1480: WHEN xla_exceptions_pkg.application_exception
1481: THEN
1482: RAISE;
1483: WHEN OTHERS
1484: THEN
1502:
1503: fnd_msg_pub.count_and_get (p_count => x_msg_count,
1504: p_data => x_msg_data
1505: );
1506: xla_exceptions_pkg.raise_message (p_location => 'XLA_FSAH_INT_PVT.reverse_journal_entries'
1507: );
1508: END reverse_journal_entries;
1509:
1510: -------------------------------------------------------------------------------
1636: );
1637: END IF;
1638: -------------------------
1639: EXCEPTION
1640: /* WHEN xla_exceptions_pkg.application_exception
1641: THEN
1642: RAISE;*/
1643: WHEN OTHERS
1644: THEN
1650: p_module => l_log_module,
1651: p_level => c_level_statement
1652: );
1653: END IF;
1654: /* xla_exceptions_pkg.raise_message (p_location => 'XLA_FSAH_INT_PVT.rev_jour_entry'
1655: );*/
1656: END rev_jour_entry;
1657:
1658: PROCEDURE rev_jour_entry_list (
1857: INTO l_application_id
1858: FROM fnd_application
1859: WHERE application_short_name = p_appl_short_name;
1860: EXCEPTION
1861: WHEN xla_exceptions_pkg.application_exception
1862: THEN
1863: RAISE;
1864: WHEN OTHERS
1865: THEN
1866: /* p_err_message :=
1867: ' Application short name is not a Valid Value'
1868: || p_appl_short_name;*/
1869: l_group_id := -2;
1870: xla_exceptions_pkg.raise_message (p_location => 'xla_fsah_int_pvt.set_group_id'
1871: );
1872: END;
1873:
1874: BEGIN
1878: l_ledger_id
1879: FROM gl_ledgers gll, gl_ledger_configurations glc
1880: WHERE gll.short_name = p_ledger_short_name AND gll.NAME = glc.NAME;
1881: EXCEPTION
1882: WHEN xla_exceptions_pkg.application_exception
1883: THEN
1884: RAISE;
1885: WHEN OTHERS
1886: THEN
1884: RAISE;
1885: WHEN OTHERS
1886: THEN
1887: l_group_id := -2;
1888: xla_exceptions_pkg.raise_message (p_location => 'xla_fsah_int_pvt.Get_group_id'
1889: );
1890: END;
1891:
1892: IF UPPER (l_ledger_status) = 'CONFIRMED'
1971: );
1972: END IF;*/
1973: RETURN l_group_id;
1974: EXCEPTION
1975: WHEN xla_exceptions_pkg.application_exception
1976: THEN
1977: RAISE;
1978: WHEN OTHERS
1979: THEN
1986: p_level => c_level_statement
1987: );
1988: END IF;
1989:
1990: xla_exceptions_pkg.raise_message (p_location => 'XLA_FSAH_INT_PVT.get_group_id'
1991: );
1992: END get_group_id;
1993:
1994: ----------------------------------------------------------------------------------
2036: INTO l_ledger_id
2037: FROM gl_ledgers
2038: WHERE short_name = p_ledger_short_name;
2039: EXCEPTION
2040: WHEN xla_exceptions_pkg.application_exception
2041: THEN
2042: RAISE;
2043: WHEN OTHERS
2044: THEN
2058: INTO l_application_id
2059: FROM fnd_application
2060: WHERE application_short_name = p_appl_short_name;
2061: EXCEPTION
2062: WHEN xla_exceptions_pkg.application_exception
2063: THEN
2064: RAISE;
2065: WHEN OTHERS
2066: THEN
2073: END IF;
2074: /* p_err_message :=
2075: ' Application short name is not a Valid Value'
2076: || p_appl_short_name;
2077: xla_exceptions_pkg.raise_message (p_location => 'Invalid Application ID'
2078: );*/
2079: END;
2080:
2081: -- Identifying the records to update
2239: ------------------------------------------------------------------------------------
2240: --Exception
2241: ------------------------------------------------------------------------------------
2242: EXCEPTION
2243: WHEN xla_exceptions_pkg.application_exception
2244: THEN
2245: RAISE;
2246: WHEN OTHERS
2247: THEN
2245: RAISE;
2246: WHEN OTHERS
2247: THEN
2248: NULL;
2249: xla_exceptions_pkg.raise_message (p_location => 'xla_fsah_int_pvt.set_transfer_status'
2250: );
2251: END set_transfer_status;
2252: BEGIN
2253: g_log_level := fnd_log.g_current_runtime_level;