728: end if;
729: -- bug 4632157 ends
730: --
731: hr_utility.set_location(l_msg_data,10);
732: fnd_message.raise_error;
733:
734: end if;
735:
736:
782: end loop;
783: end if;
784: -- bug 4632157 ends
785: hr_utility.set_location(l_msg_data,10);
786: fnd_message.raise_error;
787: --
788: end if;
789: --
790:
843: end loop;
844: end if;
845: -- bug 4632157 ends
846: hr_utility.set_location(l_msg_data,10);
847: fnd_message.raise_error;
848: --
849: end if;
850: -- added <> 'NULL' condition below for bug 4694355
851: ELSIF ( l_c1.email_address is not null and l_c1.email_address <> 'NULL' )
893: end loop;
894: end if;
895: -- bug 4632157 ends
896: hr_utility.set_location(l_msg_data,10);
897: fnd_message.raise_error;
898: --
899: end if;
900:
901: END IF;
954: end loop;
955: end if;
956: -- bug 4632157 ends
957: hr_utility.set_location(l_msg_data,10);
958: fnd_message.raise_error;
959: --
960: end if;
961:
962: END IF;
1917: ** The identify got an error, details of which are in l_errbuf.
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;
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
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
1927: /* The identify candidates was successful so now actually perform
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
1927: /* The identify candidates was successful so now actually perform
1928: ** the purge of those parties.
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
1927: /* The identify candidates was successful so now actually perform
1928: ** the purge of those parties.
1929: */
1936: /*
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;
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;
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;
1946: end if;
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;
1946: end if;
1947:
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;
1946: end if;
1947:
1948: /* Clear the temp table.
2800: l_msg_data := fnd_msg_pub.get(p_encoded => fnd_api.g_false);
2801: end loop;
2802: end if;
2803: -- bug 4632157 ends
2804: fnd_message.raise_error;
2805: --
2806: end if;
2807: exception
2808: when others then
2812: l_hzprofile_changed := 'N';
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;
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: --
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: --
2822: end;
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: --
2822: end;
2823: --
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: --
2822: end;
2823: --
2824: -- Assign party_id back to party_id for per_all_people_f row
3168: --
3169: if l_return_status in ('E','U') then
3170: --
3171: hr_utility.set_location(substr(l_msg_data,1,80),10);
3172: fnd_message.set_token('POO',p_rec.party_id);
3173: fnd_message.raise_error;
3174: --
3175: end if;
3176:
3169: if l_return_status in ('E','U') then
3170: --
3171: hr_utility.set_location(substr(l_msg_data,1,80),10);
3172: fnd_message.set_token('POO',p_rec.party_id);
3173: fnd_message.raise_error;
3174: --
3175: end if;
3176:
3177: exception
3176:
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);
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;
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;
3186: --
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;
3186: --
3187: end;
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;
3186: --
3187: end;
3188: --
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;
3186: --
3187: end;
3188: --
3189: -- Update the reference for special case where we have created a party