DBA Data[Home] [Help]

APPS.PER_HRTCA_MERGE dependencies on PER_HRTCA_MERGE

Line 1: package body per_hrtca_merge as

1: package body per_hrtca_merge as
2: /* $Header: perhrtca.pkb 120.19.12010000.9 2008/11/12 06:36:42 sidsaxen ship $ */
3: --PER_USE_TITLE_IN_FULL_NAME
4: g_package varchar2(30) := 'per_hrtca_merge.';
5: g_count number := 0;

Line 4: g_package varchar2(30) := 'per_hrtca_merge.';

1: package body per_hrtca_merge as
2: /* $Header: perhrtca.pkb 120.19.12010000.9 2008/11/12 06:36:42 sidsaxen ship $ */
3: --PER_USE_TITLE_IN_FULL_NAME
4: g_package varchar2(30) := 'per_hrtca_merge.';
5: g_count number := 0;
6: --
7: procedure update_person(p_rec in out nocopy per_all_people_f%rowtype) is
8: --

Line 1115: l_system_person_type := per_hrtca_merge.get_system_person_type(

1111: Begin
1112: --
1113: hr_utility.set_location('Entering '||l_proc,10);
1114: --
1115: l_system_person_type := per_hrtca_merge.get_system_person_type(
1116: l_effective_date,
1117: p_person_id);
1118:
1119: if p_party_id is null then

Line 1922: fnd_message.set_token('PROCEDURE','per_hrtca_merge.purge_parties');

1918: ** Raise an error and report the details we've got.
1919: */
1920:
1921: fnd_message.set_name('PER','PER_289974_TCA_PERSON');
1922: fnd_message.set_token('PROCEDURE','per_hrtca_merge.purge_parties');
1923: fnd_message.set_token('STEP','20');
1924: fnd_message.set_token('ERROR', l_errbuf);
1925: fnd_message.raise_error;
1926: else

Line 1941: fnd_message.set_token('PROCEDURE','per_hrtca_merge.purge_parties');

1937: ** The purge got an error, details of which are in l_errbuf.
1938: ** Raise an error and report the details we've got.
1939: */
1940: fnd_message.set_name('PER','PER_289974_TCA_PERSON');
1941: fnd_message.set_token('PROCEDURE','per_hrtca_merge.purge_parties');
1942: fnd_message.set_token('STEP','30');
1943: fnd_message.set_token('ERROR', l_errbuf);
1944: fnd_message.raise_error;
1945: end if;

Line 2190: per_hrtca_merge.partycleanup(

2186: fetch get_rowid_range into l_start_rowid,l_end_rowid;
2187: close get_rowid_range;
2188: --
2189: if l_start_rowid is not null then
2190: per_hrtca_merge.partycleanup(
2191: p_process_ctrl => null,
2192: p_start_rowid => l_start_rowid,
2193: p_end_rowid => l_end_rowid,
2194: p_rows_processed => l_rows_processed

Line 2471: l_tca_merge_action := per_hrtca_merge.get_tca_merge_actions

2467: --
2468: --Added for bug 2648797
2469: l_person_rec.created_by_module := 'HR API';
2470: --
2471: l_tca_merge_action := per_hrtca_merge.get_tca_merge_actions
2472: (p_person_id => p_rec.person_id
2473: ,p_party_id => p_rec.party_id
2474: );
2475: --

Line 2490: per_hrtca_merge.clear_party_from_hrms

2486: --
2487: -- We don't need this party any longer. Remove the party_id
2488: -- from HRMS tables.
2489: --
2490: per_hrtca_merge.clear_party_from_hrms
2491: (p_party_id => p_rec.party_id);
2492: --
2493: -- Bug fix 4227635 starts here--
2494: -- Updated orig_system_reference to party id when the

Line 2533: per_hrtca_merge.add_party_for_purge

2529: --
2530: -- Make calls to party purge for this party_id.
2531: --
2532: --
2533: per_hrtca_merge.add_party_for_purge
2534: (p_party_id => p_rec.party_id
2535: );
2536: --
2537: per_hrtca_merge.purge_parties;

Line 2537: per_hrtca_merge.purge_parties;

2533: per_hrtca_merge.add_party_for_purge
2534: (p_party_id => p_rec.party_id
2535: );
2536: --
2537: per_hrtca_merge.purge_parties;
2538: --
2539: end if;*/
2540: --
2541: -- bug fix 4005740 ends here --

Line 2570: -- per_hrtca_merge.g_prev_last_name, if not assigned already

2566: get_legislation_code(p_business_group_id => p_rec.business_group_id);
2567: --
2568: -- START WWBUG 2735866
2569: -- Get the length of person_previous_last_name and assign it to
2570: -- per_hrtca_merge.g_prev_last_name, if not assigned already
2571: --
2572: -- Modiifed to fix 4201545 starts here
2573: hr_utility.set_location('Before prev_last_name loop ',99);
2574: per_hrtca_merge.g_prev_last_name_len := get_column_length('HZ_PERSON_PROFILES','PERSON_PREVIOUS_LAST_NAME',222); --for bug 6331673

Line 2574: per_hrtca_merge.g_prev_last_name_len := get_column_length('HZ_PERSON_PROFILES','PERSON_PREVIOUS_LAST_NAME',222); --for bug 6331673

2570: -- per_hrtca_merge.g_prev_last_name, if not assigned already
2571: --
2572: -- Modiifed to fix 4201545 starts here
2573: hr_utility.set_location('Before prev_last_name loop ',99);
2574: per_hrtca_merge.g_prev_last_name_len := get_column_length('HZ_PERSON_PROFILES','PERSON_PREVIOUS_LAST_NAME',222); --for bug 6331673
2575: --
2576: if per_hrtca_merge.g_prev_last_name_len is null then
2577: begin
2578: --

Line 2576: if per_hrtca_merge.g_prev_last_name_len is null then

2572: -- Modiifed to fix 4201545 starts here
2573: hr_utility.set_location('Before prev_last_name loop ',99);
2574: per_hrtca_merge.g_prev_last_name_len := get_column_length('HZ_PERSON_PROFILES','PERSON_PREVIOUS_LAST_NAME',222); --for bug 6331673
2575: --
2576: if per_hrtca_merge.g_prev_last_name_len is null then
2577: begin
2578: --
2579: hr_utility.set_location('Before prev_last_name loop ',99);
2580: loop

Line 2593: per_hrtca_merge.g_prev_last_name_len := l_prev_last_name_len;

2589: -- clear the l_prev_last_name to save memory
2590: l_prev_last_name := NULL;
2591: -- the l_prev_last_name_len var will contain the length
2592: -- assign this to the pkg.global variable.
2593: per_hrtca_merge.g_prev_last_name_len := l_prev_last_name_len;
2594: --
2595: end;
2596: end if;
2597: -- Modiifed to fix 4201545 ends here

Line 2598: l_prev_last_name_len := per_hrtca_merge.g_prev_last_name_len;

2594: --
2595: end;
2596: end if;
2597: -- Modiifed to fix 4201545 ends here
2598: l_prev_last_name_len := per_hrtca_merge.g_prev_last_name_len;
2599: hr_utility.set_location('Before prev_last_name '||l_prev_last_name_len,99);
2600: -- End WWBUG 2735866
2601: --
2602: -- Assign variables to TCA structure based on legislation

Line 2817: fnd_message.set_token('PROCEDURE','per_hrtca_merge.create_tca_person');

2813: end if;
2814: -- END risgupta bug 4375792
2815: --
2816: fnd_message.set_name('PER', 'PER_289974_TCA_PERSON');
2817: fnd_message.set_token('PROCEDURE','per_hrtca_merge.create_tca_person');
2818: fnd_message.set_token('STEP','5');
2819: fnd_message.set_token('ERROR', sqlerrm);
2820: fnd_message.raise_error;
2821: --

Line 2835: per_hrtca_merge.set_party_in_hrms(

2831: -- it might be for an existing person. We therefore need to
2832: -- ripple the party_id down to all the tables in HR which hold
2833: -- it for this person.
2834: --
2835: per_hrtca_merge.set_party_in_hrms(
2836: p_party_id => p_rec.party_id,
2837: p_person_id => p_rec.person_id);
2838: --
2839: if p_rec.email_address is not null then

Line 2942: -- per_hrtca_merge.g_prev_last_name, if not assigned already

2938: get_legislation_code(p_business_group_id => p_rec.business_group_id);
2939: --
2940: -- START WWBUG 2735866
2941: -- Get the length of person_previous_last_name and assign it to
2942: -- per_hrtca_merge.g_prev_last_name, if not assigned already
2943: --
2944: -- Modiifed to fix 4201545 starts here
2945: hr_utility.set_location('Before prev_last_name loop ',99);
2946: per_hrtca_merge.g_prev_last_name_len := get_column_length('HZ_PERSON_PROFILES','PERSON_PREVIOUS_LAST_NAME',222); --for bug 6331673

Line 2946: per_hrtca_merge.g_prev_last_name_len := get_column_length('HZ_PERSON_PROFILES','PERSON_PREVIOUS_LAST_NAME',222); --for bug 6331673

2942: -- per_hrtca_merge.g_prev_last_name, if not assigned already
2943: --
2944: -- Modiifed to fix 4201545 starts here
2945: hr_utility.set_location('Before prev_last_name loop ',99);
2946: per_hrtca_merge.g_prev_last_name_len := get_column_length('HZ_PERSON_PROFILES','PERSON_PREVIOUS_LAST_NAME',222); --for bug 6331673
2947: --
2948: if per_hrtca_merge.g_prev_last_name_len is null then
2949: begin
2950: --

Line 2948: if per_hrtca_merge.g_prev_last_name_len is null then

2944: -- Modiifed to fix 4201545 starts here
2945: hr_utility.set_location('Before prev_last_name loop ',99);
2946: per_hrtca_merge.g_prev_last_name_len := get_column_length('HZ_PERSON_PROFILES','PERSON_PREVIOUS_LAST_NAME',222); --for bug 6331673
2947: --
2948: if per_hrtca_merge.g_prev_last_name_len is null then
2949: begin
2950: --
2951: hr_utility.set_location('Before prev_last_name loop ',99);
2952: loop

Line 2965: per_hrtca_merge.g_prev_last_name_len := l_prev_last_name_len;

2961: -- clear the l_prev_last_name to save memory
2962: l_prev_last_name := NULL;
2963: -- the l_prev_last_name_len var will contain the length
2964: -- assign this to the pkg.global variable.
2965: per_hrtca_merge.g_prev_last_name_len := l_prev_last_name_len;
2966: --
2967: end;
2968: --
2969: end if;

Line 2971: l_prev_last_name_len := per_hrtca_merge.g_prev_last_name_len;

2967: end;
2968: --
2969: end if;
2970: -- Modiifed to fix 4201545 ends here
2971: l_prev_last_name_len := per_hrtca_merge.g_prev_last_name_len;
2972: hr_utility.set_location('Before prev_last_name '||l_prev_last_name_len,99);
2973: -- End WWBUG 2735866
2974: --
2975: -- Assign variables to TCA structure based on legislation

Line 3181: fnd_message.set_token('PROCEDURE','per_hrtca_merge.update_tca_person');

3177: exception
3178: when others then
3179: --
3180: fnd_message.set_name('PER','PER_289974_TCA_PERSON');
3181: fnd_message.set_token('PROCEDURE','per_hrtca_merge.update_tca_person');
3182: fnd_message.set_token('STEP','10');
3183: -- fnd_message.set_token('ERROR', sqlerrm); Bug 5408534 should use l_msg_data
3184: fnd_message.set_token('ERROR', l_msg_data);
3185: fnd_message.raise_error;

Line 6156: per_hrtca_merge.create_tca_person( p_rec => l_per_rec );

6152: open csr_per_details(t_person_id(i));
6153: fetch csr_per_details into l_per_rec;
6154: close csr_per_details;
6155:
6156: per_hrtca_merge.create_tca_person( p_rec => l_per_rec );
6157:
6158: if l_per_rec.party_id is not null then
6159: --
6160: l_elig_person_cnt := l_elig_person_cnt+1;

Line 6365: per_hrtca_merge.add_party_for_purge (p_party_id => p_party_id);

6361: VALUES (p_party_id,'PURGE');
6362:
6363:
6364: /* hr_utility.set_location('before calling add_party_for_purge ', 12);
6365: per_hrtca_merge.add_party_for_purge (p_party_id => p_party_id);
6366: hr_utility.set_location('before calling purge_parties ', 13);
6367: per_hrtca_merge.purge_parties;
6368: hr_utility.set_location('After call ', 14);*/
6369:

Line 6367: per_hrtca_merge.purge_parties;

6363:
6364: /* hr_utility.set_location('before calling add_party_for_purge ', 12);
6365: per_hrtca_merge.add_party_for_purge (p_party_id => p_party_id);
6366: hr_utility.set_location('before calling purge_parties ', 13);
6367: per_hrtca_merge.purge_parties;
6368: hr_utility.set_location('After call ', 14);*/
6369:
6370: hr_utility.set_location('purge_person ', 13);
6371: --fix for bug 6620368 ends here.

Line 6377: end per_hrtca_merge;

6373: when others then
6374: ROLLBACK TO hr_delete_person;
6375: end purge_person;
6376: --
6377: end per_hrtca_merge;
6378: --