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.26.12020000.4 2012/07/05 04:34:13 amnaraya 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.26.12020000.4 2012/07/05 04:34:13 amnaraya 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 1118: l_system_person_type := per_hrtca_merge.get_system_person_type(

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

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

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

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

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

Line 2193: per_hrtca_merge.partycleanup(

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

Line 2474: l_tca_merge_action := per_hrtca_merge.get_tca_merge_actions

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

Line 2493: per_hrtca_merge.clear_party_from_hrms

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

Line 2536: per_hrtca_merge.add_party_for_purge

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

Line 2540: per_hrtca_merge.purge_parties;

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

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

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

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

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

Line 2579: if per_hrtca_merge.g_prev_last_name_len is null then

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

Line 2596: per_hrtca_merge.g_prev_last_name_len := l_prev_last_name_len;

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

Line 2601: l_prev_last_name_len := per_hrtca_merge.g_prev_last_name_len;

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

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

2818: end if;
2819: -- END risgupta bug 4375792
2820: --
2821: fnd_message.set_name('PER', 'PER_289974_TCA_PERSON');
2822: fnd_message.set_token('PROCEDURE','per_hrtca_merge.create_tca_person');
2823: fnd_message.set_token('STEP','5');
2824: fnd_message.set_token('ERROR', sqlerrm);
2825: fnd_message.raise_error;
2826: --

Line 2840: per_hrtca_merge.set_party_in_hrms(

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

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

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

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

2948: -- per_hrtca_merge.g_prev_last_name, if not assigned already
2949: --
2950: -- Modiifed to fix 4201545 starts here
2951: hr_utility.set_location('Before prev_last_name loop ',99);
2952: per_hrtca_merge.g_prev_last_name_len := get_column_length('HZ_PERSON_PROFILES','PERSON_PREVIOUS_LAST_NAME',222); --for bug 6331673
2953: --
2954: if per_hrtca_merge.g_prev_last_name_len is null then
2955: begin
2956: --

Line 2954: if per_hrtca_merge.g_prev_last_name_len is null then

2950: -- Modiifed to fix 4201545 starts here
2951: hr_utility.set_location('Before prev_last_name loop ',99);
2952: per_hrtca_merge.g_prev_last_name_len := get_column_length('HZ_PERSON_PROFILES','PERSON_PREVIOUS_LAST_NAME',222); --for bug 6331673
2953: --
2954: if per_hrtca_merge.g_prev_last_name_len is null then
2955: begin
2956: --
2957: hr_utility.set_location('Before prev_last_name loop ',99);
2958: loop

Line 2971: per_hrtca_merge.g_prev_last_name_len := l_prev_last_name_len;

2967: -- clear the l_prev_last_name to save memory
2968: l_prev_last_name := NULL;
2969: -- the l_prev_last_name_len var will contain the length
2970: -- assign this to the pkg.global variable.
2971: per_hrtca_merge.g_prev_last_name_len := l_prev_last_name_len;
2972: --
2973: end;
2974: --
2975: end if;

Line 2977: l_prev_last_name_len := per_hrtca_merge.g_prev_last_name_len;

2973: end;
2974: --
2975: end if;
2976: -- Modiifed to fix 4201545 ends here
2977: l_prev_last_name_len := per_hrtca_merge.g_prev_last_name_len;
2978: hr_utility.set_location('Before prev_last_name '||l_prev_last_name_len,99);
2979: -- End WWBUG 2735866
2980: --
2981: -- Assign variables to TCA structure based on legislation

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

3191: exception
3192: when others then
3193: --
3194: fnd_message.set_name('PER','PER_289974_TCA_PERSON');
3195: fnd_message.set_token('PROCEDURE','per_hrtca_merge.update_tca_person');
3196: fnd_message.set_token('STEP','10');
3197: -- fnd_message.set_token('ERROR', sqlerrm); Bug 5408534 should use l_msg_data
3198: fnd_message.set_token('ERROR', l_msg_data);
3199: fnd_message.raise_error;

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

6172: open csr_per_details(t_person_id(i));
6173: fetch csr_per_details into l_per_rec;
6174: close csr_per_details;
6175:
6176: per_hrtca_merge.create_tca_person( p_rec => l_per_rec );
6177:
6178: if l_per_rec.party_id is not null then
6179: --
6180: l_elig_person_cnt := l_elig_person_cnt+1;

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

6381: VALUES (p_party_id,'PURGE');
6382:
6383:
6384: /* hr_utility.set_location('before calling add_party_for_purge ', 12);
6385: per_hrtca_merge.add_party_for_purge (p_party_id => p_party_id);
6386: hr_utility.set_location('before calling purge_parties ', 13);
6387: per_hrtca_merge.purge_parties;
6388: hr_utility.set_location('After call ', 14);*/
6389:

Line 6387: per_hrtca_merge.purge_parties;

6383:
6384: /* hr_utility.set_location('before calling add_party_for_purge ', 12);
6385: per_hrtca_merge.add_party_for_purge (p_party_id => p_party_id);
6386: hr_utility.set_location('before calling purge_parties ', 13);
6387: per_hrtca_merge.purge_parties;
6388: hr_utility.set_location('After call ', 14);*/
6389:
6390: hr_utility.set_location('purge_person ', 13);
6391: --fix for bug 6620368 ends here.

Line 6397: end per_hrtca_merge;

6393: when others then
6394: ROLLBACK TO hr_delete_person;
6395: end purge_person;
6396: --
6397: end per_hrtca_merge;
6398: --