DBA Data[Home] [Help]

APPS.XLA_TRANSFER_PKG dependencies on GL_INTERFACE

Line 45: | gl_interface_confrol table per Deborah's |

41: | - Modified the code to support 'Disable |
42: | Journal Import' profile option. |
43: | 01-Mar-2005 Shishir Joshi Inserting -1 value for set of books when |
44: | inserting rows into the |
45: | gl_interface_confrol table per Deborah's |
46: | recommendation. JI is modified to |
47: | support intercompany functionality. |
48: | 15-Apr-2005 Swapna Vellani Added mutl-table Journal Import. |
49: | 04-Aug-2005 Wynne Chan Bug 4458381 - Public Sector Enhancements |

Line 55: | n2_index on GL INTERFACE Table |

51: | 30-Nov-2005 Vinay Kumar Bug4769315 Added filter on application_id|
52: | 13-Jan-2005 Vinay Kumar Modified the logic to pick JE to transfer|
53: | and signature of gl_transfer_main |
54: | Bug 4945075 Acoid creating n1_index and |
55: | n2_index on GL INTERFACE Table |
56: | 03-Mar-2006 Vinay Kumar Bug 5041325 Removed the procedure |
57: | update_gl_sl_link |
58: | 09-Mar-2006 S. Singhania Bug 5056632. |
59: | - Modified validate_input_parameters. |

Line 128: ,group_id gl_interface.group_id%TYPE

124: TYPE r_ledger_rec IS RECORD
125: (ledger_id NUMBER
126: ,NAME gl_ledgers.NAME%TYPE
127: ,ledger_category_code gl_ledgers.ledger_category_code%TYPE
128: ,group_id gl_interface.group_id%TYPE
129: ,interface_run_id gl_interface_control.interface_run_id%TYPE
130: ,gllezl_request_id NUMBER
131: ,access_set_id NUMBER
132: );

Line 129: ,interface_run_id gl_interface_control.interface_run_id%TYPE

125: (ledger_id NUMBER
126: ,NAME gl_ledgers.NAME%TYPE
127: ,ledger_category_code gl_ledgers.ledger_category_code%TYPE
128: ,group_id gl_interface.group_id%TYPE
129: ,interface_run_id gl_interface_control.interface_run_id%TYPE
130: ,gllezl_request_id NUMBER
131: ,access_set_id NUMBER
132: );
133: TYPE t_array_ledgers IS TABLE OF r_ledger_rec INDEX BY BINARY_INTEGER;

Line 178: g_gl_interface_table_name VARCHAR2(30);

174: g_group_id PLS_INTEGER;
175: g_transfer_summary_mode VARCHAR2(1);
176: g_access_set_id PLS_INTEGER := fnd_profile.value('GL_ACCESS_SET_ID');
177: g_sec_access_set_id PLS_INTEGER := fnd_profile.value('XLA_GL_SECONDARY_ACCESS_SET_ID');
178: g_gl_interface_table_name VARCHAR2(30);
179: g_budgetary_control_flag gl_ledgers.enable_budgetary_control_flag%TYPE;
180: --
181: -- Flow Control Flags
182: --

Line 278: l_gllezl_status gl_interface.status%TYPE;

274: l_status VARCHAR2(30);
275: l_dev_phase VARCHAR2(30);
276: l_dev_status VARCHAR2(30);
277: l_message VARCHAR2(240);
278: l_gllezl_status gl_interface.status%TYPE;
279: l_index PLS_INTEGER := 0;
280: l_log_module VARCHAR2(240);
281:
282: l_get_gllezl_status BOOLEAN := TRUE;

Line 734: | INSERT ROWS INTO THE GL_INTERFACE_CONTROL |

730: --Added for bug 11855000 End
731:
732:
733: /*===================================================================
734: | INSERT ROWS INTO THE GL_INTERFACE_CONTROL |
735: | |
736: =====================================================================*/
737: PROCEDURE insert_interface_control(p_ledger_id NUMBER
738: ,p_table_name VARCHAR2) IS

Line 758: --Passing NULL for GL_INTERFACE table so data will not be

