[Home] [Help]
18: -- ---------------------------------------------------------------------------
19: --
20: PROCEDURE set_security_group_id
21: (p_cagr_entitlement_id IN NUMBER
22: ,p_collective_agreement_id IN per_cagr_entitlements.collective_agreement_ID%TYPE
23: ) IS
24: --
25: -- Declare cursor
26: --
26: --
27: CURSOR csr_sec_grp IS
28: SELECT pbg.security_group_id
29: FROM per_business_groups pbg,
30: per_cagr_entitlements pce,
31: per_collective_agreements pca
32: WHERE pce.cagr_entitlement_id = p_cagr_entitlement_id
33: AND pca.collective_agreement_id = p_collective_agreement_id
34: AND pbg.business_group_id = pca.business_group_id;
81: -- ---------------------------------------------------------------------------
82: --
83: FUNCTION return_legislation_code
84: (p_cagr_entitlement_id IN NUMBER
85: ,p_collective_agreement_id IN per_cagr_entitlements.collective_agreement_ID%TYPE
86: )
87: RETURN VARCHAR2 IS
88: --
89: -- Declare cursor
91:
92: CURSOR csr_leg_code IS
93: SELECT pbg.legislation_code
94: FROM per_business_groups pbg,
95: per_cagr_entitlements pce,
96: per_collective_agreements pca
97: WHERE pce.cagr_entitlement_id = p_cagr_entitlement_id
98: AND pca.collective_agreement_id = p_collective_agreement_id
99: AND pbg.business_group_id = pca.business_group_id;
279: --
280: -- ---------------------------------------------------------------------------
281: --
282: PROCEDURE chk_status
283: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
284: ,p_effective_date IN DATE
285: ,p_status IN per_cagr_entitlements.status%TYPE
286: ) IS
287: --
281: --
282: PROCEDURE chk_status
283: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
284: ,p_effective_date IN DATE
285: ,p_status IN per_cagr_entitlements.status%TYPE
286: ) IS
287: --
288: -- Declare Local variables
289: --
370: --
371: -- ---------------------------------------------------------------------------
372: --
373: PROCEDURE chk_message_level
374: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
375: ,p_effective_date IN DATE
376: ,p_message_level IN per_cagr_entitlements.message_level%TYPE
377: ) IS
378: --
372: --
373: PROCEDURE chk_message_level
374: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
375: ,p_effective_date IN DATE
376: ,p_message_level IN per_cagr_entitlements.message_level%TYPE
377: ) IS
378: --
379: -- Declare Local variables
380: --
461: --
462: -- ---------------------------------------------------------------------------
463: --
464: PROCEDURE chk_formula_criteria_mismatch
465: (p_formula_id IN per_cagr_entitlements.formula_id%TYPE
466: ,p_formula_criteria IN per_cagr_entitlements.formula_criteria%TYPE
467: ) IS
468: --
469: -- Declare Local variables
462: -- ---------------------------------------------------------------------------
463: --
464: PROCEDURE chk_formula_criteria_mismatch
465: (p_formula_id IN per_cagr_entitlements.formula_id%TYPE
466: ,p_formula_criteria IN per_cagr_entitlements.formula_criteria%TYPE
467: ) IS
468: --
469: -- Declare Local variables
470: --
530: --
531: -- ---------------------------------------------------------------------------
532: --
533: PROCEDURE chk_formula_criteria
534: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
535: ,p_effective_date IN DATE
536: ,p_formula_id IN per_cagr_entitlements.formula_id%TYPE
537: ,p_formula_criteria IN per_cagr_entitlements.formula_criteria%TYPE
538: ) IS
532: --
533: PROCEDURE chk_formula_criteria
534: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
535: ,p_effective_date IN DATE
536: ,p_formula_id IN per_cagr_entitlements.formula_id%TYPE
537: ,p_formula_criteria IN per_cagr_entitlements.formula_criteria%TYPE
538: ) IS
539: --
540: -- Declare Local variables
533: PROCEDURE chk_formula_criteria
534: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
535: ,p_effective_date IN DATE
536: ,p_formula_id IN per_cagr_entitlements.formula_id%TYPE
537: ,p_formula_criteria IN per_cagr_entitlements.formula_criteria%TYPE
538: ) IS
539: --
540: -- Declare Local variables
541: --
622: --
623: -- ---------------------------------------------------------------------------
624: --
625: PROCEDURE chk_cagr_entitlement_item_id
626: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
627: ,p_cagr_entitlement_item_id IN NUMBER) IS
628: --
629: -- Declare Cursors
630: --
635: --
636: -- Declare Local variables
637: --
638: l_proc VARCHAR2(72) := g_package||'chk_cagr_entitlement_item_id';
639: l_item_id per_cagr_entitlements.cagr_entitlement_item_id%TYPE;
640: --
641: BEGIN
642: --
643: hr_utility.set_location('Entering : '||l_proc,10);
703: --
704: -- ---------------------------------------------------------------------------
705: --
706: PROCEDURE chk_collective_agreement_id
707: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
708: ,p_business_group_id IN NUMBER
709: ,p_collective_agreement_id IN NUMBER) IS
710: --
711: -- Declare Cursors
718: --
719: -- Declare Local variables
720: --
721: l_proc VARCHAR2(72) := g_package||'chk_collective_agreement_id';
722: l_item_id per_cagr_entitlements.collective_agreement_id%TYPE;
723: --
724: BEGIN
725: --
726: hr_utility.set_location('Entering : '||l_proc,10);
788: --
789: -- ---------------------------------------------------------------------------
790: --
791: PROCEDURE chk_formula_id
792: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
793: ,p_effective_date IN DATE
794: ,p_business_group_id IN NUMBER
795: ,p_formula_id IN per_cagr_entitlements.formula_id%TYPE
796: ,p_formula_criteria IN per_cagr_entitlements.formula_criteria%TYPE
791: PROCEDURE chk_formula_id
792: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
793: ,p_effective_date IN DATE
794: ,p_business_group_id IN NUMBER
795: ,p_formula_id IN per_cagr_entitlements.formula_id%TYPE
796: ,p_formula_criteria IN per_cagr_entitlements.formula_criteria%TYPE
797: ) IS
798: --
799: -- Declare Cursors
792: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
793: ,p_effective_date IN DATE
794: ,p_business_group_id IN NUMBER
795: ,p_formula_id IN per_cagr_entitlements.formula_id%TYPE
796: ,p_formula_criteria IN per_cagr_entitlements.formula_criteria%TYPE
797: ) IS
798: --
799: -- Declare Cursors
800: --
816: --
817: -- Declare Local variables
818: --
819: l_proc VARCHAR2(72) := g_package||'chk_formula_id';
820: l_dummy_id per_cagr_entitlements.formula_id%TYPE;
821: --
822: BEGIN
823: --
824: hr_utility.set_location('Entering : '||l_proc,10);
927: --
928: -- ---------------------------------------------------------------------------
929: --
930: PROCEDURE chk_start_date
931: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
932: ,p_start_date IN per_cagr_entitlements.start_date%TYPE
933: ,p_end_date IN per_cagr_entitlements.end_date%TYPE
934: ,p_collective_Agreement_id IN per_cagr_entitlements.collective_agreement_id%TYPE
935: ) IS
928: -- ---------------------------------------------------------------------------
929: --
930: PROCEDURE chk_start_date
931: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
932: ,p_start_date IN per_cagr_entitlements.start_date%TYPE
933: ,p_end_date IN per_cagr_entitlements.end_date%TYPE
934: ,p_collective_Agreement_id IN per_cagr_entitlements.collective_agreement_id%TYPE
935: ) IS
936: --
929: --
930: PROCEDURE chk_start_date
931: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
932: ,p_start_date IN per_cagr_entitlements.start_date%TYPE
933: ,p_end_date IN per_cagr_entitlements.end_date%TYPE
934: ,p_collective_Agreement_id IN per_cagr_entitlements.collective_agreement_id%TYPE
935: ) IS
936: --
937: -- Define cursors
930: PROCEDURE chk_start_date
931: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
932: ,p_start_date IN per_cagr_entitlements.start_date%TYPE
933: ,p_end_date IN per_cagr_entitlements.end_date%TYPE
934: ,p_collective_Agreement_id IN per_cagr_entitlements.collective_agreement_id%TYPE
935: ) IS
936: --
937: -- Define cursors
938: --
942: WHERE p_start_date < pca.start_date
943: AND pca.collective_Agreement_id = p_collective_agreement_id;
944: --
945: l_proc VARCHAR2(72) := g_package||'chk_start_date';
946: l_dummy_date per_cagr_entitlements.start_date%TYPE;
947: --
948: BEGIN
949: --
950: hr_utility.set_location('Entering : '||l_proc,10);
1026: --
1027: -- ---------------------------------------------------------------------------
1028: --
1029: PROCEDURE chk_end_date
1030: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
1031: ,p_start_date IN per_cagr_entitlements.start_date%TYPE
1032: ,p_end_date IN per_cagr_entitlements.end_date%TYPE
1033: ,p_effective_date IN DATE
1034: ) IS
1027: -- ---------------------------------------------------------------------------
1028: --
1029: PROCEDURE chk_end_date
1030: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
1031: ,p_start_date IN per_cagr_entitlements.start_date%TYPE
1032: ,p_end_date IN per_cagr_entitlements.end_date%TYPE
1033: ,p_effective_date IN DATE
1034: ) IS
1035: --
1028: --
1029: PROCEDURE chk_end_date
1030: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
1031: ,p_start_date IN per_cagr_entitlements.start_date%TYPE
1032: ,p_end_date IN per_cagr_entitlements.end_date%TYPE
1033: ,p_effective_date IN DATE
1034: ) IS
1035: --
1036: -- Declare Cursors
1140: --
1141: -- ---------------------------------------------------------------------------
1142: --
1143: PROCEDURE chk_entitlement_uniqueness
1144: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
1145: ,p_cagr_entitlement_item_id IN per_cagr_entitlements.cagr_entitlement_item_id%TYPE
1146: ,p_collective_agreement_id IN per_cagr_entitlements.collective_agreement_id%TYPE
1147: ) IS
1148: --
1141: -- ---------------------------------------------------------------------------
1142: --
1143: PROCEDURE chk_entitlement_uniqueness
1144: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
1145: ,p_cagr_entitlement_item_id IN per_cagr_entitlements.cagr_entitlement_item_id%TYPE
1146: ,p_collective_agreement_id IN per_cagr_entitlements.collective_agreement_id%TYPE
1147: ) IS
1148: --
1149: -- Declare Cursors
1142: --
1143: PROCEDURE chk_entitlement_uniqueness
1144: (p_cagr_entitlement_id IN per_cagr_entitlements.cagr_entitlement_id%TYPE
1145: ,p_cagr_entitlement_item_id IN per_cagr_entitlements.cagr_entitlement_item_id%TYPE
1146: ,p_collective_agreement_id IN per_cagr_entitlements.collective_agreement_id%TYPE
1147: ) IS
1148: --
1149: -- Declare Cursors
1150: --
1149: -- Declare Cursors
1150: --
1151: CURSOR csr_chk_uniqueness IS
1152: SELECT pce.cagr_entitlement_id
1153: FROM per_cagr_entitlements pce
1154: WHERE pce.collective_agreement_id = p_collective_agreement_id
1155: AND pce.cagr_entitlement_item_id = p_cagr_entitlement_item_id;
1156: --
1157: l_proc VARCHAR2(72) := g_package||'chk_end_date';
1154: WHERE pce.collective_agreement_id = p_collective_agreement_id
1155: AND pce.cagr_entitlement_item_id = p_cagr_entitlement_item_id;
1156: --
1157: l_proc VARCHAR2(72) := g_package||'chk_end_date';
1158: l_dummy_id per_cagr_entitlements.cagr_entitlement_id%TYPE;
1159: --
1160: BEGIN
1161: --
1162: hr_utility.set_location('Entering : '||l_proc,10);