DBA Data[Home] [Help]

APPS.FUN_BAL_PKG dependencies on FND_LOG

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

59: IS
60: cur_hdl int;
61: rows_processed int;
62: BEGIN
63: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
64: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.truncate_tables', 'begin');
65: END IF;
66:
67: DELETE FROM fun_bal_results_gt;

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

60: cur_hdl int;
61: rows_processed int;
62: BEGIN
63: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
64: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.truncate_tables', 'begin');
65: END IF;
66:
67: DELETE FROM fun_bal_results_gt;
68: DELETE FROM fun_bal_errors_gt;

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

89: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_INTER_INT_T', dbms_sql.native);
90: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_INTRA_INT_T', dbms_sql.native);
91: dbms_sql.close_cursor(cur_hdl); -- close cursor
92: */
93: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
94: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.truncate_tables', 'end');
95: END IF;
96:
97: RETURN;

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

90: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_INTRA_INT_T', dbms_sql.native);
91: dbms_sql.close_cursor(cur_hdl); -- close cursor
92: */
93: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
94: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.truncate_tables', 'end');
95: END IF;
96:
97: RETURN;
98: END truncate_tables;

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

107: SELECT DISTINCT bal_seg_column_name
108: FROM fun_bal_headers_gt headers
109: WHERE headers.status = 'OK';
110: BEGIN
111: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
112: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.update_inter_seg_val.begin', 'begin');
113: END IF;
114:
115: OPEN bal_seg_val_cur;

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

108: FROM fun_bal_headers_gt headers
109: WHERE headers.status = 'OK';
110: BEGIN
111: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
112: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.update_inter_seg_val.begin', 'begin');
113: END IF;
114:
115: OPEN bal_seg_val_cur;
116: LOOP

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

140: rows_processed := dbms_sql.execute(cur_hdl);
141: dbms_sql.close_cursor(cur_hdl); -- close cursor
142: END LOOP;
143: CLOSE bal_seg_val_cur;
144: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
145: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.update_inter_seg_val.end', 'end');
146: END IF;
147:
148: RETURN;

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

141: dbms_sql.close_cursor(cur_hdl); -- close cursor
142: END LOOP;
143: CLOSE bal_seg_val_cur;
144: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
145: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.update_inter_seg_val.end', 'end');
146: END IF;
147:
148: RETURN;
149: END update_inter_seg_val;

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

171: l_index NUMBER;
172: l_prev_seg_num NUMBER;
173:
174: BEGIN
175: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
176: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.get_segment_index', 'start');
177: END IF;
178:
179: l_index := 0;

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

172: l_prev_seg_num NUMBER;
173:
174: BEGIN
175: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
176: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.get_segment_index', 'start');
177: END IF;
178:
179: l_index := 0;
180: l_prev_seg_num := 0;

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

204: END LOOP;
205:
206: RETURN NULL;
207:
208: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
209: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.get_segment_index', 'end');
210: END IF;
211:
212: END get_segment_index;

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

205:
206: RETURN NULL;
207:
208: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
209: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.get_segment_index', 'end');
210: END IF;
211:
212: END get_segment_index;
213:

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

234: l_ccid_key VARCHAR2(2000);
235:
236: BEGIN
237:
238: IF (FND_LOG.LEVEL_ERROR >= g_debug_level) THEN
239:
240: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid', 'Begin');
241:
242: END IF;

Line 240: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid', 'Begin');

236: BEGIN
237:
238: IF (FND_LOG.LEVEL_ERROR >= g_debug_level) THEN
239:
240: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid', 'Begin');
241:
242: END IF;
243:
244: -- Bug # 7141663 Key for the cache table created

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

247: bal_seg_val || '~' || intercompany_seg_val || '~' ||
248: bal_seg_column_number|| '~' || intercompany_column_number || '~' ||
249: TO_CHAR(gl_date,'DD-MM-YYYY');
250:
251: IF (FND_LOG.LEVEL_ERROR >= g_debug_level) THEN
252:
253: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid', 'l_ccid_key : '|| l_ccid_key);
254:
255: END IF;

