69: IS
70: BEGIN
71: IF p_id IS NULL
72: THEN
73: fnd_message.set_name ('FND', 'MO_OU_REQUIRED');
74: fnd_msg_pub.ADD;
75: RAISE fnd_api.g_exc_error;
76: END IF;
77: END;
149: OR (p_comp_plan.start_date = fnd_api.g_miss_date)
150: THEN
151: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
152: THEN
153: fnd_message.set_name ('CN', 'CN_REQ_PAR_MISSING');
154: fnd_msg_pub.ADD;
155: END IF;
156:
157: RAISE fnd_api.g_exc_error;
166: IF l_temp_count <> 0
167: THEN
168: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
169: THEN
170: fnd_message.set_name ('CN', 'CN_INPUT_MUST_UNIQUE');
171: fnd_message.set_token ('INPUT_NAME', cn_api.get_lkup_meaning ('NAME', 'INPUT_TOKEN'));
172: fnd_msg_pub.ADD;
173: END IF;
174:
167: THEN
168: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
169: THEN
170: fnd_message.set_name ('CN', 'CN_INPUT_MUST_UNIQUE');
171: fnd_message.set_token ('INPUT_NAME', cn_api.get_lkup_meaning ('NAME', 'INPUT_TOKEN'));
172: fnd_msg_pub.ADD;
173: END IF;
174:
175: RAISE fnd_api.g_exc_error;
179: IF (p_comp_plan.end_date IS NOT NULL) AND (p_comp_plan.start_date > p_comp_plan.end_date)
180: THEN
181: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
182: THEN
183: fnd_message.set_name ('CN', 'CN_DATE_RANGE_ERROR');
184: fnd_msg_pub.ADD;
185: END IF;
186:
187: RAISE fnd_api.g_exc_error;
276:
277:
278: /* System Generated - Create Note Functionality */
279: /* This code is later needed when the Public --> Pvt instead of pvt --> public
280: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_CREATE');
281: fnd_message.set_token ('CP_NAME', l_comp_rec.NAME);
282: l_note_msg := fnd_message.get;
283: jtf_notes_pub.create_note
284: (p_api_version => 1.0,
277:
278: /* System Generated - Create Note Functionality */
279: /* This code is later needed when the Public --> Pvt instead of pvt --> public
280: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_CREATE');
281: fnd_message.set_token ('CP_NAME', l_comp_rec.NAME);
282: l_note_msg := fnd_message.get;
283: jtf_notes_pub.create_note
284: (p_api_version => 1.0,
285: x_return_status => x_return_status,
278: /* System Generated - Create Note Functionality */
279: /* This code is later needed when the Public --> Pvt instead of pvt --> public
280: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_CREATE');
281: fnd_message.set_token ('CP_NAME', l_comp_rec.NAME);
282: l_note_msg := fnd_message.get;
283: jtf_notes_pub.create_note
284: (p_api_version => 1.0,
285: x_return_status => x_return_status,
286: x_msg_count => x_msg_count,
431: IF (p_comp_plan.NAME IS NULL) OR (p_comp_plan.start_date IS NULL)
432: THEN
433: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
434: THEN
435: fnd_message.set_name ('CN', 'CN_REQ_PAR_MISSING');
436: fnd_msg_pub.ADD;
437: END IF;
438:
439: RAISE fnd_api.g_exc_error;
448: IF l_temp_count <> 0
449: THEN
450: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
451: THEN
452: fnd_message.set_name ('CN', 'CN_INPUT_MUST_UNIQUE');
453: fnd_message.set_token ('INPUT_NAME', cn_api.get_lkup_meaning ('NAME', 'INPUT_TOKEN'));
454: fnd_msg_pub.ADD;
455: END IF;
456:
449: THEN
450: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
451: THEN
452: fnd_message.set_name ('CN', 'CN_INPUT_MUST_UNIQUE');
453: fnd_message.set_token ('INPUT_NAME', cn_api.get_lkup_meaning ('NAME', 'INPUT_TOKEN'));
454: fnd_msg_pub.ADD;
455: END IF;
456:
457: RAISE fnd_api.g_exc_error;
490: IF (l_end_date IS NOT NULL) AND (l_start_date > l_end_date)
491: THEN
492: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
493: THEN
494: fnd_message.set_name ('CN', 'CN_DATE_RANGE_ERROR');
495: fnd_msg_pub.ADD;
496: END IF;
497:
498: RAISE fnd_api.g_exc_error;
546:
547: -- 3. check object version number
548: IF l_old_comp_plan.object_version_number <> p_comp_plan.object_version_number
549: THEN
550: fnd_message.set_name ('CN', 'CN_RECORD_CHANGED');
551: fnd_msg_pub.ADD;
552: RAISE fnd_api.g_exc_error;
553: END IF;
554:
565:
566: -- if end date null then cond doesn't pass, but that's okay
567: IF l_temp_count > 0
568: THEN
569: fnd_message.set_name ('CN', 'CN_PLAN_ELT_DISJOINT');
570: fnd_msg_pub.ADD;
571: RAISE fnd_api.g_exc_error;
572: END IF;
573:
577: WHERE comp_plan_id = l_comp_plan_id AND (start_date < l_start_date OR (end_date IS NULL AND l_end_date IS NOT NULL) OR (end_date > l_end_date));
578:
579: IF l_temp_count > 0
580: THEN
581: fnd_message.set_name ('CN', 'CN_ROLE_NOT_WITHIN_PLAN');
582: fnd_msg_pub.ADD;
583: RAISE fnd_api.g_exc_error;
584: END IF;
585:
649: l_consolidated_note := '';
650: IF (p_comp_plan.NAME <> fnd_api.g_miss_char AND p_comp_plan.NAME IS NOT NULL AND p_comp_plan.NAME <> l_old_comp_plan.NAME)
651: THEN
652: -- Need to add note CNR12_NOTE_COMPPLAN_UPDATE
653: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_UPDATE');
654: fnd_message.set_token ('OLD_CP_NAME', l_old_comp_plan.NAME);
655: fnd_message.set_token ('NEW_CP_NAME', p_comp_plan.NAME);
656: l_note_msg := fnd_message.get;
657: l_consolidated_note := l_note_msg || fnd_global.local_chr(10);
650: IF (p_comp_plan.NAME <> fnd_api.g_miss_char AND p_comp_plan.NAME IS NOT NULL AND p_comp_plan.NAME <> l_old_comp_plan.NAME)
651: THEN
652: -- Need to add note CNR12_NOTE_COMPPLAN_UPDATE
653: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_UPDATE');
654: fnd_message.set_token ('OLD_CP_NAME', l_old_comp_plan.NAME);
655: fnd_message.set_token ('NEW_CP_NAME', p_comp_plan.NAME);
656: l_note_msg := fnd_message.get;
657: l_consolidated_note := l_note_msg || fnd_global.local_chr(10);
658:
651: THEN
652: -- Need to add note CNR12_NOTE_COMPPLAN_UPDATE
653: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_UPDATE');
654: fnd_message.set_token ('OLD_CP_NAME', l_old_comp_plan.NAME);
655: fnd_message.set_token ('NEW_CP_NAME', p_comp_plan.NAME);
656: l_note_msg := fnd_message.get;
657: l_consolidated_note := l_note_msg || fnd_global.local_chr(10);
658:
659: /*
652: -- Need to add note CNR12_NOTE_COMPPLAN_UPDATE
653: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_UPDATE');
654: fnd_message.set_token ('OLD_CP_NAME', l_old_comp_plan.NAME);
655: fnd_message.set_token ('NEW_CP_NAME', p_comp_plan.NAME);
656: l_note_msg := fnd_message.get;
657: l_consolidated_note := l_note_msg || fnd_global.local_chr(10);
658:
659: /*
660: jtf_notes_pub.create_note (p_api_version => 1.0,
676: AND p_comp_plan.start_date <> l_old_comp_plan.start_date
677: )
678: THEN
679: -- Need to add note CNR12_NOTE_COMPPLAN_SDATE_CRE
680: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_SDATE_CRE');
681: fnd_message.set_token ('OLD_ST_DATE', TO_CHAR (l_old_comp_plan.start_date));
682: fnd_message.set_token ('NEW_ST_DATE', TO_CHAR (p_comp_plan.start_date));
683: l_note_msg := fnd_message.get;
684: l_consolidated_note := l_consolidated_note || l_note_msg || fnd_global.local_chr(10);
677: )
678: THEN
679: -- Need to add note CNR12_NOTE_COMPPLAN_SDATE_CRE
680: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_SDATE_CRE');
681: fnd_message.set_token ('OLD_ST_DATE', TO_CHAR (l_old_comp_plan.start_date));
682: fnd_message.set_token ('NEW_ST_DATE', TO_CHAR (p_comp_plan.start_date));
683: l_note_msg := fnd_message.get;
684: l_consolidated_note := l_consolidated_note || l_note_msg || fnd_global.local_chr(10);
685:
678: THEN
679: -- Need to add note CNR12_NOTE_COMPPLAN_SDATE_CRE
680: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_SDATE_CRE');
681: fnd_message.set_token ('OLD_ST_DATE', TO_CHAR (l_old_comp_plan.start_date));
682: fnd_message.set_token ('NEW_ST_DATE', TO_CHAR (p_comp_plan.start_date));
683: l_note_msg := fnd_message.get;
684: l_consolidated_note := l_consolidated_note || l_note_msg || fnd_global.local_chr(10);
685:
686: /*
679: -- Need to add note CNR12_NOTE_COMPPLAN_SDATE_CRE
680: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_SDATE_CRE');
681: fnd_message.set_token ('OLD_ST_DATE', TO_CHAR (l_old_comp_plan.start_date));
682: fnd_message.set_token ('NEW_ST_DATE', TO_CHAR (p_comp_plan.start_date));
683: l_note_msg := fnd_message.get;
684: l_consolidated_note := l_consolidated_note || l_note_msg || fnd_global.local_chr(10);
685:
686: /*
687: jtf_notes_pub.create_note (p_api_version => 1.0,
701: /* 3. Check if the end date has been changed */
702: IF (p_comp_plan.end_date <> fnd_api.g_miss_date AND p_comp_plan.end_date IS NOT NULL AND p_comp_plan.end_date <> l_old_comp_plan.end_date)
703: THEN
704: -- Need to add note CNR12_NOTE_COMPPLAN_EDATE_UPD
705: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_EDATE_UPD');
706: fnd_message.set_token ('OLD_END_DATE', TO_CHAR (l_old_comp_plan.end_date));
707: fnd_message.set_token ('NEW_END_DATE', TO_CHAR (p_comp_plan.end_date));
708: l_note_msg := fnd_message.get;
709: l_consolidated_note := l_consolidated_note || l_note_msg || fnd_global.local_chr(10);
702: IF (p_comp_plan.end_date <> fnd_api.g_miss_date AND p_comp_plan.end_date IS NOT NULL AND p_comp_plan.end_date <> l_old_comp_plan.end_date)
703: THEN
704: -- Need to add note CNR12_NOTE_COMPPLAN_EDATE_UPD
705: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_EDATE_UPD');
706: fnd_message.set_token ('OLD_END_DATE', TO_CHAR (l_old_comp_plan.end_date));
707: fnd_message.set_token ('NEW_END_DATE', TO_CHAR (p_comp_plan.end_date));
708: l_note_msg := fnd_message.get;
709: l_consolidated_note := l_consolidated_note || l_note_msg || fnd_global.local_chr(10);
710: /*
703: THEN
704: -- Need to add note CNR12_NOTE_COMPPLAN_EDATE_UPD
705: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_EDATE_UPD');
706: fnd_message.set_token ('OLD_END_DATE', TO_CHAR (l_old_comp_plan.end_date));
707: fnd_message.set_token ('NEW_END_DATE', TO_CHAR (p_comp_plan.end_date));
708: l_note_msg := fnd_message.get;
709: l_consolidated_note := l_consolidated_note || l_note_msg || fnd_global.local_chr(10);
710: /*
711: jtf_notes_pub.create_note (p_api_version => 1.0,
704: -- Need to add note CNR12_NOTE_COMPPLAN_EDATE_UPD
705: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_EDATE_UPD');
706: fnd_message.set_token ('OLD_END_DATE', TO_CHAR (l_old_comp_plan.end_date));
707: fnd_message.set_token ('NEW_END_DATE', TO_CHAR (p_comp_plan.end_date));
708: l_note_msg := fnd_message.get;
709: l_consolidated_note := l_consolidated_note || l_note_msg || fnd_global.local_chr(10);
710: /*
711: jtf_notes_pub.create_note (p_api_version => 1.0,
712: x_return_status => x_return_status,
729: AND p_comp_plan.allow_rev_class_overlap = 'N'
730: )
731: THEN
732: -- Need to add note CNR12_NOTE_COMPPLAN_ELIG_UPD2
733: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_ELIG_UPD2');
734: l_note_msg := fnd_message.get;
735: l_consolidated_note := l_consolidated_note || l_note_msg || fnd_global.local_chr(10);
736: /*
737: jtf_notes_pub.create_note (p_api_version => 1.0,
730: )
731: THEN
732: -- Need to add note CNR12_NOTE_COMPPLAN_ELIG_UPD2
733: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_ELIG_UPD2');
734: l_note_msg := fnd_message.get;
735: l_consolidated_note := l_consolidated_note || l_note_msg || fnd_global.local_chr(10);
736: /*
737: jtf_notes_pub.create_note (p_api_version => 1.0,
738: x_return_status => x_return_status,
755: AND p_comp_plan.allow_rev_class_overlap = 'Y'
756: )
757: THEN
758: -- Need to add note CNR12_NOTE_COMPPLAN_ELIG_UPD1
759: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_ELIG_UPD1');
760: l_note_msg := fnd_message.get;
761: l_consolidated_note := l_consolidated_note || l_note_msg || fnd_global.local_chr(10);
762: /*
763: jtf_notes_pub.create_note (p_api_version => 1.0,
756: )
757: THEN
758: -- Need to add note CNR12_NOTE_COMPPLAN_ELIG_UPD1
759: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_ELIG_UPD1');
760: l_note_msg := fnd_message.get;
761: l_consolidated_note := l_consolidated_note || l_note_msg || fnd_global.local_chr(10);
762: /*
763: jtf_notes_pub.create_note (p_api_version => 1.0,
764: x_return_status => x_return_status,
947:
948: /* Added the Notes for R12 */
949: IF (l_org_id <> -999)
950: THEN
951: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_DELETE');
952: fnd_message.set_token ('CP_NAME', l_cp_name);
953: l_note_msg := fnd_message.get;
954: jtf_notes_pub.create_note (p_api_version => 1.0,
955: x_return_status => x_return_status,
948: /* Added the Notes for R12 */
949: IF (l_org_id <> -999)
950: THEN
951: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_DELETE');
952: fnd_message.set_token ('CP_NAME', l_cp_name);
953: l_note_msg := fnd_message.get;
954: jtf_notes_pub.create_note (p_api_version => 1.0,
955: x_return_status => x_return_status,
956: x_msg_count => x_msg_count,
949: IF (l_org_id <> -999)
950: THEN
951: fnd_message.set_name ('CN', 'CNR12_NOTE_COMPPLAN_DELETE');
952: fnd_message.set_token ('CP_NAME', l_cp_name);
953: l_note_msg := fnd_message.get;
954: jtf_notes_pub.create_note (p_api_version => 1.0,
955: x_return_status => x_return_status,
956: x_msg_count => x_msg_count,
957: x_msg_data => x_msg_data,
1481: IF l_temp_count = 0
1482: THEN
1483: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
1484: THEN
1485: fnd_message.set_name ('CN', 'CN_NO_PE_ASSIGNED');
1486: fnd_msg_pub.ADD;
1487: END IF;
1488:
1489: RAISE fnd_api.g_exc_error;
1503: IF l_incomp_forms IS NOT NULL
1504: THEN
1505: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
1506: THEN
1507: fnd_message.set_name ('CN', 'CN_INCOMP_FORMULA');
1508: fnd_message.set_token ('FORMULA_NAME', l_incomp_forms);
1509: fnd_msg_pub.ADD;
1510: END IF;
1511:
1504: THEN
1505: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
1506: THEN
1507: fnd_message.set_name ('CN', 'CN_INCOMP_FORMULA');
1508: fnd_message.set_token ('FORMULA_NAME', l_incomp_forms);
1509: fnd_msg_pub.ADD;
1510: END IF;
1511:
1512: RAISE fnd_api.g_exc_error;
1682: WHEN NO_DATA_FOUND
1683: THEN
1684: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
1685: THEN
1686: fnd_message.set_name ('CN', 'CN_CP_NOT_EXIST');
1687: fnd_msg_pub.ADD;
1688: END IF;
1689:
1690: x_loading_status := 'CN_CP_NOT_EXIST';
1709: THEN
1710:
1711: /* IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
1712: THEN
1713: fnd_message.set_name ('CN', 'PLN_PLAN_DUP_REV_CLASS');
1714: fnd_message.set_token ('PLAN_NAME', l_comp_plan_name);
1715: fnd_msg_pub.ADD;
1716: END IF; */
1717:
1710:
1711: /* IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
1712: THEN
1713: fnd_message.set_name ('CN', 'PLN_PLAN_DUP_REV_CLASS');
1714: fnd_message.set_token ('PLAN_NAME', l_comp_plan_name);
1715: fnd_msg_pub.ADD;
1716: END IF; */
1717:
1718: x_loading_status := 'PLN_PLAN_DUP_REV_CLASS';