1: PACKAGE BODY AR_TRX_GLOBAL_PROCESS_LINES AS
2: /* $Header: ARINGTLB.pls 120.17.12020000.2 2012/07/25 06:11:57 ashlkuma ship $ */
3:
4: pg_debug VARCHAR2(1) := nvl(fnd_profile.value('AFLOG_ENABLED'),'N');
5:
10: BEGIN
11:
12: IF pg_debug = 'Y'
13: THEN
14: ar_invoice_utils.debug ('AR_TRX_GLOBAL_PROCESS_LINES.INSERT_ROW (+)');
15: END IF;
16: x_return_status := FND_API.G_RET_STS_SUCCESS;
17: -- Now populate the lines global Temp. Table
18: FOR i IN p_trx_lines_tbl.FIRST .. p_trx_lines_tbl.LAST
305: END LOOP;
306:
307: IF pg_debug = 'Y'
308: THEN
309: ar_invoice_utils.debug ('AR_TRX_GLOBAL_PROCESS_LINES.INSERT_ROW (-)');
310: END IF;
311: EXCEPTION
312: WHEN OTHERS THEN
313: x_errmsg := 'Error in AR_TRX_GLOBAL_PROCESS_LINES.INSERT_ROW '||sqlerrm;
309: ar_invoice_utils.debug ('AR_TRX_GLOBAL_PROCESS_LINES.INSERT_ROW (-)');
310: END IF;
311: EXCEPTION
312: WHEN OTHERS THEN
313: x_errmsg := 'Error in AR_TRX_GLOBAL_PROCESS_LINES.INSERT_ROW '||sqlerrm;
314: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
315: return;
316:
317: END INSERT_ROW;
315: return;
316:
317: END INSERT_ROW;
318:
319: END AR_TRX_GLOBAL_PROCESS_LINES;