[Home] [Help]
67: DELETE FROM fun_bal_results_gt;
68: DELETE FROM fun_bal_errors_gt;
69: DELETE FROM fun_bal_le_bsv_map_gt;
70: DELETE FROM fun_bal_inter_int_gt;
71: DELETE FROM fun_bal_intra_int_gt;
72: /* Using delete rather than truncate as shown in the code below. The reason is that truncate (or any DDL operations)
73: perform an implicit commit => need to use autonomous transaction to perform such operation. However, we would
74: like to make sure the calling program does not see the rows that gets deleted, therefore truncate is not used.
75: In addition, the truncate operation might not be able to delete the rows that the calling program has not commited yet,
78: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_RESULTS_GT', dbms_sql.native);
79: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_ERRORS_GT', dbms_sql.native);
80: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_LE_BSV_MAP_GT', dbms_sql.native);
81: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_INTER_INT_GT', dbms_sql.native);
82: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_INTRA_INT_GT', dbms_sql.native);
83: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_RESULTS_T', dbms_sql.native);
84: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_ERRORS_T', dbms_sql.native);
85: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_LINES_T', dbms_sql.native);
86: dbms_sql.parse(cur_hdl, 'TRUNCATE TABLE ' || g_fun_schema || '.FUN_BAL_HEADERS_T', dbms_sql.native);
548: PROCEDURE ins_t_tables_intra_2_auto(intra_int_tab IN intra_int_tab_type, intra_int_count IN NUMBER) IS
549: PRAGMA AUTONOMOUS_TRANSACTION;
550: BEGIN
551: -- INSERT INTO fun_bal_intra_int_t
552: -- SELECT * FROM fun_bal_intra_int_gt;
553: ins_intra_int_t(intra_int_tab, intra_int_count);
554: COMMIT;
555: END ins_t_tables_intra_2_auto;
556:
2907: l_intra_int_count NUMBER;
2908: CURSOR l_le_bsv_map_cursor IS
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;
3420: CLOSE l_le_bsv_map_cursor;
3421: ins_t_tables_intra_1_auto(l_le_bsv_map_tab, l_le_bsv_map_count);
3422: END IF;
3423:
3424: -- Insert into FUN_BAL_INTRA_INT_GT for lines that require Intracompany Balancing
3425: INSERT INTO fun_bal_intra_int_gt(group_id, gl_date, driving_dr_bsv, driving_cr_bsv,
3426: intracompany_mode, balance_by, clearing_option, bal_seg_val, le_id, template_id, entered_currency_code,
3427: exchange_date, exchange_rate, exchange_rate_type, accounted_amt_cr, accounted_amt_dr,
3428: entered_amt_cr, entered_amt_dr,
3421: ins_t_tables_intra_1_auto(l_le_bsv_map_tab, l_le_bsv_map_count);
3422: END IF;
3423:
3424: -- Insert into FUN_BAL_INTRA_INT_GT for lines that require Intracompany Balancing
3425: INSERT INTO fun_bal_intra_int_gt(group_id, gl_date, driving_dr_bsv, driving_cr_bsv,
3426: intracompany_mode, balance_by, clearing_option, bal_seg_val, le_id, template_id, entered_currency_code,
3427: exchange_date, exchange_rate, exchange_rate_type, accounted_amt_cr, accounted_amt_dr,
3428: entered_amt_cr, entered_amt_dr,
3429: dr_cr_debit_ccid, dr_cr_credit_ccid, cr_dr_debit_ccid, cr_dr_credit_ccid,
3510: AND
3511: SUM(DECODE(lines.exchange_rate, NULL, NVL(lines.entered_amt_cr, 0), 0)) <>
3512: SUM(DECODE(lines.exchange_rate, NULL, NVL(lines.entered_amt_dr, 0), 0))));
3513:
3514: --FND_STATS.GATHER_TABLE_STATS(g_fun_schema, 'FUN_BAL_INTRA_INT_GT');
3515:
3516: IF g_debug = FND_API.G_TRUE THEN
3517: OPEN l_intra_int_cursor;
3518: FETCH l_intra_int_cursor BULK COLLECT INTO l_intra_int_tab;
3694: 4, gen.value,
3695: 5, gen.value,
3696: -1),
3697: intra_lines.le_id, intra_lines.template_id, 'R'
3698: FROM FUN_BAL_INTRA_INT_GT intra_lines, FUN_BAL_GENERATE_LINES gen
3699: WHERE gen.value = DECODE(intra_lines.intracompany_mode,
3700: 1, DECODE(gen.value, 'C', DECODE(intra_lines.bal_seg_val,
3701: intra_lines.driving_cr_bsv, 'X', gen.value),
3702: 'D', DECODE(intra_lines.bal_seg_val,