461: fnd_message.set_name('BEN','BEN_93455_ELE_ALREADY_ENDED');
462: fnd_message.set_token('PARMA',l_element_name);
463: fnd_message.set_token('PARMB',to_char(l_effective_date));
464: l_string := fnd_message.get;
465: benutils.write(p_text => l_string);
466: --
467: end if;
468: --
469: if g_debug then
735: l_effective_date:=trunc(fnd_date.canonical_to_date(p_effective_date));
736: l_ocrd_date := trunc(fnd_date.canonical_to_date(p_ocrd_date));
737: --
738: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
739: fnd_message.set_token('PROC','benutils.get_parameter');
740: benutils.get_parameter(p_business_group_id => p_business_group_id
741: ,p_batch_exe_cd => 'BENBOCON'
742: ,p_threads => l_threads
743: ,p_chunk_size => l_chunk_size
736: l_ocrd_date := trunc(fnd_date.canonical_to_date(p_ocrd_date));
737: --
738: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
739: fnd_message.set_token('PROC','benutils.get_parameter');
740: benutils.get_parameter(p_business_group_id => p_business_group_id
741: ,p_batch_exe_cd => 'BENBOCON'
742: ,p_threads => l_threads
743: ,p_chunk_size => l_chunk_size
744: ,p_max_errors => g_max_errors_allowed);
756: p_threads => l_threads,
757: p_max_errors => g_max_errors_allowed,
758: p_benefit_action_id => p_benefit_action_id);
759: --
760: -- Copy benefit action id to global in benutils package
761: --
762: benutils.g_benefit_action_id := p_benefit_action_id;
763: benutils.g_thread_id := p_thread_id;
764: g_persons_errored := 0;
758: p_benefit_action_id => p_benefit_action_id);
759: --
760: -- Copy benefit action id to global in benutils package
761: --
762: benutils.g_benefit_action_id := p_benefit_action_id;
763: benutils.g_thread_id := p_thread_id;
764: g_persons_errored := 0;
765: g_persons_processed := 0;
766: --
759: --
760: -- Copy benefit action id to global in benutils package
761: --
762: benutils.g_benefit_action_id := p_benefit_action_id;
763: benutils.g_thread_id := p_thread_id;
764: g_persons_errored := 0;
765: g_persons_processed := 0;
766: --
767: open c_parameter;
838: --
839: exit when c_person_thread%notfound;
840: --
841: savepoint last_place;
842: benutils.set_cache_record_position;
843:
844: --
845: -- CWB - Added to avoid calling ben_person_object.get_object
846: --
928: -- This is to assign the per_in_ler_id in the record to extract the
929: -- the electable choices later.
930: g_rec.temporal_ler_id := l_ler_thread.per_in_ler_id;
931:
932: benutils.write(p_rec => g_rec);
933: --
934: End loop;
935: --
936: close c_ler_thread;
941: set action_status_cd = 'P'
942: where person_id = l_person_id
943: and benefit_action_id = p_benefit_action_id;
944: --
945: benutils.write(l_per_rec.full_name||' processed successfully');
946: g_persons_processed := g_persons_processed + 1;
947: --
948: exception
949: --
965: --
966: end if;
967: --
968: rollback to last_place;
969: benutils.rollback_cache;
970: --
971: update ben_person_actions
972: set action_status_cd = 'E'
973: where person_id = l_person_id
981: -- g_rec.text := fnd_message.get;
982: g_rec.person_id := l_person_id;
983:
984: g_rec.national_identifier := l_per_rec.national_identifier;
985: g_rec.error_message_code := benutils.get_message_name;
986: g_rec.text := fnd_message.get;
987:
988: hr_utility.set_location('Error Message '||g_rec.text,10);
989: benutils.write(l_per_rec.full_name||' processed unsuccessfully');
985: g_rec.error_message_code := benutils.get_message_name;
986: g_rec.text := fnd_message.get;
987:
988: hr_utility.set_location('Error Message '||g_rec.text,10);
989: benutils.write(l_per_rec.full_name||' processed unsuccessfully');
990: benutils.write(g_rec.text);
991: benutils.write(p_rec => g_rec);
992: --
993: hr_utility.set_location('Max Errors = '||g_max_errors_allowed,10);
986: g_rec.text := fnd_message.get;
987:
988: hr_utility.set_location('Error Message '||g_rec.text,10);
989: benutils.write(l_per_rec.full_name||' processed unsuccessfully');
990: benutils.write(g_rec.text);
991: benutils.write(p_rec => g_rec);
992: --
993: hr_utility.set_location('Max Errors = '||g_max_errors_allowed,10);
994: hr_utility.set_location('Num Errors = '||g_persons_errored,10);
987:
988: hr_utility.set_location('Error Message '||g_rec.text,10);
989: benutils.write(l_per_rec.full_name||' processed unsuccessfully');
990: benutils.write(g_rec.text);
991: benutils.write(p_rec => g_rec);
992: --
993: hr_utility.set_location('Max Errors = '||g_max_errors_allowed,10);
994: hr_utility.set_location('Num Errors = '||g_persons_errored,10);
995: if g_persons_errored > g_max_errors_allowed then
994: hr_utility.set_location('Num Errors = '||g_persons_errored,10);
995: if g_persons_errored > g_max_errors_allowed then
996: --
997: fnd_message.set_name('BEN','BEN_92431_BENBOCON_ERROR_LIMIT');
998: benutils.write(p_text => fnd_message.get);
999: --
1000: raise;
1001: --
1002: end if;
1019: --
1020: end if;
1021: --
1022: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
1023: fnd_message.set_token('PROC','benutils.write_table_and_file');
1024: benutils.write_table_and_file(p_table => TRUE, p_file => TRUE);
1025: commit;
1026: --
1027: end loop;
1020: end if;
1021: --
1022: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
1023: fnd_message.set_token('PROC','benutils.write_table_and_file');
1024: benutils.write_table_and_file(p_table => TRUE, p_file => TRUE);
1025: commit;
1026: --
1027: end loop;
1028: --
1042: hr_utility.set_location('Super Error',10);
1043: hr_utility.set_location(sqlerrm,10);
1044: hr_utility.set_location('Super Error',10);
1045: rollback;
1046: benutils.rollback_cache;
1047: --
1048: g_rec.ler_id := nvl(p_life_event_id,l_ler_thread.ler_id);
1049: g_rec.rep_typ_cd := 'FATAL';
1050: g_rec.text := fnd_message.get;
1049: g_rec.rep_typ_cd := 'FATAL';
1050: g_rec.text := fnd_message.get;
1051: g_rec.person_id := l_person_id;
1052: --
1053: benutils.write(p_text => g_rec.text);
1054: benutils.write(p_rec => g_rec);
1055: --
1056: ben_batch_utils.write_logfile(p_num_pers_processed => g_persons_processed
1057: ,p_num_pers_errored => g_persons_errored);
1050: g_rec.text := fnd_message.get;
1051: g_rec.person_id := l_person_id;
1052: --
1053: benutils.write(p_text => g_rec.text);
1054: benutils.write(p_rec => g_rec);
1055: --
1056: ben_batch_utils.write_logfile(p_num_pers_processed => g_persons_processed
1057: ,p_num_pers_errored => g_persons_errored);
1058: --
1055: --
1056: ben_batch_utils.write_logfile(p_num_pers_processed => g_persons_processed
1057: ,p_num_pers_errored => g_persons_errored);
1058: --
1059: benutils.write_table_and_file(p_table => TRUE, p_file => TRUE);
1060: --
1061: commit;
1062: --
1063: fnd_message.raise_error;
1231: --
1232: ben_batch_utils.ini;
1233: ben_batch_utils.ini(p_actn_cd => 'PROC_INFO');
1234: --
1235: benutils.get_parameter(p_business_group_id => p_business_group_id
1236: ,p_batch_exe_cd => 'BENBOCON'
1237: ,p_threads => l_threads
1238: ,p_chunk_size => l_chunk_size
1239: ,p_max_errors => g_max_errors_allowed);
1282: ,p_program_update_date => sysdate
1283: ,p_date_from => l_ocrd_date
1284: ,p_uneai_effective_date => null);
1285: --
1286: benutils.g_benefit_action_id := l_benefit_action_id;
1287: --
1288: hr_utility.set_location ('l_benefit_action_id created is '||l_benefit_action_id,30);
1289: -- Delete/clear ranges from ben_batch_ranges table
1290: --
1603: when l_no_one_to_process then
1604: if c_person%isopen then
1605: close c_person;
1606: end if;
1607: benutils.write(p_text => fnd_message.get);
1608: benutils.write_table_and_file(p_table => TRUE, p_file => TRUE);
1609:
1610: when others then
1611: --
1604: if c_person%isopen then
1605: close c_person;
1606: end if;
1607: benutils.write(p_text => fnd_message.get);
1608: benutils.write_table_and_file(p_table => TRUE, p_file => TRUE);
1609:
1610: when others then
1611: --
1612: if c_person%isopen then
1613: close c_person;
1614: end if;
1615: hr_utility.set_location('Super Error',10);
1616: rollback;
1617: benutils.write(p_text => fnd_message.get);
1618: benutils.write(p_text => sqlerrm);
1619: benutils.write_table_and_file(p_table => TRUE, p_file => TRUE);
1620: If (l_num_range > 0) then
1621: ben_batch_utils.check_all_slaves_finished(p_rpt_flag => TRUE);
1614: end if;
1615: hr_utility.set_location('Super Error',10);
1616: rollback;
1617: benutils.write(p_text => fnd_message.get);
1618: benutils.write(p_text => sqlerrm);
1619: benutils.write_table_and_file(p_table => TRUE, p_file => TRUE);
1620: If (l_num_range > 0) then
1621: ben_batch_utils.check_all_slaves_finished(p_rpt_flag => TRUE);
1622: ben_batch_utils.end_process(p_benefit_action_id => l_benefit_action_id
1615: hr_utility.set_location('Super Error',10);
1616: rollback;
1617: benutils.write(p_text => fnd_message.get);
1618: benutils.write(p_text => sqlerrm);
1619: benutils.write_table_and_file(p_table => TRUE, p_file => TRUE);
1620: If (l_num_range > 0) then
1621: ben_batch_utils.check_all_slaves_finished(p_rpt_flag => TRUE);
1622: ben_batch_utils.end_process(p_benefit_action_id => l_benefit_action_id
1623: ,p_person_selected => l_person_cnt