754: trace('g_budgetary_control_flag:',C_LEVEL_STATEMENT,l_Log_module);
755: END IF;
756:
757: --8429053
758: --Passing NULL for GL_INTERFACE table so data will not be
759: --retained in GL_INTERFACE table with PROCESSED status
760:
761: INSERT INTO gl_interface_control
762: (

Line 759: --retained in GL_INTERFACE table with PROCESSED status

755: END IF;
756:
757: --8429053
758: --Passing NULL for GL_INTERFACE table so data will not be
759: --retained in GL_INTERFACE table with PROCESSED status
760:
761: INSERT INTO gl_interface_control
762: (
763: je_source_name,

Line 761: INSERT INTO gl_interface_control

757: --8429053
758: --Passing NULL for GL_INTERFACE table so data will not be
759: --retained in GL_INTERFACE table with PROCESSED status
760:
761: INSERT INTO gl_interface_control
762: (
763: je_source_name,
764: status,
765: interface_run_id,

Line 782: --decode(g_gl_interface_table_name, 'GL_INTERFACE',NULL,'S') --8429053

778: -1,
779: Decode(g_budgetary_control_flag, 'N', NULL, -3),
780: p_table_name,
781: 'S' --8429053, 8691650 Commented
782: --decode(g_gl_interface_table_name, 'GL_INTERFACE',NULL,'S') --8429053
783: );
784:
785: IF (C_LEVEL_STATEMENT >= g_log_level) THEN
786: trace(SQL%ROWCOUNT|| ' rows inserted into the interface control table' ,C_LEVEL_STATEMENT,l_Log_module);

Line 797: trace('Insert into the GL_INTERFACE_CONTROL failed',C_LEVEL_UNEXPECTED,l_Log_module);

793: EXCEPTION
794: WHEN xla_exceptions_pkg.application_exception THEN
795: RAISE;
796: WHEN OTHERS THEN
797: trace('Insert into the GL_INTERFACE_CONTROL failed',C_LEVEL_UNEXPECTED,l_Log_module);
798: xla_exceptions_pkg.raise_message
799: (p_location => 'xla_transfer_pkg.get_gllezl_status');
800:
801: END insert_interface_control;

Line 1515: -- Delete rows from gl_bc_packets and update gl_interface control with packet_id as -1

1511:
1512: IF (g_group_id_tab.COUNT > 0) THEN
1513: --Added for bug 11855000 Start
1514: --
1515: -- Delete rows from gl_bc_packets and update gl_interface control with packet_id as -1
1516: --
1517: IF g_application_id = 200 THEN
1518:
1519: FORALL i IN g_group_id_tab.FIRST..g_group_id_tab.LAST

Line 1618: -- Delete rows from gl_interface, GL journals

1614:
1615:
1616:
1617: --
1618: -- Delete rows from gl_interface, GL journals
1619: --
1620:
1621: /* bug#8691650 use the g_group_id_tab to delete batches which needs to be recovered */
1622: IF l_first_time_recover THEN

Line 2340: -- gl_interface insert query in SYNC.

2336: END IF;
2337:
2338: -- for bug 8417930
2339: -- added extra conditions to make the below update and
2340: -- gl_interface insert query in SYNC.
2341:
2342: -- For bug12542507 commented the below hint
2343: -- /*+ leading(aeh,xet,xte) use_hash(xet,xec,xeca) use_nl(xte)
2344: -- swap_join_inputs(xet) swap_join_inputs(xec) swap_join_inputs(xeca) */

Line 2552: gl_interface_insert

2548: END set_application_info;
2549:
2550: /*===========================================================================+
2551: PROCEDURE
2552: gl_interface_insert
2553:
2554: DESCRIPTION
2555: Inserts ROWS INTO THE GL_ITERFACE TABLE
2556:

Line 2568: PROCEDURE insert_gl_interface IS

2564: NOTES
2565:
2566: +===========================================================================*/
2567:
2568: PROCEDURE insert_gl_interface IS
2569: l_log_module VARCHAR2(240);
2570: l_statement VARCHAR2(4500);
2571: l_je_count NUMBER;
2572:

Line 2576: l_log_module := C_DEFAULT_MODULE||'.insert_gl_interface';

2572:
2573:
2574: BEGIN
2575: IF g_log_enabled THEN
2576: l_log_module := C_DEFAULT_MODULE||'.insert_gl_interface';
2577: END IF;
2578:
2579: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
2580: trace('gl_interface_insert.Begin',C_LEVEL_PROCEDURE,l_log_module);

Line 2580: trace('gl_interface_insert.Begin',C_LEVEL_PROCEDURE,l_log_module);

2576: l_log_module := C_DEFAULT_MODULE||'.insert_gl_interface';
2577: END IF;
2578:
2579: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
2580: trace('gl_interface_insert.Begin',C_LEVEL_PROCEDURE,l_log_module);
2581: trace('g_disable_gllezl_flag = '||g_disable_gllezl_flag,C_LEVEL_PROCEDURE,l_log_module);
2582: END IF;
2583:
2584: -- Check if GL Journal Import should be submitted. Do not use multi table insert if

Line 2588: g_gl_interface_table_name := 'GL_INTERFACE';

2584: -- Check if GL Journal Import should be submitted. Do not use multi table insert if
2585: -- GL is not installed or for document level transfer.
2586:
2587: IF g_disable_gllezl_flag = 'Y' OR g_entity_id IS NOT NULL THEN
2588: g_gl_interface_table_name := 'GL_INTERFACE';
2589: ELSE
2590: g_gl_interface_table_name := 'XLA_GLT_'||to_char(g_group_id);
2591: --Added for bug 12965313 start
2592: GL_JOURNAL_IMPORT_PKG.create_table

Line 2590: g_gl_interface_table_name := 'XLA_GLT_'||to_char(g_group_id);

2586:
2587: IF g_disable_gllezl_flag = 'Y' OR g_entity_id IS NOT NULL THEN
2588: g_gl_interface_table_name := 'GL_INTERFACE';
2589: ELSE
2590: g_gl_interface_table_name := 'XLA_GLT_'||to_char(g_group_id);
2591: --Added for bug 12965313 start
2592: GL_JOURNAL_IMPORT_PKG.create_table
2593: (g_gl_interface_table_name,
2594: create_n1_index => FALSE,

Line 2593: (g_gl_interface_table_name,

2589: ELSE
2590: g_gl_interface_table_name := 'XLA_GLT_'||to_char(g_group_id);
2591: --Added for bug 12965313 start
2592: GL_JOURNAL_IMPORT_PKG.create_table
2593: (g_gl_interface_table_name,
2594: create_n1_index => FALSE,
2595: create_n2_index => FALSE,
2596: create_n3_index => TRUE
2597: );

Line 2601: print_logfile ('GL Inerface tablename = ' || g_gl_interface_table_name);

2597: );
2598: --Added for bug 12965313 end
2599: END IF;
2600:
2601: print_logfile ('GL Inerface tablename = ' || g_gl_interface_table_name);
2602: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
2603: trace('tablename = '||g_gl_interface_table_name,C_LEVEL_PROCEDURE,l_log_module);
2604: END IF;
2605:

Line 2603: trace('tablename = '||g_gl_interface_table_name,C_LEVEL_PROCEDURE,l_log_module);

2599: END IF;
2600:
2601: print_logfile ('GL Inerface tablename = ' || g_gl_interface_table_name);
2602: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
2603: trace('tablename = '||g_gl_interface_table_name,C_LEVEL_PROCEDURE,l_log_module);
2604: END IF;
2605:
2606:
2607:

Line 2608: print_logfile ('GL Inerface tablename = ' || g_gl_interface_table_name);

2604: END IF;
2605:
2606:
2607:
2608: print_logfile ('GL Inerface tablename = ' || g_gl_interface_table_name);
2609: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
2610: trace('tablename = '||g_gl_interface_table_name,C_LEVEL_PROCEDURE,l_log_module);
2611: END IF;
2612:

Line 2610: trace('tablename = '||g_gl_interface_table_name,C_LEVEL_PROCEDURE,l_log_module);

2606:
2607:
2608: print_logfile ('GL Inerface tablename = ' || g_gl_interface_table_name);
2609: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
2610: trace('tablename = '||g_gl_interface_table_name,C_LEVEL_PROCEDURE,l_log_module);
2611: END IF;
2612:
2613:
2614: print_logfile ('tablename = ' || g_gl_interface_table_name);

Line 2614: print_logfile ('tablename = ' || g_gl_interface_table_name);

2610: trace('tablename = '||g_gl_interface_table_name,C_LEVEL_PROCEDURE,l_log_module);
2611: END IF;
2612:
2613:
2614: print_logfile ('tablename = ' || g_gl_interface_table_name);
2615: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
2616: trace('tablename = '||g_gl_interface_table_name,C_LEVEL_PROCEDURE,l_log_module);
2617: END IF;
2618:

Line 2616: trace('tablename = '||g_gl_interface_table_name,C_LEVEL_PROCEDURE,l_log_module);

2612:
2613:
2614: print_logfile ('tablename = ' || g_gl_interface_table_name);
2615: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
2616: trace('tablename = '||g_gl_interface_table_name,C_LEVEL_PROCEDURE,l_log_module);
2617: END IF;
2618:
2619: --7512923 added extra columns to gl_interface_table
2620: --7419726 changed the decode statement of funds_reserved_flag

Line 2619: --7512923 added extra columns to gl_interface_table

2615: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
2616: trace('tablename = '||g_gl_interface_table_name,C_LEVEL_PROCEDURE,l_log_module);
2617: END IF;
2618:
2619: --7512923 added extra columns to gl_interface_table
2620: --7419726 changed the decode statement of funds_reserved_flag
2621: --7591257 added extra columns to pass Currency Conversion rate, type and date
2622: l_statement := 'INSERT INTO '||g_gl_interface_table_name||
2623: '(

Line 2622: l_statement := 'INSERT INTO '||g_gl_interface_table_name||

2618:
2619: --7512923 added extra columns to gl_interface_table
2620: --7419726 changed the decode statement of funds_reserved_flag
2621: --7591257 added extra columns to pass Currency Conversion rate, type and date
2622: l_statement := 'INSERT INTO '||g_gl_interface_table_name||
2623: '(
2624: status, ledger_id
2625: ,user_je_source_name, user_je_category_name
2626: ,accounting_date

Line 2763: trace(SQL%ROWCOUNT || ' rows are inserted into the GL_INTERFACE table',C_LEVEL_STATEMENT,l_log_module);

2759: -- Add the code to stop the transfer batch if no entries are
2760: -- found for the primary ledger.
2761: g_proceed := 'N';
2762: IF (C_LEVEL_STATEMENT >= g_log_level) THEN
2763: trace(SQL%ROWCOUNT || ' rows are inserted into the GL_INTERFACE table',C_LEVEL_STATEMENT,l_log_module);
2764: END IF;
2765: ELSE
2766: g_proceed := 'Y';
2767: IF (C_LEVEL_STATEMENT >= g_log_level) THEN

Line 2768: trace(SQL%ROWCOUNT || ' rows are inserted into the GL_INTERFACE table',C_LEVEL_STATEMENT,l_log_module);

2764: END IF;
2765: ELSE
2766: g_proceed := 'Y';
2767: IF (C_LEVEL_STATEMENT >= g_log_level) THEN
2768: trace(SQL%ROWCOUNT || ' rows are inserted into the GL_INTERFACE table',C_LEVEL_STATEMENT,l_log_module);
2769: END IF;
2770:
2771: END IF;
2772:

Line 2776: -- Added to find how many rows were inserted into GL_INTERFACE table

2772:
2773: Comment end for 8417930 */
2774:
2775: -- For bug 8417930
2776: -- Added to find how many rows were inserted into GL_INTERFACE table
2777:
2778: IF (C_LEVEL_STATEMENT >= g_log_level) THEN
2779: trace(SQL%ROWCOUNT || ' rows are inserted into the GL_INTERFACE table',C_LEVEL_STATEMENT,l_log_module);
2780: END IF;

Line 2779: trace(SQL%ROWCOUNT || ' rows are inserted into the GL_INTERFACE table',C_LEVEL_STATEMENT,l_log_module);

2775: -- For bug 8417930
2776: -- Added to find how many rows were inserted into GL_INTERFACE table
2777:
2778: IF (C_LEVEL_STATEMENT >= g_log_level) THEN
2779: trace(SQL%ROWCOUNT || ' rows are inserted into the GL_INTERFACE table',C_LEVEL_STATEMENT,l_log_module);
2780: END IF;
2781:
2782: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
2783: trace('gl_interface_insert.End',C_LEVEL_PROCEDURE,l_log_module);

Line 2783: trace('gl_interface_insert.End',C_LEVEL_PROCEDURE,l_log_module);

2779: trace(SQL%ROWCOUNT || ' rows are inserted into the GL_INTERFACE table',C_LEVEL_STATEMENT,l_log_module);
2780: END IF;
2781:
2782: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
2783: trace('gl_interface_insert.End',C_LEVEL_PROCEDURE,l_log_module);
2784: END IF;
2785: EXCEPTION
2786: WHEN xla_exceptions_pkg.application_exception THEN
2787: RAISE;

Line 2790: (p_location => 'xla_transfer_pkg.gl_interface_insert');

2786: WHEN xla_exceptions_pkg.application_exception THEN
2787: RAISE;
2788: WHEN OTHERS THEN
2789: xla_exceptions_pkg.raise_message
2790: (p_location => 'xla_transfer_pkg.gl_interface_insert');
2791: END insert_gl_interface;
2792:
2793: /*===========================================================================+
2794: PROCEDURE

Line 2791: END insert_gl_interface;

2787: RAISE;
2788: WHEN OTHERS THEN
2789: xla_exceptions_pkg.raise_message
2790: (p_location => 'xla_transfer_pkg.gl_interface_insert');
2791: END insert_gl_interface;
2792:
2793: /*===========================================================================+
2794: PROCEDURE
2795: wait_for_gllezl

Line 2821: g_gl_interface_table_name VARCHAR2(30);

2817: l_gllezl_status BOOLEAN := TRUE;
2818: l_index PLS_INTEGER := 0;
2819: l_log_module VARCHAR2(240);
2820: l_gl_status VARCHAR2(30);
2821: g_gl_interface_table_name VARCHAR2(30);
2822: l_journal_import_status BOOLEAN :=TRUE;
2823: BEGIN
2824: IF g_log_enabled THEN
2825: l_log_module := C_DEFAULT_MODULE||'.wait_for_gllezl';

Line 2868: g_gl_interface_table_name := 'GL_INTERFACE';

2864: -- with "table or view does not exist".
2865: */
2866:
2867: IF g_disable_gllezl_flag = 'Y' OR g_entity_id IS NOT NULL THEN
2868: g_gl_interface_table_name := 'GL_INTERFACE';
2869: ELSE
2870: g_gl_interface_table_name := 'XLA_GLT_'||to_char(g_primary_ledgers_tab(i).group_id);
2871: END IF;
2872:

Line 2870: g_gl_interface_table_name := 'XLA_GLT_'||to_char(g_primary_ledgers_tab(i).group_id);

2866:
2867: IF g_disable_gllezl_flag = 'Y' OR g_entity_id IS NOT NULL THEN
2868: g_gl_interface_table_name := 'GL_INTERFACE';
2869: ELSE
2870: g_gl_interface_table_name := 'XLA_GLT_'||to_char(g_primary_ledgers_tab(i).group_id);
2871: END IF;
2872:
2873:
2874: --added bug 6945231

Line 2877: trace('selecting from gl interface '|| g_gl_interface_table_name,C_LEVEL_PROCEDURE,l_log_module);

2873:
2874: --added bug 6945231
2875: IF ( l_dev_phase = 'COMPLETE' AND l_dev_status ='WARNING') THEN
2876: IF (C_LEVEL_ERROR >= g_log_level) THEN
2877: trace('selecting from gl interface '|| g_gl_interface_table_name,C_LEVEL_PROCEDURE,l_log_module);
2878: END IF;
2879:
2880: -- removed join of ledger id from below query for bug 7529513
2881: BEGIN

Line 2883: 'select status from ' ||g_gl_interface_table_name||

2879:
2880: -- removed join of ledger id from below query for bug 7529513
2881: BEGIN
2882: EXECUTE IMMEDIATE
2883: 'select status from ' ||g_gl_interface_table_name||
2884: ' where user_je_source_name= :1
2885: and group_id = :2
2886: and request_id = :4
2887: -- and status like ''E%''

Line 2896: trace('Data found in Gl interface with Error Status and journal import request failed. Request Id = ' || g_primary_ledgers_tab(i).gllezl_request_id,C_LEVEL_ERROR,l_log_module);

2892: --IF l_gl_status like 'E%' THEN --Bug#8691650
2893: IF ( l_gl_status <> 'PROCESSED' AND l_gl_status NOT LIKE 'W%' ) THEN
2894:
2895: IF (C_LEVEL_ERROR >= g_log_level) THEN
2896: trace('Data found in Gl interface with Error Status and journal import request failed. Request Id = ' || g_primary_ledgers_tab(i).gllezl_request_id,C_LEVEL_ERROR,l_log_module);
2897: END IF;
2898: l_journal_import_status:=FALSE;
2899: xla_accounting_err_pkg.build_message
2900: (p_appli_s_name => 'XLA'

Line 2916: trace('No data in gl_interface '|| g_gl_interface_table_name,C_LEVEL_PROCEDURE,l_log_module);

2912:
2913: EXCEPTION
2914: WHEN NO_DATA_FOUND THEN
2915: IF (C_LEVEL_ERROR >= g_log_level) THEN
2916: trace('No data in gl_interface '|| g_gl_interface_table_name,C_LEVEL_PROCEDURE,l_log_module);
2917: END IF;
2918: /*no data exists in error so dont recover */
2919: NULL; --Bug#8691650
2920: END;

Line 2947: --E% status data from GL_INTERFACE.

2943: recover_batch;
2944: END IF;
2945:
2946: --8429053 Added following IF condition in order to delete
2947: --E% status data from GL_INTERFACE.
2948:
2949: If g_gl_interface_table_name = 'GL_INTERFACE' Then
2950: delete from gl_interface
2951: where user_je_source_name = g_user_source_name

Line 2949: If g_gl_interface_table_name = 'GL_INTERFACE' Then

2945:
2946: --8429053 Added following IF condition in order to delete
2947: --E% status data from GL_INTERFACE.
2948:
2949: If g_gl_interface_table_name = 'GL_INTERFACE' Then
2950: delete from gl_interface
2951: where user_je_source_name = g_user_source_name
2952: and group_id = g_primary_ledgers_tab(i).group_id;
2953: --and request_id = g_primary_ledgers_tab(i).gllezl_request_id

Line 2950: delete from gl_interface

2946: --8429053 Added following IF condition in order to delete
2947: --E% status data from GL_INTERFACE.
2948:
2949: If g_gl_interface_table_name = 'GL_INTERFACE' Then
2950: delete from gl_interface
2951: where user_je_source_name = g_user_source_name
2952: and group_id = g_primary_ledgers_tab(i).group_id;
2953: --and request_id = g_primary_ledgers_tab(i).gllezl_request_id
2954:

Line 2957: trace('No rows found in GL_INTERFACE Table With E% errors.',C_LEVEL_ERROR,l_log_module);

2953: --and request_id = g_primary_ledgers_tab(i).gllezl_request_id
2954:
2955: IF SQL%NOTFOUND THEN
2956: IF (C_LEVEL_ERROR >= g_log_level) THEN
2957: trace('No rows found in GL_INTERFACE Table With E% errors.',C_LEVEL_ERROR,l_log_module);
2958: END IF;
2959: ELSE
2960: IF (C_LEVEL_ERROR >= g_log_level) THEN
2961: trace(SQL%ROWCOUNT || 'Rows deleted from GL_INTERFACE Table',C_LEVEL_ERROR,l_log_module);

Line 2961: trace(SQL%ROWCOUNT || 'Rows deleted from GL_INTERFACE Table',C_LEVEL_ERROR,l_log_module);

2957: trace('No rows found in GL_INTERFACE Table With E% errors.',C_LEVEL_ERROR,l_log_module);
2958: END IF;
2959: ELSE
2960: IF (C_LEVEL_ERROR >= g_log_level) THEN
2961: trace(SQL%ROWCOUNT || 'Rows deleted from GL_INTERFACE Table',C_LEVEL_ERROR,l_log_module);
2962: END IF;
2963: END IF;
2964: END IF;
2965: --8429053 END

Line 3161: | entries into the GL interface table. |

3157: | COMPLETE_BATCH |
3158: | |
3159: | DESCRIPTION |
3160: | The procedure performs the finishing tasks after inserting journal |
3161: | entries into the GL interface table. |
3162: | |
3163: | |
3164: | SCOPE - PRIVATE |
3165: | |

Line 3577: ,gl_interface_control_s.NEXTVAL

3573: INTO g_primary_ledgers_tab(i).interface_run_id
3574: FROM dual;
3575: ELSE
3576: SELECT gl_journal_import_s.NEXTVAL
3577: ,gl_interface_control_s.NEXTVAL
3578: INTO g_primary_ledgers_tab(i).interface_run_id
3579: ,g_primary_ledgers_tab(i).group_id
3580: FROM dual;
3581:

Line 3667: -- Populate the GL_INTERFACE table

3663: --
3664: --Added for bug 11855000 End
3665:
3666: --
3667: -- Populate the GL_INTERFACE table
3668: --
3669: insert_gl_interface;
3670: IF g_disable_gllezl_flag = 'N' THEN
3671: IF (get_gllezl_status) THEN

Line 3669: insert_gl_interface;

3665:
3666: --
3667: -- Populate the GL_INTERFACE table
3668: --
3669: insert_gl_interface;
3670: IF g_disable_gllezl_flag = 'N' THEN
3671: IF (get_gllezl_status) THEN
3672: insert_interface_control
3673: (p_ledger_id => g_primary_ledgers_tab(i).ledger_id

Line 3674: ,p_table_name => g_gl_interface_table_name

3670: IF g_disable_gllezl_flag = 'N' THEN
3671: IF (get_gllezl_status) THEN
3672: insert_interface_control
3673: (p_ledger_id => g_primary_ledgers_tab(i).ledger_id
3674: ,p_table_name => g_gl_interface_table_name
3675: );
3676:
3677: IF (C_LEVEL_STATEMENT>= g_log_level) THEN
3678: trace('Calling PSA_FUNDS_CHECKER_PKG',C_LEVEL_STATEMENT,l_log_module);

Line 3703: IF g_gl_interface_table_name = 'GL_INTERFACE' THEN

3699: -- Journal Import Failed
3700:
3701: -- Journal Import Failed
3702: -- bug#8691650
3703: IF g_gl_interface_table_name = 'GL_INTERFACE' THEN
3704: FORALL i IN g_group_id_tab.FIRST..g_group_id_tab.LAST
3705: DELETE FROM gl_interface
3706: WHERE user_je_source_name = g_user_source_name
3707: AND group_id = g_group_id_tab(i);

Line 3705: DELETE FROM gl_interface

3701: -- Journal Import Failed
3702: -- bug#8691650
3703: IF g_gl_interface_table_name = 'GL_INTERFACE' THEN
3704: FORALL i IN g_group_id_tab.FIRST..g_group_id_tab.LAST
3705: DELETE FROM gl_interface
3706: WHERE user_je_source_name = g_user_source_name
3707: AND group_id = g_group_id_tab(i);
3708: END IF;
3709:

Line 3721: --into GL_INTERFACE table are not deleted. Added below code to

3717: END IF;
3718:
3719: --8429053
3720: --When get_gllezl_status returns false, data that are newly inserted
3721: --into GL_INTERFACE table are not deleted. Added below code to
3722: --delete those data in GL_INTERFACE.
3723:
3724: If g_gl_interface_table_name = 'GL_INTERFACE' Then
3725:

Line 3722: --delete those data in GL_INTERFACE.

3718:
3719: --8429053
3720: --When get_gllezl_status returns false, data that are newly inserted
3721: --into GL_INTERFACE table are not deleted. Added below code to
3722: --delete those data in GL_INTERFACE.
3723:
3724: If g_gl_interface_table_name = 'GL_INTERFACE' Then
3725:
3726: --bug#8691650 delete for all the group ids in a loop

Line 3724: If g_gl_interface_table_name = 'GL_INTERFACE' Then

3720: --When get_gllezl_status returns false, data that are newly inserted
3721: --into GL_INTERFACE table are not deleted. Added below code to
3722: --delete those data in GL_INTERFACE.
3723:
3724: If g_gl_interface_table_name = 'GL_INTERFACE' Then
3725:
3726: --bug#8691650 delete for all the group ids in a loop
3727:
3728: FORALL i IN g_group_id_tab.FIRST..g_group_id_tab.LAST

Line 3729: delete from gl_interface

3725:
3726: --bug#8691650 delete for all the group ids in a loop
3727:
3728: FORALL i IN g_group_id_tab.FIRST..g_group_id_tab.LAST
3729: delete from gl_interface
3730: where user_je_source_name = g_user_source_name
3731: and group_id = g_group_id_tab(i);
3732:
3733: /* commented 8691650

Line 3734: delete from gl_interface

3730: where user_je_source_name = g_user_source_name
3731: and group_id = g_group_id_tab(i);
3732:
3733: /* commented 8691650
3734: delete from gl_interface
3735: where user_je_source_name = g_user_source_name
3736: and group_id = g_primary_ledgers_tab(i).group_id
3737: and request_id = g_request_id;
3738: */

Line 3742: trace('No rows found in GL_INTERFACE Table.',C_LEVEL_ERROR,l_log_module);

3738: */
3739:
3740: IF SQL%NOTFOUND THEN
3741: IF (C_LEVEL_ERROR >= g_log_level) THEN
3742: trace('No rows found in GL_INTERFACE Table.',C_LEVEL_ERROR,l_log_module);
3743: END IF;
3744: ELSE
3745: IF (C_LEVEL_ERROR >= g_log_level) THEN
3746: trace(SQL%ROWCOUNT || 'Rows deleted from GL_INTERFACE Table',C_LEVEL_ERROR,l_log_module);

Line 3746: trace(SQL%ROWCOUNT || 'Rows deleted from GL_INTERFACE Table',C_LEVEL_ERROR,l_log_module);

3742: trace('No rows found in GL_INTERFACE Table.',C_LEVEL_ERROR,l_log_module);
3743: END IF;
3744: ELSE
3745: IF (C_LEVEL_ERROR >= g_log_level) THEN
3746: trace(SQL%ROWCOUNT || 'Rows deleted from GL_INTERFACE Table',C_LEVEL_ERROR,l_log_module);
3747: END IF;
3748: END IF;
3749: END IF;
3750:

Line 3771: -- Drop GL_INTERFACE tables.

3767: IF (wait_for_gllezl) THEN
3768: print_logfile(to_char(sysdate,'DD-MON-YYYY HH24:MI:SS')||'- Journal Import completed ');
3769: complete_batch(p_submit_gl_post => p_submit_gl_post);
3770:
3771: -- Drop GL_INTERFACE tables.
3772: --7512923 GL_INTERFACE tables will not be dropped.
3773: /*IF g_caller <> C_ACCTPROG_DOCUMENT THEN -- Document mode use GL_INTERFACE table only
3774: FOR i IN g_primary_ledgers_tab.FIRST..g_primary_ledgers_tab.LAST
3775: LOOP

Line 3772: --7512923 GL_INTERFACE tables will not be dropped.

3768: print_logfile(to_char(sysdate,'DD-MON-YYYY HH24:MI:SS')||'- Journal Import completed ');
3769: complete_batch(p_submit_gl_post => p_submit_gl_post);
3770:
3771: -- Drop GL_INTERFACE tables.
3772: --7512923 GL_INTERFACE tables will not be dropped.
3773: /*IF g_caller <> C_ACCTPROG_DOCUMENT THEN -- Document mode use GL_INTERFACE table only
3774: FOR i IN g_primary_ledgers_tab.FIRST..g_primary_ledgers_tab.LAST
3775: LOOP
3776: IF g_primary_ledgers_tab(i).gllezl_request_id IS NOT NULL

Line 3773: /*IF g_caller <> C_ACCTPROG_DOCUMENT THEN -- Document mode use GL_INTERFACE table only

3769: complete_batch(p_submit_gl_post => p_submit_gl_post);
3770:
3771: -- Drop GL_INTERFACE tables.
3772: --7512923 GL_INTERFACE tables will not be dropped.
3773: /*IF g_caller <> C_ACCTPROG_DOCUMENT THEN -- Document mode use GL_INTERFACE table only
3774: FOR i IN g_primary_ledgers_tab.FIRST..g_primary_ledgers_tab.LAST
3775: LOOP
3776: IF g_primary_ledgers_tab(i).gllezl_request_id IS NOT NULL
3777: AND (g_entity_id IS NULL OR g_disable_gllezl_flag = 'N') THEN