Line 253: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid', 'l_ccid_key : '|| l_ccid_key);

249: TO_CHAR(gl_date,'DD-MM-YYYY');
250:
251: IF (FND_LOG.LEVEL_ERROR >= g_debug_level) THEN
252:
253: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid', 'l_ccid_key : '|| l_ccid_key);
254:
255: END IF;
256:
257: -- Bug # 7141663 If the key does not exists in the cache table,

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

266: l_delimiter := fnd_flex_ext.get_delimiter('SQLGL', 'GL#', chart_of_accounts_id);
267: l_flag := fnd_flex_ext.get_segments('SQLGL', 'GL#', chart_of_accounts_id, ccid,
268: l_no_of_segments, l_segment_array);
269: IF l_flag = FALSE THEN
270: IF (FND_LOG.LEVEL_ERROR >= g_debug_level) THEN
271: l_error_message := FND_FLEX_KEYVAL.ERROR_MESSAGE;
272: IF l_error_message IS NOT NULL THEN
273: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid.get_segments', l_error_message);
274: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid.get_segments', 'l_ccid_key : '|| l_ccid_key);

Line 273: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid.get_segments', l_error_message);

269: IF l_flag = FALSE THEN
270: IF (FND_LOG.LEVEL_ERROR >= g_debug_level) THEN
271: l_error_message := FND_FLEX_KEYVAL.ERROR_MESSAGE;
272: IF l_error_message IS NOT NULL THEN
273: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid.get_segments', l_error_message);
274: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid.get_segments', 'l_ccid_key : '|| l_ccid_key);
275: END IF;
276: END IF;
277: FND_MESSAGE.SET_NAME('FUN', 'FUN_BAL_GET_CCID_ERROR');

Line 274: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid.get_segments', 'l_ccid_key : '|| l_ccid_key);

270: IF (FND_LOG.LEVEL_ERROR >= g_debug_level) THEN
271: l_error_message := FND_FLEX_KEYVAL.ERROR_MESSAGE;
272: IF l_error_message IS NOT NULL THEN
273: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid.get_segments', l_error_message);
274: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid.get_segments', 'l_ccid_key : '|| l_ccid_key);
275: END IF;
276: END IF;
277: FND_MESSAGE.SET_NAME('FUN', 'FUN_BAL_GET_CCID_ERROR');
278: FND_MESSAGE.SET_TOKEN('GL_ERROR', FND_FLEX_KEYVAL.ERROR_MESSAGE);

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

291: 'V', gl_date, 'ALL', NULL, l_rule, l_where_clause,
292: l_get_column, FALSE, FALSE,
293: NULL, NULL, NULL, NULL, NULL, NULL);
294: IF l_flag = FALSE THEN
295: IF (FND_LOG.LEVEL_ERROR >= g_debug_level) THEN
296: l_error_message := FND_FLEX_KEYVAL.ERROR_MESSAGE;
297: IF l_error_message IS NOT NULL THEN
298: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid.validate_segs', l_error_message);
299: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid.validate_segs', 'l_ccid_key : '|| l_ccid_key);

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

294: IF l_flag = FALSE THEN
295: IF (FND_LOG.LEVEL_ERROR >= g_debug_level) THEN
296: l_error_message := FND_FLEX_KEYVAL.ERROR_MESSAGE;
297: IF l_error_message IS NOT NULL THEN
298: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid.validate_segs', l_error_message);
299: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid.validate_segs', 'l_ccid_key : '|| l_ccid_key);
300: END IF;
301: END IF;
302: FND_MESSAGE.SET_NAME('FUN', 'FUN_BAL_GET_CCID_ERROR');

Line 299: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid.validate_segs', 'l_ccid_key : '|| l_ccid_key);

