DBA Data[Home] [Help]

APPS.FUN_BAL_PKG dependencies on FND_LOG

Line 31: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

27: IS
28: cur_hdl int;
29: rows_processed int;
30: BEGIN
31: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
32: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.truncate_tables', 'begin');
33: END IF;
34:
35: DELETE FROM fun_bal_results_gt;

Line 32: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.truncate_tables', 'begin');

28: cur_hdl int;
29: rows_processed int;
30: BEGIN
31: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
32: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.truncate_tables', 'begin');
33: END IF;
34:
35: DELETE FROM fun_bal_results_gt;
36: DELETE FROM fun_bal_errors_gt;

Line 61: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

57: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_INTER_INT_T', dbms_sql.native);
58: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_INTRA_INT_T', dbms_sql.native);
59: dbms_sql.close_cursor(cur_hdl); -- close cursor
60: */
61: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
62: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.truncate_tables', 'end');
63: END IF;
64:
65: RETURN;

Line 62: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.truncate_tables', 'end');

58: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_INTRA_INT_T', dbms_sql.native);
59: dbms_sql.close_cursor(cur_hdl); -- close cursor
60: */
61: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
62: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.truncate_tables', 'end');
63: END IF;
64:
65: RETURN;
66: END truncate_tables;

Line 79: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

75: SELECT DISTINCT bal_seg_column_name
76: FROM fun_bal_headers_gt headers
77: WHERE headers.status = 'OK';
78: BEGIN
79: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
80: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.update_inter_seg_val.begin', 'begin');
81: END IF;
82:
83: OPEN bal_seg_val_cur;

Line 80: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.update_inter_seg_val.begin', 'begin');

76: FROM fun_bal_headers_gt headers
77: WHERE headers.status = 'OK';
78: BEGIN
79: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
80: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.update_inter_seg_val.begin', 'begin');
81: END IF;
82:
83: OPEN bal_seg_val_cur;
84: LOOP

Line 112: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

108: rows_processed := dbms_sql.execute(cur_hdl);
109: dbms_sql.close_cursor(cur_hdl); -- close cursor
110: END LOOP;
111: CLOSE bal_seg_val_cur;
112: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
113: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.update_inter_seg_val.end', 'end');
114: END IF;
115:
116: RETURN;

Line 113: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.update_inter_seg_val.end', 'end');

109: dbms_sql.close_cursor(cur_hdl); -- close cursor
110: END LOOP;
111: CLOSE bal_seg_val_cur;
112: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
113: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.update_inter_seg_val.end', 'end');
114: END IF;
115:
116: RETURN;
117: END update_inter_seg_val;

Line 143: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

139: l_index NUMBER;
140: l_prev_seg_num NUMBER;
141:
142: BEGIN
143: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
144: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.get_segment_index', 'start');
145: END IF;
146:
147: l_index := 0;

Line 144: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.get_segment_index', 'start');

140: l_prev_seg_num NUMBER;
141:
142: BEGIN
143: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
144: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.get_segment_index', 'start');
145: END IF;
146:
147: l_index := 0;
148: l_prev_seg_num := 0;

Line 176: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

172: END LOOP;
173:
174: RETURN NULL;
175:
176: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
177: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.get_segment_index', 'end');
178: END IF;
179:
180: END get_segment_index;

Line 177: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.get_segment_index', 'end');

173:
174: RETURN NULL;
175:
176: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
177: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.get_segment_index', 'end');
178: END IF;
179:
180: END get_segment_index;
181:

Line 226: IF (FND_LOG.LEVEL_ERROR >= g_debug_level) THEN

222: l_delimiter := fnd_flex_ext.get_delimiter('SQLGL', 'GL#', chart_of_accounts_id);
223: l_flag := fnd_flex_ext.get_segments('SQLGL', 'GL#', chart_of_accounts_id, ccid,
224: l_no_of_segments, l_segment_array);
225: IF l_flag = FALSE THEN
226: IF (FND_LOG.LEVEL_ERROR >= g_debug_level) THEN
227: l_error_message := FND_FLEX_KEYVAL.ERROR_MESSAGE;
228: IF l_error_message IS NOT NULL THEN
229: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.do_inter_bal.get_segment', l_error_message);
230: END IF;

