[Home] [Help]
469: -- ---------------------------------------------------------------------------
470: --
471: -- Desciption :
472: --
473: -- If PARENT_TABLE <> 'PER_ALL_PEOPLE_F', raise an error. This is just a
474: -- temporary
475: -- solution which will require re-thinking when new parent tables are added
476: -- because we probably dont want to hard code all these.
477: --
515: -- Check that the parent_table is in the per_people table.
516: -- This is a temporary solution.
517: --
518: hr_utility.set_location('IJH: Table name is: '||p_parent_table, 2);
519: If p_parent_table <> 'PER_ALL_PEOPLE_F' then
520: hr_utility.set_location('Failed parent Table check', 4);
521: hr_utility.set_message(801, 'HR_51532_PHN_FK_NOT_FOUND');
522: hr_utility.raise_error;
523: end if;
544: -- ---------------------------------------------------------------------------
545: --
546: -- Desciption :
547: --
548: -- If PARENT_TABLE = 'PER_ALL_PEOPLE_F', verify that the value in PARENT_ID
549: -- is in the per_all_people_f table. This is just a temporary solution
550: -- which will require re-thinking when new parent tables are added because
551: -- we probably dont want to hard code all these.
552: --
545: --
546: -- Desciption :
547: --
548: -- If PARENT_TABLE = 'PER_ALL_PEOPLE_F', verify that the value in PARENT_ID
549: -- is in the per_all_people_f table. This is just a temporary solution
550: -- which will require re-thinking when new parent tables are added because
551: -- we probably dont want to hard code all these.
552: --
553: -- Pre-conditions :
584: l_api_updating boolean;
585: --
586: cursor csr_valid_parent_id is
587: select per.person_id
588: from per_all_people_f per
589: where per.person_id = p_parent_id
590: and rownum <2; -- performance bug fix 3387297
591: --
592: begin
683: --
684: --
685: -- Description:
686: -- - Validates that the person_id and the party_id are matched in
687: -- per_all_people_f
688: -- and if person_id is not null and party_id is null, derive party_id
689: -- from per_all_people_f from person_id
690: --
691: -- Pre_conditions:
685: -- Description:
686: -- - Validates that the person_id and the party_id are matched in
687: -- per_all_people_f
688: -- and if person_id is not null and party_id is null, derive party_id
689: -- from per_all_people_f from person_id
690: --
691: -- Pre_conditions:
692: -- A valid business_group_id
693: --
718: -- cursor to check that the party_id maches person_id
719: --
720: cursor csr_get_party_id is
721: select party_id
722: from per_all_people_f per
723: where per.person_id = p_rec.parent_id
724: and p_effective_date
725: between per.effective_start_date
726: and nvl(per.effective_end_date,hr_api.g_eot)
759: );
760: end if;
761: else
762: --
763: -- derive party_id from per_all_people_f using parent_id
764: --
765: hr_utility.set_location(l_proc,50);
766: p_rec.party_id := l_party_id;
767: end if;
1216: Begin
1217: hr_utility.set_location('Entering:'||l_proc, 5);
1218: --
1219: --
1220: if p_rec.parent_table = 'PER_ALL_PEOPLE_F' then
1221: per_per_bus.set_security_group_id
1222: (
1223: p_person_id => p_rec.parent_id
1224: ,p_associated_column1 => per_phn_shd.g_tab_nam||'.PARENT_ID'
1343: --
1344: Begin
1345: hr_utility.set_location('Entering:'||l_proc, 5);
1346: --
1347: if p_rec.parent_table = 'PER_ALL_PEOPLE_F' then
1348: per_per_bus.set_security_group_id
1349: (
1350: p_person_id => p_rec.parent_id
1351: ,p_associated_column1 => per_phn_shd.g_tab_nam||'.PARENT_ID'
1491: cursor csr_leg_code is
1492: select pbg.legislation_code
1493: from per_business_groups pbg
1494: , per_phones phn
1495: , per_all_people_f per
1496: where phn.phone_id = p_phone_id
1497: and phn.parent_id = per.person_id
1498: and pbg.business_group_id = per.business_group_id;
1499: --
1555:
1556: is
1557:
1558: begin
1559: if p_parent_table = 'PER_ALL_PEOPLE_F'
1560: then
1561: return per_per_bus.return_legislation_code(p_person_id => p_parent_id);
1562: else
1563: hr_utility.set_message(801, 'HR_51532_PHN_FK_NOT_FOUND');