295: IF (FND_LOG.LEVEL_ERROR >= g_debug_level) THEN
296: l_error_message := FND_FLEX_KEYVAL.ERROR_MESSAGE;
297: IF l_error_message IS NOT NULL THEN
298: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid.validate_segs', l_error_message);
299: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.get_ccid.validate_segs', 'l_ccid_key : '|| l_ccid_key);
300: END IF;
301: END IF;
302: FND_MESSAGE.SET_NAME('FUN', 'FUN_BAL_GET_CCID_ERROR');
303: FND_MESSAGE.SET_TOKEN('GL_ERROR', FND_FLEX_KEYVAL.ERROR_MESSAGE);

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

408:
409: 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
410: cur_hdl int;
411: BEGIN
412: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
413: 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');
414: END IF;
415: cur_hdl := dbms_sql.open_cursor;
416: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_INTER_BSV_MAP_T', dbms_sql.native);

Line 413: 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');

409: 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
410: cur_hdl int;
411: BEGIN
412: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
413: 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');
414: END IF;
415: cur_hdl := dbms_sql.open_cursor;
416: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_INTER_BSV_MAP_T', dbms_sql.native);
417: dbms_sql.close_cursor(cur_hdl); -- close cursor

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

415: cur_hdl := dbms_sql.open_cursor;
416: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_INTER_BSV_MAP_T', dbms_sql.native);
417: dbms_sql.close_cursor(cur_hdl); -- close cursor
418: IF inter_le_bsv_map_count > 0 THEN
419: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
420: 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');
421: END IF;
422:
423: FORALL i IN le_bsv_map_tab.first..le_bsv_map_tab.last

Line 420: 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');

416: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_INTER_BSV_MAP_T', dbms_sql.native);
417: dbms_sql.close_cursor(cur_hdl); -- close cursor
418: IF inter_le_bsv_map_count > 0 THEN
419: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
420: 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');
421: END IF;
422:
423: FORALL i IN le_bsv_map_tab.first..le_bsv_map_tab.last
424: INSERT INTO fun_bal_inter_bsv_map_t

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

423: FORALL i IN le_bsv_map_tab.first..le_bsv_map_tab.last
424: INSERT INTO fun_bal_inter_bsv_map_t
425: VALUES le_bsv_map_tab(i);
426:
427: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
428: 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');
429: END IF;
430: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
431: 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 428: 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');

424: INSERT INTO fun_bal_inter_bsv_map_t
425: VALUES le_bsv_map_tab(i);
426:
427: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
428: 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');
429: END IF;
430: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
431: 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');
432: END IF;

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

426:
427: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
428: 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');
429: END IF;
430: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
431: 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');
432: END IF;
433: END IF;
434: END ins_inter_le_bsv_map_t;

Line 431: 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');

427: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
428: 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');
429: END IF;
430: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
431: 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');
432: END IF;
433: END IF;
434: END ins_inter_le_bsv_map_t;
435:

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

518: 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
519: PRAGMA AUTONOMOUS_TRANSACTION;
520: BEGIN
521:
522: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
523: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'auton_begin');
524: END IF;
525: ins_inter_le_bsv_map_t(le_bsv_map_tab, le_bsv_map_count);
526: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

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

519: PRAGMA AUTONOMOUS_TRANSACTION;
520: BEGIN
521:
522: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
523: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'auton_begin');
524: END IF;
525: ins_inter_le_bsv_map_t(le_bsv_map_tab, le_bsv_map_count);
526: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
527: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'auton_end');

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

522: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
523: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'auton_begin');
524: END IF;
525: ins_inter_le_bsv_map_t(le_bsv_map_tab, le_bsv_map_count);
526: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
527: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'auton_end');
528: END IF;
529:
530: COMMIT;

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

523: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'auton_begin');
524: END IF;
525: ins_inter_le_bsv_map_t(le_bsv_map_tab, le_bsv_map_count);
526: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
527: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'auton_end');
528: END IF;
529:
530: COMMIT;
531: END ins_t_tables_inter_1_auto;

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

562: BEGIN
563:
564: l_return_val := FND_API.G_RET_STS_SUCCESS;
565:
566: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
567: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_init.begin', 'begin');
568: END IF;
569: -- Retrieve the actual FUN schema name from the current installation
570: l_boolean := FND_INSTALLATION.GET_APP_INFO('FUN', l_status, l_industry, g_fun_schema);

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