Line 229: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.do_inter_bal.get_segment', l_error_message);

225: IF l_flag = FALSE THEN
226: IF (FND_LOG.LEVEL_ERROR >= g_debug_level) THEN
227: l_error_message := FND_FLEX_KEYVAL.ERROR_MESSAGE;
228: IF l_error_message IS NOT NULL THEN
229: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.do_inter_bal.get_segment', l_error_message);
230: END IF;
231: END IF;
232: FND_MESSAGE.SET_NAME('FUN', 'FUN_BAL_GET_CCID_ERROR');
233: FND_MESSAGE.SET_TOKEN('GL_ERROR', FND_FLEX_KEYVAL.ERROR_MESSAGE);

Line 250: IF (FND_LOG.LEVEL_ERROR >= g_debug_level) THEN

246: 'V', gl_date, 'ALL', NULL, l_rule, l_where_clause,
247: l_get_column, FALSE, FALSE,
248: NULL, NULL, NULL, NULL, NULL, NULL);
249: IF l_flag = FALSE THEN
250: IF (FND_LOG.LEVEL_ERROR >= g_debug_level) THEN
251: l_error_message := FND_FLEX_KEYVAL.ERROR_MESSAGE;
252: IF l_error_message IS NOT NULL THEN
253: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.do_inter_bal.validate_segs', l_error_message);
254: END IF;

Line 253: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.do_inter_bal.validate_segs', l_error_message);

249: IF l_flag = FALSE THEN
250: IF (FND_LOG.LEVEL_ERROR >= g_debug_level) THEN
251: l_error_message := FND_FLEX_KEYVAL.ERROR_MESSAGE;
252: IF l_error_message IS NOT NULL THEN
253: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.do_inter_bal.validate_segs', l_error_message);
254: END IF;
255: END IF;
256: FND_MESSAGE.SET_NAME('FUN', 'FUN_BAL_GET_CCID_ERROR');
257: FND_MESSAGE.SET_TOKEN('GL_ERROR', FND_FLEX_KEYVAL.ERROR_MESSAGE);

Line 361: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

357:
358: PROCEDURE ins_inter_le_bsv_map_t(le_bsv_map_tab IN inter_le_bsv_map_tab_type, inter_le_bsv_map_count IN NUMBER) IS
359: cur_hdl int;
360: BEGIN
361: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
362: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'ins_inter_le_bsv_map_t.begin');
363: END IF;
364: cur_hdl := dbms_sql.open_cursor;
365: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_INTER_BSV_MAP_T', dbms_sql.native);

Line 362: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'ins_inter_le_bsv_map_t.begin');

358: PROCEDURE ins_inter_le_bsv_map_t(le_bsv_map_tab IN inter_le_bsv_map_tab_type, inter_le_bsv_map_count IN NUMBER) IS
359: cur_hdl int;
360: BEGIN
361: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
362: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'ins_inter_le_bsv_map_t.begin');
363: END IF;
364: cur_hdl := dbms_sql.open_cursor;
365: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_INTER_BSV_MAP_T', dbms_sql.native);
366: dbms_sql.close_cursor(cur_hdl); -- close cursor

Line 368: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

364: cur_hdl := dbms_sql.open_cursor;
365: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_INTER_BSV_MAP_T', dbms_sql.native);
366: dbms_sql.close_cursor(cur_hdl); -- close cursor
367: IF inter_le_bsv_map_count > 0 THEN
368: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
369: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'ins_inter_le_bsv_map_t.insert_begin');
370: END IF;
371:
372: FORALL i IN le_bsv_map_tab.first..le_bsv_map_tab.last

Line 369: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'ins_inter_le_bsv_map_t.insert_begin');

365: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_INTER_BSV_MAP_T', dbms_sql.native);
366: dbms_sql.close_cursor(cur_hdl); -- close cursor
367: IF inter_le_bsv_map_count > 0 THEN
368: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
369: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'ins_inter_le_bsv_map_t.insert_begin');
370: END IF;
371:
372: FORALL i IN le_bsv_map_tab.first..le_bsv_map_tab.last
373: INSERT INTO fun_bal_inter_bsv_map_t

Line 376: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

