8: --
9: -- History
10: -- 12/1/1999 julou created
11: -------------------------------------------------------------------------------
12: AMS_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
13: AMS_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
14: AMS_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
15:
16: PROCEDURE create_setup_attr
9: -- History
10: -- 12/1/1999 julou created
11: -------------------------------------------------------------------------------
12: AMS_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
13: AMS_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
14: AMS_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
15:
16: PROCEDURE create_setup_attr
17: (
10: -- 12/1/1999 julou created
11: -------------------------------------------------------------------------------
12: AMS_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
13: AMS_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
14: AMS_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
15:
16: PROCEDURE create_setup_attr
17: (
18: p_api_version IN NUMBER,
49: -- initialize
50: SAVEPOINT create_setup_attr;
51:
52: IF FND_API.to_boolean(p_init_msg_list) THEN
53: FND_MSG_PUB.initialize;
54: END IF;
55:
56: IF (AMS_DEBUG_HIGH_ON) THEN
57:
175: IF FND_API.to_boolean(p_commit) THEN
176: COMMIT;
177: END IF;
178:
179: FND_MSG_PUB.count_and_get
180: (
181: p_encoded => FND_API.g_false,
182: p_count => x_msg_count,
183: p_data => x_msg_data
195:
196: WHEN FND_API.g_exc_error THEN
197: ROLLBACK TO create_setup_attr;
198: x_return_status := FND_API.g_ret_sts_error;
199: FND_MSG_PUB.count_and_get
200: (
201: p_encoded => FND_API.g_false,
202: p_count => x_msg_count,
203: p_data => x_msg_data
205:
206: WHEN FND_API.g_exc_unexpected_error THEN
207: ROLLBACK TO create_setup_attr;
208: x_return_status := FND_API.g_ret_sts_unexp_error;
209: FND_MSG_PUB.count_and_get
210: (
211: p_encoded => FND_API.g_false,
212: p_count => x_msg_count,
213: p_data => x_msg_data
215:
216: WHEN OTHERS THEN
217: ROLLBACK TO create_setup_attr;
218: x_return_status :=FND_API.g_ret_sts_unexp_error;
219: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
220: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
221: END IF;
222: FND_MSG_PUB.count_and_get
223: (
216: WHEN OTHERS THEN
217: ROLLBACK TO create_setup_attr;
218: x_return_status :=FND_API.g_ret_sts_unexp_error;
219: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
220: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
221: END IF;
222: FND_MSG_PUB.count_and_get
223: (
224: p_encoded => FND_API.g_false,
218: x_return_status :=FND_API.g_ret_sts_unexp_error;
219: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
220: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
221: END IF;
222: FND_MSG_PUB.count_and_get
223: (
224: p_encoded => FND_API.g_false,
225: p_count => x_msg_count,
226: p_data => x_msg_data
261: -- initialize
262: SAVEPOINT update_setup_attr;
263:
264: IF FND_API.to_boolean(p_init_msg_list) THEN
265: FND_MSG_PUB.initialize;
266: END IF;
267:
268: x_return_status := FND_API.g_ret_sts_success;
269:
336: WHERE setup_attribute_id = l_setup_attr_rec.setup_attribute_id
337: AND object_version_number = l_setup_attr_rec.object_version_number;
338:
339: IF (SQL%NOTFOUND) THEN
340: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
341: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
342: FND_MSG_PUB.add;
343: END IF;
344: RAISE FND_API.g_exc_error;
338:
339: IF (SQL%NOTFOUND) THEN
340: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
341: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
342: FND_MSG_PUB.add;
343: END IF;
344: RAISE FND_API.g_exc_error;
345: END IF;
346:
348: IF FND_API.to_boolean(p_commit) THEN
349: COMMIT;
350: END IF;
351:
352: FND_MSG_PUB.count_and_get
353: (
354: P_ENCODED => FND_API.g_false,
355: p_count => x_msg_count,
356: p_data => x_msg_data
368:
369: WHEN FND_API.g_exc_error THEN
370: ROLLBACK TO update_setup_attr;
371: x_return_status := FND_API.g_ret_sts_error;
372: FND_MSG_PUB.count_and_get
373: (
374: p_encoded => FND_API.g_false,
375: p_count => x_msg_count,
376: p_data => x_msg_data
378:
379: WHEN FND_API.g_exc_unexpected_error THEN
380: ROLLBACK TO update_setup_attr;
381: x_return_status := FND_API.g_ret_sts_unexp_error;
382: FND_MSG_PUB.count_and_get
383: (
384: p_encoded => FND_API.g_false,
385: p_count => x_msg_count,
386: p_data => x_msg_data
388:
389: WHEN OTHERS THEN
390: ROLLBACK TO update_setup_attr;
391: x_return_status :=FND_API.g_ret_sts_unexp_error;
392: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
393: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
394: END IF;
395: FND_MSG_PUB.count_and_get
396: (
389: WHEN OTHERS THEN
390: ROLLBACK TO update_setup_attr;
391: x_return_status :=FND_API.g_ret_sts_unexp_error;
392: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
393: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
394: END IF;
395: FND_MSG_PUB.count_and_get
396: (
397: p_encoded => FND_API.g_false,
391: x_return_status :=FND_API.g_ret_sts_unexp_error;
392: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
393: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
394: END IF;
395: FND_MSG_PUB.count_and_get
396: (
397: p_encoded => FND_API.g_false,
398: p_count => x_msg_count,
399: p_data => x_msg_data
434: ----------------------- initialize --------------------
435: -- IF (AMS_DEBUG_HIGH_ON) THEN AMS_Utility_PVT.debug_message(l_full_name||': start start '); END IF;
436:
437: IF FND_API.to_boolean(p_init_msg_list) THEN
438: FND_MSG_PUB.initialize;
439: END IF;
440:
441: /** IF NOT FND_API.compatible_api_call(
442: l_api_version,
470: END IF;
471: END IF;
472:
473: -------------------- finish --------------------------
474: FND_MSG_PUB.count_and_get(
475: p_encoded => FND_API.g_false,
476: p_count => x_msg_count,
477: p_data => x_msg_data
478: );
487:
488: EXCEPTION
489: WHEN FND_API.g_exc_error THEN
490: x_return_status := FND_API.g_ret_sts_error;
491: FND_MSG_PUB.count_and_get
492: (
493: p_encoded => FND_API.g_false,
494: p_count => x_msg_count,
495: p_data => x_msg_data
496: );
497:
498: WHEN FND_API.g_exc_unexpected_error THEN
499: x_return_status := FND_API.g_ret_sts_unexp_error ;
500: FND_MSG_PUB.count_and_get
501: (
502: p_encoded => FND_API.g_false,
503: p_count => x_msg_count,
504: p_data => x_msg_data
505: );
506:
507: WHEN OTHERS THEN
508: x_return_status := FND_API.g_ret_sts_unexp_error;
509: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
510: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
511: END IF;
512:
513: FND_MSG_PUB.count_and_get
506:
507: WHEN OTHERS THEN
508: x_return_status := FND_API.g_ret_sts_unexp_error;
509: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
510: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
511: END IF;
512:
513: FND_MSG_PUB.count_and_get
514: (
509: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
510: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
511: END IF;
512:
513: FND_MSG_PUB.count_and_get
514: (
515: p_encoded => FND_API.g_false,
516: p_count => x_msg_count,
517: p_data => x_msg_data
617:
618: -- check setup_attribute_id
619: IF p_setup_attr_rec.setup_attribute_id IS NULL
620: AND p_validation_mode = JTF_PLSQL_API.g_update THEN
621: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
622: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATT_NO_SETUP_ATT_ID');
623: FND_MSG_PUB.add;
624: END IF;
625:
619: IF p_setup_attr_rec.setup_attribute_id IS NULL
620: AND p_validation_mode = JTF_PLSQL_API.g_update THEN
621: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
622: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATT_NO_SETUP_ATT_ID');
623: FND_MSG_PUB.add;
624: END IF;
625:
626: x_return_status := FND_API.g_ret_sts_error;
627: RETURN;
630: -- check object_version_number
631: IF p_setup_attr_rec.object_version_number IS NULL
632: AND p_validation_mode = JTF_PLSQL_API.g_update
633: THEN
634: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
635: FND_MESSAGE.set_name('AMS', 'AMS_API_NO_OBJ_VER_NUM');
636: FND_MSG_PUB.add;
637: END IF;
638:
632: AND p_validation_mode = JTF_PLSQL_API.g_update
633: THEN
634: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
635: FND_MESSAGE.set_name('AMS', 'AMS_API_NO_OBJ_VER_NUM');
636: FND_MSG_PUB.add;
637: END IF;
638:
639: x_return_status := FND_API.g_ret_sts_error;
640: RETURN;
641: END IF;
642:
643: -- check custom_setup_id
644: IF p_setup_attr_rec.custom_setup_id IS NULL THEN
645: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
646: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATT_NO_CUS_SETUP_ID');
647: FND_MSG_PUB.add;
648: END IF;
649:
643: -- check custom_setup_id
644: IF p_setup_attr_rec.custom_setup_id IS NULL THEN
645: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
646: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATT_NO_CUS_SETUP_ID');
647: FND_MSG_PUB.add;
648: END IF;
649:
650: x_return_status := FND_API.g_ret_sts_error;
651: RETURN;
652: END IF;
653:
654: -- check display_sequence_no
655: IF p_setup_attr_rec.display_sequence_no IS NULL THEN
656: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
657: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATT_NO_DIS_SEQ_NO');
658: FND_MSG_PUB.add;
659: END IF;
660:
654: -- check display_sequence_no
655: IF p_setup_attr_rec.display_sequence_no IS NULL THEN
656: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
657: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATT_NO_DIS_SEQ_NO');
658: FND_MSG_PUB.add;
659: END IF;
660:
661: x_return_status := FND_API.g_ret_sts_error;
662: RETURN;
663: END IF;
664:
665: -- check object_attribute
666: IF p_setup_attr_rec.object_attribute IS NULL THEN
667: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
668: FND_MESSAGE.set_name('AMS', 'AMS_CUS_SETUP_NO_OBJ_ATTR');
669: FND_MSG_PUB.add;
670: END IF;
671:
665: -- check object_attribute
666: IF p_setup_attr_rec.object_attribute IS NULL THEN
667: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
668: FND_MESSAGE.set_name('AMS', 'AMS_CUS_SETUP_NO_OBJ_ATTR');
669: FND_MSG_PUB.add;
670: END IF;
671:
672: x_return_status := FND_API.g_ret_sts_error;
673: RETURN;
674: END IF;
675:
676: -- check attr_mandatory_flag
677: IF p_setup_attr_rec.attr_mandatory_flag IS NULL THEN
678: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
679: -- Change message here from Mandatory to Essential
680: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATT_NO_ATT_ESS_FLAG');
681: FND_MSG_PUB.add;
682: END IF;
677: IF p_setup_attr_rec.attr_mandatory_flag IS NULL THEN
678: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
679: -- Change message here from Mandatory to Essential
680: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATT_NO_ATT_ESS_FLAG');
681: FND_MSG_PUB.add;
682: END IF;
683:
684: x_return_status := FND_API.g_ret_sts_error;
685: RETURN;
687:
688: -- Put the check for the essential seq num here
689: IF (nvl(p_setup_attr_rec.attr_mandatory_flag, 'N') = 'Y' AND
690: p_setup_attr_rec.essential_seq_num IS NULL) THEN
691: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
692: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATT_NO_ESS_SEQ_NUM');
693: FND_MSG_PUB.add;
694: END IF;
695:
689: IF (nvl(p_setup_attr_rec.attr_mandatory_flag, 'N') = 'Y' AND
690: p_setup_attr_rec.essential_seq_num IS NULL) THEN
691: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
692: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATT_NO_ESS_SEQ_NUM');
693: FND_MSG_PUB.add;
694: END IF;
695:
696: x_return_status := FND_API.g_ret_sts_error;
697: RETURN;
698: END IF;
699:
700: -- check attr_available_flag
701: IF p_setup_attr_rec.attr_available_flag IS NULL THEN
702: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
703: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATT_NO_ATT_AVAL_FLAG');
704: FND_MSG_PUB.add;
705: END IF;
706:
700: -- check attr_available_flag
701: IF p_setup_attr_rec.attr_available_flag IS NULL THEN
702: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
703: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATT_NO_ATT_AVAL_FLAG');
704: FND_MSG_PUB.add;
705: END IF;
706:
707: x_return_status := FND_API.g_ret_sts_error;
708: RETURN;
755: );
756: END IF;
757:
758: IF l_uk_flag = FND_API.g_false THEN
759: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
760: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATTR_DUPLICATE_ID');
761: FND_MSG_PUB.add;
762: END IF;
763:
757:
758: IF l_uk_flag = FND_API.g_false THEN
759: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
760: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATTR_DUPLICATE_ID');
761: FND_MSG_PUB.add;
762: END IF;
763:
764:
765: x_return_status := FND_API.g_ret_sts_error;
775: FETCH c_ess_seq_exists INTO l_dummy;
776: CLOSE c_ess_seq_exists;
777:
778: IF l_dummy = 1 THEN
779: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_ERROR)
780: THEN
781: Fnd_Message.set_name('AMS', 'AMS_ESSENTIAL_DUP_SEQ');
782: Fnd_Msg_Pub.ADD;
783: x_return_status := Fnd_Api.g_ret_sts_error;
778: IF l_dummy = 1 THEN
779: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_ERROR)
780: THEN
781: Fnd_Message.set_name('AMS', 'AMS_ESSENTIAL_DUP_SEQ');
782: Fnd_Msg_Pub.ADD;
783: x_return_status := Fnd_Api.g_ret_sts_error;
784: RETURN;
785: END IF;
786: END IF;
822: p_setup_attr_rec.custom_setup_id
823: );
824:
825: IF l_fk_flag = FND_API.g_false THEN
826: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
827: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATTR_BAD_CUS_SET_ID');
828: FND_MSG_PUB.add;
829: END IF;
830:
824:
825: IF l_fk_flag = FND_API.g_false THEN
826: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
827: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATTR_BAD_CUS_SET_ID');
828: FND_MSG_PUB.add;
829: END IF;
830:
831: x_return_status := FND_API.g_ret_sts_error;
832: RETURN;
900: x_return_status := FND_API.g_ret_sts_success;
901: l_mand_setup_attr := NULL;
902: IF p_setup_attr_rec.attr_mandatory_flag NOT IN ('Y','N',FND_API.g_miss_char,NULL)
903: THEN
904: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
905: -- Added by cgoyal on 06/Feb/2002 for bugfix 2178381
906: IF l_mand_setup_attr IS NULL THEN
907: OPEN c_mand_setup_attr (p_setup_attr_rec.object_attribute);
908: FETCH c_mand_setup_attr
917: END IF;
918: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATTR_INVALID_ESS_FLG');
919: FND_MESSAGE.set_token('ESS_SETUP_ATTR', l_mand_setup_attr);
920: -- End Add by cgoyal
921: FND_MSG_PUB.add;
922: END IF;
923: x_return_status := FND_API.g_ret_sts_error;
924: RETURN;
925: END IF;
925: END IF;
926:
927: IF p_setup_attr_rec.attr_available_flag NOT IN ('Y','N',FND_API.g_miss_char,NULL)
928: THEN
929: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
930: -- Added by cgoyal on 06/Feb/2002 for bugfix 2178381
931: IF l_mand_setup_attr IS NULL THEN
932: OPEN c_mand_setup_attr (p_setup_attr_rec.object_attribute);
933: FETCH c_mand_setup_attr
941: END IF;
942: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATTR_INVALID_AVL_FLG');
943: FND_MESSAGE.set_token('MAND_SETUP_ATTR', l_mand_setup_attr);
944: -- End Add by cgoyal
945: FND_MSG_PUB.add;
946: END IF;
947: END IF;
948: x_return_status := FND_API.g_ret_sts_error;
949: RETURN;
965: END IF;
966: -- End of code modified by ptendulk on 29th Dec.
967:
968: IF (p_setup_attr_rec.OBJECT_ATTRIBUTE = 'DETL') AND (p_setup_attr_rec.attr_mandatory_flag <> 'Y') THEN
969: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
970: -- Added by cgoyal on 06/Feb/2002 for bugfix 2178381
971: IF l_mand_setup_attr IS NULL THEN
972: OPEN c_mand_setup_attr (p_setup_attr_rec.object_attribute);
973: FETCH c_mand_setup_attr
982: END IF;
983: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATTR_BAD_ESS_FLAG');
984: FND_MESSAGE.set_token('ESS_SETUP_ATTR', l_mand_setup_attr);
985: -- End Add by cgoyal
986: FND_MSG_PUB.add;
987: END IF;
988: x_return_status := FND_API.g_ret_sts_error;
989: RETURN;
990: END IF;
990: END IF;
991:
992: IF l_mand_flag = 'Y' THEN
993: IF p_setup_attr_rec.attr_available_flag <> 'Y' THEN
994: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
995: -- Added by cgoyal on 06/Feb/2002 for bugfix 2178381
996: IF l_mand_setup_attr IS NULL THEN
997: OPEN c_mand_setup_attr (p_setup_attr_rec.object_attribute);
998: FETCH c_mand_setup_attr
1007: END IF;
1008: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATTR_BAD_AVAL_FLAG');
1009: FND_MESSAGE.set_token('MAND_SETUP_ATTR', l_mand_setup_attr);
1010: -- End Add by cgoyal
1011: FND_MSG_PUB.add;
1012: END IF;
1013: x_return_status := FND_API.g_ret_sts_error;
1014: RETURN;
1015: END IF;
1017:
1018: IF p_setup_attr_rec.attr_mandatory_flag = 'Y'
1019: AND p_setup_attr_rec.attr_available_flag <> 'Y'
1020: THEN
1021: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1022: -- Added by cgoyal on 06/Feb/2002 for bugfix 2178381
1023: IF l_mand_setup_attr IS NULL THEN
1024: OPEN c_mand_setup_attr (p_setup_attr_rec.object_attribute);
1025: FETCH c_mand_setup_attr
1034: END IF;
1035: FND_MESSAGE.set_name('AMS', 'AMS_SETUP_ATTR_BAD_AVAL_FLAG');
1036: FND_MESSAGE.set_token('MAND_SETUP_ATTR', l_mand_setup_attr);
1037: -- End Add by cgoyal
1038: FND_MSG_PUB.add;
1039: END IF;
1040: x_return_status := FND_API.g_ret_sts_error;
1041: RETURN;
1042: END IF;
1070: OPEN c_setup_attr;
1071: FETCH c_setup_attr INTO l_setup_attr_rec;
1072: IF (c_setup_attr%NOTFOUND) THEN
1073: CLOSE c_setup_attr;
1074: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1075: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
1076: FND_MSG_PUB.add;
1077: END IF;
1078: RAISE FND_API.g_exc_error;
1072: IF (c_setup_attr%NOTFOUND) THEN
1073: CLOSE c_setup_attr;
1074: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1075: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
1076: FND_MSG_PUB.add;
1077: END IF;
1078: RAISE FND_API.g_exc_error;
1079: END IF;
1080: CLOSE c_setup_attr;