563:
564: l_return_val := FND_API.G_RET_STS_SUCCESS;
565:
566: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
567: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_init.begin', 'begin');
568: END IF;
569: -- Retrieve the actual FUN schema name from the current installation
570: l_boolean := FND_INSTALLATION.GET_APP_INFO('FUN', l_status, l_industry, g_fun_schema);
571: IF g_debug = FND_API.G_TRUE THEN

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

612:
613: --FND_STATS.GATHER_TABLE_STATS(g_fun_schema, 'FUN_BAL_HEADERS_GT');
614: --FND_STATS.GATHER_TABLE_STATS(g_fun_schema, 'FUN_BAL_LINES_GT');
615:
616: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
617: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_init.end', 'end');
618: END IF;
619:
620:

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

613: --FND_STATS.GATHER_TABLE_STATS(g_fun_schema, 'FUN_BAL_HEADERS_GT');
614: --FND_STATS.GATHER_TABLE_STATS(g_fun_schema, 'FUN_BAL_LINES_GT');
615:
616: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
617: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_init.end', 'end');
618: END IF;
619:
620:
621: RETURN l_return_val;

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

667: SELECT * FROM fun_bal_errors_gt;
668: BEGIN
669: l_return_val := FND_API.G_RET_STS_SUCCESS;
670:
671: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
672: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_finalize.begin', 'begin');
673: END IF;
674:
675: -- Insert lines generated for Intercompany balancing from FUN_BAL_LINES_GT to FUN_BAL_RESULTS_GT

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