372: FORALL i IN le_bsv_map_tab.first..le_bsv_map_tab.last
373: INSERT INTO fun_bal_inter_bsv_map_t
374: VALUES le_bsv_map_tab(i);
375:
376: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
377: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'ins_inter_le_bsv_map_t.insert_end');
378: END IF;
379: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
380: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'ins_inter_le_bsv_map_t.end');

Line 377: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'ins_inter_le_bsv_map_t.insert_end');

373: INSERT INTO fun_bal_inter_bsv_map_t
374: VALUES le_bsv_map_tab(i);
375:
376: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
377: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'ins_inter_le_bsv_map_t.insert_end');
378: END IF;
379: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
380: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'ins_inter_le_bsv_map_t.end');
381: END IF;

Line 379: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

375:
376: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
377: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'ins_inter_le_bsv_map_t.insert_end');
378: END IF;
379: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
380: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'ins_inter_le_bsv_map_t.end');
381: END IF;
382: END IF;
383: END ins_inter_le_bsv_map_t;

Line 380: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'ins_inter_le_bsv_map_t.end');

376: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
377: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'ins_inter_le_bsv_map_t.insert_end');
378: END IF;
379: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
380: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'ins_inter_le_bsv_map_t.end');
381: END IF;
382: END IF;
383: END ins_inter_le_bsv_map_t;
384:

Line 470: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

466: PROCEDURE ins_t_tables_inter_1_auto(le_bsv_map_tab IN inter_le_bsv_map_tab_type, le_bsv_map_count IN NUMBER) IS
467: PRAGMA AUTONOMOUS_TRANSACTION;
468: BEGIN
469:
470: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
471: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'auton_begin');
472: END IF;
473: ins_inter_le_bsv_map_t(le_bsv_map_tab, le_bsv_map_count);
474: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

Line 471: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'auton_begin');

467: PRAGMA AUTONOMOUS_TRANSACTION;
468: BEGIN
469:
470: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
471: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'auton_begin');
472: END IF;
473: ins_inter_le_bsv_map_t(le_bsv_map_tab, le_bsv_map_count);
474: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
475: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'auton_end');

Line 474: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

470: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
471: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'auton_begin');
472: END IF;
473: ins_inter_le_bsv_map_t(le_bsv_map_tab, le_bsv_map_count);
474: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
475: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'auton_end');
476: END IF;
477:
478: COMMIT;

Line 475: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'auton_end');

471: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'auton_begin');
472: END IF;
473: ins_inter_le_bsv_map_t(le_bsv_map_tab, le_bsv_map_count);
474: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
475: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'auton_end');
476: END IF;
477:
478: COMMIT;
479: END ins_t_tables_inter_1_auto;

Line 514: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

510: BEGIN
511:
512: l_return_val := FND_API.G_RET_STS_SUCCESS;
513:
514: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
515: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_init.begin', 'begin');
516: END IF;
517: -- Retrieve the actual FUN schema name from the current installation
518: l_boolean := FND_INSTALLATION.GET_APP_INFO('FUN', l_status, l_industry, g_fun_schema);

Line 515: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_init.begin', 'begin');

511:
512: l_return_val := FND_API.G_RET_STS_SUCCESS;
513:
514: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
515: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_init.begin', 'begin');
516: END IF;
517: -- Retrieve the actual FUN schema name from the current installation
518: l_boolean := FND_INSTALLATION.GET_APP_INFO('FUN', l_status, l_industry, g_fun_schema);
519: IF g_debug = FND_API.G_TRUE THEN

Line 550: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

546:
547: --FND_STATS.GATHER_TABLE_STATS(g_fun_schema, 'FUN_BAL_HEADERS_GT');
548: --FND_STATS.GATHER_TABLE_STATS(g_fun_schema, 'FUN_BAL_LINES_GT');
549:
550: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
551: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_init.end', 'end');
552: END IF;
553:
554:

Line 551: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_init.end', 'end');

547: --FND_STATS.GATHER_TABLE_STATS(g_fun_schema, 'FUN_BAL_HEADERS_GT');
548: --FND_STATS.GATHER_TABLE_STATS(g_fun_schema, 'FUN_BAL_LINES_GT');
549:
550: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
551: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_init.end', 'end');
552: END IF;
553:
554:
555: RETURN l_return_val;

Line 605: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

