1: PACKAGE BODY PSA_MFAR_TRANSACTIONS AS
2: /* $Header: PSAMFTXB.pls 120.15 2006/09/13 14:00:54 agovil ship $ */
3:
4: g_cust_trx_id ra_customer_trx_all.customer_trx_id%type;
5: g_set_of_books_id ra_customer_trx_all.set_of_books_id%type;
11: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
12: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
14: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
15: g_path VARCHAR2(50) := 'PSA.PLSQL.PSAMFTXB.PSA_MFAR_TRANSACTIONS.';
16: --===========================FND_LOG.END=======================================
17:
18: --
19: -- LOCAL PROCEDURES
256: -- ========================= FND LOG ===========================
257: RETURN FALSE;
258:
259: WHEN FLEX_COMPARE_ERROR THEN
260: l_exception_error := 'EXCEPTION - FLEX_COMPARE_ERROR PACKAGE - PSA_MFAR_TRANSACTIONS.CREATE_DISTRIBUTIONS: '||FND_MESSAGE.GET;
261: PSA_MFAR_UTILS.INSERT_DISTRIBUTIONS_LOG (g_run_id, 'TRANSACTION',
262: g_cust_trx_id, Null, l_exception_error);
263:
264: p_error_message := l_exception_error;
268: -- ========================= FND LOG ===========================
269: RETURN FALSE;
270:
271: WHEN OTHERS THEN
272: l_exception_error := 'EXCEPTION - OTHERS PACKAGE - PSA_MFAR_TRANSACTIONS.CREATE_DISTRIBUTIONS: '
273: || sqlerrm;
274: PSA_MFAR_UTILS.INSERT_DISTRIBUTIONS_LOG (g_run_id, 'TRANSACTION',
275: g_cust_trx_id, Null, l_exception_error);
276:
412: RETURN TRUE;
413:
414: EXCEPTION
415: WHEN FLEX_BUILD_ERROR THEN
416: p_error_message := 'EXCEPTION - FLEX_BUILD_ERROR PACKAGE - PSA_MFAR_TRANSACTIONS.GENERATE_TRX_DIST: '||FND_MESSAGE.GET;
417: PSA_MFAR_UTILS.INSERT_DISTRIBUTIONS_LOG (g_run_id, 'TRANSACTION',
418: g_cust_trx_id, Null, p_error_message);
419: retcode := 'F';
420: -- ========================= FND LOG ===========================
422: -- ========================= FND LOG ===========================
423: RETURN FALSE;
424:
425: WHEN OTHERS THEN
426: p_error_message := 'EXCEPTION - WHEN OTHERS - PSA_MFAR_TRANSACTIONS.GENERATE_TRX_DIST: '|| SQLERRM;
427: PSA_MFAR_UTILS.INSERT_DISTRIBUTIONS_LOG (g_run_id, 'TRANSACTION',
428: g_cust_trx_id, Null, p_error_message);
429: retcode := 'F';
430: -- ========================= FND LOG ===========================
469: END IF;
470:
471: EXCEPTION
472: WHEN OTHERS THEN
473: l_exception_error := 'EXCEPTION - OTHERS PACKAGE - PSA_MFAR_TRANSACTIONS.TRANSACTION_IS_COMPLETE: '
474: || SQLERRM;
475: PSA_MFAR_UTILS.INSERT_DISTRIBUTIONS_LOG (g_run_id, 'TRANSACTION', g_cust_trx_id, Null,
476: l_exception_error);
477: -- ========================= FND LOG ===========================
543: END IF;
544:
545: EXCEPTION
546: WHEN OTHERS THEN
547: l_exception_error := 'EXCEPTION - OTHERS PACKAGE - PSA_MFAR_TRANSACTIONS.TRANSACTION_MODIFIED: '
548: || SQLERRM;
549: PSA_MFAR_UTILS.INSERT_DISTRIBUTIONS_LOG (g_run_id, 'TRANSACTION',
550: g_cust_trx_id, Null,l_exception_error);
551: -- ========================= FND LOG ===========================
555: RETURN FALSE;
556:
557: END transaction_modified;
558:
559: END PSA_MFAR_TRANSACTIONS;