668: BEGIN
669: l_return_val := FND_API.G_RET_STS_SUCCESS;
670:
671: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
672: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_finalize.begin', 'begin');
673: END IF;
674:
675: -- Insert lines generated for Intercompany balancing from FUN_BAL_LINES_GT to FUN_BAL_RESULTS_GT
676: INSERT INTO fun_bal_results_gt results(group_id, bal_seg_val, entered_amt_dr,

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

721: IF l_errors_count > 0 THEN
722: l_return_val := FND_API.G_RET_STS_ERROR;
723: END IF;
724:
725: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
726: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_finalize.end', 'end');
727: END IF;
728: RETURN l_return_val;
729: END do_finalize;

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

722: l_return_val := FND_API.G_RET_STS_ERROR;
723: END IF;
724:
725: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
726: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_finalize.end', 'end');
727: END IF;
728: RETURN l_return_val;
729: END do_finalize;
730:

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

739: l_le_bsv_map_count NUMBER;
740: l_inter_int_count NUMBER;
741:
742: BEGIN
743: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
744: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.begin', 'begin');
745: END IF;
746:
747: /* Replaced by sql below from performance review

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

740: l_inter_int_count NUMBER;
741:
742: BEGIN
743: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
744: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.begin', 'begin');
745: END IF;
746:
747: /* Replaced by sql below from performance review
748: INSERT INTO fun_bal_le_bsv_map_gt(group_id, ledger_id, bal_seg_val, gl_date)

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

910: OPEN l_le_bsv_map_cursor;
911: FETCH l_le_bsv_map_cursor BULK COLLECT INTO l_le_bsv_map_tab;
912: l_le_bsv_map_count := l_le_bsv_map_cursor%ROWCOUNT;
913: CLOSE l_le_bsv_map_cursor;
914: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
915: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'begin');
916: END IF;
917: ins_t_tables_inter_1_auto(l_le_bsv_map_tab, l_le_bsv_map_count);
918: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

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

911: FETCH l_le_bsv_map_cursor BULK COLLECT INTO l_le_bsv_map_tab;
912: l_le_bsv_map_count := l_le_bsv_map_cursor%ROWCOUNT;
913: CLOSE l_le_bsv_map_cursor;
914: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
915: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'begin');
916: END IF;
917: ins_t_tables_inter_1_auto(l_le_bsv_map_tab, l_le_bsv_map_count);
918: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
919: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'end');

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

914: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
915: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'begin');
916: END IF;
917: ins_t_tables_inter_1_auto(l_le_bsv_map_tab, l_le_bsv_map_count);
918: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
919: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'end');
920: END IF;
921:
922: END IF;

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

915: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'begin');
916: END IF;
917: ins_t_tables_inter_1_auto(l_le_bsv_map_tab, l_le_bsv_map_count);
918: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
919: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.ins_t_tables_inter_1_auto', 'end');
920: END IF;
921:
922: END IF;
923:

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

2892: 1, DECODE(sum_lines.type, gen.value, 'X', gen.value),
2893: 2, DECODE(sum_lines.le_id, sum_lines.driving_dr_le_id, 'X', gen.value),
2894: 3, DECODE(sum_lines.le_id, sum_lines.driving_cr_le_id, 'X', gen.value),
2895: 4, DECODE(sum_lines.type, gen.value, 'X', gen.value));
2896: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2897: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.end', 'end');
2898: END IF;
2899:
2900: RETURN FND_API.G_RET_STS_SUCCESS;

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

2893: 2, DECODE(sum_lines.le_id, sum_lines.driving_dr_le_id, 'X', gen.value),
2894: 3, DECODE(sum_lines.le_id, sum_lines.driving_cr_le_id, 'X', gen.value),
2895: 4, DECODE(sum_lines.type, gen.value, 'X', gen.value));
2896: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2897: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_inter_bal.end', 'end');
2898: END IF;
2899:
2900: RETURN FND_API.G_RET_STS_SUCCESS;
2901: END do_inter_bal;

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

2909: SELECT * FROM fun_bal_le_bsv_map_gt;
2910: CURSOR l_intra_int_cursor IS
2911: SELECT * FROM fun_bal_intra_int_gt;
2912: BEGIN
2913: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2914: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.begin', 'begin');
2915: END IF;
2916:
2917:

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

2910: CURSOR l_intra_int_cursor IS
2911: SELECT * FROM fun_bal_intra_int_gt;
2912: BEGIN
2913: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2914: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.begin', 'begin');
2915: END IF;
2916:
2917:
2918: -- Delete all records from FUN_BAL_LE_BSV_MAP_GT for reuse.

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

2929: WHERE hdrs.group_id = lines.group_id
2930: AND hdrs.status = 'OK';
2931:
2932:
2933: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2934: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.insert_le_bsv_map.finish', 'finish');
2935: END IF;
2936:
2937:

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

2930: AND hdrs.status = 'OK';
2931:
2932:
2933: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2934: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.insert_le_bsv_map.finish', 'finish');
2935: END IF;
2936:
2937:
2938: -- Update Legal entity for each ledger, BSV combination. Legal entity can only be either null or has a specific value

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

2946: AND bsv_le_map.ledger_id = vals.ledger_id
2947: ), -99);
2948:
2949:
2950: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2951: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_le.finish', 'finish');
2952: END IF;
2953:
2954: -- Determine intracompany mode, driving_dr_bsv and driving_cr_bsv

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

2947: ), -99);
2948:
2949:
2950: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2951: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_le.finish', 'finish');
2952: END IF;
2953:
2954: -- Determine intracompany mode, driving_dr_bsv and driving_cr_bsv
2955: -- improve performance for not updating the lines of LE that uses clearing company

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

2974: SUM(DECODE(lines.exchange_rate, NULL,NVL(lines.entered_amt_cr,0), 0)))))
2975: WHERE le_bsv_map_upd.intracompany_mode IS NULL; -- OR le_bsv_map_upd.intracompany_mode <> 5;
2976:
2977:
2978: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2979: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_intracompany_mode_1.finish', 'finish');
2980: END IF;
2981:
2982:

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

2975: WHERE le_bsv_map_upd.intracompany_mode IS NULL; -- OR le_bsv_map_upd.intracompany_mode <> 5;
2976:
2977:
2978: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
2979: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_intracompany_mode_1.finish', 'finish');
2980: END IF;
2981:
2982:
2983: --Delete records that has intracompany mode NULL

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

3032: DELETE FROM fun_bal_le_bsv_map_gt le_bsv_map
3033: WHERE le_bsv_map.driving_dr_bsv IS NULL OR le_bsv_map.driving_cr_bsv IS NULL;
3034:
3035:
3036: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3037: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_intracompany_mode.finish', 'finish');
3038: END IF;
3039:
3040:

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

3033: WHERE le_bsv_map.driving_dr_bsv IS NULL OR le_bsv_map.driving_cr_bsv IS NULL;
3034:
3035:
3036: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3037: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_intracompany_mode.finish', 'finish');
3038: END IF;
3039:
3040:
3041: -- Update intra_template_id in FUN_BAL_LE_BSV_MAP

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

3091: le_bsv_map.driving_dr_bsv, le_bsv_map.driving_cr_bsv
3092: FROM fun_bal_le_bsv_map_gt le_bsv_map
3093: WHERE le_bsv_map.template_id IS NULL;
3094:
3095: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3096: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_template.finish', 'finish');
3097: END IF;
3098:
3099:

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

3092: FROM fun_bal_le_bsv_map_gt le_bsv_map
3093: WHERE le_bsv_map.template_id IS NULL;
3094:
3095: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3096: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.update_template.finish', 'finish');
3097: END IF;
3098:
3099:
3100: -- Logic to update balancing segment values are shown as follows:

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

3353: AND cc1.segment1 = DECODE(le_bsv_map.bal_seg_column_no, 1, le_bsv_)
3354: WHERE dr_cr_debit_complete = 'N'
3355: */
3356:
3357: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3358: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid.begin', 'begin');
3359: END IF;
3360:
3361: --Bug: 11665072.

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

3354: WHERE dr_cr_debit_complete = 'N'
3355: */
3356:
3357: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3358: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid.begin', 'begin');
3359: END IF;
3360:
3361: --Bug: 11665072.
3362: -- Retrieve correct ccid by replacing balancing segment and intercompany segment

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

3408: NULL),
3409: le_bsv_map.bal_seg_column_number, le_bsv_map.intercompany_column_number,
3410: le_bsv_map.gl_date);
3411:
3412: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3413: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid.end', 'end');
3414: END IF;
3415:
3416: IF g_debug = FND_API.G_TRUE THEN

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