601: SELECT * FROM fun_bal_errors_gt;
602: BEGIN
603: l_return_val := FND_API.G_RET_STS_SUCCESS;
604:
605: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
606: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_finalize.begin', 'begin');
607: END IF;
608:
609: -- Insert lines generated for Intercompany balancing from FUN_BAL_LINES_GT to FUN_BAL_RESULTS_GT

Line 606: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_finalize.begin', 'begin');

602: BEGIN
603: l_return_val := FND_API.G_RET_STS_SUCCESS;
604:
605: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
606: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_finalize.begin', 'begin');
607: END IF;
608:
609: -- Insert lines generated for Intercompany balancing from FUN_BAL_LINES_GT to FUN_BAL_RESULTS_GT
610: INSERT INTO fun_bal_results_gt results(group_id, bal_seg_val, entered_amt_dr,

Line 656: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

652: IF l_errors_count > 0 THEN
653: l_return_val := FND_API.G_RET_STS_ERROR;
654: END IF;
655:
656: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
657: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_finalize.end', 'end');
658: END IF;
659: RETURN l_return_val;
660: END do_finalize;

Line 657: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_finalize.end', 'end');

653: l_return_val := FND_API.G_RET_STS_ERROR;
654: END IF;
655:
656: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
657: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_finalize.end', 'end');
658: END IF;
659: RETURN l_return_val;
660: END do_finalize;
661:

Line 673: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

669: SELECT * FROM fun_bal_inter_int_gt;
670: l_le_bsv_map_count NUMBER;
671: l_inter_int_count NUMBER;
672: BEGIN
673: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
674: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.begin', 'begin');
675: END IF;
676:
677: /* Replaced by sql below from performance review

Line 674: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.begin', 'begin');

670: l_le_bsv_map_count NUMBER;
671: l_inter_int_count NUMBER;
672: BEGIN
673: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
674: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.begin', 'begin');
675: END IF;
676:
677: /* Replaced by sql below from performance review
678: INSERT INTO fun_bal_le_bsv_map_gt(group_id, ledger_id, bal_seg_val, gl_date)

Line 841: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

837: OPEN l_le_bsv_map_cursor;
838: FETCH l_le_bsv_map_cursor BULK COLLECT INTO l_le_bsv_map_tab;
839: l_le_bsv_map_count := l_le_bsv_map_cursor%ROWCOUNT;
840: CLOSE l_le_bsv_map_cursor;
841: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
842: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'begin');
843: END IF;
844: ins_t_tables_inter_1_auto(l_le_bsv_map_tab, l_le_bsv_map_count);
845: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

Line 842: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'begin');

838: FETCH l_le_bsv_map_cursor BULK COLLECT INTO l_le_bsv_map_tab;
839: l_le_bsv_map_count := l_le_bsv_map_cursor%ROWCOUNT;
840: CLOSE l_le_bsv_map_cursor;
841: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
842: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'begin');
843: END IF;
844: ins_t_tables_inter_1_auto(l_le_bsv_map_tab, l_le_bsv_map_count);
845: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
846: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'end');

Line 845: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

841: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
842: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'begin');
843: END IF;
844: ins_t_tables_inter_1_auto(l_le_bsv_map_tab, l_le_bsv_map_count);
845: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
846: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'end');
847: END IF;
848:
849: END IF;

Line 846: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'end');

842: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'begin');
843: END IF;
844: ins_t_tables_inter_1_auto(l_le_bsv_map_tab, l_le_bsv_map_count);
845: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
846: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'end');
847: END IF;
848:
849: END IF;
850:

Line 1936: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

1932: 1, DECODE(sum_lines.type, gen.value, 'X', gen.value),
1933: 2, DECODE(sum_lines.le_id, sum_lines.driving_dr_le_id, 'X', gen.value),
1934: 3, DECODE(sum_lines.le_id, sum_lines.driving_cr_le_id, 'X', gen.value),
1935: 4, DECODE(sum_lines.type, gen.value, 'X', gen.value));
1936: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
1937: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.end', 'end');
1938: END IF;
1939:
1940: RETURN FND_API.G_RET_STS_SUCCESS;

Line 1937: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.end', 'end');

1933: 2, DECODE(sum_lines.le_id, sum_lines.driving_dr_le_id, 'X', gen.value),
1934: 3, DECODE(sum_lines.le_id, sum_lines.driving_cr_le_id, 'X', gen.value),
1935: 4, DECODE(sum_lines.type, gen.value, 'X', gen.value));
1936: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
1937: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.end', 'end');
1938: END IF;
1939:
1940: RETURN FND_API.G_RET_STS_SUCCESS;
1941: END do_inter_bal;

Line 1953: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

1949: SELECT * FROM fun_bal_le_bsv_map_gt;
1950: CURSOR l_intra_int_cursor IS
1951: SELECT * FROM fun_bal_intra_int_gt;
1952: BEGIN
1953: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
1954: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.begin', 'begin');
1955: END IF;
1956:
1957:

Line 1954: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.begin', 'begin');

1950: CURSOR l_intra_int_cursor IS
1951: SELECT * FROM fun_bal_intra_int_gt;
1952: BEGIN
1953: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
1954: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.begin', 'begin');
1955: END IF;
1956:
1957:
1958: -- Delete all records from FUN_BAL_LE_BSV_MAP_GT for reuse.

Line 1973: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

1969: WHERE hdrs.group_id = lines.group_id
1970: AND hdrs.status = 'OK';
1971:
1972:
1973: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
1974: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.insert_le_bsv_map.finish', 'finish');
1975: END IF;
1976:
1977:

Line 1974: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.insert_le_bsv_map.finish', 'finish');

1970: AND hdrs.status = 'OK';
1971:
1972:
1973: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
1974: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.insert_le_bsv_map.finish', 'finish');
1975: END IF;
1976:
1977:
1978: -- Update Legal entity for each ledger, BSV combination. Legal entity can only be either null or has a specific value

Line 1990: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

1986: AND bsv_le_map.ledger_id = vals.ledger_id
1987: ), -99);
1988:
1989:
1990: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
1991: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_le.finish', 'finish');
1992: END IF;
1993:
1994: -- Determine intracompany mode, driving_dr_bsv and driving_cr_bsv

Line 1991: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_le.finish', 'finish');

1987: ), -99);
1988:
1989:
1990: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
1991: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_le.finish', 'finish');
1992: END IF;
1993:
1994: -- Determine intracompany mode, driving_dr_bsv and driving_cr_bsv
1995: -- improve performance for not updating the lines of LE that uses clearing company

Line 2015: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

2011: SUM(DECODE(lines.exchange_rate, NULL,NVL(lines.entered_amt_cr,0), 0)))))
2012: WHERE le_bsv_map_upd.intracompany_mode IS NULL; -- OR le_bsv_map_upd.intracompany_mode <> 5;
2013:
2014:
2015: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2016: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_intracompany_mode_1.finish', 'finish');
2017: END IF;
2018:
2019:

Line 2016: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_intracompany_mode_1.finish', 'finish');

2012: WHERE le_bsv_map_upd.intracompany_mode IS NULL; -- OR le_bsv_map_upd.intracompany_mode <> 5;
2013:
2014:
2015: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2016: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_intracompany_mode_1.finish', 'finish');
2017: END IF;
2018:
2019:
2020: --Delete records that has intracompany mode NULL

Line 2067: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

2063: DELETE FROM fun_bal_le_bsv_map_gt le_bsv_map
2064: WHERE le_bsv_map.driving_dr_bsv IS NULL OR le_bsv_map.driving_cr_bsv IS NULL;
2065:
2066:
2067: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2068: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_intracompany_mode.finish', 'finish');
2069: END IF;
2070:
2071:

Line 2068: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_intracompany_mode.finish', 'finish');

2064: WHERE le_bsv_map.driving_dr_bsv IS NULL OR le_bsv_map.driving_cr_bsv IS NULL;
2065:
2066:
2067: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2068: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_intracompany_mode.finish', 'finish');
2069: END IF;
2070:
2071:
2072: -- Update intra_template_id in FUN_BAL_LE_BSV_MAP

Line 2126: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

2122: le_bsv_map.driving_dr_bsv, le_bsv_map.driving_cr_bsv
2123: FROM fun_bal_le_bsv_map_gt le_bsv_map
2124: WHERE le_bsv_map.template_id IS NULL;
2125:
2126: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2127: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_template.finish', 'finish');
2128: END IF;
2129:
2130:

Line 2127: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_template.finish', 'finish');

2123: FROM fun_bal_le_bsv_map_gt le_bsv_map
2124: WHERE le_bsv_map.template_id IS NULL;
2125:
2126: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2127: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_template.finish', 'finish');
2128: END IF;
2129:
2130:
2131: -- Logic to update balancing segment values are shown as follows:

Line 2388: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

2384: AND cc1.segment1 = DECODE(le_bsv_map.bal_seg_column_no, 1, le_bsv_)
2385: WHERE dr_cr_debit_complete = 'N'
2386: */
2387:
2388: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2389: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid.begin', 'begin');
2390: END IF;
2391:
2392: -- Retrieve correct ccid by replacing balancing segment and intercompany segment

Line 2389: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid.begin', 'begin');

2385: WHERE dr_cr_debit_complete = 'N'
2386: */
2387:
2388: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2389: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid.begin', 'begin');
2390: END IF;
2391:
2392: -- Retrieve correct ccid by replacing balancing segment and intercompany segment
2393: UPDATE fun_bal_le_bsv_map_gt le_bsv_map

Line 2445: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

2441: NULL),
2442: le_bsv_map.bal_seg_column_number, le_bsv_map.intercompany_column_number,
2443: le_bsv_map.gl_date));
2444:
2445: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2446: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid.end', 'end');
2447: END IF;
2448:
2449: IF g_debug = FND_API.G_TRUE THEN

