2600: AP_Debug_Pkg.Print(g_debug_flag, l_debug_info);
2601: END IF;
2602:
2603:
2604: /* Inserting into the ap_invoices_upg_control table information
2605: about the Transaction Upgrade Subworkers that have been
2606: submitted from the Main program */
2607: INSERT INTO ap_invoices_upg_control
2608: (Module_Name,
2603:
2604: /* Inserting into the ap_invoices_upg_control table information
2605: about the Transaction Upgrade Subworkers that have been
2606: submitted from the Main program */
2607: INSERT INTO ap_invoices_upg_control
2608: (Module_Name,
2609: Sub_Module,
2610: Upgrade_Phase,
2611: Start_Date,
2713: END IF;
2714:
2715: END LOOP;
2716:
2717: UPDATE ap_invoices_upg_control
2718: SET end_date = sysdate
2719: WHERE parent_request_id = p_parent_request_id
2720: AND request_id = l_request_id;
2721:
2808: IF p_force_upgrade = 'Y' THEN
2809:
2810: Truncate_Table('AP_INV_DISTS_UPDATE');
2811: Truncate_Table('AP_INVOICE_LINES_ALL');
2812: Truncate_Table('AP_INVOICES_UPG_CONTROL');
2813:
2814: ad_parallel_updates_pkg.delete_update_information
2815: (ad_parallel_updates_pkg.ROWID_RANGE,
2816: l_table_owner,
2822:
2823: /* Getting the previous run information for this program */
2824: SELECT count(*), max(end_date)
2825: INTO l_control_count, l_end_date
2826: FROM ap_invoices_upg_control
2827: WHERE module_name = 'TRANSACTION_UPGRADE_MAIN';
2828:
2829:
2830: IF l_control_count = 1 and l_end_date IS NULL THEN
2839: EXECUTE IMMEDIATE 'ALTER TRIGGER ap_invoice_distributions_aiud ENABLE';
2840: EXECUTE IMMEDIATE 'ALTER TRIGGER ap_chrg_allocations_aiud ENABLE';
2841:
2842:
2843: l_debug_info := 'Inserting record in the ap_invoices_upg_control table';
2844: IF g_debug_flag = 'Y' THEN
2845: AP_Debug_Pkg.Print(g_debug_flag, l_debug_info);
2846: END IF;
2847:
2844: IF g_debug_flag = 'Y' THEN
2845: AP_Debug_Pkg.Print(g_debug_flag, l_debug_info);
2846: END IF;
2847:
2848: /* Inserting into ap_invoices_upg_control table information about the
2849: Main program so as to track the progress of the upgrade */
2850: INSERT INTO ap_invoices_upg_control
2851: (Module_Name,
2852: Sub_Module,
2846: END IF;
2847:
2848: /* Inserting into ap_invoices_upg_control table information about the
2849: Main program so as to track the progress of the upgrade */
2850: INSERT INTO ap_invoices_upg_control
2851: (Module_Name,
2852: Sub_Module,
2853: Upgrade_Phase,
2854: Start_Date,
3016:
3017:
3018: SELECT count(*)
3019: INTO l_failed_count
3020: FROM ap_invoices_upg_control
3021: WHERE parent_request_id = g_parent_request_id
3022: AND end_date IS NULL;
3023:
3024: IF l_failed_count = 0 THEN
3022: AND end_date IS NULL;
3023:
3024: IF l_failed_count = 0 THEN
3025:
3026: UPDATE ap_invoices_upg_control
3027: SET end_date = sysdate
3028: WHERE module_name = 'TRANSACTION_UPGRADE_MAIN'
3029: AND request_id = FND_GLOBAL.conc_request_id;
3030: