25: --
26: cursor csr_sec_grp is
27: select pbg.security_group_id
28: from per_business_groups_perf pbg
29: , per_gen_hierarchy_nodes pgn
30: where pgn.hierarchy_node_id = p_hierarchy_node_id
31: and pbg.business_group_id (+) = pgn.business_group_id;
32: --
33: -- Declare local variables
85: --
86: cursor csr_leg_code is
87: select pbg.legislation_code
88: from per_business_groups_perf pbg
89: , per_gen_hierarchy_nodes pgn
90: where pgn.hierarchy_node_id = p_hierarchy_node_id
91: and pbg.business_group_id (+) = pgn.business_group_id;
92: --
93: -- Declare local variables
254: then
255: --
256: hr_dflex_utility.ins_or_upd_descflex_attribs
257: (p_appl_short_name => 'PER'
258: ,p_descflex_name => 'PER_GEN_HIERARCHY_NODES_DDF'
259: ,p_attribute_category => p_rec.information_category
260: ,p_attribute1_name => 'INFORMATION1'
261: ,p_attribute1_value => p_rec.information1
262: ,p_attribute2_name => 'INFORMATION2'
433: -- b) During insert.
434: --
435: hr_dflex_utility.ins_or_upd_descflex_attribs
436: (p_appl_short_name => 'PER'
437: ,p_descflex_name => 'PER_GEN_HIERARCHY_NODES'
438: ,p_attribute_category => p_rec.attribute_category
439: ,p_attribute1_name => 'ATTRIBUTE1'
440: ,p_attribute1_value => p_rec.attribute1
441: ,p_attribute2_name => 'ATTRIBUTE2'
582: -- ----------------------------------------------------------------------------
583: -- |---------------------------< chk_entity_id >------------------------------|
584: -- ----------------------------------------------------------------------------
585: Procedure chk_entity_id
586: ( p_entity_id in per_gen_hierarchy_nodes.entity_id%TYPE
587: , p_business_group_id in hr_all_organization_units.business_group_id%TYPE
588: , p_node_type in per_gen_hierarchy_nodes.node_type%TYPE
589: , p_hierarchy_version_id in per_gen_hierarchy_versions.hierarchy_version_id%TYPE
590: ) IS
584: -- ----------------------------------------------------------------------------
585: Procedure chk_entity_id
586: ( p_entity_id in per_gen_hierarchy_nodes.entity_id%TYPE
587: , p_business_group_id in hr_all_organization_units.business_group_id%TYPE
588: , p_node_type in per_gen_hierarchy_nodes.node_type%TYPE
589: , p_hierarchy_version_id in per_gen_hierarchy_versions.hierarchy_version_id%TYPE
590: ) IS
591: --
592: l_ent_exists varchar2(1) := 'Y';
620: 'Multi Work Site Information');
621: --
622: cursor csr_ent_exists is
623: select 'Y'
624: from per_gen_hierarchy_nodes
625: where entity_id = p_entity_id
626: and hierarchy_version_id = p_hierarchy_version_id
627: and node_type = p_node_type;
628: --
722: -- ----------------------------------------------------------------------------
723: --
724: Procedure chk_hierarchy_version_id
725: ( p_hierarchy_version_id in per_gen_hierarchy_versions.hierarchy_version_id%TYPE
726: , p_hierarchy_node_id in per_gen_hierarchy_nodes.hierarchy_node_id%TYPE
727: , p_object_version_number in per_gen_hierarchy_nodes.object_version_number%TYPE
728: ) IS
729: --
730: -- Declare local variables
723: --
724: Procedure chk_hierarchy_version_id
725: ( p_hierarchy_version_id in per_gen_hierarchy_versions.hierarchy_version_id%TYPE
726: , p_hierarchy_node_id in per_gen_hierarchy_nodes.hierarchy_node_id%TYPE
727: , p_object_version_number in per_gen_hierarchy_nodes.object_version_number%TYPE
728: ) IS
729: --
730: -- Declare local variables
731: --
773: -- |-------------------------< chk_seq >--------------------------------------|
774: -- ----------------------------------------------------------------------------
775: --
776: PROCEDURE chk_seq
777: (p_seq IN per_gen_hierarchy_nodes.seq%TYPE
778: ,p_hierarchy_version_id IN per_gen_hierarchy_versions.hierarchy_version_id%TYPE
779: ,p_parent_hierarchy_node_id IN per_gen_hierarchy_nodes.parent_hierarchy_node_id%TYPE
780: ,p_hierarchy_node_id IN per_gen_hierarchy_nodes.hierarchy_node_id%TYPE
781: ,p_object_version_number IN per_gen_hierarchy_nodes.object_version_number%TYPE
775: --
776: PROCEDURE chk_seq
777: (p_seq IN per_gen_hierarchy_nodes.seq%TYPE
778: ,p_hierarchy_version_id IN per_gen_hierarchy_versions.hierarchy_version_id%TYPE
779: ,p_parent_hierarchy_node_id IN per_gen_hierarchy_nodes.parent_hierarchy_node_id%TYPE
780: ,p_hierarchy_node_id IN per_gen_hierarchy_nodes.hierarchy_node_id%TYPE
781: ,p_object_version_number IN per_gen_hierarchy_nodes.object_version_number%TYPE
782: )
783: IS
776: PROCEDURE chk_seq
777: (p_seq IN per_gen_hierarchy_nodes.seq%TYPE
778: ,p_hierarchy_version_id IN per_gen_hierarchy_versions.hierarchy_version_id%TYPE
779: ,p_parent_hierarchy_node_id IN per_gen_hierarchy_nodes.parent_hierarchy_node_id%TYPE
780: ,p_hierarchy_node_id IN per_gen_hierarchy_nodes.hierarchy_node_id%TYPE
781: ,p_object_version_number IN per_gen_hierarchy_nodes.object_version_number%TYPE
782: )
783: IS
784: l_proc VARCHAR2(72) := g_package||'chk_seq';
777: (p_seq IN per_gen_hierarchy_nodes.seq%TYPE
778: ,p_hierarchy_version_id IN per_gen_hierarchy_versions.hierarchy_version_id%TYPE
779: ,p_parent_hierarchy_node_id IN per_gen_hierarchy_nodes.parent_hierarchy_node_id%TYPE
780: ,p_hierarchy_node_id IN per_gen_hierarchy_nodes.hierarchy_node_id%TYPE
781: ,p_object_version_number IN per_gen_hierarchy_nodes.object_version_number%TYPE
782: )
783: IS
784: l_proc VARCHAR2(72) := g_package||'chk_seq';
785: l_api_updating BOOLEAN;
785: l_api_updating BOOLEAN;
786: --
787: cursor c1 is
788: select seq
789: from per_gen_hierarchy_nodes
790: where seq = p_seq
791: and hierarchy_version_id = p_hierarchy_version_id
792: and parent_hierarchy_node_id = p_parent_hierarchy_node_id;
793: --
836: -- |-------------------------< chk_node_type >--------------------------------|
837: -- ----------------------------------------------------------------------------
838: --
839: PROCEDURE chk_node_type
840: ( p_node_type IN per_gen_hierarchy_nodes.node_type%TYPE
841: ,p_effective_date IN DATE
842: ,p_hierarchy_node_id IN per_gen_hierarchy_nodes.hierarchy_node_id%TYPE
843: ,p_hierarchy_version_id IN per_gen_hierarchy_nodes.hierarchy_version_id%TYPE
844: ,p_object_version_number IN per_gen_hierarchy_nodes.object_version_number%TYPE
838: --
839: PROCEDURE chk_node_type
840: ( p_node_type IN per_gen_hierarchy_nodes.node_type%TYPE
841: ,p_effective_date IN DATE
842: ,p_hierarchy_node_id IN per_gen_hierarchy_nodes.hierarchy_node_id%TYPE
843: ,p_hierarchy_version_id IN per_gen_hierarchy_nodes.hierarchy_version_id%TYPE
844: ,p_object_version_number IN per_gen_hierarchy_nodes.object_version_number%TYPE
845: )
846: IS
839: PROCEDURE chk_node_type
840: ( p_node_type IN per_gen_hierarchy_nodes.node_type%TYPE
841: ,p_effective_date IN DATE
842: ,p_hierarchy_node_id IN per_gen_hierarchy_nodes.hierarchy_node_id%TYPE
843: ,p_hierarchy_version_id IN per_gen_hierarchy_nodes.hierarchy_version_id%TYPE
844: ,p_object_version_number IN per_gen_hierarchy_nodes.object_version_number%TYPE
845: )
846: IS
847: l_proc VARCHAR2(72) := g_package||'chk_node_type';
840: ( p_node_type IN per_gen_hierarchy_nodes.node_type%TYPE
841: ,p_effective_date IN DATE
842: ,p_hierarchy_node_id IN per_gen_hierarchy_nodes.hierarchy_node_id%TYPE
843: ,p_hierarchy_version_id IN per_gen_hierarchy_nodes.hierarchy_version_id%TYPE
844: ,p_object_version_number IN per_gen_hierarchy_nodes.object_version_number%TYPE
845: )
846: IS
847: l_proc VARCHAR2(72) := g_package||'chk_node_type';
848: l_api_updating BOOLEAN;
849: l_exists varchar2(1);
850: --
851: cursor c1 is
852: select 'Y'
853: from per_gen_hierarchy_nodes
854: where node_type = 'PAR'
855: and hierarchy_version_id = p_hierarchy_version_id;
856: --
857: --
915: -- |---------------------------< chk_parent_hierarchy_node_id >---------------|
916: -- ----------------------------------------------------------------------------
917: --
918: Procedure chk_parent_hierarchy_node_id
919: (p_parent_hierarchy_node_id in per_gen_hierarchy_nodes.parent_hierarchy_node_id%TYPE
920: , p_hierarchy_version_id in per_gen_hierarchy_nodes.hierarchy_version_id%TYPE
921: , p_node_type in per_gen_hierarchy_nodes.node_type%TYPE
922: ,p_hierarchy_node_id in per_gen_hierarchy_nodes.hierarchy_node_id%TYPE
923: ,p_object_version_number in per_gen_hierarchy_nodes.object_version_number%TYPE
916: -- ----------------------------------------------------------------------------
917: --
918: Procedure chk_parent_hierarchy_node_id
919: (p_parent_hierarchy_node_id in per_gen_hierarchy_nodes.parent_hierarchy_node_id%TYPE
920: , p_hierarchy_version_id in per_gen_hierarchy_nodes.hierarchy_version_id%TYPE
921: , p_node_type in per_gen_hierarchy_nodes.node_type%TYPE
922: ,p_hierarchy_node_id in per_gen_hierarchy_nodes.hierarchy_node_id%TYPE
923: ,p_object_version_number in per_gen_hierarchy_nodes.object_version_number%TYPE
924: ) IS
917: --
918: Procedure chk_parent_hierarchy_node_id
919: (p_parent_hierarchy_node_id in per_gen_hierarchy_nodes.parent_hierarchy_node_id%TYPE
920: , p_hierarchy_version_id in per_gen_hierarchy_nodes.hierarchy_version_id%TYPE
921: , p_node_type in per_gen_hierarchy_nodes.node_type%TYPE
922: ,p_hierarchy_node_id in per_gen_hierarchy_nodes.hierarchy_node_id%TYPE
923: ,p_object_version_number in per_gen_hierarchy_nodes.object_version_number%TYPE
924: ) IS
925: --
918: Procedure chk_parent_hierarchy_node_id
919: (p_parent_hierarchy_node_id in per_gen_hierarchy_nodes.parent_hierarchy_node_id%TYPE
920: , p_hierarchy_version_id in per_gen_hierarchy_nodes.hierarchy_version_id%TYPE
921: , p_node_type in per_gen_hierarchy_nodes.node_type%TYPE
922: ,p_hierarchy_node_id in per_gen_hierarchy_nodes.hierarchy_node_id%TYPE
923: ,p_object_version_number in per_gen_hierarchy_nodes.object_version_number%TYPE
924: ) IS
925: --
926: l_proc varchar2(72) := g_package||'chk_parent_hierarchy_node_id';
919: (p_parent_hierarchy_node_id in per_gen_hierarchy_nodes.parent_hierarchy_node_id%TYPE
920: , p_hierarchy_version_id in per_gen_hierarchy_nodes.hierarchy_version_id%TYPE
921: , p_node_type in per_gen_hierarchy_nodes.node_type%TYPE
922: ,p_hierarchy_node_id in per_gen_hierarchy_nodes.hierarchy_node_id%TYPE
923: ,p_object_version_number in per_gen_hierarchy_nodes.object_version_number%TYPE
924: ) IS
925: --
926: l_proc varchar2(72) := g_package||'chk_parent_hierarchy_node_id';
927: l_exists varchar2(1) := 'N';
928: l_api_updating boolean;
929: --
930: cursor csr_par_node is
931: select 'Y'
932: from per_gen_hierarchy_nodes
933: where hierarchy_version_id = p_hierarchy_version_id
934: and hierarchy_node_id = p_parent_hierarchy_node_id;
935: Begin
936: --
987: -- ----------------------------------------------------------------------------
988: -- |---------------------------< chk_delete >---------------------------------|
989: -- ----------------------------------------------------------------------------
990: Procedure chk_delete
991: ( p_hierarchy_node_id in per_gen_hierarchy_nodes.hierarchy_node_id%TYPE
992: ) is
993: --
994: -- Declare local variables
995: --
997: l_proc varchar2(72) := g_package||'chk_delete';
998: --
999: cursor csr_node_id is
1000: select 'Y'
1001: from per_gen_hierarchy_nodes
1002: where parent_hierarchy_node_id = p_hierarchy_node_id;
1003:
1004: cursor csr_ev is
1005: select 'X'