Line 2446: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid.end', 'end');

2442: le_bsv_map.bal_seg_column_number, le_bsv_map.intercompany_column_number,
2443: le_bsv_map.gl_date));
2444:
2445: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2446: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid.end', 'end');
2447: END IF;
2448:
2449: IF g_debug = FND_API.G_TRUE THEN
2450: OPEN l_le_bsv_map_cursor;

Line 2742: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

2738: 'D', DECODE(intra_lines.type, 'D', 'X', gen.value)),
2739: 5, DECODE(bal_seg_val, clearing_bsv, 'X', gen.value), -- bug 3203634
2740: 'X');
2741:
2742: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2743: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid_concat_disp.begin', 'begin');
2744: END IF;
2745:
2746: INSERT INTO fun_bal_errors_gt(error_code, group_id, template_id, le_id,

Line 2743: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid_concat_disp.begin', 'begin');

2739: 5, DECODE(bal_seg_val, clearing_bsv, 'X', gen.value), -- bug 3203634
2740: 'X');
2741:
2742: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2743: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid_concat_disp.begin', 'begin');
2744: END IF;
2745:
2746: INSERT INTO fun_bal_errors_gt(error_code, group_id, template_id, le_id,
2747: dr_bsv, cr_bsv, acct_type, ccid_concat_display)

