55: close csr_sec_grp;
56: --
57: -- The primary key is invalid therefore we must error
58: --
59: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
60: fnd_message.raise_error;
61: --
62: end if;
63: close csr_sec_grp;
56: --
57: -- The primary key is invalid therefore we must error
58: --
59: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
60: fnd_message.raise_error;
61: --
62: end if;
63: close csr_sec_grp;
64: --
128: --
129: -- The primary key is invalid therefore we must error
130: --
131: close csr_leg_code;
132: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
133: fnd_message.raise_error;
134: end if;
135: hr_utility.set_location(l_proc,30);
136: --
129: -- The primary key is invalid therefore we must error
130: --
131: close csr_leg_code;
132: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
133: fnd_message.raise_error;
134: end if;
135: hr_utility.set_location(l_proc,30);
136: --
137: -- Set the global variables so the values are
549: IF NOT per_pgh_shd.api_updating
550: (p_hierarchy_id => p_rec.hierarchy_id
551: ,p_object_version_number => p_rec.object_version_number
552: ) THEN
553: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
554: fnd_message.set_token('PROCEDURE ', l_proc);
555: fnd_message.set_token('STEP ', '5');
556: fnd_message.raise_error;
557: END IF;
550: (p_hierarchy_id => p_rec.hierarchy_id
551: ,p_object_version_number => p_rec.object_version_number
552: ) THEN
553: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
554: fnd_message.set_token('PROCEDURE ', l_proc);
555: fnd_message.set_token('STEP ', '5');
556: fnd_message.raise_error;
557: END IF;
558: --
551: ,p_object_version_number => p_rec.object_version_number
552: ) THEN
553: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
554: fnd_message.set_token('PROCEDURE ', l_proc);
555: fnd_message.set_token('STEP ', '5');
556: fnd_message.raise_error;
557: END IF;
558: --
559: -- EDIT_HERE: Add checks to ensure non-updateable args have
552: ) THEN
553: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
554: fnd_message.set_token('PROCEDURE ', l_proc);
555: fnd_message.set_token('STEP ', '5');
556: fnd_message.raise_error;
557: END IF;
558: --
559: -- EDIT_HERE: Add checks to ensure non-updateable args have
560: -- not been updated.
622: hr_utility.set_location('Entering:'|| l_proc, 10);
623: --
624: if p_hierarchy_id is not null then
625: --
626: fnd_message.set_name('PER', 'HR_289056_PGH_PK_NOT_NULL');
627: fnd_message.raise_error;
628: --
629: end if;
630: --
623: --
624: if p_hierarchy_id is not null then
625: --
626: fnd_message.set_name('PER', 'HR_289056_PGH_PK_NOT_NULL');
627: fnd_message.raise_error;
628: --
629: end if;
630: --
631: hr_utility.set_location('Leaving:'||l_proc, 30);
717: --
718: ELSE
719: --
720: CLOSE csr_unique_name;
721: fnd_message.set_name('PER', 'HR_289057_PGH_DUP_HIER_NAME');
722: fnd_message.raise_error;
723: --
724: END IF;
725: --
718: ELSE
719: --
720: CLOSE csr_unique_name;
721: fnd_message.set_name('PER', 'HR_289057_PGH_DUP_HIER_NAME');
722: fnd_message.raise_error;
723: --
724: END IF;
725: --
726: end if;
787: (p_effective_date => p_effective_date
788: ,p_lookup_type => 'HIERARCHY_TYPE'
789: ,p_lookup_code => p_type) then
790: --
791: fnd_message.set_name('PER', 'HR_289058_PGH_INV_HIER_TYPE');
792: fnd_message.raise_error;
793: --
794: end if;
795:
788: ,p_lookup_type => 'HIERARCHY_TYPE'
789: ,p_lookup_code => p_type) then
790: --
791: fnd_message.set_name('PER', 'HR_289058_PGH_INV_HIER_TYPE');
792: fnd_message.raise_error;
793: --
794: end if;
795:
796: -- Validate that for a custom calendar hierarchy or a geographical hierarchy, the hierarchy
798: if p_business_group_id is NULL then
799: if substr(p_type,0,7) = 'PER_CAL' then
800: if nvl(fnd_profile.value('HR_CROSS_BUSINESS_GROUP'),'N') <> 'Y' then
801: -- raise error
802: fnd_message.set_name('PER', 'PER_289185_CAL_GLB_INV');
803: fnd_message.raise_error;
804: end if;
805: end if;
806: end if;
799: if substr(p_type,0,7) = 'PER_CAL' then
800: if nvl(fnd_profile.value('HR_CROSS_BUSINESS_GROUP'),'N') <> 'Y' then
801: -- raise error
802: fnd_message.set_name('PER', 'PER_289185_CAL_GLB_INV');
803: fnd_message.raise_error;
804: end if;
805: end if;
806: end if;
807: --
882: If csr_hierarchy_exists%found and l_duplicate_name = 'N'
883: then
884: hr_utility.set_location(l_proc, 30);
885: Close csr_hierarchy_exists;
886: fnd_message.set_name('PER','HR_449062_PGH_DUPLICATE_NAME');
887: fnd_message.raise_error;
888: else
889: Close csr_hierarchy_exists;
890: End if;
883: then
884: hr_utility.set_location(l_proc, 30);
885: Close csr_hierarchy_exists;
886: fnd_message.set_name('PER','HR_449062_PGH_DUPLICATE_NAME');
887: fnd_message.raise_error;
888: else
889: Close csr_hierarchy_exists;
890: End if;
891: --
937: --
938: else
939: --
940: close csr_vers_exists;
941: fnd_message.set_name('PER', 'HR_289059_PGH_DEL_HIERARCHY');
942: fnd_message.raise_error;
943: --
944: end if;
945:
938: else
939: --
940: close csr_vers_exists;
941: fnd_message.set_name('PER', 'HR_289059_PGH_DEL_HIERARCHY');
942: fnd_message.raise_error;
943: --
944: end if;
945:
946: -- prevent delete if Calendar Hierarchy child record exists
949: if csr_ev%notfound then
950: close csr_ev;
951: else
952: close csr_ev;
953: fnd_message.set_name('PER', 'HR_449078_CAL_ENTRY_VAL_EXISTS');
954: fnd_message.raise_error;
955: end if;
956:
957: --
950: close csr_ev;
951: else
952: close csr_ev;
953: fnd_message.set_name('PER', 'HR_449078_CAL_ENTRY_VAL_EXISTS');
954: fnd_message.raise_error;
955: end if;
956:
957: --
958: hr_utility.set_location('Leaving :'||l_proc, 30);