2295: p_person_id => p_person_id);
2296: --
2297: if fnd_global.conc_request_id in ( 0,-1) then
2298: --
2299: fnd_message.set_name('BEN','BEN_93455_ELE_ALREADY_ENDED');
2300: fnd_message.set_token('PARMA',l_element_name);
2301: fnd_message.set_token('PARMB',to_char(l_effective_date));
2302: l_string := fnd_message.get;
2303: benutils.write(p_text => l_string);
2296: --
2297: if fnd_global.conc_request_id in ( 0,-1) then
2298: --
2299: fnd_message.set_name('BEN','BEN_93455_ELE_ALREADY_ENDED');
2300: fnd_message.set_token('PARMA',l_element_name);
2301: fnd_message.set_token('PARMB',to_char(l_effective_date));
2302: l_string := fnd_message.get;
2303: benutils.write(p_text => l_string);
2304: --
2297: if fnd_global.conc_request_id in ( 0,-1) then
2298: --
2299: fnd_message.set_name('BEN','BEN_93455_ELE_ALREADY_ENDED');
2300: fnd_message.set_token('PARMA',l_element_name);
2301: fnd_message.set_token('PARMB',to_char(l_effective_date));
2302: l_string := fnd_message.get;
2303: benutils.write(p_text => l_string);
2304: --
2305: end if;
2298: --
2299: fnd_message.set_name('BEN','BEN_93455_ELE_ALREADY_ENDED');
2300: fnd_message.set_token('PARMA',l_element_name);
2301: fnd_message.set_token('PARMB',to_char(l_effective_date));
2302: l_string := fnd_message.get;
2303: benutils.write(p_text => l_string);
2304: --
2305: end if;
2306: --
2610: write_h('New Salary in CWB is ' || l_new_sal_cwb || ' : New Salary in HR is '||l_new_sal_hr);
2611:
2612: IF(l_pay_proposal_id is not null AND future_pay_proposal_rec.proposed_salary_n is not null) THEN
2613: p_warning := TRUE;
2614: fnd_message.set_name ('BEN', 'BEN_94685_FUTURE_SAL_PROP_WARN');
2615: l_message := fnd_message.get_encoded;
2616: fnd_message.set_encoded(l_message);
2617: --
2618: fnd_message.parse_encoded(encoded_message => l_message,
2611:
2612: IF(l_pay_proposal_id is not null AND future_pay_proposal_rec.proposed_salary_n is not null) THEN
2613: p_warning := TRUE;
2614: fnd_message.set_name ('BEN', 'BEN_94685_FUTURE_SAL_PROP_WARN');
2615: l_message := fnd_message.get_encoded;
2616: fnd_message.set_encoded(l_message);
2617: --
2618: fnd_message.parse_encoded(encoded_message => l_message,
2619: app_short_name => l_app_name,
2612: IF(l_pay_proposal_id is not null AND future_pay_proposal_rec.proposed_salary_n is not null) THEN
2613: p_warning := TRUE;
2614: fnd_message.set_name ('BEN', 'BEN_94685_FUTURE_SAL_PROP_WARN');
2615: l_message := fnd_message.get_encoded;
2616: fnd_message.set_encoded(l_message);
2617: --
2618: fnd_message.parse_encoded(encoded_message => l_message,
2619: app_short_name => l_app_name,
2620: message_name => l_message_name);
2614: fnd_message.set_name ('BEN', 'BEN_94685_FUTURE_SAL_PROP_WARN');
2615: l_message := fnd_message.get_encoded;
2616: fnd_message.set_encoded(l_message);
2617: --
2618: fnd_message.parse_encoded(encoded_message => l_message,
2619: app_short_name => l_app_name,
2620: message_name => l_message_name);
2621: IF g_person_errored = FALSE THEN
2622: p_warning_text := substr(p_warning_text||fnd_message.get_number(l_app_name,l_message_name)||' '||fnd_message.get,1,2000);
2618: fnd_message.parse_encoded(encoded_message => l_message,
2619: app_short_name => l_app_name,
2620: message_name => l_message_name);
2621: IF g_person_errored = FALSE THEN
2622: p_warning_text := substr(p_warning_text||fnd_message.get_number(l_app_name,l_message_name)||' '||fnd_message.get,1,2000);
2623: END IF;
2624: g_person_errored := TRUE;
2625: write('Future dated salary proposal exists');
2626:
2625: write('Future dated salary proposal exists');
2626:
2627: ELSIF (l_pay_proposal_id is not null AND l_new_sal_cwb <> l_new_sal_hr) THEN
2628: p_warning := TRUE;
2629: fnd_message.set_name ('BEN', 'BEN_94748_CWB_RECENT_SALY_CHG');
2630: l_message := fnd_message.get_encoded;
2631: fnd_message.set_encoded(l_message);
2632: fnd_message.parse_encoded(encoded_message => l_message,
2633: app_short_name => l_app_name,
2626:
2627: ELSIF (l_pay_proposal_id is not null AND l_new_sal_cwb <> l_new_sal_hr) THEN
2628: p_warning := TRUE;
2629: fnd_message.set_name ('BEN', 'BEN_94748_CWB_RECENT_SALY_CHG');
2630: l_message := fnd_message.get_encoded;
2631: fnd_message.set_encoded(l_message);
2632: fnd_message.parse_encoded(encoded_message => l_message,
2633: app_short_name => l_app_name,
2634: message_name => l_message_name);
2627: ELSIF (l_pay_proposal_id is not null AND l_new_sal_cwb <> l_new_sal_hr) THEN
2628: p_warning := TRUE;
2629: fnd_message.set_name ('BEN', 'BEN_94748_CWB_RECENT_SALY_CHG');
2630: l_message := fnd_message.get_encoded;
2631: fnd_message.set_encoded(l_message);
2632: fnd_message.parse_encoded(encoded_message => l_message,
2633: app_short_name => l_app_name,
2634: message_name => l_message_name);
2635: IF g_person_errored = FALSE THEN
2628: p_warning := TRUE;
2629: fnd_message.set_name ('BEN', 'BEN_94748_CWB_RECENT_SALY_CHG');
2630: l_message := fnd_message.get_encoded;
2631: fnd_message.set_encoded(l_message);
2632: fnd_message.parse_encoded(encoded_message => l_message,
2633: app_short_name => l_app_name,
2634: message_name => l_message_name);
2635: IF g_person_errored = FALSE THEN
2636: p_warning_text := substr(p_warning_text||fnd_message.get_number(l_app_name,l_message_name)||' '||fnd_message.get,1,2000);
2632: fnd_message.parse_encoded(encoded_message => l_message,
2633: app_short_name => l_app_name,
2634: message_name => l_message_name);
2635: IF g_person_errored = FALSE THEN
2636: p_warning_text := substr(p_warning_text||fnd_message.get_number(l_app_name,l_message_name)||' '||fnd_message.get,1,2000);
2637: END IF;
2638: g_person_errored := TRUE;
2639: write('This employee had a recent update to Salary or Pay Basis after postprocess. Hence could not back-out this employee');
2640:
2672: write_h('Element Value in CWB is ' || l_element_entry_val_cwb || ' : Element Value in HR is '|| l_element_entry_val_hr);
2673:
2674: if(l_element_entry_val_cwb <> l_element_entry_val_hr) then
2675: p_warning := TRUE;
2676: fnd_message.set_name ('BEN', 'BEN_94749_CWB_RECENT_ELE_CHG');
2677: l_message := fnd_message.get_encoded;
2678: fnd_message.set_encoded(l_message);
2679: fnd_message.parse_encoded(encoded_message => l_message,
2680: app_short_name => l_app_name,
2673:
2674: if(l_element_entry_val_cwb <> l_element_entry_val_hr) then
2675: p_warning := TRUE;
2676: fnd_message.set_name ('BEN', 'BEN_94749_CWB_RECENT_ELE_CHG');
2677: l_message := fnd_message.get_encoded;
2678: fnd_message.set_encoded(l_message);
2679: fnd_message.parse_encoded(encoded_message => l_message,
2680: app_short_name => l_app_name,
2681: message_name => l_message_name);
2674: if(l_element_entry_val_cwb <> l_element_entry_val_hr) then
2675: p_warning := TRUE;
2676: fnd_message.set_name ('BEN', 'BEN_94749_CWB_RECENT_ELE_CHG');
2677: l_message := fnd_message.get_encoded;
2678: fnd_message.set_encoded(l_message);
2679: fnd_message.parse_encoded(encoded_message => l_message,
2680: app_short_name => l_app_name,
2681: message_name => l_message_name);
2682: IF g_person_errored = FALSE THEN
2675: p_warning := TRUE;
2676: fnd_message.set_name ('BEN', 'BEN_94749_CWB_RECENT_ELE_CHG');
2677: l_message := fnd_message.get_encoded;
2678: fnd_message.set_encoded(l_message);
2679: fnd_message.parse_encoded(encoded_message => l_message,
2680: app_short_name => l_app_name,
2681: message_name => l_message_name);
2682: IF g_person_errored = FALSE THEN
2683: p_warning_text := substr(p_warning_text||fnd_message.get_number(l_app_name,l_message_name)||' '||fnd_message.get,1,2000);
2679: fnd_message.parse_encoded(encoded_message => l_message,
2680: app_short_name => l_app_name,
2681: message_name => l_message_name);
2682: IF g_person_errored = FALSE THEN
2683: p_warning_text := substr(p_warning_text||fnd_message.get_number(l_app_name,l_message_name)||' '||fnd_message.get,1,2000);
2684: END IF;
2685: g_person_errored := TRUE;
2686: write('This employee had a recent update to Element after postprocess. Hence could not back-out this employee');
2687: end if;
2828:
2829: if(l_event_type is not null) then
2830: if (l_event_type <> nvl(p_txn_rec.attribute2,'-1')) then
2831: hr_utility.set_location('Rating type mismatch '||l_event_type||'&'||p_txn_rec.attribute2, 20);
2832: fnd_message.set_name ('BEN', 'BEN_93371_RATING_EXST_FOR_DATE');
2833: fnd_message.raise_error;
2834: end if;
2835: end if;
2836:
2829: if(l_event_type is not null) then
2830: if (l_event_type <> nvl(p_txn_rec.attribute2,'-1')) then
2831: hr_utility.set_location('Rating type mismatch '||l_event_type||'&'||p_txn_rec.attribute2, 20);
2832: fnd_message.set_name ('BEN', 'BEN_93371_RATING_EXST_FOR_DATE');
2833: fnd_message.raise_error;
2834: end if;
2835: end if;
2836:
2837: if(l_performance_review_id is not null) then
3080: write_h('l_last_payroll_date is '|| l_last_payroll_date);
3081: OPEN c_payroll_run (asg_rec.assignment_id,l_posting_date,p_effective_date);
3082: FETCH c_payroll_run INTO l_payroll_run;
3083: IF (c_payroll_run%FOUND OR (l_last_payroll_date is not null AND l_last_payroll_date >= least(l_posting_date,p_effective_date) )) THEN
3084: fnd_message.set_name ('BEN', 'BEN_94739_PAYROLL_RAN');
3085: l_message := fnd_message.get_encoded;
3086: fnd_message.set_encoded(l_message);
3087: --
3088: fnd_message.parse_encoded(encoded_message => l_message,
3081: OPEN c_payroll_run (asg_rec.assignment_id,l_posting_date,p_effective_date);
3082: FETCH c_payroll_run INTO l_payroll_run;
3083: IF (c_payroll_run%FOUND OR (l_last_payroll_date is not null AND l_last_payroll_date >= least(l_posting_date,p_effective_date) )) THEN
3084: fnd_message.set_name ('BEN', 'BEN_94739_PAYROLL_RAN');
3085: l_message := fnd_message.get_encoded;
3086: fnd_message.set_encoded(l_message);
3087: --
3088: fnd_message.parse_encoded(encoded_message => l_message,
3089: app_short_name => l_app_name,
3082: FETCH c_payroll_run INTO l_payroll_run;
3083: IF (c_payroll_run%FOUND OR (l_last_payroll_date is not null AND l_last_payroll_date >= least(l_posting_date,p_effective_date) )) THEN
3084: fnd_message.set_name ('BEN', 'BEN_94739_PAYROLL_RAN');
3085: l_message := fnd_message.get_encoded;
3086: fnd_message.set_encoded(l_message);
3087: --
3088: fnd_message.parse_encoded(encoded_message => l_message,
3089: app_short_name => l_app_name,
3090: message_name => l_message_name);
3084: fnd_message.set_name ('BEN', 'BEN_94739_PAYROLL_RAN');
3085: l_message := fnd_message.get_encoded;
3086: fnd_message.set_encoded(l_message);
3087: --
3088: fnd_message.parse_encoded(encoded_message => l_message,
3089: app_short_name => l_app_name,
3090: message_name => l_message_name);
3091: l_comp_person_rec.error_or_warning_text := substr(fnd_message.get_number(l_app_name,l_message_name)||' '||fnd_message.get,1,2000);
3092: WRITE(l_comp_person_rec.error_or_warning_text);
3087: --
3088: fnd_message.parse_encoded(encoded_message => l_message,
3089: app_short_name => l_app_name,
3090: message_name => l_message_name);
3091: l_comp_person_rec.error_or_warning_text := substr(fnd_message.get_number(l_app_name,l_message_name)||' '||fnd_message.get,1,2000);
3092: WRITE(l_comp_person_rec.error_or_warning_text);
3093: ROLLBACK TO delete_elements_and_salary;
3094: l_comp_error := TRUE;
3095: g_person_errored := TRUE;
3120: close c_payroll_run;
3121: END IF;
3122:
3123: l_comp_person_rec.status := 'E';
3124: l_message := fnd_message.get_encoded;
3125: if(l_message is null) then
3126: fnd_message.set_name ('BEN', 'BEN_94685_FUTURE_SAL_PROP_WARN');
3127: l_message := fnd_message.get_encoded;
3128: end if;
3122:
3123: l_comp_person_rec.status := 'E';
3124: l_message := fnd_message.get_encoded;
3125: if(l_message is null) then
3126: fnd_message.set_name ('BEN', 'BEN_94685_FUTURE_SAL_PROP_WARN');
3127: l_message := fnd_message.get_encoded;
3128: end if;
3129: fnd_message.set_encoded(l_message);
3130: --
3123: l_comp_person_rec.status := 'E';
3124: l_message := fnd_message.get_encoded;
3125: if(l_message is null) then
3126: fnd_message.set_name ('BEN', 'BEN_94685_FUTURE_SAL_PROP_WARN');
3127: l_message := fnd_message.get_encoded;
3128: end if;
3129: fnd_message.set_encoded(l_message);
3130: --
3131: fnd_message.parse_encoded(encoded_message => l_message,
3125: if(l_message is null) then
3126: fnd_message.set_name ('BEN', 'BEN_94685_FUTURE_SAL_PROP_WARN');
3127: l_message := fnd_message.get_encoded;
3128: end if;
3129: fnd_message.set_encoded(l_message);
3130: --
3131: fnd_message.parse_encoded(encoded_message => l_message,
3132: app_short_name => l_app_name,
3133: message_name => l_message_name);
3127: l_message := fnd_message.get_encoded;
3128: end if;
3129: fnd_message.set_encoded(l_message);
3130: --
3131: fnd_message.parse_encoded(encoded_message => l_message,
3132: app_short_name => l_app_name,
3133: message_name => l_message_name);
3134: l_comp_person_rec.error_or_warning_text := l_warning_text;
3135: WRITE(l_comp_person_rec.error_or_warning_text);
3170: l_perf_person_rec.rating_date := l_perf_revw_strt_dt;
3171: l_perf_person_rec.rating_type := l_perf_txn.attribute2;
3172: l_perf_person_rec.performance_rating := substrb(hr_general.decode_lookup('PERFORMANCE_RATING',l_perf_txn.attribute3),1,30);
3173: if(l_error) then
3174: fnd_message.raise_error;
3175: end if;
3176:
3177: backout_rating (p_person_id => p_person_id
3178: , p_txn_rec => l_perf_txn
3197: EXCEPTION
3198: WHEN OTHERS THEN
3199: WRITE('Error at Performance rating '||SQLERRM);
3200: l_perf_person_rec.status := 'E';
3201: l_message := fnd_message.get_encoded;
3202: fnd_message.set_encoded(l_message);
3203: --
3204: fnd_message.parse_encoded(encoded_message => l_message,
3205: app_short_name => l_app_name,
3198: WHEN OTHERS THEN
3199: WRITE('Error at Performance rating '||SQLERRM);
3200: l_perf_person_rec.status := 'E';
3201: l_message := fnd_message.get_encoded;
3202: fnd_message.set_encoded(l_message);
3203: --
3204: fnd_message.parse_encoded(encoded_message => l_message,
3205: app_short_name => l_app_name,
3206: message_name => l_message_name);
3200: l_perf_person_rec.status := 'E';
3201: l_message := fnd_message.get_encoded;
3202: fnd_message.set_encoded(l_message);
3203: --
3204: fnd_message.parse_encoded(encoded_message => l_message,
3205: app_short_name => l_app_name,
3206: message_name => l_message_name);
3207: l_perf_person_rec.error_or_warning_text := substr(fnd_message.get_number(l_app_name,l_message_name)||' '||fnd_message.get,1,2000);
3208: g_person_errored := TRUE;
3203: --
3204: fnd_message.parse_encoded(encoded_message => l_message,
3205: app_short_name => l_app_name,
3206: message_name => l_message_name);
3207: l_perf_person_rec.error_or_warning_text := substr(fnd_message.get_number(l_app_name,l_message_name)||' '||fnd_message.get,1,2000);
3208: g_person_errored := TRUE;
3209: WRITE(l_perf_person_rec.error_or_warning_text);
3210: ROLLBACK TO process_rating;
3211: IF(benutils.get_message_name = 'BEN_93371_RATING_EXST_FOR_DATE') THEN
3208: g_person_errored := TRUE;
3209: WRITE(l_perf_person_rec.error_or_warning_text);
3210: ROLLBACK TO process_rating;
3211: IF(benutils.get_message_name = 'BEN_93371_RATING_EXST_FOR_DATE') THEN
3212: --l_perf_person_rec.error_or_warning_text := fnd_message.get;
3213: write_m ('Time after processing rating '||to_char(sysdate,'yyyy/mm/dd:hh:mi:ssam'));
3214: WRITE('Failed Performance rating is '||l_perf_person_rec.performance_rating);
3215: l_rating_status := 'CWB_PERF_SUS';
3216: ELSE
3312: EXCEPTION
3313: WHEN OTHERS THEN
3314: WRITE('Error at Ranking '||SQLERRM);
3315: l_perf_person_rec.status := 'E';
3316: l_message := fnd_message.get_encoded;
3317: fnd_message.set_encoded(l_message);
3318: --
3319: fnd_message.parse_encoded(encoded_message => l_message,
3320: app_short_name => l_app_name,
3313: WHEN OTHERS THEN
3314: WRITE('Error at Ranking '||SQLERRM);
3315: l_perf_person_rec.status := 'E';
3316: l_message := fnd_message.get_encoded;
3317: fnd_message.set_encoded(l_message);
3318: --
3319: fnd_message.parse_encoded(encoded_message => l_message,
3320: app_short_name => l_app_name,
3321: message_name => l_message_name);
3315: l_perf_person_rec.status := 'E';
3316: l_message := fnd_message.get_encoded;
3317: fnd_message.set_encoded(l_message);
3318: --
3319: fnd_message.parse_encoded(encoded_message => l_message,
3320: app_short_name => l_app_name,
3321: message_name => l_message_name);
3322: l_perf_person_rec.error_or_warning_text := substr(fnd_message.get_number(l_app_name,l_message_name)||' '||fnd_message.get,1,2000);
3323: WRITE(l_perf_person_rec.error_or_warning_text);
3318: --
3319: fnd_message.parse_encoded(encoded_message => l_message,
3320: app_short_name => l_app_name,
3321: message_name => l_message_name);
3322: l_perf_person_rec.error_or_warning_text := substr(fnd_message.get_number(l_app_name,l_message_name)||' '||fnd_message.get,1,2000);
3323: WRITE(l_perf_person_rec.error_or_warning_text);
3324: ROLLBACK TO process_ranking;
3325: l_perf_error := TRUE;
3326: l_error := TRUE;
3878: -- g_cache_cwb_rpt_person (g_cache_cwb_rpt_person.COUNT + 1) := g_cwb_rpt_person;
3879:
3880: END IF;
3881: WRITE (benutils.get_message_name);
3882: WRITE (fnd_message.get);
3883: WRITE (SQLERRM||' in process_person');
3884: RAISE ben_batch_utils.g_record_error;
3885: END;
3886:
4060: IF (g_persons_errored > g_max_errors_allowed)
4061: THEN
4062: g_actn := '<
4063: WRITE (g_actn);
4064: fnd_message.set_name ('BEN', 'BEN_93145_MAX_LIMIT_REACHED');
4065: -- removed RAISE ben_batch_utils.g_record_error;
4066: raise g_max_error;
4067: END IF;
4068:
4074: ELSE
4075: --
4076: g_actn := 'Erroring out since no person is found in range...';
4077: --
4078: fnd_message.set_name ('BEN', 'BEN_91709_PER_NOT_FND_IN_RNG');
4079: fnd_message.set_token ('PROCEDURE', g_proc);
4080: fnd_message.raise_error;
4081: END IF;
4082:
4075: --
4076: g_actn := 'Erroring out since no person is found in range...';
4077: --
4078: fnd_message.set_name ('BEN', 'BEN_91709_PER_NOT_FND_IN_RNG');
4079: fnd_message.set_token ('PROCEDURE', g_proc);
4080: fnd_message.raise_error;
4081: END IF;
4082:
4083: COMMIT;
4076: g_actn := 'Erroring out since no person is found in range...';
4077: --
4078: fnd_message.set_name ('BEN', 'BEN_91709_PER_NOT_FND_IN_RNG');
4079: fnd_message.set_token ('PROCEDURE', g_proc);
4080: fnd_message.raise_error;
4081: END IF;
4082:
4083: COMMIT;
4084: END LOOP;
4096: WRITE(SQLERRM);
4097: print_cache;
4098: table_corrections(p_benefit_action_id);
4099: COMMIT;
4100: fnd_message.set_name ('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
4101: fnd_message.set_token ('PROCEDURE', g_proc);
4102: fnd_message.set_token ('STEP', g_actn);
4103: fnd_message.raise_error;
4104:
4097: print_cache;
4098: table_corrections(p_benefit_action_id);
4099: COMMIT;
4100: fnd_message.set_name ('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
4101: fnd_message.set_token ('PROCEDURE', g_proc);
4102: fnd_message.set_token ('STEP', g_actn);
4103: fnd_message.raise_error;
4104:
4105: END;
4098: table_corrections(p_benefit_action_id);
4099: COMMIT;
4100: fnd_message.set_name ('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
4101: fnd_message.set_token ('PROCEDURE', g_proc);
4102: fnd_message.set_token ('STEP', g_actn);
4103: fnd_message.raise_error;
4104:
4105: END;
4106:
4099: COMMIT;
4100: fnd_message.set_name ('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
4101: fnd_message.set_token ('PROCEDURE', g_proc);
4102: fnd_message.set_token ('STEP', g_actn);
4103: fnd_message.raise_error;
4104:
4105: END;
4106:
4107:
4569: END LOOP;
4570: ELSIF l_num_ranges = 0
4571: THEN
4572: WRITE ('<< No Person got selected with above selection criteria >>');
4573: fnd_message.set_name ('BEN', 'BEN_91769_NOONE_TO_PROCESS');
4574: fnd_message.set_token ('PROC', g_proc);
4575: RAISE l_silent_error;
4576: END IF;
4577:
4570: ELSIF l_num_ranges = 0
4571: THEN
4572: WRITE ('<< No Person got selected with above selection criteria >>');
4573: fnd_message.set_name ('BEN', 'BEN_91769_NOONE_TO_PROCESS');
4574: fnd_message.set_token ('PROC', g_proc);
4575: RAISE l_silent_error;
4576: END IF;
4577:
4578: write_m ('Time after launching the threads '||to_char(sysdate,'yyyy/mm/dd:hh:mi:ssam'));
4638: Close c_slaves;
4639: End loop;
4640: EXCEPTION
4641: WHEN l_slave_errored THEN
4642: --fnd_message.set_name ('BEN', 'BEN_94890_CWB_PROC_SLAVE_ERROR');
4643: --fnd_message.set_name('BEN', 'BEN_93145_MAX_LIMIT_REACHED');
4644: g_actn:= 'slave processes';
4645: raise g_slave_error;
4646: END;
4639: End loop;
4640: EXCEPTION
4641: WHEN l_slave_errored THEN
4642: --fnd_message.set_name ('BEN', 'BEN_94890_CWB_PROC_SLAVE_ERROR');
4643: --fnd_message.set_name('BEN', 'BEN_93145_MAX_LIMIT_REACHED');
4644: g_actn:= 'slave processes';
4645: raise g_slave_error;
4646: END;
4647:
4648: EXCEPTION
4649: --
4650: WHEN l_silent_error
4651: THEN
4652: WRITE (fnd_message.get);
4653: IF (l_num_ranges > 0) THEN
4654: WRITE('END_PROCESS');
4655: ben_batch_utils.check_all_slaves_finished (p_rpt_flag => TRUE);
4656: end_process (p_benefit_action_id => l_benefit_action_id
4659: );
4660: END IF;
4661: --
4662: WHEN g_slave_error THEN
4663: WRITE (fnd_message.get);
4664: WRITE (SQLERRM);
4665: WRITE ('Big Error Occurred');
4666: IF (l_num_ranges > 0) THEN
4667: WRITE('END_PROCESS');
4670: , p_person_selected => l_num_persons
4671: , p_business_group_id => p_bg_id
4672: );
4673: END IF;
4674: fnd_message.clear();
4675: fnd_message.set_name('BEN', 'BEN_94890_CWB_PROC_SLAVE_ERROR');
4676: --fnd_message.set_name('BEN', 'BEN_93145_MAX_LIMIT_REACHED');
4677: --fnd_message.raise_error;
4678: RAISE_APPLICATION_ERROR(-20001,fnd_global.Newline||fnd_message.get||fnd_global.Newline);
4671: , p_business_group_id => p_bg_id
4672: );
4673: END IF;
4674: fnd_message.clear();
4675: fnd_message.set_name('BEN', 'BEN_94890_CWB_PROC_SLAVE_ERROR');
4676: --fnd_message.set_name('BEN', 'BEN_93145_MAX_LIMIT_REACHED');
4677: --fnd_message.raise_error;
4678: RAISE_APPLICATION_ERROR(-20001,fnd_global.Newline||fnd_message.get||fnd_global.Newline);
4679: --
4672: );
4673: END IF;
4674: fnd_message.clear();
4675: fnd_message.set_name('BEN', 'BEN_94890_CWB_PROC_SLAVE_ERROR');
4676: --fnd_message.set_name('BEN', 'BEN_93145_MAX_LIMIT_REACHED');
4677: --fnd_message.raise_error;
4678: RAISE_APPLICATION_ERROR(-20001,fnd_global.Newline||fnd_message.get||fnd_global.Newline);
4679: --
4680: WHEN g_max_error THEN
4673: END IF;
4674: fnd_message.clear();
4675: fnd_message.set_name('BEN', 'BEN_94890_CWB_PROC_SLAVE_ERROR');
4676: --fnd_message.set_name('BEN', 'BEN_93145_MAX_LIMIT_REACHED');
4677: --fnd_message.raise_error;
4678: RAISE_APPLICATION_ERROR(-20001,fnd_global.Newline||fnd_message.get||fnd_global.Newline);
4679: --
4680: WHEN g_max_error THEN
4681: WRITE (fnd_message.get);
4674: fnd_message.clear();
4675: fnd_message.set_name('BEN', 'BEN_94890_CWB_PROC_SLAVE_ERROR');
4676: --fnd_message.set_name('BEN', 'BEN_93145_MAX_LIMIT_REACHED');
4677: --fnd_message.raise_error;
4678: RAISE_APPLICATION_ERROR(-20001,fnd_global.Newline||fnd_message.get||fnd_global.Newline);
4679: --
4680: WHEN g_max_error THEN
4681: WRITE (fnd_message.get);
4682: WRITE (SQLERRM);
4677: --fnd_message.raise_error;
4678: RAISE_APPLICATION_ERROR(-20001,fnd_global.Newline||fnd_message.get||fnd_global.Newline);
4679: --
4680: WHEN g_max_error THEN
4681: WRITE (fnd_message.get);
4682: WRITE (SQLERRM);
4683: WRITE ('Big Error Occurred');
4684: IF (l_num_ranges > 0) THEN
4685: WRITE('END_PROCESS');
4689: , p_business_group_id => p_bg_id
4690: );
4691: END IF;
4692:
4693: fnd_message.set_name('BEN', 'BEN_93145_MAX_LIMIT_REACHED');
4694: --fnd_message.raise_error;
4695: RAISE_APPLICATION_ERROR(-20001,fnd_global.Newline||fnd_message.get||fnd_global.Newline);
4696: --
4697: WHEN OTHERS THEN
4690: );
4691: END IF;
4692:
4693: fnd_message.set_name('BEN', 'BEN_93145_MAX_LIMIT_REACHED');
4694: --fnd_message.raise_error;
4695: RAISE_APPLICATION_ERROR(-20001,fnd_global.Newline||fnd_message.get||fnd_global.Newline);
4696: --
4697: WHEN OTHERS THEN
4698: WRITE (fnd_message.get);
4691: END IF;
4692:
4693: fnd_message.set_name('BEN', 'BEN_93145_MAX_LIMIT_REACHED');
4694: --fnd_message.raise_error;
4695: RAISE_APPLICATION_ERROR(-20001,fnd_global.Newline||fnd_message.get||fnd_global.Newline);
4696: --
4697: WHEN OTHERS THEN
4698: WRITE (fnd_message.get);
4699: WRITE (SQLERRM);
4694: --fnd_message.raise_error;
4695: RAISE_APPLICATION_ERROR(-20001,fnd_global.Newline||fnd_message.get||fnd_global.Newline);
4696: --
4697: WHEN OTHERS THEN
4698: WRITE (fnd_message.get);
4699: WRITE (SQLERRM);
4700: WRITE ('Big Error Occurred');
4701: IF (l_num_ranges > 0) THEN
4702: WRITE('END_PROCESS');
4706: , p_business_group_id => p_bg_id
4707: );
4708: END IF;
4709:
4710: fnd_message.set_name ('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
4711: fnd_message.set_token ('PROCEDURE', g_proc);
4712: fnd_message.set_token ('STEP', g_actn);
4713: fnd_message.raise_error;
4714: END;
4707: );
4708: END IF;
4709:
4710: fnd_message.set_name ('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
4711: fnd_message.set_token ('PROCEDURE', g_proc);
4712: fnd_message.set_token ('STEP', g_actn);
4713: fnd_message.raise_error;
4714: END;
4715:
4708: END IF;
4709:
4710: fnd_message.set_name ('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
4711: fnd_message.set_token ('PROCEDURE', g_proc);
4712: fnd_message.set_token ('STEP', g_actn);
4713: fnd_message.raise_error;
4714: END;
4715:
4716:
4709:
4710: fnd_message.set_name ('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
4711: fnd_message.set_token ('PROCEDURE', g_proc);
4712: fnd_message.set_token ('STEP', g_actn);
4713: fnd_message.raise_error;
4714: END;
4715:
4716:
4717: -- Package end