1091: Savepoint process_premium_savepoint;
1092: --
1093: -- Cache person data and write personal data into cache.
1094: --
1095: l_actn := 'Calling ben_batch_utils.person_header...';
1096: ben_batch_utils.person_header
1097: (p_person_id => p_person_id
1098: ,p_business_group_id => p_business_group_id
1099: ,p_effective_date => p_effective_date
1092: --
1093: -- Cache person data and write personal data into cache.
1094: --
1095: l_actn := 'Calling ben_batch_utils.person_header...';
1096: ben_batch_utils.person_header
1097: (p_person_id => p_person_id
1098: ,p_business_group_id => p_business_group_id
1099: ,p_effective_date => p_effective_date
1100: );
1098: ,p_business_group_id => p_business_group_id
1099: ,p_effective_date => p_effective_date
1100: );
1101: --
1102: l_actn := 'Calling ben_batch_utils.ini(COMP_OBJ)...';
1103: ben_batch_utils.ini('COMP_OBJ');
1104: -- Concurrent Code End
1105:
1106: for l_results in c_results loop
1099: ,p_effective_date => p_effective_date
1100: );
1101: --
1102: l_actn := 'Calling ben_batch_utils.ini(COMP_OBJ)...';
1103: ben_batch_utils.ini('COMP_OBJ');
1104: -- Concurrent Code End
1105:
1106: for l_results in c_results loop
1107: -- Concurrent Code Begin
1325: end if; -- comp object rule passed
1326: end loop; -- results
1327: -- Concurrent Code Begin
1328: hr_utility.set_location(l_package,110);
1329: l_actn := 'Calling Ben_batch_utils.write_comp...';
1330: Ben_batch_utils.write_comp(p_business_group_id => p_business_group_id
1331: ,p_effective_date => p_effective_date
1332: );
1333: l_actn := 'About to optionally rollback...';
1326: end loop; -- results
1327: -- Concurrent Code Begin
1328: hr_utility.set_location(l_package,110);
1329: l_actn := 'Calling Ben_batch_utils.write_comp...';
1330: Ben_batch_utils.write_comp(p_business_group_id => p_business_group_id
1331: ,p_effective_date => p_effective_date
1332: );
1333: l_actn := 'About to optionally rollback...';
1334: If (p_validate = 'Y') then
1355: l_error_text := sqlerrm;
1356: hr_utility.set_location ('Fail in '||l_package,998);
1357: hr_utility.set_location (' with error '||l_error_text,999);
1358: rollback to process_premium_savepoint;
1359: ben_batch_utils.write_error_rec;
1360: ben_batch_utils.rpt_error(p_proc => l_package
1361: ,p_last_actn => l_actn
1362: ,p_rpt_flag => TRUE);
1363: Ben_batch_utils.write_comp(p_business_group_id => p_business_group_id
1356: hr_utility.set_location ('Fail in '||l_package,998);
1357: hr_utility.set_location (' with error '||l_error_text,999);
1358: rollback to process_premium_savepoint;
1359: ben_batch_utils.write_error_rec;
1360: ben_batch_utils.rpt_error(p_proc => l_package
1361: ,p_last_actn => l_actn
1362: ,p_rpt_flag => TRUE);
1363: Ben_batch_utils.write_comp(p_business_group_id => p_business_group_id
1364: ,p_effective_date => p_effective_date
1359: ben_batch_utils.write_error_rec;
1360: ben_batch_utils.rpt_error(p_proc => l_package
1361: ,p_last_actn => l_actn
1362: ,p_rpt_flag => TRUE);
1363: Ben_batch_utils.write_comp(p_business_group_id => p_business_group_id
1364: ,p_effective_date => p_effective_date
1365: );
1366: If p_person_action_id is not null then
1367: ben_person_actions_api.update_person_actions
1371: ,p_effective_date => p_effective_date
1372: );
1373: End if;
1374: commit;
1375: raise ben_batch_utils.g_record_error;
1376: -- Concurrent Code End
1377: end main;
1378: end ben_prem_prtt_monthly;