[Home] [Help]
134: else
135: l_string := ' WARNING : ' ;
136: end if ;
137:
138: if g_business_group_id is not null and fnd_global.conc_request_id <> -1 then
139: if p_err_msg is not null then
140: fnd_file.put_line(fnd_file.log,l_string || p_err_msg);
141: elsif p_err_num is not null then
142: fnd_message.set_name(substr(p_err_num,1,3),p_err_num);
202: fnd_message.raise_error;
203: end if ;
204: end if ;
205:
206: if g_business_group_id is not null and fnd_global.conc_request_id <> -1 then
207: benutils.get_parameter
208: (p_business_group_id => g_business_group_id
209: ,p_batch_exe_cd => 'BENXEXP'
210: ,p_threads => l_threads
2079: AND nvl(l_new_business_group_id, -1) = nvl(business_group_id , -1)
2080: AND nvl(legislation_code,'~NULL~') = nvl(l_legislation_code,'~NULL~');
2081:
2082: --for the business group extract dont allow to upload if the extract layout already exist
2083: if nvl(fnd_global.conc_request_id,-1) <> -1 and
2084: ( l_new_business_group_id is not null and g_override <> 'Y' ) then
2085: fnd_message.set_name('BEN','BEN_93741_EXT_FILE_EXISTS');
2086: fnd_file.put_line(fnd_file.log, fnd_message.get);
2087: fnd_message.raise_error;
3652: return ;
3653: end if ;
3654: else
3655: -- make sure the cahnge evt code is enabled
3656: if g_business_group_id is not null and fnd_global.conc_request_id <> -1 then
3657: open cw(L_CHG_EVT_CD) ;
3658: fetch cw into l_temp ;
3659: if cw%notfound then
3660: close cw ;
3997: end if ;
3998:
3999: if l_value is NULL THEN
4000: -- if the concurrent manger does the job log the message
4001: if g_business_group_id is not null and fnd_global.conc_request_id <> -1 then
4002: write_err
4003: (p_err_num => null,
4004: p_err_msg => 'Criteria value not found : '||hr_general.decode_lookup('BEN_EXT_CRIT_TYP',l_code )||' : '||l_meaning,
4005: p_typ_cd => 'E' ,
4014:
4015:
4016: -- if the type code is change event then make sure the change event is valid for business group
4017: if p_type_code = 'CCE' then
4018: if g_business_group_id is not null and fnd_global.conc_request_id <> -1 then
4019: open cw(l_value) ;
4020: fetch cw into l_temp ;
4021: if cw%notfound then
4022: close cw ;
4209: end if ;
4210:
4211: if l_val_1 is NULL THEN
4212: -- if the concurrent manger does the job log the message
4213: if g_business_group_id is not null and fnd_global.conc_request_id <> -1 then
4214: write_err
4215: (p_err_num => null,
4216: p_err_msg => 'Criteria value not found : '||hr_general.decode_lookup('BEN_EXT_CRIT_TYP',l_code)||' : '||l_meaning,
4217: p_typ_cd => 'E' ,
4390: EXCEPTION
4391: WHEN NO_DATA_FOUND
4392: THEN
4393: -- if the concurrent manger does the job log the message
4394: if g_business_group_id is not null and fnd_global.conc_request_id <> -1 then
4395: write_err
4396: (p_err_num => null,
4397: p_err_msg => ' No formula of name '||p_post_processing_rule||' Exists for Definition '||p_definition_name ,
4398: p_typ_cd => 'E' ,
4411: cursor c is
4412: select xdo.template_id
4413: from xdo_templates_b xdo
4414: where xdo.template_code = P_xdo_template_name
4415: order by decode(xdo.application_id ,FND_GLOBAL.resp_appl_id,1,2)
4416: ;
4417:
4418: Begin
4419: open c ;