517: WHEN concurrent_program_failure THEN
518:
519:
520:
521: fnd_message.set_name('PAY', 'HR_75258_GEOCODE_PATCH_ERROR');
522: fnd_message.set_token('PATCH_NAME', l_patch_name);
523: fnd_message.set_token('REQ_ID', ('o' || l_req_id || '.out') );
524:
525: errbuf := hr_utility.get_message;
518:
519:
520:
521: fnd_message.set_name('PAY', 'HR_75258_GEOCODE_PATCH_ERROR');
522: fnd_message.set_token('PATCH_NAME', l_patch_name);
523: fnd_message.set_token('REQ_ID', ('o' || l_req_id || '.out') );
524:
525: errbuf := hr_utility.get_message;
526: retcode := 2;
519:
520:
521: fnd_message.set_name('PAY', 'HR_75258_GEOCODE_PATCH_ERROR');
522: fnd_message.set_token('PATCH_NAME', l_patch_name);
523: fnd_message.set_token('REQ_ID', ('o' || l_req_id || '.out') );
524:
525: errbuf := hr_utility.get_message;
526: retcode := 2;
527: RAISE;