[Home] [Help]
35: DELETE FROM fun_bal_results_gt;
36: DELETE FROM fun_bal_errors_gt;
37: DELETE FROM fun_bal_le_bsv_map_gt;
38: DELETE FROM fun_bal_inter_int_gt;
39: DELETE FROM fun_bal_intra_int_gt;
40: /* Using delete rather than truncate as shown in the code below. The reason is that truncate (or any DDL operations)
41: perform an implicit commit => need to use autonomous transaction to perform such operation. However, we would
42: like to make sure the calling program does not see the rows that gets deleted, therefore truncate is not used.
43: In addition, the truncate operation might not be able to delete the rows that the calling program has not commited yet,
46: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_RESULTS_GT', dbms_sql.native);
47: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_ERRORS_GT', dbms_sql.native);
48: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_LE_BSV_MAP_GT', dbms_sql.native);
49: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_INTER_INT_GT', dbms_sql.native);
50: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_INTRA_INT_GT', dbms_sql.native);
51: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_RESULTS_T', dbms_sql.native);
52: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_ERRORS_T', dbms_sql.native);
53: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_LINES_T', dbms_sql.native);
54: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_HEADERS_T', dbms_sql.native);
496: PROCEDURE ins_t_tables_intra_2_auto(intra_int_tab IN intra_int_tab_type, intra_int_count IN NUMBER) IS
497: PRAGMA AUTONOMOUS_TRANSACTION;
498: BEGIN
499: -- INSERT INTO fun_bal_intra_int_t
500: -- SELECT * FROM fun_bal_intra_int_gt;
501: ins_intra_int_t(intra_int_tab, intra_int_count);
502: COMMIT;
503: END ins_t_tables_intra_2_auto;
504:
1947: l_intra_int_count NUMBER;
1948: CURSOR l_le_bsv_map_cursor IS
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;
2453: CLOSE l_le_bsv_map_cursor;
2454: ins_t_tables_intra_1_auto(l_le_bsv_map_tab, l_le_bsv_map_count);
2455: END IF;
2456:
2457: -- Insert into FUN_BAL_INTRA_INT_GT for lines that require Intracompany Balancing
2458: INSERT INTO fun_bal_intra_int_gt(group_id, gl_date, driving_dr_bsv, driving_cr_bsv,
2459: intracompany_mode, balance_by, clearing_option, bal_seg_val, le_id, template_id, entered_currency_code,
2460: exchange_date, exchange_rate, exchange_rate_type, accounted_amt_cr, accounted_amt_dr,
2461: entered_amt_cr, entered_amt_dr,
2454: ins_t_tables_intra_1_auto(l_le_bsv_map_tab, l_le_bsv_map_count);
2455: END IF;
2456:
2457: -- Insert into FUN_BAL_INTRA_INT_GT for lines that require Intracompany Balancing
2458: INSERT INTO fun_bal_intra_int_gt(group_id, gl_date, driving_dr_bsv, driving_cr_bsv,
2459: intracompany_mode, balance_by, clearing_option, bal_seg_val, le_id, template_id, entered_currency_code,
2460: exchange_date, exchange_rate, exchange_rate_type, accounted_amt_cr, accounted_amt_dr,
2461: entered_amt_cr, entered_amt_dr,
2462: dr_cr_debit_ccid, dr_cr_credit_ccid, cr_dr_debit_ccid, cr_dr_credit_ccid,
2540: AND
2541: SUM(DECODE(lines.exchange_rate, NULL, NVL(lines.entered_amt_cr, 0), 0)) <>
2542: SUM(DECODE(lines.exchange_rate, NULL, NVL(lines.entered_amt_dr, 0), 0))));
2543:
2544: --FND_STATS.GATHER_TABLE_STATS(g_fun_schema, 'FUN_BAL_INTRA_INT_GT');
2545:
2546: IF g_debug = FND_API.G_TRUE THEN
2547: OPEN l_intra_int_cursor;
2548: FETCH l_intra_int_cursor BULK COLLECT INTO l_intra_int_tab;
2724: 4, gen.value,
2725: 5, gen.value,
2726: -1),
2727: intra_lines.le_id, intra_lines.template_id, 'R'
2728: FROM FUN_BAL_INTRA_INT_GT intra_lines, FUN_BAL_GENERATE_LINES gen
2729: WHERE gen.value = DECODE(intra_lines.intracompany_mode,
2730: 1, DECODE(gen.value, 'C', DECODE(intra_lines.bal_seg_val,
2731: intra_lines.driving_cr_bsv, 'X', gen.value),
2732: 'D', DECODE(intra_lines.bal_seg_val,