945: --
946: --
947: -- Retrieve Current person analysis Details from person_analyses
948: --
949: l_api_updating := per_pea_shd.api_updating
950: (p_person_analysis_id => p_person_analysis_id
951: ,p_object_version_number => p_pea_object_version_number);
952: --
953: hr_utility.set_location(l_proc, 40);
960: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
961: hr_utility.raise_error;
962: else
963: hr_utility.set_location(l_proc, 60);
964: l_id_flex_num := per_pea_shd.g_old_rec.id_flex_num;
965: l_business_group_id := per_pea_shd.g_old_rec.business_group_id;
966: end if;
967: --
968: hr_utility.set_location(l_proc, 70);
961: hr_utility.raise_error;
962: else
963: hr_utility.set_location(l_proc, 60);
964: l_id_flex_num := per_pea_shd.g_old_rec.id_flex_num;
965: l_business_group_id := per_pea_shd.g_old_rec.business_group_id;
966: end if;
967: --
968: hr_utility.set_location(l_proc, 70);
969: --
973: --
974: if l_analysis_criteria_id is null
975: then
976: --
977: l_analysis_criteria_id := per_pea_shd.g_old_rec.analysis_criteria_id;
978: --
979: hr_kflex_utility.upd_or_sel_keyflex_comb
980: (p_appl_short_name => 'PER'
981: ,p_flex_code => 'PEA'
1337: begin
1338: --
1339: hr_utility.set_location('Entering:'|| l_proc, 10);
1340: --
1341: per_pea_shd.lck
1342: (
1343: p_person_analysis_id => p_person_analysis_id
1344: ,p_object_version_number => p_pea_object_version_number
1345: );