3409: le_bsv_map.bal_seg_column_number, le_bsv_map.intercompany_column_number,
3410: le_bsv_map.gl_date);
3411:
3412: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3413: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid.end', 'end');
3414: END IF;
3415:
3416: IF g_debug = FND_API.G_TRUE THEN
3417: OPEN l_le_bsv_map_cursor;

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

3708: 'D', DECODE(intra_lines.type, 'D', 'X', gen.value)),
3709: 5, DECODE(bal_seg_val, clearing_bsv, 'X', gen.value), -- bug 3203634
3710: 'X');
3711:
3712: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3713: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid_concat_disp.begin', 'begin');
3714: END IF;
3715:
3716: INSERT INTO fun_bal_errors_gt(error_code, group_id, template_id, le_id,

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

3709: 5, DECODE(bal_seg_val, clearing_bsv, 'X', gen.value), -- bug 3203634
3710: 'X');
3711:
3712: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3713: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid_concat_disp.begin', 'begin');
3714: END IF;
3715:
3716: INSERT INTO fun_bal_errors_gt(error_code, group_id, template_id, le_id,
3717: dr_bsv, cr_bsv, acct_type, ccid_concat_display)

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

3743: AND cc.template_id IS NULL
3744: AND (TRUNC(headers.gl_date) BETWEEN TRUNC(NVL(cc.start_date_active, headers.gl_date))
3745: AND TRUNC(NVL(cc.end_date_active, headers.gl_date)))));
3746:
3747: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3748: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid_concat_disp.end', 'end');
3749: END IF;
3750:
3751: UPDATE fun_bal_headers_gt headers

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

