21: --
22: begin
23: l_start_date := to_char(sysdate,'DD-MON-YYYY HH24:MI:SS');
24: --
25: l_profile_check := fnd_profile.save (
26: x_name => 'IRC_REC_SUM_PROGRAM_LAST_RUN',
27: x_value => l_start_date,
28: x_level_name => 'SITE');
29: --
178: begin
179: log('Starting concurrent request');
180: log('Number of workers : '||p_number_of_workers);
181: log('Concurrent request mode : '||p_mode);
182: log('Last time when concurrent program was run :'||fnd_profile.value('IRC_REC_SUM_PROGRAM_LAST_RUN'));
183: save_profile;
184: log_break;
185: --
186: retcode:=0;