17: -- |---------------------< chk_contribution_conv_rule >------------------------|
18: -- ----------------------------------------------------------------------------
19: --
20: procedure chk_contribution_conv_rule
21: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
22: ,p_contribution_conversion_rule in pqp_pension_types_f.contribution_conversion_rule%TYPE
23: ,p_effective_date in date
24: ,p_validation_start_date in date
25: ,p_validation_end_date in date
18: -- ----------------------------------------------------------------------------
19: --
20: procedure chk_contribution_conv_rule
21: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
22: ,p_contribution_conversion_rule in pqp_pension_types_f.contribution_conversion_rule%TYPE
23: ,p_effective_date in date
24: ,p_validation_start_date in date
25: ,p_validation_end_date in date
26: ) is
73: hr_utility.set_location(' Leaving:'|| l_proc, 20);
74: exception
75: when app_exception.application_exception then
76: if hr_multi_message.exception_add
77: (p_associated_column1 => 'PQP_PENSION_TYPES_F.CONTRIBUTION_CONVERSION_RULE'
78: ) then
79: hr_utility.set_location(' Leaving:'|| l_proc, 30);
80: raise;
81: end if;
87: -- |------------------------< chk_threshold_conv_rule >-----------------------------|
88: -- ---------------------------------------------------------------------------------
89: --
90: procedure chk_threshold_conv_rule
91: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
92: ,p_threshold_conversion_rule in pqp_pension_types_f.threshold_conversion_rule%TYPE
93: ,p_effective_date in date
94: ,p_validation_start_date in date
95: ,p_validation_end_date in date
88: -- ---------------------------------------------------------------------------------
89: --
90: procedure chk_threshold_conv_rule
91: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
92: ,p_threshold_conversion_rule in pqp_pension_types_f.threshold_conversion_rule%TYPE
93: ,p_effective_date in date
94: ,p_validation_start_date in date
95: ,p_validation_end_date in date
96: ) is
142: hr_utility.set_location(' Leaving:'|| l_proc, 20);
143: exception
144: when app_exception.application_exception then
145: if hr_multi_message.exception_add
146: (p_associated_column1 => 'PQP_PENSION_TYPES_F.THRESHOLD_CONVERSION_RULE'
147: ) then
148: hr_utility.set_location(' Leaving:'|| l_proc, 30);
149: raise;
150: end if;
156: -- |-----------------------< chk_pension_category >----------------------------|
157: -- ----------------------------------------------------------------------------
158: --
159: procedure chk_pension_category
160: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
161: ,p_pension_category in pqp_pension_types_f.pension_category%TYPE
162: ,p_effective_date in date
163: ,p_validation_start_date in date
164: ,p_validation_end_date in date
157: -- ----------------------------------------------------------------------------
158: --
159: procedure chk_pension_category
160: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
161: ,p_pension_category in pqp_pension_types_f.pension_category%TYPE
162: ,p_effective_date in date
163: ,p_validation_start_date in date
164: ,p_validation_end_date in date
165: ) is
214: hr_utility.set_location(' Leaving:'|| l_proc, 20);
215: exception
216: when app_exception.application_exception then
217: if hr_multi_message.exception_add
218: (p_associated_column1 => 'PQP_PENSION_TYPES_F.PENSION_CATEGORY'
219: ) then
220: hr_utility.set_location(' Leaving:'|| l_proc, 30);
221: raise;
222: end if;
228: -- |-------------------------< chk_pension_provider >----------------------------|
229: -- ------------------------------------------------------------------------------
230: --
231: procedure chk_pension_provider
232: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
233: ,p_pension_provider_type in pqp_pension_types_f.pension_provider_type%TYPE
234: ,p_effective_date in date
235: ,p_validation_start_date in date
236: ,p_validation_end_date in date
229: -- ------------------------------------------------------------------------------
230: --
231: procedure chk_pension_provider
232: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
233: ,p_pension_provider_type in pqp_pension_types_f.pension_provider_type%TYPE
234: ,p_effective_date in date
235: ,p_validation_start_date in date
236: ,p_validation_end_date in date
237: ) is
283: hr_utility.set_location(' Leaving:'|| l_proc, 20);
284: exception
285: when app_exception.application_exception then
286: if hr_multi_message.exception_add
287: (p_associated_column1 => 'PQP_PENSION_TYPES_F.PENSION_PROVIDER_TYPE'
288: ) then
289: hr_utility.set_location(' Leaving:'|| l_proc, 30);
290: raise;
291: end if;
296: -- |-------------------------< chk_salary_calc_method >--------------------------|
297: -- ------------------------------------------------------------------------------
298: --
299: procedure chk_salary_calc_method
300: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
301: ,p_salary_calculation_method in pqp_pension_types_f.salary_calculation_method%TYPE
302: ,p_effective_date in date
303: ,p_validation_start_date in date
304: ,p_validation_end_date in date
297: -- ------------------------------------------------------------------------------
298: --
299: procedure chk_salary_calc_method
300: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
301: ,p_salary_calculation_method in pqp_pension_types_f.salary_calculation_method%TYPE
302: ,p_effective_date in date
303: ,p_validation_start_date in date
304: ,p_validation_end_date in date
305: ) is
351: hr_utility.set_location(' Leaving:'|| l_proc, 20);
352: exception
353: when app_exception.application_exception then
354: if hr_multi_message.exception_add
355: (p_associated_column1 => 'PQP_PENSION_TYPES_F.SALARY_CALCULATION_METHOD'
356: ) then
357: hr_utility.set_location(' Leaving:'|| l_proc, 30);
358: raise;
359: end if;
364: -- |-------------------------< chk_pension_type_name >---------------------------|
365: -- ------------------------------------------------------------------------------
366: --
367: procedure chk_pension_type_name
368: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
369: ,p_pension_type_name in pqp_pension_types_f.pension_type_name%TYPE
370: ,p_effective_date in date
371: ,p_business_group_id in pqp_pension_types_f.business_group_id%TYPE
372: ,p_legislation_code in pqp_pension_types_f.legislation_code%TYPE
365: -- ------------------------------------------------------------------------------
366: --
367: procedure chk_pension_type_name
368: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
369: ,p_pension_type_name in pqp_pension_types_f.pension_type_name%TYPE
370: ,p_effective_date in date
371: ,p_business_group_id in pqp_pension_types_f.business_group_id%TYPE
372: ,p_legislation_code in pqp_pension_types_f.legislation_code%TYPE
373: ,p_validation_start_date in date
367: procedure chk_pension_type_name
368: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
369: ,p_pension_type_name in pqp_pension_types_f.pension_type_name%TYPE
370: ,p_effective_date in date
371: ,p_business_group_id in pqp_pension_types_f.business_group_id%TYPE
372: ,p_legislation_code in pqp_pension_types_f.legislation_code%TYPE
373: ,p_validation_start_date in date
374: ,p_validation_end_date in date
375: ) is
368: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
369: ,p_pension_type_name in pqp_pension_types_f.pension_type_name%TYPE
370: ,p_effective_date in date
371: ,p_business_group_id in pqp_pension_types_f.business_group_id%TYPE
372: ,p_legislation_code in pqp_pension_types_f.legislation_code%TYPE
373: ,p_validation_start_date in date
374: ,p_validation_end_date in date
375: ) is
376: --
374: ,p_validation_end_date in date
375: ) is
376: --
377: Cursor csr_pension_type
378: (c_pension_type_name in pqp_pension_types_f.pension_type_name%TYPE,
379: c_business_group_id in pqp_pension_types_f.business_group_id%TYPE,
380: c_legislation_code in pqp_pension_types_f.legislation_code%TYPE,
381: c_effective_date in date,
382: c_validation_start_date in date,
375: ) is
376: --
377: Cursor csr_pension_type
378: (c_pension_type_name in pqp_pension_types_f.pension_type_name%TYPE,
379: c_business_group_id in pqp_pension_types_f.business_group_id%TYPE,
380: c_legislation_code in pqp_pension_types_f.legislation_code%TYPE,
381: c_effective_date in date,
382: c_validation_start_date in date,
383: c_validation_end_date in date
376: --
377: Cursor csr_pension_type
378: (c_pension_type_name in pqp_pension_types_f.pension_type_name%TYPE,
379: c_business_group_id in pqp_pension_types_f.business_group_id%TYPE,
380: c_legislation_code in pqp_pension_types_f.legislation_code%TYPE,
381: c_effective_date in date,
382: c_validation_start_date in date,
383: c_validation_end_date in date
384: ) Is
387: legislation_code,
388: effective_start_date,
389: effective_start_date,
390: effective_end_date
391: from pqp_pension_types_f
392: where upper(pension_type_name) = upper(c_pension_type_name)
393: and
394: (( business_group_id IS NOT NULL
395: AND business_group_id = c_business_group_id
400: and c_effective_date between effective_start_date and effective_end_date;
401:
402: l_proc varchar2(72) := g_package||'chk_pension_type_name';
403: l_api_updating boolean;
404: l_pension_type_name pqp_pension_types_f.pension_type_name%TYPE;
405: l_business_group_id pqp_pension_types_f.business_group_id%TYPE;
406: l_legislation_code pqp_pension_types_f.legislation_code%TYPE;
407: l_effective_date date;
408: l_validation_start_date date;
401:
402: l_proc varchar2(72) := g_package||'chk_pension_type_name';
403: l_api_updating boolean;
404: l_pension_type_name pqp_pension_types_f.pension_type_name%TYPE;
405: l_business_group_id pqp_pension_types_f.business_group_id%TYPE;
406: l_legislation_code pqp_pension_types_f.legislation_code%TYPE;
407: l_effective_date date;
408: l_validation_start_date date;
409: l_validation_end_date date;
402: l_proc varchar2(72) := g_package||'chk_pension_type_name';
403: l_api_updating boolean;
404: l_pension_type_name pqp_pension_types_f.pension_type_name%TYPE;
405: l_business_group_id pqp_pension_types_f.business_group_id%TYPE;
406: l_legislation_code pqp_pension_types_f.legislation_code%TYPE;
407: l_effective_date date;
408: l_validation_start_date date;
409: l_validation_end_date date;
410: --
412: hr_utility.set_location('Entering:'|| l_proc, 10);
413:
414: --
415: -- During insert check to see if the pension type name exists
416: -- already in the pqp_pension_types_f table.
417: --
418: if p_pension_type_id is null then
419: open csr_pension_type
420: (
449: hr_utility.set_location(' Leaving:'|| l_proc, 20);
450: exception
451: when app_exception.application_exception then
452: if hr_multi_message.exception_add
453: (p_associated_column1 => 'PQP_PENSION_TYPES_F.PENSION_TYPE_NAME'
454: ) then
455: hr_utility.set_location(' Leaving:'|| l_proc, 30);
456: raise;
457: end if;
462: -- |-------------------------< chk_provider_assignment >-------------------------|
463: -- ------------------------------------------------------------------------------
464: --
465: procedure chk_provider_assignment
466: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
467: ,p_effective_date in date
468: ,p_leg_code in pqp_pension_types_f.legislation_code%TYPE
469: ) is
470: --
464: --
465: procedure chk_provider_assignment
466: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
467: ,p_effective_date in date
468: ,p_leg_code in pqp_pension_types_f.legislation_code%TYPE
469: ) is
470: --
471: Cursor csr_org_info_nl
472: (c_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE) Is
468: ,p_leg_code in pqp_pension_types_f.legislation_code%TYPE
469: ) is
470: --
471: Cursor csr_org_info_nl
472: (c_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE) Is
473: select 'x'
474: from hr_organization_information
475: where org_information_context = 'PQP_NL_PENSION_TYPES'
476: and org_information1 = to_char(c_pension_type_id);
476: and org_information1 = to_char(c_pension_type_id);
477:
478: -- added for UK
479: Cursor csr_org_info_gb
480: (c_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE) Is
481: select 'x'
482: from hr_organization_information
483: where org_information_context = 'PQP_GB_PENSION_TYPES_INFO'
484: and org_information1 = to_char(c_pension_type_id);
484: and org_information1 = to_char(c_pension_type_id);
485:
486: -- added for HU
487: Cursor csr_org_info_hu
488: (c_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE) Is
489: select 'x'
490: from hr_organization_information
491: where org_information_context = 'HU_PENSION_TYPES_INFO'
492: and org_information1 = to_char(c_pension_type_id);
498: begin
499: hr_utility.set_location('Entering:'|| l_proc, 10);
500: --
501: -- During insert check to see if the pension type name exists
502: -- already in the pqp_pension_types_f table.
503: --
504:
505: if(p_leg_code = 'NL') then
506: open csr_org_info_nl (c_pension_type_id => p_pension_type_id);
544: hr_utility.set_location(' Leaving:'|| l_proc, 20);
545: exception
546: when app_exception.application_exception then
547: if hr_multi_message.exception_add
548: (p_associated_column1 => 'PQP_PENSION_TYPES_F.PENSION_TYPE_ID'
549: ) then
550: hr_utility.set_location(' Leaving:'|| l_proc, 30);
551: raise;
552: end if;
558: -- |----------------------< chk_special_pension_type_code >-------------------|
559: -- ------------------------------------------------------------------------------
560: --
561: procedure chk_special_pension_type_code
562: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
563: ,p_special_pension_type_code in pqp_pension_types_f.special_pension_type_code%TYPE
564: ,p_effective_date in date
565: ,p_validation_start_date in date
566: ,p_validation_end_date in date
559: -- ------------------------------------------------------------------------------
560: --
561: procedure chk_special_pension_type_code
562: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
563: ,p_special_pension_type_code in pqp_pension_types_f.special_pension_type_code%TYPE
564: ,p_effective_date in date
565: ,p_validation_start_date in date
566: ,p_validation_end_date in date
567: ) is
613: hr_utility.set_location(' Leaving:'|| l_proc, 20);
614: exception
615: when app_exception.application_exception then
616: if hr_multi_message.exception_add
617: (p_associated_column1 => 'PQP_PENSION_TYPES_F.SPECIAL_PENSION_TYPE_CODE'
618: ) then
619: hr_utility.set_location(' Leaving:'|| l_proc, 30);
620: raise;
621: end if;
627: -- |-----------------------< chk_pension_sub_category >------------------------|
628: -- ------------------------------------------------------------------------------
629: --
630: procedure chk_pension_sub_category
631: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
632: ,p_pension_sub_category in pqp_pension_types_f.pension_sub_category%TYPE
633: ,p_effective_date in date
634: ,p_validation_start_date in date
635: ,p_validation_end_date in date
628: -- ------------------------------------------------------------------------------
629: --
630: procedure chk_pension_sub_category
631: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
632: ,p_pension_sub_category in pqp_pension_types_f.pension_sub_category%TYPE
633: ,p_effective_date in date
634: ,p_validation_start_date in date
635: ,p_validation_end_date in date
636: ) is
682: hr_utility.set_location(' Leaving:'|| l_proc, 20);
683: exception
684: when app_exception.application_exception then
685: if hr_multi_message.exception_add
686: (p_associated_column1 => 'PQP_PENSION_TYPES_F.PENSION_SUB_CATEGORY'
687: ) then
688: hr_utility.set_location(' Leaving:'|| l_proc, 30);
689: raise;
690: end if;
696: -- |-----------------------< chk_pension_basis_calc_method >-------------------|
697: -- ------------------------------------------------------------------------------
698: --
699: procedure chk_pension_basis_calc_method
700: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
701: ,p_pension_basis_calc_method in pqp_pension_types_f.pension_basis_calc_method%TYPE
702: ,p_effective_date in date
703: ,p_validation_start_date in date
704: ,p_validation_end_date in date
697: -- ------------------------------------------------------------------------------
698: --
699: procedure chk_pension_basis_calc_method
700: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
701: ,p_pension_basis_calc_method in pqp_pension_types_f.pension_basis_calc_method%TYPE
702: ,p_effective_date in date
703: ,p_validation_start_date in date
704: ,p_validation_end_date in date
705: ) is
751: hr_utility.set_location(' Leaving:'|| l_proc, 20);
752: exception
753: when app_exception.application_exception then
754: if hr_multi_message.exception_add
755: (p_associated_column1 => 'PQP_PENSION_TYPES_F.PENSION_BASIS_CALC_METHOD'
756: ) then
757: hr_utility.set_location(' Leaving:'|| l_proc, 30);
758: raise;
759: end if;
765: -- |----------------------< chk_prev_year_bonus_include >---------------------|
766: -- ------------------------------------------------------------------------------
767: --
768: procedure chk_prev_year_bonus_include
769: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
770: ,p_previous_year_bonus_included in pqp_pension_types_f.previous_year_bonus_included%TYPE
771: ,p_effective_date in date
772: ,p_validation_start_date in date
773: ,p_validation_end_date in date
766: -- ------------------------------------------------------------------------------
767: --
768: procedure chk_prev_year_bonus_include
769: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
770: ,p_previous_year_bonus_included in pqp_pension_types_f.previous_year_bonus_included%TYPE
771: ,p_effective_date in date
772: ,p_validation_start_date in date
773: ,p_validation_end_date in date
774: ) is
820: hr_utility.set_location(' Leaving:'|| l_proc, 20);
821: exception
822: when app_exception.application_exception then
823: if hr_multi_message.exception_add
824: (p_associated_column1 => 'PQP_PENSION_TYPES_F.PREVIOUS_YEAR_BONUS_INCLUDED'
825: ) then
826: hr_utility.set_location(' Leaving:'|| l_proc, 30);
827: raise;
828: end if;
834: -- |-----------------------< chk_recurring_bonus_period >---------------------|
835: -- ------------------------------------------------------------------------------
836: --
837: procedure chk_recurring_bonus_period
838: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
839: ,p_recurring_bonus_period in pqp_pension_types_f.recurring_bonus_period%TYPE
840: ,p_effective_date in date
841: ,p_validation_start_date in date
842: ,p_validation_end_date in date
835: -- ------------------------------------------------------------------------------
836: --
837: procedure chk_recurring_bonus_period
838: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
839: ,p_recurring_bonus_period in pqp_pension_types_f.recurring_bonus_period%TYPE
840: ,p_effective_date in date
841: ,p_validation_start_date in date
842: ,p_validation_end_date in date
843: ) is
889: hr_utility.set_location(' Leaving:'|| l_proc, 20);
890: exception
891: when app_exception.application_exception then
892: if hr_multi_message.exception_add
893: (p_associated_column1 => 'PQP_PENSION_TYPES_F.RECURRING_BONUS_PERIOD'
894: ) then
895: hr_utility.set_location(' Leaving:'|| l_proc, 30);
896: raise;
897: end if;
903: -- |--------------------< chk_non_recurring_bonus_period >---------------------|
904: -- ------------------------------------------------------------------------------
905: --
906: procedure chk_non_recurring_bonus_period
907: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
908: ,p_non_recurring_bonus_period in pqp_pension_types_f.non_recurring_bonus_period%TYPE
909: ,p_effective_date in date
910: ,p_validation_start_date in date
911: ,p_validation_end_date in date
904: -- ------------------------------------------------------------------------------
905: --
906: procedure chk_non_recurring_bonus_period
907: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
908: ,p_non_recurring_bonus_period in pqp_pension_types_f.non_recurring_bonus_period%TYPE
909: ,p_effective_date in date
910: ,p_validation_start_date in date
911: ,p_validation_end_date in date
912: ) is
958: hr_utility.set_location(' Leaving:'|| l_proc, 20);
959: exception
960: when app_exception.application_exception then
961: if hr_multi_message.exception_add
962: (p_associated_column1 => 'PQP_PENSION_TYPES_F.NON_RECURRING_BONUS_PERIOD'
963: ) then
964: hr_utility.set_location(' Leaving:'|| l_proc, 30);
965: raise;
966: end if;
972: -- |---------------------< chk_pension_salary_balance >----------------------|
973: ------------------------------------------------------------------------------
974: --
975: procedure chk_pension_salary_balance
976: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
977: ,p_pension_salary_balance in pqp_pension_types_f.pension_salary_balance%TYPE
978: ,p_business_group_id in pqp_pension_types_f.business_group_id%TYPE
979: ,p_legislation_code in pqp_pension_types_f.legislation_code%TYPE
980: ,p_effective_date in date
973: ------------------------------------------------------------------------------
974: --
975: procedure chk_pension_salary_balance
976: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
977: ,p_pension_salary_balance in pqp_pension_types_f.pension_salary_balance%TYPE
978: ,p_business_group_id in pqp_pension_types_f.business_group_id%TYPE
979: ,p_legislation_code in pqp_pension_types_f.legislation_code%TYPE
980: ,p_effective_date in date
981: ,p_validation_start_date in date
974: --
975: procedure chk_pension_salary_balance
976: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
977: ,p_pension_salary_balance in pqp_pension_types_f.pension_salary_balance%TYPE
978: ,p_business_group_id in pqp_pension_types_f.business_group_id%TYPE
979: ,p_legislation_code in pqp_pension_types_f.legislation_code%TYPE
980: ,p_effective_date in date
981: ,p_validation_start_date in date
982: ,p_validation_end_date in date
975: procedure chk_pension_salary_balance
976: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
977: ,p_pension_salary_balance in pqp_pension_types_f.pension_salary_balance%TYPE
978: ,p_business_group_id in pqp_pension_types_f.business_group_id%TYPE
979: ,p_legislation_code in pqp_pension_types_f.legislation_code%TYPE
980: ,p_effective_date in date
981: ,p_validation_start_date in date
982: ,p_validation_end_date in date
983: ) is
983: ) is
984: --
985:
986: Cursor csr_chk_for_dimension
987: (c_balance_type_id in pqp_pension_types_f.pension_salary_balance%TYPE
988: ,c_business_group_id in pqp_pension_types_f.business_group_id%TYPE
989: ,c_legislation_code in pqp_pension_types_f.legislation_code%TYPE)
990: Is
991: Select 1 from pay_defined_balances
984: --
985:
986: Cursor csr_chk_for_dimension
987: (c_balance_type_id in pqp_pension_types_f.pension_salary_balance%TYPE
988: ,c_business_group_id in pqp_pension_types_f.business_group_id%TYPE
989: ,c_legislation_code in pqp_pension_types_f.legislation_code%TYPE)
990: Is
991: Select 1 from pay_defined_balances
992: where balance_dimension_id =
985:
986: Cursor csr_chk_for_dimension
987: (c_balance_type_id in pqp_pension_types_f.pension_salary_balance%TYPE
988: ,c_business_group_id in pqp_pension_types_f.business_group_id%TYPE
989: ,c_legislation_code in pqp_pension_types_f.legislation_code%TYPE)
990: Is
991: Select 1 from pay_defined_balances
992: where balance_dimension_id =
993: (select balance_dimension_id from pay_balance_dimensions
1061: hr_utility.set_location(' Leaving:'|| l_proc, 20);
1062: exception
1063: when app_exception.application_exception then
1064: if hr_multi_message.exception_add
1065: (p_associated_column1 => 'PQP_PENSION_TYPES_F.PENSION_SALARY_BALANCE'
1066: ) then
1067: hr_utility.set_location(' Leaving:'|| l_proc, 30);
1068: raise;
1069: end if;
1075: -- |-------------------------< chk_ee_age_threshold >---------------------------|
1076: -- ------------------------------------------------------------------------------
1077: --
1078: procedure chk_ee_age_threshold
1079: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
1080: ,p_ee_age_threshold in pqp_pension_types_f.ee_age_threshold%TYPE
1081: ,p_effective_date in date
1082: ,p_validation_start_date in date
1083: ,p_validation_end_date in date
1076: -- ------------------------------------------------------------------------------
1077: --
1078: procedure chk_ee_age_threshold
1079: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
1080: ,p_ee_age_threshold in pqp_pension_types_f.ee_age_threshold%TYPE
1081: ,p_effective_date in date
1082: ,p_validation_start_date in date
1083: ,p_validation_end_date in date
1084: ) is
1130: hr_utility.set_location(' Leaving:'|| l_proc, 20);
1131: exception
1132: when app_exception.application_exception then
1133: if hr_multi_message.exception_add
1134: (p_associated_column1 => 'PQP_PENSION_TYPES_F.EE_AGE_THRESHOLD'
1135: ) then
1136: hr_utility.set_location(' Leaving:'|| l_proc, 30);
1137: raise;
1138: end if;
1144: -- |-------------------------< chk_er_age_threshold >---------------------------|
1145: -- ------------------------------------------------------------------------------
1146: --
1147: procedure chk_er_age_threshold
1148: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
1149: ,p_er_age_threshold in pqp_pension_types_f.ee_age_threshold%TYPE
1150: ,p_effective_date in date
1151: ,p_validation_start_date in date
1152: ,p_validation_end_date in date
1145: -- ------------------------------------------------------------------------------
1146: --
1147: procedure chk_er_age_threshold
1148: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
1149: ,p_er_age_threshold in pqp_pension_types_f.ee_age_threshold%TYPE
1150: ,p_effective_date in date
1151: ,p_validation_start_date in date
1152: ,p_validation_end_date in date
1153: ) is
1199: hr_utility.set_location(' Leaving:'|| l_proc, 20);
1200: exception
1201: when app_exception.application_exception then
1202: if hr_multi_message.exception_add
1203: (p_associated_column1 => 'PQP_PENSION_TYPES_F.ER_AGE_THRESHOLD'
1204: ) then
1205: hr_utility.set_location(' Leaving:'|| l_proc, 30);
1206: raise;
1207: end if;
1213: -- |-----------------------< chk_ee_age_contribution >--------------------------|
1214: -- ------------------------------------------------------------------------------
1215: --
1216: procedure chk_ee_age_contribution
1217: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
1218: ,p_ee_age_contribution in pqp_pension_types_f.ee_age_threshold%TYPE
1219: ,p_effective_date in date
1220: ,p_validation_start_date in date
1221: ,p_validation_end_date in date
1214: -- ------------------------------------------------------------------------------
1215: --
1216: procedure chk_ee_age_contribution
1217: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
1218: ,p_ee_age_contribution in pqp_pension_types_f.ee_age_threshold%TYPE
1219: ,p_effective_date in date
1220: ,p_validation_start_date in date
1221: ,p_validation_end_date in date
1222: ) is
1268: hr_utility.set_location(' Leaving:'|| l_proc, 20);
1269: exception
1270: when app_exception.application_exception then
1271: if hr_multi_message.exception_add
1272: (p_associated_column1 => 'PQP_PENSION_TYPES_F.EE_AGE_CONTRIBUTION'
1273: ) then
1274: hr_utility.set_location(' Leaving:'|| l_proc, 30);
1275: raise;
1276: end if;
1282: -- |------------------------< chk_er_age_contribution >--------------------------|
1283: -- ------------------------------------------------------------------------------
1284: --
1285: procedure chk_er_age_contribution
1286: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
1287: ,p_er_age_contribution in pqp_pension_types_f.ee_age_threshold%TYPE
1288: ,p_effective_date in date
1289: ,p_validation_start_date in date
1290: ,p_validation_end_date in date
1283: -- ------------------------------------------------------------------------------
1284: --
1285: procedure chk_er_age_contribution
1286: (p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
1287: ,p_er_age_contribution in pqp_pension_types_f.ee_age_threshold%TYPE
1288: ,p_effective_date in date
1289: ,p_validation_start_date in date
1290: ,p_validation_end_date in date
1291: ) is
1337: hr_utility.set_location(' Leaving:'|| l_proc, 20);
1338: exception
1339: when app_exception.application_exception then
1340: if hr_multi_message.exception_add
1341: (p_associated_column1 => 'PQP_PENSION_TYPES_F.ER_AGE_CONTRIBUTION'
1342: ) then
1343: hr_utility.set_location(' Leaving:'|| l_proc, 30);
1344: raise;
1345: end if;
1353: --
1354:
1355: Procedure set_end_date_fpus
1356: (
1357: p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
1358: ,p_pension_sub_category in pqp_pension_types_f.pension_sub_category%TYPE
1359: ,p_effective_date in date
1360: ,p_validation_start_date in date
1361: ,p_validation_end_date out nocopy date
1354:
1355: Procedure set_end_date_fpus
1356: (
1357: p_pension_type_id in pqp_pension_types_f.pension_type_id%TYPE
1358: ,p_pension_sub_category in pqp_pension_types_f.pension_sub_category%TYPE
1359: ,p_effective_date in date
1360: ,p_validation_start_date in date
1361: ,p_validation_end_date out nocopy date
1362: ) IS
1409: cursor csr_sec_grp is
1410: select pbg.security_group_id,
1411: pbg.legislation_code
1412: from per_business_groups_perf pbg
1413: , pqp_pension_types_f pty
1414: where pty.pension_type_id = p_pension_type_id
1415: and pbg.business_group_id = pty.business_group_id;
1416: --
1417: -- Declare local variables
1479: --
1480: cursor csr_leg_code is
1481: select pbg.legislation_code
1482: from per_business_groups_perf pbg
1483: , pqp_pension_types_f pty
1484: where pty.pension_type_id = p_pension_type_id
1485: and pbg.business_group_id (+) = pty.business_group_id;
1486: --
1487: -- Declare local variables
2167: END IF;
2168:
2169:
2170: -- Check if the Pension Type Name is Unique within the table
2171: -- pqp_pension_types_f
2172: --
2173: chk_pension_type_name
2174: (p_pension_type_id => p_rec.pension_type_id
2175: ,p_pension_type_name => p_rec.pension_type_name
2686: l_max_org_end_dt DATE;
2687: l_max_asg_end_dt DATE;
2688:
2689: --cursor to check that the pension type is a ABP Pension type
2690: CURSOR c_chk_abp_pt(c_pension_type_id IN pqp_pension_types_f.pension_type_id%TYPE) IS
2691: SELECT 1
2692: FROM pqp_pension_types_f
2693: WHERE pension_type_id = c_pension_type_id
2694: AND special_pension_type_code = 'ABP';
2688:
2689: --cursor to check that the pension type is a ABP Pension type
2690: CURSOR c_chk_abp_pt(c_pension_type_id IN pqp_pension_types_f.pension_type_id%TYPE) IS
2691: SELECT 1
2692: FROM pqp_pension_types_f
2693: WHERE pension_type_id = c_pension_type_id
2694: AND special_pension_type_code = 'ABP';
2695:
2696: --cursor to check that the pension type is a PGGM Pension type
2693: WHERE pension_type_id = c_pension_type_id
2694: AND special_pension_type_code = 'ABP';
2695:
2696: --cursor to check that the pension type is a PGGM Pension type
2697: CURSOR c_chk_pggm_pt(c_pension_type_id IN pqp_pension_types_f.pension_type_id%TYPE) IS
2698: SELECT 1
2699: FROM pqp_pension_types_f
2700: WHERE pension_type_id = c_pension_type_id
2701: AND special_pension_type_code = 'PGGM';
2695:
2696: --cursor to check that the pension type is a PGGM Pension type
2697: CURSOR c_chk_pggm_pt(c_pension_type_id IN pqp_pension_types_f.pension_type_id%TYPE) IS
2698: SELECT 1
2699: FROM pqp_pension_types_f
2700: WHERE pension_type_id = c_pension_type_id
2701: AND special_pension_type_code = 'PGGM';
2702:
2703: --cursor to check if an org info row exists for the PT
2700: WHERE pension_type_id = c_pension_type_id
2701: AND special_pension_type_code = 'PGGM';
2702:
2703: --cursor to check if an org info row exists for the PT
2704: CURSOR c_chk_org_info(c_pension_type_id IN pqp_pension_types_f.pension_type_id%TYPE) IS
2705: SELECT 1
2706: FROM hr_organization_information
2707: WHERE org_information_context = 'PQP_NL_ABP_PT'
2708: AND org_information3 = to_char(c_pension_type_id);
2707: WHERE org_information_context = 'PQP_NL_ABP_PT'
2708: AND org_information3 = to_char(c_pension_type_id);
2709:
2710: --cursor to check if an org info row exists for the PT
2711: CURSOR c_chk_pggm_org_info(c_pension_type_id IN pqp_pension_types_f.pension_type_id%TYPE) IS
2712: SELECT 1
2713: FROM hr_organization_information
2714: WHERE org_information_context = 'PQP_NL_PGGM_PT'
2715: AND org_information3 = to_char(c_pension_type_id);
2714: WHERE org_information_context = 'PQP_NL_PGGM_PT'
2715: AND org_information3 = to_char(c_pension_type_id);
2716:
2717: --cursor to check if an asg eit row exists for the PT
2718: CURSOR c_chk_asg_info(c_pension_type_id IN pqp_pension_types_f.pension_type_id%TYPE) IS
2719: SELECT 1
2720: FROM per_assignment_extra_info
2721: WHERE aei_information_category = 'NL_ABP_PI'
2722: AND information_type = 'NL_ABP_PI'
2722: AND information_type = 'NL_ABP_PI'
2723: AND aei_information3 = to_char(c_pension_type_id);
2724:
2725: --cursor to get the end date for the org eit row for this PT
2726: CURSOR c_org_info_end_dt(c_pension_type_id IN pqp_pension_types_f.pension_type_id%TYPE) IS
2727: SELECT fnd_date.canonical_to_date(nvl(org_information2,'4712/12/31')) org_info_end_dt
2728: FROM hr_organization_information
2729: WHERE org_information3 = to_char(c_pension_type_id)
2730: AND org_information_context = 'PQP_NL_ABP_PT';
2729: WHERE org_information3 = to_char(c_pension_type_id)
2730: AND org_information_context = 'PQP_NL_ABP_PT';
2731:
2732: --cursor to get the end date for the org eit row for this PT
2733: CURSOR c_pggm_org_info_end_dt(c_pension_type_id IN pqp_pension_types_f.pension_type_id%TYPE) IS
2734: SELECT fnd_date.canonical_to_date(nvl(org_information2,'4712/12/31')) org_info_end_dt
2735: FROM hr_organization_information
2736: WHERE org_information3 = to_char(c_pension_type_id)
2737: AND org_information_context = 'PQP_NL_PGGM_PT';
2736: WHERE org_information3 = to_char(c_pension_type_id)
2737: AND org_information_context = 'PQP_NL_PGGM_PT';
2738:
2739: --cursor to get the end date for the asg eit row for this PT
2740: CURSOR c_asg_info_end_dt(c_pension_type_id IN pqp_pension_types_f.pension_type_id%TYPE) IS
2741: SELECT fnd_date.canonical_to_date(nvl(aei_information2,'4712/12/31')) asg_info_end_dt
2742: FROM per_assignment_extra_info
2743: WHERE aei_information3 = to_char(c_pension_type_id)
2744: AND aei_information_category = 'NL_ABP_PI'
2747: --
2748: -- CURSOR to check if a PGGM Scheme Exists
2749: --
2750: CURSOR c_pggm_scheme (
2751: c_pension_type_id IN pqp_pension_types_f.pension_type_id%TYPE) IS
2752: SELECT 1
2753: FROM pay_element_type_extra_info
2754: WHERE eei_information_category = 'PQP_NL_PGGM_DEDUCTION'
2755: AND eei_information2 = fnd_number.number_to_canonical(c_pension_type_id);