Line 2776: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

2772: AND cc.template_id IS NULL
2773: AND (TRUNC(headers.gl_date) BETWEEN TRUNC(NVL(cc.start_date_active, headers.gl_date))
2774: AND TRUNC(NVL(cc.end_date_active, headers.gl_date)))));
2775:
2776: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2777: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid_concat_disp.end', 'end');
2778: END IF;
2779:
2780: UPDATE fun_bal_headers_gt headers

Line 2777: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid_concat_disp.end', 'end');

2773: AND (TRUNC(headers.gl_date) BETWEEN TRUNC(NVL(cc.start_date_active, headers.gl_date))
2774: AND TRUNC(NVL(cc.end_date_active, headers.gl_date)))));
2775:
2776: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2777: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid_concat_disp.end', 'end');
2778: END IF;
2779:
2780: UPDATE fun_bal_headers_gt headers
2781: SET STATUS = 'ERROR'

Line 2796: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

2792: FROM fun_bal_headers_gt headers
2793: WHERE headers.status = 'ERROR'
2794: AND results.group_id = headers.group_id);
2795:
2796: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2797: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.end', 'end');
2798: END IF;
2799:
2800: RETURN FND_API.G_RET_STS_SUCCESS;

Line 2797: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.end', 'end');

2793: WHERE headers.status = 'ERROR'
2794: AND results.group_id = headers.group_id);
2795:
2796: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2797: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.end', 'end');
2798: END IF;
2799:
2800: RETURN FND_API.G_RET_STS_SUCCESS;
2801: END do_intra_bal;