3744: AND (TRUNC(headers.gl_date) BETWEEN TRUNC(NVL(cc.start_date_active, headers.gl_date))
3745: AND TRUNC(NVL(cc.end_date_active, headers.gl_date)))));
3746:
3747: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3748: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.get_ccid_concat_disp.end', 'end');
3749: END IF;
3750:
3751: UPDATE fun_bal_headers_gt headers
3752: SET STATUS = 'ERROR'

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

3763: FROM fun_bal_headers_gt headers
3764: WHERE headers.status = 'ERROR'
3765: AND results.group_id = headers.group_id);
3766:
3767: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3768: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.end', 'end');
3769: END IF;
3770:
3771: RETURN FND_API.G_RET_STS_SUCCESS;

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

3764: WHERE headers.status = 'ERROR'
3765: AND results.group_id = headers.group_id);
3766:
3767: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3768: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.do_intra_bal.end', 'end');
3769: END IF;
3770:
3771: RETURN FND_API.G_RET_STS_SUCCESS;
3772: END do_intra_bal;

Line 3802: g_debug_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

3798:
3799: BEGIN
3800:
3801: -- variable p_validation_level is not used .
3802: g_debug_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3803:
3804: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3805: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing.begin', 'begin');
3806: END IF;

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

3800:
3801: -- variable p_validation_level is not used .
3802: g_debug_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3803:
3804: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3805: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing.begin', 'begin');
3806: END IF;
3807:
3808: -- Standard call to check for call compatibility.

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

3801: -- variable p_validation_level is not used .
3802: g_debug_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3803:
3804: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3805: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing.begin', 'begin');
3806: END IF;
3807:
3808: -- Standard call to check for call compatibility.
3809: IF NOT FND_API.Compatible_API_Call ( l_api_version,

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

3838: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
3839:
3840: fnd_profile.get('FUN_ENABLE_BALANCING_CUSTOM_API', l_balancing_custom_api);
3841:
3842: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3843: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing', 'l_balancing_custom_api : '|| l_balancing_custom_api);
3844: END IF;
3845:
3846: IF (l_balancing_custom_api IS NOT NULL) THEN

Line 3843: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing', 'l_balancing_custom_api : '|| l_balancing_custom_api);

3839:
3840: fnd_profile.get('FUN_ENABLE_BALANCING_CUSTOM_API', l_balancing_custom_api);
3841:
3842: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3843: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing', 'l_balancing_custom_api : '|| l_balancing_custom_api);
3844: END IF;
3845:
3846: IF (l_balancing_custom_api IS NOT NULL) THEN
3847: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN

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

3843: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing', 'l_balancing_custom_api : '|| l_balancing_custom_api);
3844: END IF;
3845:
3846: IF (l_balancing_custom_api IS NOT NULL) THEN
3847: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3848: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing', 'Calling custom balancing API');
3849: END IF;
3850:
3851: execute immediate 'begin '|| l_balancing_custom_api || '; end;';

Line 3848: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing', 'Calling custom balancing API');

3844: END IF;
3845:
3846: IF (l_balancing_custom_api IS NOT NULL) THEN
3847: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3848: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing', 'Calling custom balancing API');
3849: END IF;
3850:
3851: execute immediate 'begin '|| l_balancing_custom_api || '; end;';
3852:

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

3849: END IF;
3850:
3851: execute immediate 'begin '|| l_balancing_custom_api || '; end;';
3852:
3853: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3854: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing', 'End of custom balancing API');
3855: END IF;
3856:
3857: SELECT COUNT(*) INTO l_errors_count

Line 3854: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing', 'End of custom balancing API');

3850:
3851: execute immediate 'begin '|| l_balancing_custom_api || '; end;';
3852:
3853: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3854: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing', 'End of custom balancing API');
3855: END IF;
3856:
3857: SELECT COUNT(*) INTO l_errors_count
3858: FROM fun_bal_errors_gt;

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

3856:
3857: SELECT COUNT(*) INTO l_errors_count
3858: FROM fun_bal_errors_gt;
3859:
3860: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3861: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing', 'l_errors_count : '|| l_errors_count);
3862: END IF;
3863:
3864: IF l_errors_count > 0 THEN

Line 3861: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing', 'l_errors_count : '|| l_errors_count);

3857: SELECT COUNT(*) INTO l_errors_count
3858: FROM fun_bal_errors_gt;
3859:
3860: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3861: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing', 'l_errors_count : '|| l_errors_count);
3862: END IF;
3863:
3864: IF l_errors_count > 0 THEN
3865: x_return_status := FND_API.G_RET_STS_ERROR;

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

3864: IF l_errors_count > 0 THEN
3865: x_return_status := FND_API.G_RET_STS_ERROR;
3866: END IF;
3867:
3868: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3869: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing', 'x_return_status : '|| x_return_status);
3870: END IF;
3871:
3872: END IF;

Line 3869: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing', 'x_return_status : '|| x_return_status);

3865: x_return_status := FND_API.G_RET_STS_ERROR;
3866: END IF;
3867:
3868: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3869: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing', 'x_return_status : '|| x_return_status);
3870: END IF;
3871:
3872: END IF;
3873: END IF;

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

3877: -- Standard call to get message count and if count is 1, get message info.
3878: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3879: p_data => x_msg_data);
3880:
3881: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3882: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing.end', 'end');
3883: END IF;
3884:
3885: EXCEPTION

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

