[Home] [Help]
1374: l_person_id ben_person_actions.person_id%type;
1375: l_person_action_id ben_person_actions.person_action_id%type;
1376: l_object_version_number ben_person_actions.object_version_number%type;
1377: l_ler_id ben_person_actions.ler_id%type;
1378: l_range_id ben_batch_ranges.range_id%type;
1379: l_record_number number := 0;
1380: l_start_person_action_id number := 0;
1381: l_end_person_action_id number := 0;
1382: l_actn varchar2(80);
1391: is
1392: select ran.range_id
1393: ,ran.starting_person_action_id
1394: ,ran.ending_person_action_id
1395: from ben_batch_ranges ran
1396: where ran.range_status_cd = 'U'
1397: and ran.benefit_action_id = p_benefit_action_id
1398: and rownum < 2
1399: for update of ran.range_status_cd;
1504: --
1505: end if;
1506: --
1507: -- The processing for this thread is as follows:
1508: -- 1) Lock the rows in ben_batch_ranges that are not processed.
1509: -- 2) Fetch the start and ending person action id for the range.
1510: -- 3) Loop through the person actions in the range and close unresolved
1511: -- action items for each.
1512: -- 4) Go to number 1 again and repeat until all ranges are processed.
1524: end if;
1525: --
1526: close c_range_thread;
1527: --
1528: update ben_batch_ranges ran
1529: set ran.range_status_cd = 'P'
1530: where ran.range_id = l_range_id;
1531: --
1532: commit;
1924: --
1925: -- The number of person actions that got created equals the chunk
1926: -- size. Create a batch range for the person actions.
1927: --
1928: ben_batch_ranges_api.create_batch_ranges
1929: (p_validate => FALSE
1930: ,p_effective_date => l_effective_date
1931: ,p_benefit_action_id => l_benefit_action_id
1932: ,p_range_id => l_range_id
1952: if l_person_actn_cnt > 0 and
1953: mod(l_person_actn_cnt, l_chunk_size) <> 0
1954: then
1955: --
1956: ben_batch_ranges_api.create_batch_ranges
1957: (p_validate => FALSE
1958: ,p_effective_date => l_effective_date
1959: ,p_benefit_action_id => l_benefit_action_id
1960: ,p_range_id => l_range_id