646: begin
647: if (p_information_type = 'KR_YEA_DONATION_TYPE_DETAIL') then
648: l_effective_date := fnd_date.canonical_to_date(p_aei_information1);
649: l_year := to_char(fnd_date.canonical_to_date(p_aei_information1), 'YYYY');
650: if (fnd_number.canonical_to_number(p_aei_information2) < 2008 or
651: fnd_number.canonical_to_number(p_aei_information2) > fnd_number.canonical_to_number(l_year)) then
652: fnd_message.set_name('PAY', 'PAY_KR_TAX_PD_OUT_OF_RANGE');
653: fnd_message.raise_error;
654: end if;
647: if (p_information_type = 'KR_YEA_DONATION_TYPE_DETAIL') then
648: l_effective_date := fnd_date.canonical_to_date(p_aei_information1);
649: l_year := to_char(fnd_date.canonical_to_date(p_aei_information1), 'YYYY');
650: if (fnd_number.canonical_to_number(p_aei_information2) < 2008 or
651: fnd_number.canonical_to_number(p_aei_information2) > fnd_number.canonical_to_number(l_year)) then
652: fnd_message.set_name('PAY', 'PAY_KR_TAX_PD_OUT_OF_RANGE');
653: fnd_message.raise_error;
654: end if;
655: --
664: fnd_message.set_token('YEAR',p_aei_information2);
665: fnd_message.raise_error;
666: end if;
667:
668: if (fnd_number.canonical_to_number(p_aei_information3) < 0 or
669: fnd_number.canonical_to_number(p_aei_information4) < 0 or
670: fnd_number.canonical_to_number(p_aei_information5) < 0 ) then
671: fnd_message.set_name('PAY' , 'PAY_KR_YEA_NEG_VAL_ERR');
672: fnd_message.raise_error;
665: fnd_message.raise_error;
666: end if;
667:
668: if (fnd_number.canonical_to_number(p_aei_information3) < 0 or
669: fnd_number.canonical_to_number(p_aei_information4) < 0 or
670: fnd_number.canonical_to_number(p_aei_information5) < 0 ) then
671: fnd_message.set_name('PAY' , 'PAY_KR_YEA_NEG_VAL_ERR');
672: fnd_message.raise_error;
673: end if;
666: end if;
667:
668: if (fnd_number.canonical_to_number(p_aei_information3) < 0 or
669: fnd_number.canonical_to_number(p_aei_information4) < 0 or
670: fnd_number.canonical_to_number(p_aei_information5) < 0 ) then
671: fnd_message.set_name('PAY' , 'PAY_KR_YEA_NEG_VAL_ERR');
672: fnd_message.raise_error;
673: end if;
674:
671: fnd_message.set_name('PAY' , 'PAY_KR_YEA_NEG_VAL_ERR');
672: fnd_message.raise_error;
673: end if;
674:
675: if (fnd_number.canonical_to_number(p_aei_information2) = l_year) then -- Bug 9213683
676: if fnd_number.canonical_to_number(p_aei_information3) > 0 then
677: fnd_message.set_name('PAY', 'PAY_KR_CARRY_OVER_BAL_VAL_ERR');
678: fnd_message.raise_error;
679: end if;
672: fnd_message.raise_error;
673: end if;
674:
675: if (fnd_number.canonical_to_number(p_aei_information2) = l_year) then -- Bug 9213683
676: if fnd_number.canonical_to_number(p_aei_information3) > 0 then
677: fnd_message.set_name('PAY', 'PAY_KR_CARRY_OVER_BAL_VAL_ERR');
678: fnd_message.raise_error;
679: end if;
680: end if;