3878: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3879: p_data => x_msg_data);
3880:
3881: IF (FND_LOG.LEVEL_PROCEDURE >= g_debug_level) THEN
3882: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'fun.plsql.fun_bal_pkg.journal_balancing.end', 'end');
3883: END IF;
3884:
3885: EXCEPTION
3886: WHEN FND_API.G_EXC_ERROR THEN

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

3888: unexpected_error(SQLERRM);
3889: -- Delete and save data in temporary tables
3890: do_save_in_error;
3891: END IF;
3892: IF (FND_LOG.LEVEL_ERROR>= g_debug_level) THEN
3893: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.journal_balancing.error', SUBSTR(SQLERRM,1, 4000));
3894: END IF;
3895: x_return_status := FND_API.G_RET_STS_ERROR ;
3896: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

3889: -- Delete and save data in temporary tables
3890: do_save_in_error;
3891: END IF;
3892: IF (FND_LOG.LEVEL_ERROR>= g_debug_level) THEN
3893: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.journal_balancing.error', SUBSTR(SQLERRM,1, 4000));
3894: END IF;
3895: x_return_status := FND_API.G_RET_STS_ERROR ;
3896: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3897: p_data => x_msg_data);

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

3900: IF g_debug = FND_API.G_TRUE THEN
3901: -- Delete and save data in temporary tables
3902: do_save_in_error;
3903: END IF;
3904: IF (FND_LOG.LEVEL_ERROR>= g_debug_level) THEN
3905: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.journal_balancing.unexpected_error_norm', SUBSTR(SQLCODE ||
3906: ' : ' || SQLERRM,1, 4000));
3907: END IF;
3908: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

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

3901: -- Delete and save data in temporary tables
3902: do_save_in_error;
3903: END IF;
3904: IF (FND_LOG.LEVEL_ERROR>= g_debug_level) THEN
3905: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.journal_balancing.unexpected_error_norm', SUBSTR(SQLCODE ||
3906: ' : ' || SQLERRM,1, 4000));
3907: END IF;
3908: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3909: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

3914: -- Delete and save data in temporary tables
3915: do_save_in_error;
3916: END IF;
3917: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3918: IF (FND_LOG.LEVEL_ERROR>= g_debug_level) THEN
3919: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.journal_balancing.unexpected_error_others', SUBSTR(SQLCODE ||
3920: ' : ' || SQLERRM,1, 4000));
3921: END IF;
3922: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

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

3915: do_save_in_error;
3916: END IF;
3917: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3918: IF (FND_LOG.LEVEL_ERROR>= g_debug_level) THEN
3919: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, 'fun.plsql.fun_bal_pkg.journal_balancing.unexpected_error_others', SUBSTR(SQLCODE ||
3920: ' : ' || SQLERRM,1, 4000));
3921: END IF;
3922: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3923: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);