63: (p_effective_date < start_date
64: and start_date < nvl(end_date,start_date + ame_util.oneSecond)));
65: --+
66: if l_descriptionCount > 0 then
67: fnd_message.set_name('PER','AME_400206_RUL_DESC_IN_USE');
68: fnd_message.raise_error;
69: end if;
70: -- check length
71: if(ame_util.isArgumentTooLong(tableNameIn => 'ame_rules'
64: and start_date < nvl(end_date,start_date + ame_util.oneSecond)));
65: --+
66: if l_descriptionCount > 0 then
67: fnd_message.set_name('PER','AME_400206_RUL_DESC_IN_USE');
68: fnd_message.raise_error;
69: end if;
70: -- check length
71: if(ame_util.isArgumentTooLong(tableNameIn => 'ame_rules'
72: ,columnNameIn => 'description'
70: -- check length
71: if(ame_util.isArgumentTooLong(tableNameIn => 'ame_rules'
72: ,columnNameIn => 'description'
73: ,argumentIn => p_description)) then
74: fnd_message.set_name('PER','AME_400207_RUL_DESC_LONG');
75: fnd_message.raise_error;
76: end if;
77: exception
78: when app_exception.application_exception then
71: if(ame_util.isArgumentTooLong(tableNameIn => 'ame_rules'
72: ,columnNameIn => 'description'
73: ,argumentIn => p_description)) then
74: fnd_message.set_name('PER','AME_400207_RUL_DESC_LONG');
75: fnd_message.raise_error;
76: end if;
77: exception
78: when app_exception.application_exception then
79: if hr_multi_message.exception_add
138: open c_sel1;
139: fetch c_sel1 into l_exists;
140: if c_sel1%notfound then
141: close c_sel1;
142: fnd_message.set_name('PER','AME_400472_INV_ITEM_CLASS');
143: fnd_message.raise_error;
144: end if;
145: close c_sel1;
146: end if;
139: fetch c_sel1 into l_exists;
140: if c_sel1%notfound then
141: close c_sel1;
142: fnd_message.set_name('PER','AME_400472_INV_ITEM_CLASS');
143: fnd_message.raise_error;
144: end if;
145: close c_sel1;
146: end if;
147: exception
190: into l_count
191: from ame_rules
192: where lower(p_rule_key) = lower(rule_key);
193: if l_count > 0 then
194: fnd_message.set_name('PER','AME_400359_RULE_KEY_EXIST');
195: fnd_message.raise_error;
196: end if;
197: end chk_rule_key;
198: --
191: from ame_rules
192: where lower(p_rule_key) = lower(rule_key);
193: if l_count > 0 then
194: fnd_message.set_name('PER','AME_400359_RULE_KEY_EXIST');
195: fnd_message.raise_error;
196: end if;
197: end chk_rule_key;
198: --
199: -- ---------------------------------------------------------------------------
248: p_rule_type = ame_util.substitutionRuleType or
249: p_rule_type = ame_util.preListGroupRuleType or
250: p_rule_type = ame_util.postListGroupRuleType or
251: p_rule_type = ame_util.productionRuleType) then
252: fnd_message.set_name('PER','AME_400468_RULE_TYPE_INVALID');
253: fnd_message.raise_error;
254: end if;
255: exception
256: when app_exception.application_exception then
249: p_rule_type = ame_util.preListGroupRuleType or
250: p_rule_type = ame_util.postListGroupRuleType or
251: p_rule_type = ame_util.productionRuleType) then
252: fnd_message.set_name('PER','AME_400468_RULE_TYPE_INVALID');
253: fnd_message.raise_error;
254: end if;
255: exception
256: when app_exception.application_exception then
257: if hr_multi_message.exception_add
308:
309: if (p_rule_type = ame_util.listModRuleType or
310: p_rule_type = ame_util.substitutionRuleType) then
311: if p_item_class_id is not null then
312: fnd_message.set_name('PER','AME_400722_INV_IC_LM_SUB_RULE');
313: fnd_message.raise_error;
314: end if;
315: elsif p_rule_type = ame_util.combinationRuleType then
316: null;
309: if (p_rule_type = ame_util.listModRuleType or
310: p_rule_type = ame_util.substitutionRuleType) then
311: if p_item_class_id is not null then
312: fnd_message.set_name('PER','AME_400722_INV_IC_LM_SUB_RULE');
313: fnd_message.raise_error;
314: end if;
315: elsif p_rule_type = ame_util.combinationRuleType then
316: null;
317: elsif p_item_class_id is null then
314: end if;
315: elsif p_rule_type = ame_util.combinationRuleType then
316: null;
317: elsif p_item_class_id is null then
318: fnd_message.set_name('PER','AME_400472_INV_ITEM_CLASS');
319: fnd_message.raise_error;
320: end if;
321:
322: end chk_item_class_and_rule_type;
315: elsif p_rule_type = ame_util.combinationRuleType then
316: null;
317: elsif p_item_class_id is null then
318: fnd_message.set_name('PER','AME_400472_INV_ITEM_CLASS');
319: fnd_message.raise_error;
320: end if;
321:
322: end chk_item_class_and_rule_type;
323: -- ---------------------------------------------------------------------------
364: l_proc varchar2(72) := g_package||'chk_start_end_date_combination';
365: begin
366: if(p_start_date is null or
367: p_start_date < p_effective_date ) then
368: fnd_message.set_name('PER','AME_400208_RUL_STRT_PREC_TDY');
369: fnd_message.raise_error;
370: end if;
371: if p_end_date is not null then
372: if ( p_end_date < p_start_date or
365: begin
366: if(p_start_date is null or
367: p_start_date < p_effective_date ) then
368: fnd_message.set_name('PER','AME_400208_RUL_STRT_PREC_TDY');
369: fnd_message.raise_error;
370: end if;
371: if p_end_date is not null then
372: if ( p_end_date < p_start_date or
373: p_end_date < p_effective_date) then
370: end if;
371: if p_end_date is not null then
372: if ( p_end_date < p_start_date or
373: p_end_date < p_effective_date) then
374: fnd_message.set_name('PER','AME_400209_RUL_STRT_PREC_END');
375: fnd_message.raise_error;
376: end if;
377: end if;
378: exception
371: if p_end_date is not null then
372: if ( p_end_date < p_start_date or
373: p_end_date < p_effective_date) then
374: fnd_message.set_name('PER','AME_400209_RUL_STRT_PREC_END');
375: fnd_message.raise_error;
376: end if;
377: end if;
378: exception
379: when app_exception.application_exception then
451: open c_sel1;
452: fetch c_sel1 into l_exists;
453: if c_sel1%found then
454: close c_sel1;
455: fnd_message.set_name('PER','AME_400216_RUL_IN_USE');
456: fnd_message.raise_error;
457: end if;
458: close c_sel1;
459: -- ame_condition_usages
452: fetch c_sel1 into l_exists;
453: if c_sel1%found then
454: close c_sel1;
455: fnd_message.set_name('PER','AME_400216_RUL_IN_USE');
456: fnd_message.raise_error;
457: end if;
458: close c_sel1;
459: -- ame_condition_usages
460: open c_sel2;
460: open c_sel2;
461: fetch c_sel2 into l_exists;
462: if c_sel2%found then
463: close c_sel2;
464: fnd_message.set_name('PER','AME_400216_RUL_IN_USE');
465: fnd_message.raise_error;
466: end if;
467: close c_sel2;
468: -- ame_action_usages
461: fetch c_sel2 into l_exists;
462: if c_sel2%found then
463: close c_sel2;
464: fnd_message.set_name('PER','AME_400216_RUL_IN_USE');
465: fnd_message.raise_error;
466: end if;
467: close c_sel2;
468: -- ame_action_usages
469: open c_sel3;
469: open c_sel3;
470: fetch c_sel3 into l_exists;
471: if c_sel3%found then
472: close c_sel3;
473: fnd_message.set_name('PER','AME_400216_RUL_IN_USE');
474: fnd_message.raise_error;
475: end if;
476: close c_sel3;
477: exception
470: fetch c_sel3 into l_exists;
471: if c_sel3%found then
472: close c_sel3;
473: fnd_message.set_name('PER','AME_400216_RUL_IN_USE');
474: fnd_message.raise_error;
475: end if;
476: close c_sel3;
477: exception
478: when app_exception.application_exception then
527: (p_rule_id => p_rec.rule_id
528: ,p_effective_date => p_effective_date
529: ,p_object_version_number => p_rec.object_version_number
530: ) THEN
531: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
532: fnd_message.set_token('PROCEDURE ', l_proc);
533: fnd_message.set_token('STEP ', '5');
534: fnd_message.raise_error;
535: END IF;
528: ,p_effective_date => p_effective_date
529: ,p_object_version_number => p_rec.object_version_number
530: ) THEN
531: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
532: fnd_message.set_token('PROCEDURE ', l_proc);
533: fnd_message.set_token('STEP ', '5');
534: fnd_message.raise_error;
535: END IF;
536: --
529: ,p_object_version_number => p_rec.object_version_number
530: ) THEN
531: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
532: fnd_message.set_token('PROCEDURE ', l_proc);
533: fnd_message.set_token('STEP ', '5');
534: fnd_message.raise_error;
535: END IF;
536: --
537: -- checks to ensure non-updateable args have not been updated.
530: ) THEN
531: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
532: fnd_message.set_token('PROCEDURE ', l_proc);
533: fnd_message.set_token('STEP ', '5');
534: fnd_message.raise_error;
535: END IF;
536: --
537: -- checks to ensure non-updateable args have not been updated.
538: --
536: --
537: -- checks to ensure non-updateable args have not been updated.
538: --
539: if (ame_rul_shd.g_old_rec.rule_key <> p_rec.rule_key) then
540: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
541: fnd_message.set_token('FIELD_NAME ', 'RULE_KEY');
542: fnd_message.set_token('PROCEDURE ', l_proc);
543: fnd_message.set_token('STEP ', '5');
544: fnd_message.raise_error;
537: -- checks to ensure non-updateable args have not been updated.
538: --
539: if (ame_rul_shd.g_old_rec.rule_key <> p_rec.rule_key) then
540: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
541: fnd_message.set_token('FIELD_NAME ', 'RULE_KEY');
542: fnd_message.set_token('PROCEDURE ', l_proc);
543: fnd_message.set_token('STEP ', '5');
544: fnd_message.raise_error;
545: end if;
538: --
539: if (ame_rul_shd.g_old_rec.rule_key <> p_rec.rule_key) then
540: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
541: fnd_message.set_token('FIELD_NAME ', 'RULE_KEY');
542: fnd_message.set_token('PROCEDURE ', l_proc);
543: fnd_message.set_token('STEP ', '5');
544: fnd_message.raise_error;
545: end if;
546: if (ame_rul_shd.g_old_rec.rule_type <> p_rec.rule_type) then
539: if (ame_rul_shd.g_old_rec.rule_key <> p_rec.rule_key) then
540: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
541: fnd_message.set_token('FIELD_NAME ', 'RULE_KEY');
542: fnd_message.set_token('PROCEDURE ', l_proc);
543: fnd_message.set_token('STEP ', '5');
544: fnd_message.raise_error;
545: end if;
546: if (ame_rul_shd.g_old_rec.rule_type <> p_rec.rule_type) then
547: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
540: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
541: fnd_message.set_token('FIELD_NAME ', 'RULE_KEY');
542: fnd_message.set_token('PROCEDURE ', l_proc);
543: fnd_message.set_token('STEP ', '5');
544: fnd_message.raise_error;
545: end if;
546: if (ame_rul_shd.g_old_rec.rule_type <> p_rec.rule_type) then
547: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
548: fnd_message.set_token('FIELD_NAME ', 'RULE_TYPE');
543: fnd_message.set_token('STEP ', '5');
544: fnd_message.raise_error;
545: end if;
546: if (ame_rul_shd.g_old_rec.rule_type <> p_rec.rule_type) then
547: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
548: fnd_message.set_token('FIELD_NAME ', 'RULE_TYPE');
549: fnd_message.set_token('PROCEDURE ', l_proc);
550: fnd_message.set_token('STEP ', '5');
551: fnd_message.raise_error;
544: fnd_message.raise_error;
545: end if;
546: if (ame_rul_shd.g_old_rec.rule_type <> p_rec.rule_type) then
547: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
548: fnd_message.set_token('FIELD_NAME ', 'RULE_TYPE');
549: fnd_message.set_token('PROCEDURE ', l_proc);
550: fnd_message.set_token('STEP ', '5');
551: fnd_message.raise_error;
552: end if;
545: end if;
546: if (ame_rul_shd.g_old_rec.rule_type <> p_rec.rule_type) then
547: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
548: fnd_message.set_token('FIELD_NAME ', 'RULE_TYPE');
549: fnd_message.set_token('PROCEDURE ', l_proc);
550: fnd_message.set_token('STEP ', '5');
551: fnd_message.raise_error;
552: end if;
553: if (ame_rul_shd.g_old_rec.item_class_id <> p_rec.item_class_id) then
546: if (ame_rul_shd.g_old_rec.rule_type <> p_rec.rule_type) then
547: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
548: fnd_message.set_token('FIELD_NAME ', 'RULE_TYPE');
549: fnd_message.set_token('PROCEDURE ', l_proc);
550: fnd_message.set_token('STEP ', '5');
551: fnd_message.raise_error;
552: end if;
553: if (ame_rul_shd.g_old_rec.item_class_id <> p_rec.item_class_id) then
554: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
547: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
548: fnd_message.set_token('FIELD_NAME ', 'RULE_TYPE');
549: fnd_message.set_token('PROCEDURE ', l_proc);
550: fnd_message.set_token('STEP ', '5');
551: fnd_message.raise_error;
552: end if;
553: if (ame_rul_shd.g_old_rec.item_class_id <> p_rec.item_class_id) then
554: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
555: fnd_message.set_token('FIELD_NAME ', 'ITEM_CLASS_ID');
550: fnd_message.set_token('STEP ', '5');
551: fnd_message.raise_error;
552: end if;
553: if (ame_rul_shd.g_old_rec.item_class_id <> p_rec.item_class_id) then
554: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
555: fnd_message.set_token('FIELD_NAME ', 'ITEM_CLASS_ID');
556: fnd_message.set_token('PROCEDURE ', l_proc);
557: fnd_message.set_token('STEP ', '5');
558: fnd_message.raise_error;
551: fnd_message.raise_error;
552: end if;
553: if (ame_rul_shd.g_old_rec.item_class_id <> p_rec.item_class_id) then
554: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
555: fnd_message.set_token('FIELD_NAME ', 'ITEM_CLASS_ID');
556: fnd_message.set_token('PROCEDURE ', l_proc);
557: fnd_message.set_token('STEP ', '5');
558: fnd_message.raise_error;
559: end if;
552: end if;
553: if (ame_rul_shd.g_old_rec.item_class_id <> p_rec.item_class_id) then
554: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
555: fnd_message.set_token('FIELD_NAME ', 'ITEM_CLASS_ID');
556: fnd_message.set_token('PROCEDURE ', l_proc);
557: fnd_message.set_token('STEP ', '5');
558: fnd_message.raise_error;
559: end if;
560: --
553: if (ame_rul_shd.g_old_rec.item_class_id <> p_rec.item_class_id) then
554: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
555: fnd_message.set_token('FIELD_NAME ', 'ITEM_CLASS_ID');
556: fnd_message.set_token('PROCEDURE ', l_proc);
557: fnd_message.set_token('STEP ', '5');
558: fnd_message.raise_error;
559: end if;
560: --
561: End chk_non_updateable_args;
554: fnd_message.set_name('PER', 'AME_400467_NON_UPDATEABLE_FIELD');
555: fnd_message.set_token('FIELD_NAME ', 'ITEM_CLASS_ID');
556: fnd_message.set_token('PROCEDURE ', l_proc);
557: fnd_message.set_token('STEP ', '5');
558: fnd_message.raise_error;
559: end if;
560: --
561: End chk_non_updateable_args;
562: --
628: --
629: -- An unhandled or unexpected error has occurred which
630: -- we must report
631: --
632: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
633: fnd_message.set_token('PROCEDURE', l_proc);
634: fnd_message.set_token('STEP','15');
635: fnd_message.raise_error;
636: End dt_update_validate;
629: -- An unhandled or unexpected error has occurred which
630: -- we must report
631: --
632: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
633: fnd_message.set_token('PROCEDURE', l_proc);
634: fnd_message.set_token('STEP','15');
635: fnd_message.raise_error;
636: End dt_update_validate;
637: --
630: -- we must report
631: --
632: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
633: fnd_message.set_token('PROCEDURE', l_proc);
634: fnd_message.set_token('STEP','15');
635: fnd_message.raise_error;
636: End dt_update_validate;
637: --
638: -- ----------------------------------------------------------------------------
631: --
632: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
633: fnd_message.set_token('PROCEDURE', l_proc);
634: fnd_message.set_token('STEP','15');
635: fnd_message.raise_error;
636: End dt_update_validate;
637: --
638: -- ----------------------------------------------------------------------------
639: -- |--------------------------< dt_delete_validate >--------------------------|
729: --
730: -- An unhandled or unexpected error has occurred which
731: -- we must report
732: --
733: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
734: fnd_message.set_token('PROCEDURE', l_proc);
735: fnd_message.set_token('STEP','15');
736: fnd_message.raise_error;
737: --
730: -- An unhandled or unexpected error has occurred which
731: -- we must report
732: --
733: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
734: fnd_message.set_token('PROCEDURE', l_proc);
735: fnd_message.set_token('STEP','15');
736: fnd_message.raise_error;
737: --
738: End dt_delete_validate;
731: -- we must report
732: --
733: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
734: fnd_message.set_token('PROCEDURE', l_proc);
735: fnd_message.set_token('STEP','15');
736: fnd_message.raise_error;
737: --
738: End dt_delete_validate;
739: --
732: --
733: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
734: fnd_message.set_token('PROCEDURE', l_proc);
735: fnd_message.set_token('STEP','15');
736: fnd_message.raise_error;
737: --
738: End dt_delete_validate;
739: --
740: -- ----------------------------------------------------------------------------