Line 2822: g_debug_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

2818:
2819: BEGIN
2820:
2821: -- variable p_validation_level is not used .
2822: g_debug_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2823:
2824: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2825: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing.begin', 'begin');
2826: END IF;

Line 2824: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

2820:
2821: -- variable p_validation_level is not used .
2822: g_debug_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2823:
2824: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2825: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing.begin', 'begin');
2826: END IF;
2827:
2828: -- Standard call to check for call compatibility.

Line 2825: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing.begin', 'begin');

2821: -- variable p_validation_level is not used .
2822: g_debug_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2823:
2824: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2825: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing.begin', 'begin');
2826: END IF;
2827:
2828: -- Standard call to check for call compatibility.
2829: IF NOT FND_API.Compatible_API_Call ( l_api_version,

Line 2860: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

2856: -- Standard call to get message count and if count is 1, get message info.
2857: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2858: p_data => x_msg_data);
2859:
2860: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2861: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing.end', 'end');
2862: END IF;
2863:
2864: EXCEPTION

Line 2861: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing.end', 'end');

2857: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2858: p_data => x_msg_data);
2859:
2860: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2861: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing.end', 'end');
2862: END IF;
2863:
2864: EXCEPTION
2865: WHEN FND_API.G_EXC_ERROR THEN

Line 2867: IF (FND_LOG.LEVEL_ERROR>= g_debug_level) THEN

2863:
2864: EXCEPTION
2865: WHEN FND_API.G_EXC_ERROR THEN
2866: do_save_in_error;
2867: IF (FND_LOG.LEVEL_ERROR>= g_debug_level) THEN
2868: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.journal_balancing.error', SUBSTR(SQLERRM,1, 4000));
2869: END IF;
2870: x_return_status := FND_API.G_RET_STS_ERROR ;
2871: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

Line 2868: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.journal_balancing.error', SUBSTR(SQLERRM,1, 4000));

2864: EXCEPTION
2865: WHEN FND_API.G_EXC_ERROR THEN
2866: do_save_in_error;
2867: IF (FND_LOG.LEVEL_ERROR>= g_debug_level) THEN
2868: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.journal_balancing.error', SUBSTR(SQLERRM,1, 4000));
2869: END IF;
2870: x_return_status := FND_API.G_RET_STS_ERROR ;
2871: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2872: p_data => x_msg_data);

Line 2875: IF (FND_LOG.LEVEL_ERROR>= g_debug_level) THEN

2871: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2872: p_data => x_msg_data);
2873: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2874: do_save_in_error;
2875: IF (FND_LOG.LEVEL_ERROR>= g_debug_level) THEN
2876: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.journal_balancing.unexpected_error_norm', SUBSTR(SQLCODE ||
2877: ' : ' || SQLERRM,1, 4000));
2878: END IF;
2879: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 2876: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.journal_balancing.unexpected_error_norm', SUBSTR(SQLCODE ||

2872: p_data => x_msg_data);
2873: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2874: do_save_in_error;
2875: IF (FND_LOG.LEVEL_ERROR>= g_debug_level) THEN
2876: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.journal_balancing.unexpected_error_norm', SUBSTR(SQLCODE ||
2877: ' : ' || SQLERRM,1, 4000));
2878: END IF;
2879: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2880: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

Line 2885: IF (FND_LOG.LEVEL_ERROR>= g_debug_level) THEN

2881: p_data => x_msg_data);
2882: WHEN OTHERS THEN
2883: do_save_in_error;
2884: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2885: IF (FND_LOG.LEVEL_ERROR>= g_debug_level) THEN
2886: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.journal_balancing.unexpected_error_others', SUBSTR(SQLCODE ||
2887: ' : ' || SQLERRM,1, 4000));
2888: END IF;
2889: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 2886: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.journal_balancing.unexpected_error_others', SUBSTR(SQLCODE ||

2882: WHEN OTHERS THEN
2883: do_save_in_error;
2884: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2885: IF (FND_LOG.LEVEL_ERROR>= g_debug_level) THEN
2886: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.journal_balancing.unexpected_error_others', SUBSTR(SQLCODE ||
2887: ' : ' || SQLERRM,1, 4000));
2888: END IF;
2889: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2890: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);