347: WHEN concurrent_program_failure THEN
348:
349:
350:
351: fnd_message.set_name('PAY', 'HR_75258_GEOCODE_PATCH_ERROR');
352: fnd_message.set_token('PATCH_NAME', l_patch_name);
353: fnd_message.set_token('REQ_ID', ('o' || l_req_id || '.out') );
354:
355: errbuf := hr_utility.get_message;
348:
349:
350:
351: fnd_message.set_name('PAY', 'HR_75258_GEOCODE_PATCH_ERROR');
352: fnd_message.set_token('PATCH_NAME', l_patch_name);
353: fnd_message.set_token('REQ_ID', ('o' || l_req_id || '.out') );
354:
355: errbuf := hr_utility.get_message;
356: retcode := 2;
349:
350:
351: fnd_message.set_name('PAY', 'HR_75258_GEOCODE_PATCH_ERROR');
352: fnd_message.set_token('PATCH_NAME', l_patch_name);
353: fnd_message.set_token('REQ_ID', ('o' || l_req_id || '.out') );
354:
355: errbuf := hr_utility.get_message;
356: retcode := 2;
357: RAISE;