[Home] [Help]
235: -- End of Comments by ptendulk
236:
237: -- IF p_media_rec.media_type_code = 'DIRECT_MARKETING' THEN
238: -- IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
239: -- FND_MESSAGE.set_name ('AMS', 'AMS_MED_CANT_CREATE_DM_MEDIA');
240: -- FND_MSG_PUB.add;
241: -- END IF;
242: -- RAISE FND_API.g_exc_error;
243: -- END IF;
244:
245:
246: IF p_media_rec.media_type_code = 'EVENTS' THEN
247: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
248: FND_MESSAGE.set_name ('AMS', 'AMS_MED_CANT_CREATE_EVE_MEDIA');
249: FND_MSG_PUB.add;
250: END IF;
251: RAISE FND_API.g_exc_error;
252: END IF;
252: END IF;
253:
254: IF p_media_rec.media_type_code = 'INTERNET' THEN
255: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
256: FND_MESSAGE.set_name ('AMS', 'AMS_MED_CANT_CR_INTERNET_MEDIA');
257: FND_MSG_PUB.add;
258: END IF;
259: RAISE FND_API.g_exc_error;
260: END IF;
531: /***
532: IF IsSeeded (p_media_rec.media_id) THEN
533: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
534: THEN
535: FND_MESSAGE.set_name('AMS', 'AMS_API_SEED_DATA');
536: FND_MSG_PUB.add;
537: END IF;
538:
539: RAISE FND_API.G_EXC_ERROR;
610: AND object_version_number = l_media_rec.object_version_number ;
611:
612: IF (SQL%NOTFOUND) THEN
613: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
614: FND_MESSAGE.set_name ('AMS', 'AMS_API_RECORD_NOT_FOUND');
615: FND_MSG_PUB.add;
616: END IF;
617: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
618: END IF;
630: AND USERENV('LANG') IN (LANGUAGE, SOURCE_LANG);
631:
632: IF (SQL%NOTFOUND) THEN
633: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
634: FND_MESSAGE.set_name ('AMS', 'AMS_API_RECORD_NOT_FOUND');
635: FND_MSG_PUB.add;
636: END IF;
637: RAISE FND_API.g_exc_error;
638: END IF;
774: -- Check if record is seeded.
775: IF IsSeeded (p_media_id) THEN
776: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
777: THEN
778: FND_MESSAGE.set_name('AMS', 'AMS_API_SEED_DATA');
779: FND_MSG_PUB.add;
780: END IF;
781:
782: RAISE FND_API.G_EXC_ERROR;
795:
796: IF ( l_is_campaign = 'Y' ) OR ( l_is_setup = 'Y') THEN
797: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
798: THEN
799: FND_MESSAGE.set_name('AMS', 'AMS_MEDIA_IS_USED');
800: FND_MSG_PUB.add;
801: END IF;
802:
803: RAISE FND_API.G_EXC_ERROR;
812:
813:
814: IF (SQL%NOTFOUND) THEN
815: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
816: FND_MESSAGE.set_name ('AMS', 'AMS_API_RECORD_NOT_FOUND');
817: FND_MSG_PUB.add;
818: END IF;
819: RAISE FND_API.g_exc_error;
820: END IF;
945: FETCH c_lock INTO l_dummy;
946: IF (c_lock%NOTFOUND) THEN
947: CLOSE c_lock;
948: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
949: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
950: FND_MSG_PUB.add;
951: END IF;
952: RAISE FND_API.g_exc_error;
953: END IF;
971: EXCEPTION
972: WHEN AMS_Utility_PVT.resource_locked THEN
973: x_return_status := FND_API.g_ret_sts_error;
974: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
975: FND_MESSAGE.set_name ('AMS', 'AMS_API_RESOURCE_LOCKED');
976: FND_MSG_PUB.add;
977: END IF;
978:
979: FND_MSG_PUB.count_and_get (
1297: FETCH c_media INTO l_media_rec;
1298: IF c_media%NOTFOUND THEN
1299: CLOSE c_media;
1300: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1301: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
1302: FND_MSG_PUB.add;
1303: END IF;
1304: RAISE FND_API.g_exc_error;
1305: END IF;
1442: BEGIN
1443: -- MEDIA_TYPE_CODE
1444: IF p_media_rec.media_type_code IS NULL THEN
1445: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
1446: FND_MESSAGE.set_name ('AMS', 'AMS_MED_NO_MEDIA_TYPE_CODE');
1447: FND_MSG_PUB.add;
1448: END IF;
1449:
1450: x_return_status := FND_API.g_ret_sts_error;
1453:
1454: -- MEDIA_NAME
1455: IF p_media_rec.media_name IS NULL THEN
1456: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
1457: FND_MESSAGE.set_name ('AMS', 'AMS_MED_NO_MEDIA_NAME');
1458: FND_MSG_PUB.add;
1459: END IF;
1460:
1461: x_return_status := FND_API.g_ret_sts_error;
1502: 'media_id = ' || p_media_rec.media_id
1503: ) = FND_API.g_false
1504: THEN
1505: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
1506: FND_MESSAGE.set_name ('AMS', 'AMS_MED_DUP_MEDIA_ID');
1507: FND_MSG_PUB.add;
1508: END IF;
1509: x_return_status := FND_API.g_ret_sts_error;
1510: RETURN;
1541: -- c_name_unique_up
1542: IF l_count > 0 THEN
1543: -- rrajesh end 11/07
1544: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
1545: FND_MESSAGE.set_name ('AMS', 'AMS_MED_DUP_NAME');
1546: FND_MSG_PUB.add;
1547: END IF;
1548: x_return_status := FND_API.g_ret_sts_error;
1549: RETURN;
1583: p_lookup_code => p_media_rec.media_type_code
1584: ) = FND_API.g_false
1585: THEN
1586: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
1587: FND_MESSAGE.set_name ('AMS', 'AMS_MED_BAD_MEDIA_TYPE_CODE');
1588: FND_MSG_PUB.add;
1589: END IF;
1590:
1591: x_return_status := FND_API.g_ret_sts_error;
1610: -- INBOUND_FLAG
1611: IF p_media_rec.inbound_flag <> FND_API.g_miss_char AND p_media_rec.inbound_flag IS NOT NULL THEN
1612: IF AMS_Utility_PVT.is_Y_or_N (p_media_rec.inbound_flag) = FND_API.g_false THEN
1613: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
1614: FND_MESSAGE.set_name ('AMS', 'AMS_MED_BAD_INBOUND_FLAG');
1615: FND_MSG_PUB.add;
1616: END IF;
1617:
1618: x_return_status := FND_API.g_ret_sts_error;
1623: -- ENABLED_FLAG
1624: IF p_media_rec.enabled_flag <> FND_API.g_miss_char AND p_media_rec.enabled_flag IS NOT NULL THEN
1625: IF AMS_Utility_PVT.is_Y_or_N (p_media_rec.enabled_flag) = FND_API.g_false THEN
1626: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
1627: FND_MESSAGE.set_name ('AMS', 'AMS_MED_BAD_ENABLED_FLAG');
1628: FND_MSG_PUB.add;
1629: END IF;
1630:
1631: x_return_status := FND_API.g_ret_sts_error;
1995: AND object_version_number = l_mediachl_rec.object_version_number ;
1996:
1997: IF (SQL%NOTFOUND) THEN
1998: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1999: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
2000: FND_MSG_PUB.add;
2001: END IF;
2002: RAISE FND_API.g_exc_error;
2003: END IF;
2142:
2143: IF l_in_use IS NOT NULL THEN
2144: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
2145: THEN
2146: FND_MESSAGE.set_name('AMS', 'AMS_MED_CANNOT_DELETE_CHAN');
2147: FND_MSG_PUB.add;
2148: END IF;
2149: RAISE FND_API.g_exc_error;
2150: END IF;
2156:
2157: IF l_mktg_medium_id IS NOT NULL THEN
2158: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
2159: THEN
2160: FND_MESSAGE.set_name('AMS', 'AMS_MKTG_MEDIA_ACT_IN_USE');
2161: FND_MSG_PUB.add;
2162: END IF;
2163: RAISE FND_API.g_exc_error;
2164: END IF;
2174: WHERE media_channel_id = p_mediachl_id;
2175:
2176: IF (SQL%NOTFOUND) THEN
2177: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
2178: FND_MESSAGE.set_name ('AMS', 'AMS_API_RECORD_NOT_FOUND');
2179: FND_MSG_PUB.add;
2180: END IF;
2181: RAISE FND_API.g_exc_error;
2182: END IF;
2302: FETCH c_lock INTO l_dummy;
2303: IF (c_lock%NOTFOUND) THEN
2304: CLOSE c_lock;
2305: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2306: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
2307: FND_MSG_PUB.add;
2308: END IF;
2309: RAISE FND_API.g_exc_error;
2310: END IF;
2328: EXCEPTION
2329: WHEN AMS_Utility_PVT.resource_locked THEN
2330: x_return_status := FND_API.g_ret_sts_error;
2331: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
2332: FND_MESSAGE.set_name ('AMS', 'AMS_API_RESOURCE_LOCKED');
2333: FND_MSG_PUB.add;
2334: END IF;
2335:
2336: FND_MSG_PUB.count_and_get (
2602: l_active_to_date := p_complete_rec.active_to_date;
2603: END IF;
2604:
2605: IF l_active_from_date > l_active_to_date THEN
2606: FND_MESSAGE.set_name ('AMS', 'AMS_MED_FROMDT_GTR_TODT');
2607: FND_MSG_PUB.add;
2608: x_return_status := FND_API.g_ret_sts_error;
2609: RETURN;
2610: END IF;
2638: OR (l_active_from_date > l_chan_to_date )
2639: )
2640: THEN
2641:
2642: FND_MESSAGE.set_name ('AMS', 'AMS_MEDCHAN_FROMDT_GTR');
2643: FND_MSG_PUB.add;
2644: x_return_status := FND_API.g_ret_sts_error;
2645: RETURN;
2646:
2652: OR (l_active_to_date < l_chan_from_date)
2653: )
2654: THEN
2655:
2656: FND_MESSAGE.set_name ('AMS', 'AMS_MEDCHAN_TODT_GTR');
2657: FND_MSG_PUB.add;
2658: x_return_status := FND_API.g_ret_sts_error;
2659: RETURN;
2660:
2666: IF (l_chan_from_date IS NOT NULL AND l_chan_to_date IS NULL) THEN
2667:
2668: IF l_active_from_date < l_chan_from_date THEN
2669:
2670: FND_MESSAGE.set_name ('AMS', 'AMS_MEDCHAN_FROMDT_GTR');
2671: FND_MSG_PUB.add;
2672: x_return_status := FND_API.g_ret_sts_error;
2673: RETURN;
2674:
2724: FETCH c_mediachl INTO l_mediachl_rec;
2725: IF c_mediachl%NOTFOUND THEN
2726: CLOSE c_mediachl;
2727: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2728: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
2729: FND_MSG_PUB.add;
2730: END IF;
2731: RAISE FND_API.g_exc_error;
2732: END IF;
2769: --
2770: -- MEDIA_ID
2771: IF p_mediachl_rec.media_id IS NULL THEN
2772: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2773: FND_MESSAGE.set_name('AMS', 'AMS_MED_NO_MEDIA_ID');
2774: FND_MSG_PUB.add;
2775: END IF;
2776:
2777: x_return_status := FND_API.g_ret_sts_error;
2782: -- CHANNEL_ID
2783: IF p_mediachl_rec.channel_id IS NULL THEN
2784: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
2785: THEN
2786: FND_MESSAGE.set_name('AMS', 'AMS_MED_NO_CHANNEL_ID');
2787: FND_MSG_PUB.add;
2788: END IF;
2789:
2790: x_return_status := FND_API.g_ret_sts_error;
2794: --
2795: -- ACTIVE_FROM_DATE
2796: IF p_mediachl_rec.active_from_date IS NULL THEN
2797: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2798: FND_MESSAGE.set_name('AMS', 'AMS_MED_NO_ACTIVE_FROM_DATE');
2799: FND_MSG_PUB.add;
2800: END IF;
2801:
2802: x_return_status := FND_API.g_ret_sts_error;
2938:
2939: END IF;
2940: IF l_valid_flag = FND_API.g_false THEN
2941: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2942: FND_MESSAGE.set_name('AMS', 'AMS_MED_DUP_MEDIA_CHANNEL');
2943: FND_MSG_PUB.add;
2944: END IF;
2945: x_return_status := FND_API.g_ret_sts_error;
2946: RETURN;
2970: p_mediachl_rec.media_id
2971: ) = FND_API.g_false
2972: THEN
2973: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
2974: FND_MESSAGE.set_name ('AMS', 'AMS_MED_BAD_MEDIA_ID');
2975: FND_MSG_PUB.add;
2976: END IF;
2977:
2978: x_return_status := FND_API.g_ret_sts_error;
2989: p_mediachl_rec.channel_id
2990: ) = FND_API.g_false
2991: THEN
2992: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
2993: FND_MESSAGE.set_name ('AMS', 'AMS_MED_BAD_CHANNEL_ID');
2994: FND_MSG_PUB.add;
2995: END IF;
2996:
2997: x_return_status := FND_API.g_ret_sts_error;
3097: from date is NOT NULL on channels table?
3098: ***/
3099: IF l_channel_rec.active_from_date IS NULL AND l_active_from_date IS NOT NULL THEN
3100: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3101: FND_MESSAGE.set_name ('AMS', 'AMS_MED_CFD_IS_NULL'); -- Channel From Date is NULL.
3102: FND_MSG_PUB.Add;
3103: END IF;
3104:
3105: x_return_status := FND_API.g_ret_sts_error;
3106: END IF;
3107:
3108: IF l_channel_rec.active_to_date IS NULL AND l_active_from_date IS NOT NULL THEN
3109: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3110: FND_MESSAGE.set_name ('AMS', 'AMS_MED_CTD_IS_NULL'); -- Channel To Date is NULL.
3111: FND_MSG_PUB.Add;
3112: END IF;
3113:
3114: x_return_status := FND_API.g_ret_sts_error;
3118: -- media channel's active from date should not
3119: -- be before channel's active from date.
3120: IF l_active_from_date < l_channel_rec.active_from_date THEN
3121: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3122: FND_MESSAGE.set_name ('AMS', 'AMS_MED_MFD_LT_CFD');
3123: FND_MSG_PUB.Add;
3124: END IF;
3125:
3126: x_return_status := FND_API.g_ret_sts_error;
3130: -- media channel's active from date should not
3131: -- be after channel's active to date.
3132: IF l_active_from_date > l_channel_rec.active_to_date THEN
3133: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3134: FND_MESSAGE.set_name ('AMS', 'AMS_MED_CFD_GT_MTD');
3135: FND_MSG_PUB.Add;
3136: END IF;
3137:
3138: x_return_status := FND_API.g_ret_sts_error;
3142: -- media channel's active to date should not
3143: -- be after channel's active to date.
3144: IF l_active_to_date > l_channel_rec.active_to_date THEN
3145: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3146: FND_MESSAGE.set_name ('AMS', 'AMS_MED_CTD_GT_MTD');
3147: FND_MSG_PUB.Add;
3148: END IF;
3149:
3150: x_return_status := FND_API.g_ret_sts_error;