2014: log ('Entering procedure sync_parties');
2015: log ('p_num_of_workers = ' || p_num_of_workers);
2016: log('p_indexes_only = '|| p_indexes_only);
2017:
2018: req_data := fnd_conc_global.request_data;
2019:
2020: log(' req_data = ' || req_data);
2021:
2022: l_indexes_only := nvl(p_indexes_only, 'N');
2139: END IF;
2140: END LOOP;
2141:
2142: -- be in paused status until all the concurrent requests submitted have completed
2143: fnd_conc_global.set_req_globals(conc_status => 'PAUSED',
2144: request_data => 'END') ;
2145: err := 'Concurrent Workers submitted.';
2146: retcode := 0;
2147:
2708: l_workers_completed boolean ;
2709:
2710: BEGIN
2711: -- req_data will be null the first time, by default
2712: req_data := fnd_conc_global.request_data;
2713:
2714: -- First Phase
2715: -- Submit the Parallel Sync Index Child Concurrent Progarm for each one of the indexes
2716: IF (req_data IS NULL)
2759: EXIT when l_sub_requests(i) = 0;
2760: END LOOP;
2761:
2762: -- This will make sure that the parent is waits until the above requests complete
2763: fnd_conc_global.set_req_globals(conc_status => 'PAUSED', request_data => 'END') ;
2764: return;
2765:
2766:
2767: END IF;