518: THEN
519: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
520: END IF;
521: -- Debug Message
522: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
523: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
524: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
525: FND_MSG_PUB.Add;
526: END IF;
521: -- Debug Message
522: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
523: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
524: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
525: FND_MSG_PUB.Add;
526: END IF;
527: --Initialize message list if p_init_msg_list is TRUE.
528: IF FND_API.To_Boolean (p_init_msg_list) THEN
529: FND_MSG_PUB.initialize;
525: FND_MSG_PUB.Add;
526: END IF;
527: --Initialize message list if p_init_msg_list is TRUE.
528: IF FND_API.To_Boolean (p_init_msg_list) THEN
529: FND_MSG_PUB.initialize;
530: END IF;
531: -- Get the current (login) user id.
532: AMV_UTILITY_PVT.Get_UserInfo(
533: x_resource_id => l_resource_id,
539: IF (p_check_login_user = FND_API.G_TRUE) THEN
540: -- Check if user is login and has the required privilege.
541: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
542: -- User is not login.
543: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
544: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
545: FND_MSG_PUB.Add;
546: END IF;
547: RAISE FND_API.G_EXC_ERROR;
541: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
542: -- User is not login.
543: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
544: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
545: FND_MSG_PUB.Add;
546: END IF;
547: RAISE FND_API.G_EXC_ERROR;
548: END IF;
549: END IF;
573: END IF;
574:
575: -- raise exception if null values passed
576: IF l_error_flag = FND_API.G_TRUE THEN
577: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
578: THEN
579: FND_MESSAGE.Set_Name('AMV', 'AMV_INVALID_OBJ_VALUES');
580: FND_MESSAGE.Set_Token('TKN', 'Channel');
581: FND_MSG_PUB.Add;
577: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
578: THEN
579: FND_MESSAGE.Set_Name('AMV', 'AMV_INVALID_OBJ_VALUES');
580: FND_MESSAGE.Set_Token('TKN', 'Channel');
581: FND_MSG_PUB.Add;
582: END IF;
583: RAISE FND_API.G_EXC_ERROR;
584: END IF;
585:
655:
656: -- Add channel if it does not exist
657: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
658: IF (l_channel_exist_flag = FND_API.G_TRUE) THEN
659: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
660: THEN
661: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
662: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
663: FND_MSG_PUB.Add;
659: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
660: THEN
661: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
662: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
663: FND_MSG_PUB.Add;
664: END IF;
665: RAISE FND_API.G_EXC_ERROR;
666: ELSE
667: -- set expiration date to null if none passed
741: );
742: EXCEPTION
743: WHEN OTHERS THEN
744: --will log the error
745: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
746: THEN
747: FND_MESSAGE.Set_Name('AMV', 'AMV_TABLE_HANDLER_ERROR');
748: FND_MESSAGE.Set_Token('ACTION', 'Adding Channel');
749: FND_MESSAGE.Set_Token('TABLE', sqlerrm);
746: THEN
747: FND_MESSAGE.Set_Name('AMV', 'AMV_TABLE_HANDLER_ERROR');
748: FND_MESSAGE.Set_Token('ACTION', 'Adding Channel');
749: FND_MESSAGE.Set_Token('TABLE', sqlerrm);
750: FND_MSG_PUB.Add;
751: END IF;
752: RAISE FND_API.G_EXC_ERROR;
753: END;
754: -- Pass the channel id created
755: x_channel_id := l_channel_id;
756: END IF;
757: ELSE
758: -- exception errors from get_channelstatus
759: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
760: THEN
761: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
762: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
763: FND_MSG_PUB.Add;
759: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
760: THEN
761: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
762: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
763: FND_MSG_PUB.Add;
764: END IF;
765: RAISE FND_API.G_EXC_ERROR;
766: END IF;
767: --
766: END IF;
767: --
768:
769: -- Success message
770: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
771: THEN
772: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
773: FND_MESSAGE.Set_Token('ROW', l_full_name);
774: FND_MSG_PUB.Add;
770: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
771: THEN
772: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
773: FND_MESSAGE.Set_Token('ROW', l_full_name);
774: FND_MSG_PUB.Add;
775: END IF;
776: --Standard check of commit
777: IF FND_API.To_Boolean ( p_commit ) THEN
778: COMMIT WORK;
777: IF FND_API.To_Boolean ( p_commit ) THEN
778: COMMIT WORK;
779: END IF;
780: -- Debug Message
781: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
782: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
783: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
784: FND_MSG_PUB.Add;
785: END IF;
780: -- Debug Message
781: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
782: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
783: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
784: FND_MSG_PUB.Add;
785: END IF;
786: --Standard call to get message count and if count=1, get the message
787: FND_MSG_PUB.Count_And_Get (
788: p_encoded => FND_API.G_FALSE,
783: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
784: FND_MSG_PUB.Add;
785: END IF;
786: --Standard call to get message count and if count=1, get the message
787: FND_MSG_PUB.Count_And_Get (
788: p_encoded => FND_API.G_FALSE,
789: p_count => x_msg_count,
790: p_data => x_msg_data
791: );
793: WHEN FND_API.G_EXC_ERROR THEN
794: ROLLBACK TO Add_Channel_PVT;
795: x_return_status := FND_API.G_RET_STS_ERROR;
796: -- Standard call to get message count and if count=1, get the message
797: FND_MSG_PUB.Count_And_Get (
798: p_encoded => FND_API.G_FALSE,
799: p_count => x_msg_count,
800: p_data => x_msg_data
801: );
802: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
803: ROLLBACK TO Add_Channel_PVT;
804: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
805: -- Standard call to get message count and if count=1, get the message
806: FND_MSG_PUB.Count_And_Get (
807: p_encoded => FND_API.G_FALSE,
808: p_count => x_msg_count,
809: p_data => x_msg_data
810: );
810: );
811: WHEN OTHERS THEN
812: ROLLBACK TO Add_Channel_PVT;
813: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
814: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
815: THEN
816: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
817: END IF;
818: -- Standard call to get message count and if count=1, get the message
812: ROLLBACK TO Add_Channel_PVT;
813: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
814: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
815: THEN
816: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
817: END IF;
818: -- Standard call to get message count and if count=1, get the message
819: FND_MSG_PUB.Count_And_Get (
820: p_encoded => FND_API.G_FALSE,
815: THEN
816: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
817: END IF;
818: -- Standard call to get message count and if count=1, get the message
819: FND_MSG_PUB.Count_And_Get (
820: p_encoded => FND_API.G_FALSE,
821: p_count => x_msg_count,
822: p_data => x_msg_data
823: );
895: THEN
896: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
897: END IF;
898: -- Debug Message
899: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
900: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
901: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
902: FND_MSG_PUB.Add;
903: END IF;
898: -- Debug Message
899: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
900: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
901: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
902: FND_MSG_PUB.Add;
903: END IF;
904: --Initialize message list if p_init_msg_list is TRUE.
905: IF FND_API.To_Boolean (p_init_msg_list) THEN
906: FND_MSG_PUB.initialize;
902: FND_MSG_PUB.Add;
903: END IF;
904: --Initialize message list if p_init_msg_list is TRUE.
905: IF FND_API.To_Boolean (p_init_msg_list) THEN
906: FND_MSG_PUB.initialize;
907: END IF;
908: -- Get the current (login) user id.
909: AMV_UTILITY_PVT.Get_UserInfo(
910: x_resource_id => l_resource_id,
916: IF (p_check_login_user = FND_API.G_TRUE) THEN
917: -- Check if user is login and has the required privilege.
918: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
919: -- User is not login.
920: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
921: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
922: FND_MSG_PUB.Add;
923: END IF;
924: RAISE FND_API.G_EXC_ERROR;
918: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
919: -- User is not login.
920: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
921: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
922: FND_MSG_PUB.Add;
923: END IF;
924: RAISE FND_API.G_EXC_ERROR;
925: END IF;
926: END IF;
981: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
982: END IF;
983: ELSE
984: -- Invalid channel type passed
985: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
986: THEN
987: FND_MESSAGE.Set_Name('AMV','AMV_INVALID_CHAN_TYPE');
988: FND_MESSAGE.Set_Token('TKN','Content');
989: FND_MSG_PUB.Add;
985: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
986: THEN
987: FND_MESSAGE.Set_Name('AMV','AMV_INVALID_CHAN_TYPE');
988: FND_MESSAGE.Set_Token('TKN','Content');
989: FND_MSG_PUB.Add;
990: END IF;
991: END IF;
992: ELSE
993: -- Invalid channel type passed
990: END IF;
991: END IF;
992: ELSE
993: -- Invalid channel type passed
994: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
995: THEN
996: FND_MESSAGE.Set_Name('AMV','AMV_INVALID_CHAN_ACCS');
997: FND_MESSAGE.Set_Token('TKN','Public');
998: FND_MSG_PUB.Add;
994: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
995: THEN
996: FND_MESSAGE.Set_Name('AMV','AMV_INVALID_CHAN_ACCS');
997: FND_MESSAGE.Set_Token('TKN','Public');
998: FND_MSG_PUB.Add;
999: END IF;
1000: END IF;
1001: ELSE
1002: -- user does not have privilege to create public channel
999: END IF;
1000: END IF;
1001: ELSE
1002: -- user does not have privilege to create public channel
1003: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1004: THEN
1005: FND_MESSAGE.Set_Name('AMV', 'AMV_NO_ACCESS_ERROR');
1006: FND_MESSAGE.Set_Token('LEVEL','Channel');
1007: FND_MSG_PUB.Add;
1003: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1004: THEN
1005: FND_MESSAGE.Set_Name('AMV', 'AMV_NO_ACCESS_ERROR');
1006: FND_MESSAGE.Set_Token('LEVEL','Channel');
1007: FND_MSG_PUB.Add;
1008: END IF;
1009: RAISE FND_API.G_EXC_ERROR;
1010: END IF;
1011: ELSE
1009: RAISE FND_API.G_EXC_ERROR;
1010: END IF;
1011: ELSE
1012: -- error while user privilege check in Can_SetupChannel
1013: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1014: THEN
1015: FND_MESSAGE.Set_Name('AMV', 'AMV_SETUP_CHECK_ERROR');
1016: FND_MESSAGE.Set_Token('LEVEL','Channel');
1017: FND_MSG_PUB.Add;
1013: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1014: THEN
1015: FND_MESSAGE.Set_Name('AMV', 'AMV_SETUP_CHECK_ERROR');
1016: FND_MESSAGE.Set_Token('LEVEL','Channel');
1017: FND_MSG_PUB.Add;
1018: END IF;
1019: RAISE FND_API.G_EXC_ERROR;
1020: END IF;
1021: --
1020: END IF;
1021: --
1022:
1023: -- Success message
1024: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1025: THEN
1026: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1027: FND_MESSAGE.Set_Token('ROW', l_full_name);
1028: FND_MSG_PUB.Add;
1024: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1025: THEN
1026: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1027: FND_MESSAGE.Set_Token('ROW', l_full_name);
1028: FND_MSG_PUB.Add;
1029: END IF;
1030: --Standard check of commit
1031: IF FND_API.To_Boolean ( p_commit ) THEN
1032: COMMIT WORK;
1031: IF FND_API.To_Boolean ( p_commit ) THEN
1032: COMMIT WORK;
1033: END IF;
1034: -- Debug Message
1035: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1036: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1037: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1038: FND_MSG_PUB.Add;
1039: END IF;
1034: -- Debug Message
1035: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1036: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1037: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1038: FND_MSG_PUB.Add;
1039: END IF;
1040: --Standard call to get message count and if count=1, get the message
1041: FND_MSG_PUB.Count_And_Get (
1042: p_encoded => FND_API.G_FALSE,
1037: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1038: FND_MSG_PUB.Add;
1039: END IF;
1040: --Standard call to get message count and if count=1, get the message
1041: FND_MSG_PUB.Count_And_Get (
1042: p_encoded => FND_API.G_FALSE,
1043: p_count => x_msg_count,
1044: p_data => x_msg_data
1045: );
1047: WHEN FND_API.G_EXC_ERROR THEN
1048: ROLLBACK TO Add_PublicChannel_PVT;
1049: x_return_status := FND_API.G_RET_STS_ERROR;
1050: -- Standard call to get message count and if count=1, get the message
1051: FND_MSG_PUB.Count_And_Get (
1052: p_encoded => FND_API.G_FALSE,
1053: p_count => x_msg_count,
1054: p_data => x_msg_data
1055: );
1056: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1057: ROLLBACK TO Add_PublicChannel_PVT;
1058: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1059: -- Standard call to get message count and if count=1, get the message
1060: FND_MSG_PUB.Count_And_Get (
1061: p_encoded => FND_API.G_FALSE,
1062: p_count => x_msg_count,
1063: p_data => x_msg_data
1064: );
1064: );
1065: WHEN OTHERS THEN
1066: ROLLBACK TO Add_PublicChannel_PVT;
1067: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1068: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1069: THEN
1070: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1071: END IF;
1072: -- Standard call to get message count and if count=1, get the message
1066: ROLLBACK TO Add_PublicChannel_PVT;
1067: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1068: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1069: THEN
1070: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1071: END IF;
1072: -- Standard call to get message count and if count=1, get the message
1073: FND_MSG_PUB.Count_And_Get (
1074: p_encoded => FND_API.G_FALSE,
1069: THEN
1070: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1071: END IF;
1072: -- Standard call to get message count and if count=1, get the message
1073: FND_MSG_PUB.Count_And_Get (
1074: p_encoded => FND_API.G_FALSE,
1075: p_count => x_msg_count,
1076: p_data => x_msg_data
1077: );
1150: THEN
1151: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1152: END IF;
1153: -- Debug Message
1154: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1155: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1156: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
1157: FND_MSG_PUB.Add;
1158: END IF;
1153: -- Debug Message
1154: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1155: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1156: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
1157: FND_MSG_PUB.Add;
1158: END IF;
1159: --Initialize message list if p_init_msg_list is TRUE.
1160: IF FND_API.To_Boolean (p_init_msg_list) THEN
1161: FND_MSG_PUB.initialize;
1157: FND_MSG_PUB.Add;
1158: END IF;
1159: --Initialize message list if p_init_msg_list is TRUE.
1160: IF FND_API.To_Boolean (p_init_msg_list) THEN
1161: FND_MSG_PUB.initialize;
1162: END IF;
1163: -- Get the current (login) user id.
1164: AMV_UTILITY_PVT.Get_UserInfo(
1165: x_resource_id => l_resource_id,
1171: IF (p_check_login_user = FND_API.G_TRUE) THEN
1172: -- Check if user is login and has the required privilege.
1173: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
1174: -- User is not login.
1175: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1176: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
1177: FND_MSG_PUB.Add;
1178: END IF;
1179: RAISE FND_API.G_EXC_ERROR;
1173: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
1174: -- User is not login.
1175: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1176: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
1177: FND_MSG_PUB.Add;
1178: END IF;
1179: RAISE FND_API.G_EXC_ERROR;
1180: END IF;
1181: END IF;
1236: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1237: END IF;
1238: ELSE
1239: -- Invalid channel type passed
1240: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1241: THEN
1242: FND_MESSAGE.Set_Name('AMV','AMV_INVALID_CHAN_TYPE');
1243: FND_MESSAGE.Set_Token('TKN','Content');
1244: FND_MSG_PUB.Add;
1240: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1241: THEN
1242: FND_MESSAGE.Set_Name('AMV','AMV_INVALID_CHAN_TYPE');
1243: FND_MESSAGE.Set_Token('TKN','Content');
1244: FND_MSG_PUB.Add;
1245: END IF;
1246: END IF;
1247: ELSE
1248: -- Invalid channel type passed
1245: END IF;
1246: END IF;
1247: ELSE
1248: -- Invalid channel type passed
1249: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1250: THEN
1251: FND_MESSAGE.Set_Name('AMV','AMV_INVALID_CHAN_ACCS');
1252: FND_MESSAGE.Set_Token('TKN','Protected');
1253: FND_MSG_PUB.Add;
1249: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1250: THEN
1251: FND_MESSAGE.Set_Name('AMV','AMV_INVALID_CHAN_ACCS');
1252: FND_MESSAGE.Set_Token('TKN','Protected');
1253: FND_MSG_PUB.Add;
1254: END IF;
1255: END IF;
1256: ELSE
1257: -- user does not have privilege to create public channel
1254: END IF;
1255: END IF;
1256: ELSE
1257: -- user does not have privilege to create public channel
1258: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1259: THEN
1260: FND_MESSAGE.Set_Name('AMV', 'AMV_NO_ACCESS_ERROR');
1261: FND_MESSAGE.Set_Token('LEVEL','Channel');
1262: FND_MSG_PUB.Add;
1258: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1259: THEN
1260: FND_MESSAGE.Set_Name('AMV', 'AMV_NO_ACCESS_ERROR');
1261: FND_MESSAGE.Set_Token('LEVEL','Channel');
1262: FND_MSG_PUB.Add;
1263: END IF;
1264: RAISE FND_API.G_EXC_ERROR;
1265: END IF;
1266: ELSE
1264: RAISE FND_API.G_EXC_ERROR;
1265: END IF;
1266: ELSE
1267: -- error while user privilege check in Can_SetupChannel
1268: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1269: THEN
1270: FND_MESSAGE.Set_Name('AMV', 'AMV_SETUP_CHECK_ERROR');
1271: FND_MESSAGE.Set_Token('LEVEL','Channel');
1272: FND_MSG_PUB.Add;
1268: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1269: THEN
1270: FND_MESSAGE.Set_Name('AMV', 'AMV_SETUP_CHECK_ERROR');
1271: FND_MESSAGE.Set_Token('LEVEL','Channel');
1272: FND_MSG_PUB.Add;
1273: END IF;
1274: RAISE FND_API.G_EXC_ERROR;
1275: END IF;
1276: --
1275: END IF;
1276: --
1277:
1278: -- Success message
1279: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1280: THEN
1281: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1282: FND_MESSAGE.Set_Token('ROW', l_full_name);
1283: FND_MSG_PUB.Add;
1279: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1280: THEN
1281: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1282: FND_MESSAGE.Set_Token('ROW', l_full_name);
1283: FND_MSG_PUB.Add;
1284: END IF;
1285: --Standard check of commit
1286: IF FND_API.To_Boolean ( p_commit ) THEN
1287: COMMIT WORK;
1286: IF FND_API.To_Boolean ( p_commit ) THEN
1287: COMMIT WORK;
1288: END IF;
1289: -- Debug Message
1290: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1291: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1292: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1293: FND_MSG_PUB.Add;
1294: END IF;
1289: -- Debug Message
1290: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1291: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1292: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1293: FND_MSG_PUB.Add;
1294: END IF;
1295: --Standard call to get message count and if count=1, get the message
1296: FND_MSG_PUB.Count_And_Get (
1297: p_encoded => FND_API.G_FALSE,
1292: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1293: FND_MSG_PUB.Add;
1294: END IF;
1295: --Standard call to get message count and if count=1, get the message
1296: FND_MSG_PUB.Count_And_Get (
1297: p_encoded => FND_API.G_FALSE,
1298: p_count => x_msg_count,
1299: p_data => x_msg_data
1300: );
1302: WHEN FND_API.G_EXC_ERROR THEN
1303: ROLLBACK TO Add_ProtectedChannel_PVT;
1304: x_return_status := FND_API.G_RET_STS_ERROR;
1305: -- Standard call to get message count and if count=1, get the message
1306: FND_MSG_PUB.Count_And_Get (
1307: p_encoded => FND_API.G_FALSE,
1308: p_count => x_msg_count,
1309: p_data => x_msg_data
1310: );
1311: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1312: ROLLBACK TO Add_ProtectedChannel_PVT;
1313: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1314: -- Standard call to get message count and if count=1, get the message
1315: FND_MSG_PUB.Count_And_Get (
1316: p_encoded => FND_API.G_FALSE,
1317: p_count => x_msg_count,
1318: p_data => x_msg_data
1319: );
1319: );
1320: WHEN OTHERS THEN
1321: ROLLBACK TO Add_ProtectedChannel_PVT;
1322: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1323: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1324: THEN
1325: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1326: END IF;
1327: -- Standard call to get message count and if count=1, get the message
1321: ROLLBACK TO Add_ProtectedChannel_PVT;
1322: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1323: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1324: THEN
1325: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1326: END IF;
1327: -- Standard call to get message count and if count=1, get the message
1328: FND_MSG_PUB.Count_And_Get (
1329: p_encoded => FND_API.G_FALSE,
1324: THEN
1325: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1326: END IF;
1327: -- Standard call to get message count and if count=1, get the message
1328: FND_MSG_PUB.Count_And_Get (
1329: p_encoded => FND_API.G_FALSE,
1330: p_count => x_msg_count,
1331: p_data => x_msg_data
1332: );
1404: THEN
1405: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1406: END IF;
1407: -- Debug Message
1408: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1409: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1410: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
1411: FND_MSG_PUB.Add;
1412: END IF;
1407: -- Debug Message
1408: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1409: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1410: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
1411: FND_MSG_PUB.Add;
1412: END IF;
1413: --Initialize message list if p_init_msg_list is TRUE.
1414: IF FND_API.To_Boolean (p_init_msg_list) THEN
1415: FND_MSG_PUB.initialize;
1411: FND_MSG_PUB.Add;
1412: END IF;
1413: --Initialize message list if p_init_msg_list is TRUE.
1414: IF FND_API.To_Boolean (p_init_msg_list) THEN
1415: FND_MSG_PUB.initialize;
1416: END IF;
1417: -- Get the current (login) user id.
1418: AMV_UTILITY_PVT.Get_UserInfo(
1419: x_resource_id => l_resource_id,
1425: IF (p_check_login_user = FND_API.G_TRUE) THEN
1426: -- Check if user is login and has the required privilege.
1427: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
1428: -- User is not login.
1429: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1430: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
1431: FND_MSG_PUB.Add;
1432: END IF;
1433: RAISE FND_API.G_EXC_ERROR;
1427: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
1428: -- User is not login.
1429: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1430: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
1431: FND_MSG_PUB.Add;
1432: END IF;
1433: RAISE FND_API.G_EXC_ERROR;
1434: END IF;
1435: END IF;
1506: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1507: END IF;
1508: ELSE
1509: -- Invalid channel type passed
1510: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1511: THEN
1512: FND_MESSAGE.Set_Name('AMV','AMV_INVALID_CHAN_TYPE');
1513: FND_MESSAGE.Set_Token('TKN','Content');
1514: FND_MSG_PUB.Add;
1510: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1511: THEN
1512: FND_MESSAGE.Set_Name('AMV','AMV_INVALID_CHAN_TYPE');
1513: FND_MESSAGE.Set_Token('TKN','Content');
1514: FND_MSG_PUB.Add;
1515: END IF;
1516: END IF;
1517: ELSE
1518: -- Invalid channel type passed
1515: END IF;
1516: END IF;
1517: ELSE
1518: -- Invalid channel type passed
1519: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1520: THEN
1521: FND_MESSAGE.Set_Name('AMV','AMV_INVALID_CHAN_ACCS');
1522: FND_MESSAGE.Set_Token('TKN','Protected');
1523: FND_MSG_PUB.Add;
1519: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1520: THEN
1521: FND_MESSAGE.Set_Name('AMV','AMV_INVALID_CHAN_ACCS');
1522: FND_MESSAGE.Set_Token('TKN','Protected');
1523: FND_MSG_PUB.Add;
1524: END IF;
1525: END IF;
1526: --
1527:
1525: END IF;
1526: --
1527:
1528: -- Success message
1529: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1530: THEN
1531: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1532: FND_MESSAGE.Set_Token('ROW', l_full_name);
1533: FND_MSG_PUB.Add;
1529: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1530: THEN
1531: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1532: FND_MESSAGE.Set_Token('ROW', l_full_name);
1533: FND_MSG_PUB.Add;
1534: END IF;
1535: --Standard check of commit
1536: IF FND_API.To_Boolean ( p_commit ) THEN
1537: COMMIT WORK;
1536: IF FND_API.To_Boolean ( p_commit ) THEN
1537: COMMIT WORK;
1538: END IF;
1539: -- Debug Message
1540: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1541: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1542: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1543: FND_MSG_PUB.Add;
1544: END IF;
1539: -- Debug Message
1540: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1541: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1542: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1543: FND_MSG_PUB.Add;
1544: END IF;
1545: --Standard call to get message count and if count=1, get the message
1546: FND_MSG_PUB.Count_And_Get (
1547: p_encoded => FND_API.G_FALSE,
1542: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1543: FND_MSG_PUB.Add;
1544: END IF;
1545: --Standard call to get message count and if count=1, get the message
1546: FND_MSG_PUB.Count_And_Get (
1547: p_encoded => FND_API.G_FALSE,
1548: p_count => x_msg_count,
1549: p_data => x_msg_data
1550: );
1552: WHEN FND_API.G_EXC_ERROR THEN
1553: ROLLBACK TO Add_PrivateChannel_PVT;
1554: x_return_status := FND_API.G_RET_STS_ERROR;
1555: -- Standard call to get message count and if count=1, get the message
1556: FND_MSG_PUB.Count_And_Get (
1557: p_encoded => FND_API.G_FALSE,
1558: p_count => x_msg_count,
1559: p_data => x_msg_data
1560: );
1561: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1562: ROLLBACK TO Add_PrivateChannel_PVT;
1563: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1564: -- Standard call to get message count and if count=1, get the message
1565: FND_MSG_PUB.Count_And_Get (
1566: p_encoded => FND_API.G_FALSE,
1567: p_count => x_msg_count,
1568: p_data => x_msg_data
1569: );
1569: );
1570: WHEN OTHERS THEN
1571: ROLLBACK TO Add_PrivateChannel_PVT;
1572: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1573: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1574: THEN
1575: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1576: END IF;
1577: -- Standard call to get message count and if count=1, get the message
1571: ROLLBACK TO Add_PrivateChannel_PVT;
1572: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1573: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1574: THEN
1575: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1576: END IF;
1577: -- Standard call to get message count and if count=1, get the message
1578: FND_MSG_PUB.Count_And_Get (
1579: p_encoded => FND_API.G_FALSE,
1574: THEN
1575: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1576: END IF;
1577: -- Standard call to get message count and if count=1, get the message
1578: FND_MSG_PUB.Count_And_Get (
1579: p_encoded => FND_API.G_FALSE,
1580: p_count => x_msg_count,
1581: p_data => x_msg_data
1582: );
1669: THEN
1670: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1671: END IF;
1672: -- Debug Message
1673: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1674: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1675: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
1676: FND_MSG_PUB.Add;
1677: END IF;
1672: -- Debug Message
1673: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1674: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1675: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
1676: FND_MSG_PUB.Add;
1677: END IF;
1678: --Initialize message list if p_init_msg_list is TRUE.
1679: IF FND_API.To_Boolean (p_init_msg_list) THEN
1680: FND_MSG_PUB.initialize;
1676: FND_MSG_PUB.Add;
1677: END IF;
1678: --Initialize message list if p_init_msg_list is TRUE.
1679: IF FND_API.To_Boolean (p_init_msg_list) THEN
1680: FND_MSG_PUB.initialize;
1681: END IF;
1682: -- Get the current (login) user id.
1683: AMV_UTILITY_PVT.Get_UserInfo(
1684: x_resource_id => l_resource_id,
1690: IF (p_check_login_user = FND_API.G_TRUE) THEN
1691: -- Check if user is login and has the required privilege.
1692: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
1693: -- User is not login.
1694: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1695: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
1696: FND_MSG_PUB.Add;
1697: END IF;
1698: RAISE FND_API.G_EXC_ERROR;
1692: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
1693: -- User is not login.
1694: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1695: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
1696: FND_MSG_PUB.Add;
1697: END IF;
1698: RAISE FND_API.G_EXC_ERROR;
1699: END IF;
1700: END IF;
1716: CLOSE Get_GroupName;
1717: --
1718: IF l_group_name is null THEN
1719: -- Invalid channel type passed
1720: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1721: THEN
1722: FND_MESSAGE.Set_Name('AMV','AMV_INVALID_GROUP_ID');
1723: FND_MESSAGE.Set_Token('TKN',p_group_id);
1724: FND_MSG_PUB.Add;
1720: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1721: THEN
1722: FND_MESSAGE.Set_Name('AMV','AMV_INVALID_GROUP_ID');
1723: FND_MESSAGE.Set_Token('TKN',p_group_id);
1724: FND_MSG_PUB.Add;
1725: END IF;
1726: RAISE FND_API.G_EXC_ERROR;
1727: END IF;
1728:
1794: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1795: END IF;
1796: ELSE
1797: -- Invalid channel type passed
1798: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1799: THEN
1800: FND_MESSAGE.Set_Name('AMV','AMV_INVALID_CHAN_TYPE');
1801: FND_MESSAGE.Set_Token('TKN','Group');
1802: FND_MSG_PUB.Add;
1798: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1799: THEN
1800: FND_MESSAGE.Set_Name('AMV','AMV_INVALID_CHAN_TYPE');
1801: FND_MESSAGE.Set_Token('TKN','Group');
1802: FND_MSG_PUB.Add;
1803: END IF;
1804: RAISE FND_API.G_EXC_ERROR;
1805: END IF;
1806: --
1805: END IF;
1806: --
1807:
1808: -- Success message
1809: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1810: THEN
1811: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1812: FND_MESSAGE.Set_Token('ROW', l_full_name);
1813: FND_MSG_PUB.Add;
1809: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1810: THEN
1811: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1812: FND_MESSAGE.Set_Token('ROW', l_full_name);
1813: FND_MSG_PUB.Add;
1814: END IF;
1815: --Standard check of commit
1816: IF FND_API.To_Boolean ( p_commit ) THEN
1817: COMMIT WORK;
1816: IF FND_API.To_Boolean ( p_commit ) THEN
1817: COMMIT WORK;
1818: END IF;
1819: -- Debug Message
1820: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1821: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1822: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1823: FND_MSG_PUB.Add;
1824: END IF;
1819: -- Debug Message
1820: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1821: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1822: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1823: FND_MSG_PUB.Add;
1824: END IF;
1825: --Standard call to get message count and if count=1, get the message
1826: FND_MSG_PUB.Count_And_Get (
1827: p_encoded => FND_API.G_FALSE,
1822: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1823: FND_MSG_PUB.Add;
1824: END IF;
1825: --Standard call to get message count and if count=1, get the message
1826: FND_MSG_PUB.Count_And_Get (
1827: p_encoded => FND_API.G_FALSE,
1828: p_count => x_msg_count,
1829: p_data => x_msg_data
1830: );
1832: WHEN FND_API.G_EXC_ERROR THEN
1833: ROLLBACK TO Add_GroupChannel_PVT;
1834: x_return_status := FND_API.G_RET_STS_ERROR;
1835: -- Standard call to get message count and if count=1, get the message
1836: FND_MSG_PUB.Count_And_Get (
1837: p_encoded => FND_API.G_FALSE,
1838: p_count => x_msg_count,
1839: p_data => x_msg_data
1840: );
1841: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1842: ROLLBACK TO Add_GroupChannel_PVT;
1843: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1844: -- Standard call to get message count and if count=1, get the message
1845: FND_MSG_PUB.Count_And_Get (
1846: p_encoded => FND_API.G_FALSE,
1847: p_count => x_msg_count,
1848: p_data => x_msg_data
1849: );
1849: );
1850: WHEN OTHERS THEN
1851: ROLLBACK TO Add_GroupChannel_PVT;
1852: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1853: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1854: THEN
1855: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1856: END IF;
1857: -- Standard call to get message count and if count=1, get the message
1851: ROLLBACK TO Add_GroupChannel_PVT;
1852: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1853: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1854: THEN
1855: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1856: END IF;
1857: -- Standard call to get message count and if count=1, get the message
1858: FND_MSG_PUB.Count_And_Get (
1859: p_encoded => FND_API.G_FALSE,
1854: THEN
1855: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1856: END IF;
1857: -- Standard call to get message count and if count=1, get the message
1858: FND_MSG_PUB.Count_And_Get (
1859: p_encoded => FND_API.G_FALSE,
1860: p_count => x_msg_count,
1861: p_data => x_msg_data
1862: );
1937: THEN
1938: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1939: END IF;
1940: -- Debug Message
1941: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1942: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1943: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
1944: FND_MSG_PUB.Add;
1945: END IF;
1940: -- Debug Message
1941: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1942: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1943: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
1944: FND_MSG_PUB.Add;
1945: END IF;
1946: --Initialize message list if p_init_msg_list is TRUE.
1947: IF FND_API.To_Boolean (p_init_msg_list) THEN
1948: FND_MSG_PUB.initialize;
1944: FND_MSG_PUB.Add;
1945: END IF;
1946: --Initialize message list if p_init_msg_list is TRUE.
1947: IF FND_API.To_Boolean (p_init_msg_list) THEN
1948: FND_MSG_PUB.initialize;
1949: END IF;
1950: -- Get the current (login) user id.
1951: AMV_UTILITY_PVT.Get_UserInfo(
1952: x_resource_id => l_resource_id,
1958: IF (p_check_login_user = FND_API.G_TRUE) THEN
1959: -- Check if user is login and has the required privilege.
1960: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
1961: -- User is not login.
1962: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1963: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
1964: FND_MSG_PUB.Add;
1965: END IF;
1966: RAISE FND_API.G_EXC_ERROR;
1960: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
1961: -- User is not login.
1962: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1963: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
1964: FND_MSG_PUB.Add;
1965: END IF;
1966: RAISE FND_API.G_EXC_ERROR;
1967: END IF;
1968: END IF;
1988: x_error_token => l_Error_Token
1989: );
1990: -- remove channel if it exists
1991: IF (l_channel_exist_flag = FND_API.G_FALSE) THEN
1992: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1993: THEN
1994: FND_MESSAGE.Set_Name('AMV', 'l_Error_Msg');
1995: FND_MESSAGE.Set_Token('CHN',l_Error_Token);
1996: FND_MSG_PUB.Add;
1992: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1993: THEN
1994: FND_MESSAGE.Set_Name('AMV', 'l_Error_Msg');
1995: FND_MESSAGE.Set_Token('CHN',l_Error_Token);
1996: FND_MSG_PUB.Add;
1997: END IF;
1998: RAISE FND_API.G_EXC_ERROR;
1999: ELSE
2000: --
2021: THEN
2022: l_delete_channel_flag := FND_API.G_TRUE;
2023: ELSE
2024: -- user does not have privilege to create public channel
2025: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2026: THEN
2027: FND_MESSAGE.Set_Name('AMV', 'AMV_NO_ACCESS_ERROR');
2028: FND_MESSAGE.Set_Token('LEVEL','Channel');
2029: FND_MSG_PUB.Add;
2025: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2026: THEN
2027: FND_MESSAGE.Set_Name('AMV', 'AMV_NO_ACCESS_ERROR');
2028: FND_MESSAGE.Set_Token('LEVEL','Channel');
2029: FND_MSG_PUB.Add;
2030: END IF;
2031: RAISE FND_API.G_EXC_ERROR;
2032: END IF;
2033: END IF;
2032: END IF;
2033: END IF;
2034: ELSE
2035: -- error while user privilege check in Can_SetupChannel
2036: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2037: THEN
2038: FND_MESSAGE.Set_Name('AMV', 'AMV_SETUP_CHECK_ERROR');
2039: FND_MESSAGE.Set_Token('LEVEL','Channel');
2040: FND_MSG_PUB.Add;
2036: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2037: THEN
2038: FND_MESSAGE.Set_Name('AMV', 'AMV_SETUP_CHECK_ERROR');
2039: FND_MESSAGE.Set_Token('LEVEL','Channel');
2040: FND_MSG_PUB.Add;
2041: END IF;
2042: RAISE FND_API.G_EXC_ERROR;
2043: END IF;
2044: END IF;
2081: END IF;
2082: --
2083:
2084: -- Success message
2085: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
2086: THEN
2087: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
2088: FND_MESSAGE.Set_Token('ROW', l_full_name);
2089: FND_MSG_PUB.Add;
2085: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
2086: THEN
2087: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
2088: FND_MESSAGE.Set_Token('ROW', l_full_name);
2089: FND_MSG_PUB.Add;
2090: END IF;
2091: --Standard check of commit
2092: IF FND_API.To_Boolean ( p_commit ) THEN
2093: COMMIT WORK;
2092: IF FND_API.To_Boolean ( p_commit ) THEN
2093: COMMIT WORK;
2094: END IF;
2095: -- Debug Message
2096: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2097: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
2098: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
2099: FND_MSG_PUB.Add;
2100: END IF;
2095: -- Debug Message
2096: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2097: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
2098: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
2099: FND_MSG_PUB.Add;
2100: END IF;
2101: --Standard call to get message count and if count=1, get the message
2102: FND_MSG_PUB.Count_And_Get (
2103: p_encoded => FND_API.G_FALSE,
2098: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
2099: FND_MSG_PUB.Add;
2100: END IF;
2101: --Standard call to get message count and if count=1, get the message
2102: FND_MSG_PUB.Count_And_Get (
2103: p_encoded => FND_API.G_FALSE,
2104: p_count => x_msg_count,
2105: p_data => x_msg_data
2106: );
2108: WHEN FND_API.G_EXC_ERROR THEN
2109: ROLLBACK TO Delete_Channel_PVT;
2110: x_return_status := FND_API.G_RET_STS_ERROR;
2111: -- Standard call to get message count and if count=1, get the message
2112: FND_MSG_PUB.Count_And_Get (
2113: p_encoded => FND_API.G_FALSE,
2114: p_count => x_msg_count,
2115: p_data => x_msg_data
2116: );
2117: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2118: ROLLBACK TO Delete_Channel_PVT;
2119: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2120: -- Standard call to get message count and if count=1, get the message
2121: FND_MSG_PUB.Count_And_Get (
2122: p_encoded => FND_API.G_FALSE,
2123: p_count => x_msg_count,
2124: p_data => x_msg_data
2125: );
2125: );
2126: WHEN OTHERS THEN
2127: ROLLBACK TO Delete_Channel_PVT;
2128: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2129: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2130: THEN
2131: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2132: END IF;
2133: -- Standard call to get message count and if count=1, get the message
2127: ROLLBACK TO Delete_Channel_PVT;
2128: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2129: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2130: THEN
2131: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2132: END IF;
2133: -- Standard call to get message count and if count=1, get the message
2134: FND_MSG_PUB.Count_And_Get (
2135: p_encoded => FND_API.G_FALSE,
2130: THEN
2131: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2132: END IF;
2133: -- Standard call to get message count and if count=1, get the message
2134: FND_MSG_PUB.Count_And_Get (
2135: p_encoded => FND_API.G_FALSE,
2136: p_count => x_msg_count,
2137: p_data => x_msg_data
2138: );
2213: THEN
2214: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2215: END IF;
2216: -- Debug Message
2217: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2218: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
2219: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
2220: FND_MSG_PUB.Add;
2221: END IF;
2216: -- Debug Message
2217: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2218: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
2219: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
2220: FND_MSG_PUB.Add;
2221: END IF;
2222: --Initialize message list if p_init_msg_list is TRUE.
2223: IF FND_API.To_Boolean (p_init_msg_list) THEN
2224: FND_MSG_PUB.initialize;
2220: FND_MSG_PUB.Add;
2221: END IF;
2222: --Initialize message list if p_init_msg_list is TRUE.
2223: IF FND_API.To_Boolean (p_init_msg_list) THEN
2224: FND_MSG_PUB.initialize;
2225: END IF;
2226: -- Get the current (login) user id.
2227: AMV_UTILITY_PVT.Get_UserInfo(
2228: x_resource_id => l_resource_id,
2234: IF (p_check_login_user = FND_API.G_TRUE) THEN
2235: -- Check if user is login and has the required privilege.
2236: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
2237: -- User is not login.
2238: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2239: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
2240: FND_MSG_PUB.Add;
2241: END IF;
2242: RAISE FND_API.G_EXC_ERROR;
2236: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
2237: -- User is not login.
2238: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2239: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
2240: FND_MSG_PUB.Add;
2241: END IF;
2242: RAISE FND_API.G_EXC_ERROR;
2243: END IF;
2244: END IF;
2264: x_error_token => l_Error_Token
2265: );
2266: -- check if channel exists
2267: IF (l_channel_exist_flag = FND_API.G_FALSE) THEN
2268: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2269: THEN
2270: FND_MESSAGE.Set_Name('AMV', 'l_Error_Msg');
2271: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
2272: FND_MSG_PUB.Add;
2268: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2269: THEN
2270: FND_MESSAGE.Set_Name('AMV', 'l_Error_Msg');
2271: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
2272: FND_MSG_PUB.Add;
2273: END IF;
2274: RAISE FND_API.G_EXC_ERROR;
2275: ELSE
2276: -- check if the user has privilege to update channel
2299: THEN
2300: l_update_channel_flag := FND_API.G_TRUE;
2301: ELSE
2302: -- user does not have privilege to create public channel
2303: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2304: THEN
2305: FND_MESSAGE.Set_Name('AMV', 'AMV_NO_ACCESS_ERROR');
2306: FND_MESSAGE.Set_Token('LEVEL','Channel');
2307: FND_MSG_PUB.Add;
2303: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2304: THEN
2305: FND_MESSAGE.Set_Name('AMV', 'AMV_NO_ACCESS_ERROR');
2306: FND_MESSAGE.Set_Token('LEVEL','Channel');
2307: FND_MSG_PUB.Add;
2308: END IF;
2309: RAISE FND_API.G_EXC_ERROR;
2310: END IF;
2311: END IF;
2310: END IF;
2311: END IF;
2312: ELSE
2313: -- error while user privilege check in Can_SetupChannel
2314: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2315: THEN
2316: FND_MESSAGE.Set_Name('AMV', 'AMV_SETUP_CHECK_ERROR');
2317: FND_MESSAGE.Set_Token('LEVEL','Channel');
2318: FND_MSG_PUB.Add;
2314: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2315: THEN
2316: FND_MESSAGE.Set_Name('AMV', 'AMV_SETUP_CHECK_ERROR');
2317: FND_MESSAGE.Set_Token('LEVEL','Channel');
2318: FND_MSG_PUB.Add;
2319: END IF;
2320: RAISE FND_API.G_EXC_ERROR;
2321: END IF;
2322: END IF;
2493: IF l_channel_exist_flag = FND_API.G_FALSE THEN
2494: -- set channel name to new value only if it does not exist
2495: l_channel_obj.channel_name := p_channel_record.channel_name;
2496: ELSE
2497: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2498: THEN
2499: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
2500: FND_MESSAGE.Set_Token('TKN', l_Error_Token);
2501: FND_MSG_PUB.Add;
2497: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2498: THEN
2499: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
2500: FND_MESSAGE.Set_Token('TKN', l_Error_Token);
2501: FND_MSG_PUB.Add;
2502: END IF;
2503: RAISE FND_API.G_EXC_ERROR;
2504: END IF;
2505: ELSE
2502: END IF;
2503: RAISE FND_API.G_EXC_ERROR;
2504: END IF;
2505: ELSE
2506: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2507: THEN
2508: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
2509: FND_MESSAGE.Set_Token('TKN', l_Error_Token);
2510: FND_MSG_PUB.Add;
2506: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2507: THEN
2508: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
2509: FND_MESSAGE.Set_Token('TKN', l_Error_Token);
2510: FND_MSG_PUB.Add;
2511: END IF;
2512: RAISE FND_API.G_EXC_ERROR;
2513: END IF;
2514: END IF;
2571: );
2572: EXCEPTION
2573: WHEN OTHERS THEN
2574: --will log the error
2575: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2576: THEN
2577: FND_MESSAGE.Set_Name('AMV', 'AMV_TABLE_HANDLER_ERROR');
2578: FND_MESSAGE.Set_Token('ACTION', 'Updating');
2579: FND_MESSAGE.Set_Token('TABLE', 'Channel');
2576: THEN
2577: FND_MESSAGE.Set_Name('AMV', 'AMV_TABLE_HANDLER_ERROR');
2578: FND_MESSAGE.Set_Token('ACTION', 'Updating');
2579: FND_MESSAGE.Set_Token('TABLE', 'Channel');
2580: FND_MSG_PUB.Add;
2581: END IF;
2582: RAISE FND_API.G_EXC_ERROR;
2583: END;
2584: -- invoke macthing engine for populating items into channel
2594: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2595: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2596: END IF;
2597: ELSE
2598: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2599: THEN
2600: FND_MESSAGE.Set_Name('AMV', 'AMV_CHN_VERSION_CHANGE');
2601: FND_MSG_PUB.Add;
2602: END IF;
2597: ELSE
2598: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2599: THEN
2600: FND_MESSAGE.Set_Name('AMV', 'AMV_CHN_VERSION_CHANGE');
2601: FND_MSG_PUB.Add;
2602: END IF;
2603: RAISE FND_API.G_EXC_ERROR;
2604: END IF;
2605: END IF;
2605: END IF;
2606: --
2607:
2608: -- Success message
2609: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
2610: THEN
2611: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
2612: FND_MESSAGE.Set_Token('ROW', l_full_name);
2613: FND_MSG_PUB.Add;
2609: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
2610: THEN
2611: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
2612: FND_MESSAGE.Set_Token('ROW', l_full_name);
2613: FND_MSG_PUB.Add;
2614: END IF;
2615: --Standard check of commit
2616: IF FND_API.To_Boolean ( p_commit ) THEN
2617: COMMIT WORK;
2616: IF FND_API.To_Boolean ( p_commit ) THEN
2617: COMMIT WORK;
2618: END IF;
2619: -- Debug Message
2620: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2621: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
2622: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
2623: FND_MSG_PUB.Add;
2624: END IF;
2619: -- Debug Message
2620: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2621: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
2622: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
2623: FND_MSG_PUB.Add;
2624: END IF;
2625: --Standard call to get message count and if count=1, get the message
2626: FND_MSG_PUB.Count_And_Get (
2627: p_encoded => FND_API.G_FALSE,
2622: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
2623: FND_MSG_PUB.Add;
2624: END IF;
2625: --Standard call to get message count and if count=1, get the message
2626: FND_MSG_PUB.Count_And_Get (
2627: p_encoded => FND_API.G_FALSE,
2628: p_count => x_msg_count,
2629: p_data => x_msg_data
2630: );
2632: WHEN FND_API.G_EXC_ERROR THEN
2633: ROLLBACK TO Update_Channel_PVT;
2634: x_return_status := FND_API.G_RET_STS_ERROR;
2635: -- Standard call to get message count and if count=1, get the message
2636: FND_MSG_PUB.Count_And_Get (
2637: p_encoded => FND_API.G_FALSE,
2638: p_count => x_msg_count,
2639: p_data => x_msg_data
2640: );
2641: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2642: ROLLBACK TO Update_Channel_PVT;
2643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2644: -- Standard call to get message count and if count=1, get the message
2645: FND_MSG_PUB.Count_And_Get (
2646: p_encoded => FND_API.G_FALSE,
2647: p_count => x_msg_count,
2648: p_data => x_msg_data
2649: );
2649: );
2650: WHEN OTHERS THEN
2651: ROLLBACK TO Update_Channel_PVT;
2652: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2653: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2654: THEN
2655: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2656: END IF;
2657: -- Standard call to get message count and if count=1, get the message
2651: ROLLBACK TO Update_Channel_PVT;
2652: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2653: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2654: THEN
2655: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2656: END IF;
2657: -- Standard call to get message count and if count=1, get the message
2658: FND_MSG_PUB.Count_And_Get (
2659: p_encoded => FND_API.G_FALSE,
2654: THEN
2655: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2656: END IF;
2657: -- Standard call to get message count and if count=1, get the message
2658: FND_MSG_PUB.Count_And_Get (
2659: p_encoded => FND_API.G_FALSE,
2660: p_count => x_msg_count,
2661: p_data => x_msg_data
2662: );
2734: THEN
2735: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2736: END IF;
2737: -- Debug Message
2738: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2739: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
2740: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
2741: FND_MSG_PUB.Add;
2742: END IF;
2737: -- Debug Message
2738: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2739: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
2740: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
2741: FND_MSG_PUB.Add;
2742: END IF;
2743: --Initialize message list if p_init_msg_list is TRUE.
2744: IF FND_API.To_Boolean (p_init_msg_list) THEN
2745: FND_MSG_PUB.initialize;
2741: FND_MSG_PUB.Add;
2742: END IF;
2743: --Initialize message list if p_init_msg_list is TRUE.
2744: IF FND_API.To_Boolean (p_init_msg_list) THEN
2745: FND_MSG_PUB.initialize;
2746: END IF;
2747: -- Get the current (login) user id.
2748: AMV_UTILITY_PVT.Get_UserInfo(
2749: x_resource_id => l_resource_id,
2755: IF (p_check_login_user = FND_API.G_TRUE) THEN
2756: -- Check if user is login and has the required privilege.
2757: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
2758: -- User is not login.
2759: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2760: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
2761: FND_MSG_PUB.Add;
2762: END IF;
2763: RAISE FND_API.G_EXC_ERROR;
2757: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
2758: -- User is not login.
2759: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2760: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
2761: FND_MSG_PUB.Add;
2762: END IF;
2763: RAISE FND_API.G_EXC_ERROR;
2764: END IF;
2765: END IF;
2784: x_error_token => l_Error_Token
2785: );
2786: -- check if channel exists
2787: IF (l_channel_exist_flag = FND_API.G_FALSE) THEN
2788: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2789: THEN
2790: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
2791: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
2792: FND_MSG_PUB.Add;
2788: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2789: THEN
2790: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
2791: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
2792: FND_MSG_PUB.Add;
2793: END IF;
2794: RAISE FND_API.G_EXC_ERROR;
2795: ELSE
2796: Get_ChannelRecord(l_channel_id, x_channel_record);
2797: END IF;
2798: --
2799:
2800: -- Debug Message
2801: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2802: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
2803: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
2804: FND_MSG_PUB.Add;
2805: END IF;
2800: -- Debug Message
2801: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2802: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
2803: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
2804: FND_MSG_PUB.Add;
2805: END IF;
2806: --Standard call to get message count and if count=1, get the message
2807: FND_MSG_PUB.Count_And_Get (
2808: p_encoded => FND_API.G_FALSE,
2803: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
2804: FND_MSG_PUB.Add;
2805: END IF;
2806: --Standard call to get message count and if count=1, get the message
2807: FND_MSG_PUB.Count_And_Get (
2808: p_encoded => FND_API.G_FALSE,
2809: p_count => x_msg_count,
2810: p_data => x_msg_data
2811: );
2813: WHEN FND_API.G_EXC_ERROR THEN
2814: ROLLBACK TO Get_Channel_PVT;
2815: x_return_status := FND_API.G_RET_STS_ERROR;
2816: -- Standard call to get message count and if count=1, get the message
2817: FND_MSG_PUB.Count_And_Get (
2818: p_encoded => FND_API.G_FALSE,
2819: p_count => x_msg_count,
2820: p_data => x_msg_data
2821: );
2822: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2823: ROLLBACK TO Get_Channel_PVT;
2824: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2825: -- Standard call to get message count and if count=1, get the message
2826: FND_MSG_PUB.Count_And_Get (
2827: p_encoded => FND_API.G_FALSE,
2828: p_count => x_msg_count,
2829: p_data => x_msg_data
2830: );
2830: );
2831: WHEN OTHERS THEN
2832: ROLLBACK TO Get_Channel_PVT;
2833: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2834: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2835: THEN
2836: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2837: END IF;
2838: -- Standard call to get message count and if count=1, get the message
2832: ROLLBACK TO Get_Channel_PVT;
2833: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2834: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2835: THEN
2836: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2837: END IF;
2838: -- Standard call to get message count and if count=1, get the message
2839: FND_MSG_PUB.Count_And_Get (
2840: p_encoded => FND_API.G_FALSE,
2835: THEN
2836: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2837: END IF;
2838: -- Standard call to get message count and if count=1, get the message
2839: FND_MSG_PUB.Count_And_Get (
2840: p_encoded => FND_API.G_FALSE,
2841: p_count => x_msg_count,
2842: p_data => x_msg_data
2843: );
2924: THEN
2925: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2926: END IF;
2927: -- Debug Message
2928: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2929: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
2930: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
2931: FND_MSG_PUB.Add;
2932: END IF;
2927: -- Debug Message
2928: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2929: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
2930: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
2931: FND_MSG_PUB.Add;
2932: END IF;
2933: --Initialize message list if p_init_msg_list is TRUE.
2934: IF FND_API.To_Boolean (p_init_msg_list) THEN
2935: FND_MSG_PUB.initialize;
2931: FND_MSG_PUB.Add;
2932: END IF;
2933: --Initialize message list if p_init_msg_list is TRUE.
2934: IF FND_API.To_Boolean (p_init_msg_list) THEN
2935: FND_MSG_PUB.initialize;
2936: END IF;
2937: -- Get the current (login) user id.
2938: AMV_UTILITY_PVT.Get_UserInfo(
2939: x_resource_id => l_resource_id,
2945: IF (p_check_login_user = FND_API.G_TRUE) THEN
2946: -- Check if user is login and has the required privilege.
2947: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
2948: -- User is not login.
2949: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2950: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
2951: FND_MSG_PUB.Add;
2952: END IF;
2953: RAISE FND_API.G_EXC_ERROR;
2947: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
2948: -- User is not login.
2949: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2950: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
2951: FND_MSG_PUB.Add;
2952: END IF;
2953: RAISE FND_API.G_EXC_ERROR;
2954: END IF;
2955: END IF;
2974: x_error_token => l_Error_Token
2975: );
2976: -- change channel categories if the channel exists
2977: IF (l_channel_exist_flag = FND_API.G_FALSE) THEN
2978: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2979: THEN
2980: FND_MESSAGE.Set_Name('AMV', 'l_Error_Msg');
2981: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
2982: FND_MSG_PUB.Add;
2978: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2979: THEN
2980: FND_MESSAGE.Set_Name('AMV', 'l_Error_Msg');
2981: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
2982: FND_MSG_PUB.Add;
2983: END IF;
2984: RAISE FND_API.G_EXC_ERROR;
2985: ELSE
2986: --
3008: THEN
3009: l_update_channel_flag := FND_API.G_TRUE;
3010: ELSE
3011: -- user does not have privilege to create public channel
3012: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3013: THEN
3014: FND_MESSAGE.Set_Name('AMV', 'AMV_NO_ACCESS_ERROR');
3015: FND_MESSAGE.Set_Token('LEVEL','Channel');
3016: FND_MSG_PUB.Add;
3012: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3013: THEN
3014: FND_MESSAGE.Set_Name('AMV', 'AMV_NO_ACCESS_ERROR');
3015: FND_MESSAGE.Set_Token('LEVEL','Channel');
3016: FND_MSG_PUB.Add;
3017: END IF;
3018: RAISE FND_API.G_EXC_ERROR;
3019: END IF;
3020: END IF;
3019: END IF;
3020: END IF;
3021: ELSE
3022: -- error while user privilege check in Can_SetupChannel
3023: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3024: THEN
3025: FND_MESSAGE.Set_Name('AMV', 'AMV_SETUP_CHECK_ERROR');
3026: FND_MESSAGE.Set_Token('LEVEL','Channel');
3027: FND_MSG_PUB.Add;
3023: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3024: THEN
3025: FND_MESSAGE.Set_Name('AMV', 'AMV_SETUP_CHECK_ERROR');
3026: FND_MESSAGE.Set_Token('LEVEL','Channel');
3027: FND_MSG_PUB.Add;
3028: END IF;
3029: RAISE FND_API.G_EXC_ERROR;
3030: END IF;
3031: END IF;
3094: END IF;
3095: --
3096:
3097: -- Success message
3098: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
3099: THEN
3100: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
3101: FND_MESSAGE.Set_Token('ROW', l_full_name);
3102: FND_MSG_PUB.Add;
3098: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
3099: THEN
3100: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
3101: FND_MESSAGE.Set_Token('ROW', l_full_name);
3102: FND_MSG_PUB.Add;
3103: END IF;
3104: --Standard check of commit
3105: IF FND_API.To_Boolean ( p_commit ) THEN
3106: COMMIT WORK;
3105: IF FND_API.To_Boolean ( p_commit ) THEN
3106: COMMIT WORK;
3107: END IF;
3108: -- Debug Message
3109: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3110: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
3111: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
3112: FND_MSG_PUB.Add;
3113: END IF;
3108: -- Debug Message
3109: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3110: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
3111: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
3112: FND_MSG_PUB.Add;
3113: END IF;
3114: --Standard call to get message count and if count=1, get the message
3115: FND_MSG_PUB.Count_And_Get (
3116: p_encoded => FND_API.G_FALSE,
3111: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
3112: FND_MSG_PUB.Add;
3113: END IF;
3114: --Standard call to get message count and if count=1, get the message
3115: FND_MSG_PUB.Count_And_Get (
3116: p_encoded => FND_API.G_FALSE,
3117: p_count => x_msg_count,
3118: p_data => x_msg_data
3119: );
3121: WHEN FND_API.G_EXC_ERROR THEN
3122: ROLLBACK TO Set_ChannelContent_PVT;
3123: x_return_status := FND_API.G_RET_STS_ERROR;
3124: -- Standard call to get message count and if count=1, get the message
3125: FND_MSG_PUB.Count_And_Get (
3126: p_encoded => FND_API.G_FALSE,
3127: p_count => x_msg_count,
3128: p_data => x_msg_data
3129: );
3130: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3131: ROLLBACK TO Set_ChannelContent_PVT;
3132: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3133: -- Standard call to get message count and if count=1, get the message
3134: FND_MSG_PUB.Count_And_Get (
3135: p_encoded => FND_API.G_FALSE,
3136: p_count => x_msg_count,
3137: p_data => x_msg_data
3138: );
3138: );
3139: WHEN OTHERS THEN
3140: ROLLBACK TO Set_ChannelContent_PVT;
3141: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3142: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3143: THEN
3144: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3145: END IF;
3146: -- Standard call to get message count and if count=1, get the message
3140: ROLLBACK TO Set_ChannelContent_PVT;
3141: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3142: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3143: THEN
3144: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3145: END IF;
3146: -- Standard call to get message count and if count=1, get the message
3147: FND_MSG_PUB.Count_And_Get (
3148: p_encoded => FND_API.G_FALSE,
3143: THEN
3144: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3145: END IF;
3146: -- Standard call to get message count and if count=1, get the message
3147: FND_MSG_PUB.Count_And_Get (
3148: p_encoded => FND_API.G_FALSE,
3149: p_count => x_msg_count,
3150: p_data => x_msg_data
3151: );
3229: THEN
3230: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3231: END IF;
3232: -- Debug Message
3233: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3234: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
3235: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
3236: FND_MSG_PUB.Add;
3237: END IF;
3232: -- Debug Message
3233: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3234: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
3235: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
3236: FND_MSG_PUB.Add;
3237: END IF;
3238: --Initialize message list if p_init_msg_list is TRUE.
3239: IF FND_API.To_Boolean (p_init_msg_list) THEN
3240: FND_MSG_PUB.initialize;
3236: FND_MSG_PUB.Add;
3237: END IF;
3238: --Initialize message list if p_init_msg_list is TRUE.
3239: IF FND_API.To_Boolean (p_init_msg_list) THEN
3240: FND_MSG_PUB.initialize;
3241: END IF;
3242: -- Get the current (login) user id.
3243: AMV_UTILITY_PVT.Get_UserInfo(
3244: x_resource_id => l_resource_id,
3250: IF (p_check_login_user = FND_API.G_TRUE) THEN
3251: -- Check if user is login and has the required privilege.
3252: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
3253: -- User is not login.
3254: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3255: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
3256: FND_MSG_PUB.Add;
3257: END IF;
3258: RAISE FND_API.G_EXC_ERROR;
3252: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
3253: -- User is not login.
3254: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3255: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
3256: FND_MSG_PUB.Add;
3257: END IF;
3258: RAISE FND_API.G_EXC_ERROR;
3259: END IF;
3260: END IF;
3279: x_error_token => l_Error_Token
3280: );
3281: -- get channel categories if the channel exists
3282: IF (l_channel_exist_flag = FND_API.G_FALSE) THEN
3283: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3284: THEN
3285: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
3286: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
3287: FND_MSG_PUB.Add;
3283: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3284: THEN
3285: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
3286: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
3287: FND_MSG_PUB.Add;
3288: END IF;
3289: RAISE FND_API.G_EXC_ERROR;
3290: ELSE
3291: OPEN Get_Categories;
3301: END IF;
3302: --
3303:
3304: -- Debug Message
3305: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3306: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
3307: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
3308: FND_MSG_PUB.Add;
3309: END IF;
3304: -- Debug Message
3305: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3306: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
3307: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
3308: FND_MSG_PUB.Add;
3309: END IF;
3310: --Standard call to get message count and if count=1, get the message
3311: FND_MSG_PUB.Count_And_Get (
3312: p_encoded => FND_API.G_FALSE,
3307: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
3308: FND_MSG_PUB.Add;
3309: END IF;
3310: --Standard call to get message count and if count=1, get the message
3311: FND_MSG_PUB.Count_And_Get (
3312: p_encoded => FND_API.G_FALSE,
3313: p_count => x_msg_count,
3314: p_data => x_msg_data
3315: );
3317: WHEN FND_API.G_EXC_ERROR THEN
3318: ROLLBACK TO Get_ChannelContent_PVT;
3319: x_return_status := FND_API.G_RET_STS_ERROR;
3320: -- Standard call to get message count and if count=1, get the message
3321: FND_MSG_PUB.Count_And_Get (
3322: p_encoded => FND_API.G_FALSE,
3323: p_count => x_msg_count,
3324: p_data => x_msg_data
3325: );
3326: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3327: ROLLBACK TO Get_ChannelContent_PVT;
3328: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3329: -- Standard call to get message count and if count=1, get the message
3330: FND_MSG_PUB.Count_And_Get (
3331: p_encoded => FND_API.G_FALSE,
3332: p_count => x_msg_count,
3333: p_data => x_msg_data
3334: );
3334: );
3335: WHEN OTHERS THEN
3336: ROLLBACK TO Get_ChannelContent_PVT;
3337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3338: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3339: THEN
3340: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3341: END IF;
3342: -- Standard call to get message count and if count=1, get the message
3336: ROLLBACK TO Get_ChannelContent_PVT;
3337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3338: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3339: THEN
3340: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3341: END IF;
3342: -- Standard call to get message count and if count=1, get the message
3343: FND_MSG_PUB.Count_And_Get (
3344: p_encoded => FND_API.G_FALSE,
3339: THEN
3340: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3341: END IF;
3342: -- Standard call to get message count and if count=1, get the message
3343: FND_MSG_PUB.Count_And_Get (
3344: p_encoded => FND_API.G_FALSE,
3345: p_count => x_msg_count,
3346: p_data => x_msg_data
3347: );
3428: THEN
3429: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3430: END IF;
3431: -- Debug Message
3432: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3433: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
3434: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
3435: FND_MSG_PUB.Add;
3436: END IF;
3431: -- Debug Message
3432: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3433: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
3434: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
3435: FND_MSG_PUB.Add;
3436: END IF;
3437: --Initialize message list if p_init_msg_list is TRUE.
3438: IF FND_API.To_Boolean (p_init_msg_list) THEN
3439: FND_MSG_PUB.initialize;
3435: FND_MSG_PUB.Add;
3436: END IF;
3437: --Initialize message list if p_init_msg_list is TRUE.
3438: IF FND_API.To_Boolean (p_init_msg_list) THEN
3439: FND_MSG_PUB.initialize;
3440: END IF;
3441: -- Get the current (login) user id.
3442: AMV_UTILITY_PVT.Get_UserInfo(
3443: x_resource_id => l_resource_id,
3449: IF (p_check_login_user = FND_API.G_TRUE) THEN
3450: -- Check if user is login and has the required privilege.
3451: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
3452: -- User is not login.
3453: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3454: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
3455: FND_MSG_PUB.Add;
3456: END IF;
3457: RAISE FND_API.G_EXC_ERROR;
3451: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
3452: -- User is not login.
3453: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3454: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
3455: FND_MSG_PUB.Add;
3456: END IF;
3457: RAISE FND_API.G_EXC_ERROR;
3458: END IF;
3459: END IF;
3478: x_error_token => l_Error_Token
3479: );
3480: -- change perspectives if the channel exists
3481: IF (l_channel_exist_flag = FND_API.G_FALSE) THEN
3482: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3483: THEN
3484: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
3485: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
3486: FND_MSG_PUB.Add;
3482: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3483: THEN
3484: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
3485: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
3486: FND_MSG_PUB.Add;
3487: END IF;
3488: RAISE FND_API.G_EXC_ERROR;
3489: ELSE
3490: --
3512: THEN
3513: l_update_channel_flag := FND_API.G_TRUE;
3514: ELSE
3515: -- user does not have privilege to create public channel
3516: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3517: THEN
3518: FND_MESSAGE.Set_Name('AMV', 'AMV_NO_ACCESS_ERROR');
3519: FND_MESSAGE.Set_Token('LEVEL','Channel');
3520: FND_MSG_PUB.Add;
3516: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3517: THEN
3518: FND_MESSAGE.Set_Name('AMV', 'AMV_NO_ACCESS_ERROR');
3519: FND_MESSAGE.Set_Token('LEVEL','Channel');
3520: FND_MSG_PUB.Add;
3521: END IF;
3522: RAISE FND_API.G_EXC_ERROR;
3523: END IF;
3524: END IF;
3523: END IF;
3524: END IF;
3525: ELSE
3526: -- error while user privilege check in Can_SetupChannel
3527: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3528: THEN
3529: FND_MESSAGE.Set_Name('AMV', 'AMV_SETUP_CHECK_ERROR');
3530: FND_MESSAGE.Set_Token('LEVEL','Channel');
3531: FND_MSG_PUB.Add;
3527: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3528: THEN
3529: FND_MESSAGE.Set_Name('AMV', 'AMV_SETUP_CHECK_ERROR');
3530: FND_MESSAGE.Set_Token('LEVEL','Channel');
3531: FND_MSG_PUB.Add;
3532: END IF;
3533: RAISE FND_API.G_EXC_ERROR;
3534: END IF;
3535: END IF;
3597: END IF;
3598: --
3599:
3600: -- Success message
3601: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
3602: THEN
3603: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
3604: FND_MESSAGE.Set_Token('ROW', l_full_name);
3605: FND_MSG_PUB.Add;
3601: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
3602: THEN
3603: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
3604: FND_MESSAGE.Set_Token('ROW', l_full_name);
3605: FND_MSG_PUB.Add;
3606: END IF;
3607: --Standard check of commit
3608: IF FND_API.To_Boolean ( p_commit ) THEN
3609: COMMIT WORK;
3608: IF FND_API.To_Boolean ( p_commit ) THEN
3609: COMMIT WORK;
3610: END IF;
3611: -- Debug Message
3612: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3613: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
3614: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
3615: FND_MSG_PUB.Add;
3616: END IF;
3611: -- Debug Message
3612: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3613: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
3614: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
3615: FND_MSG_PUB.Add;
3616: END IF;
3617: --Standard call to get message count and if count=1, get the message
3618: FND_MSG_PUB.Count_And_Get (
3619: p_encoded => FND_API.G_FALSE,
3614: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
3615: FND_MSG_PUB.Add;
3616: END IF;
3617: --Standard call to get message count and if count=1, get the message
3618: FND_MSG_PUB.Count_And_Get (
3619: p_encoded => FND_API.G_FALSE,
3620: p_count => x_msg_count,
3621: p_data => x_msg_data
3622: );
3624: WHEN FND_API.G_EXC_ERROR THEN
3625: ROLLBACK TO Set_ChannelPerspectives_PVT;
3626: x_return_status := FND_API.G_RET_STS_ERROR;
3627: -- Standard call to get message count and if count=1, get the message
3628: FND_MSG_PUB.Count_And_Get (
3629: p_encoded => FND_API.G_FALSE,
3630: p_count => x_msg_count,
3631: p_data => x_msg_data
3632: );
3633: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3634: ROLLBACK TO Set_ChannelPerspectives_PVT;
3635: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3636: -- Standard call to get message count and if count=1, get the message
3637: FND_MSG_PUB.Count_And_Get (
3638: p_encoded => FND_API.G_FALSE,
3639: p_count => x_msg_count,
3640: p_data => x_msg_data
3641: );
3641: );
3642: WHEN OTHERS THEN
3643: ROLLBACK TO Set_ChannelPerspectives_PVT;
3644: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3645: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3646: THEN
3647: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3648: END IF;
3649: -- Standard call to get message count and if count=1, get the message
3643: ROLLBACK TO Set_ChannelPerspectives_PVT;
3644: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3645: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3646: THEN
3647: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3648: END IF;
3649: -- Standard call to get message count and if count=1, get the message
3650: FND_MSG_PUB.Count_And_Get (
3651: p_encoded => FND_API.G_FALSE,
3646: THEN
3647: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3648: END IF;
3649: -- Standard call to get message count and if count=1, get the message
3650: FND_MSG_PUB.Count_And_Get (
3651: p_encoded => FND_API.G_FALSE,
3652: p_count => x_msg_count,
3653: p_data => x_msg_data
3654: );
3732: THEN
3733: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3734: END IF;
3735: -- Debug Message
3736: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3737: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
3738: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
3739: FND_MSG_PUB.Add;
3740: END IF;
3735: -- Debug Message
3736: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3737: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
3738: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
3739: FND_MSG_PUB.Add;
3740: END IF;
3741: --Initialize message list if p_init_msg_list is TRUE.
3742: IF FND_API.To_Boolean (p_init_msg_list) THEN
3743: FND_MSG_PUB.initialize;
3739: FND_MSG_PUB.Add;
3740: END IF;
3741: --Initialize message list if p_init_msg_list is TRUE.
3742: IF FND_API.To_Boolean (p_init_msg_list) THEN
3743: FND_MSG_PUB.initialize;
3744: END IF;
3745: -- Get the current (login) user id.
3746: AMV_UTILITY_PVT.Get_UserInfo(
3747: x_resource_id => l_resource_id,
3753: IF (p_check_login_user = FND_API.G_TRUE) THEN
3754: -- Check if user is login and has the required privilege.
3755: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
3756: -- User is not login.
3757: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3758: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
3759: FND_MSG_PUB.Add;
3760: END IF;
3761: RAISE FND_API.G_EXC_ERROR;
3755: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
3756: -- User is not login.
3757: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3758: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
3759: FND_MSG_PUB.Add;
3760: END IF;
3761: RAISE FND_API.G_EXC_ERROR;
3762: END IF;
3763: END IF;
3782: x_error_token => l_Error_Token
3783: );
3784: -- get channel perspectives if the channel exists
3785: IF (l_channel_exist_flag = FND_API.G_FALSE) THEN
3786: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3787: THEN
3788: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
3789: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
3790: FND_MSG_PUB.Add;
3786: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3787: THEN
3788: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
3789: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
3790: FND_MSG_PUB.Add;
3791: END IF;
3792: RAISE FND_API.G_EXC_ERROR;
3793: ELSE
3794: OPEN Get_Perspectives;
3804: END IF;
3805: --
3806:
3807: -- Debug Message
3808: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3809: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
3810: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
3811: FND_MSG_PUB.Add;
3812: END IF;
3807: -- Debug Message
3808: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3809: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
3810: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
3811: FND_MSG_PUB.Add;
3812: END IF;
3813: --Standard call to get message count and if count=1, get the message
3814: FND_MSG_PUB.Count_And_Get (
3815: p_encoded => FND_API.G_FALSE,
3810: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
3811: FND_MSG_PUB.Add;
3812: END IF;
3813: --Standard call to get message count and if count=1, get the message
3814: FND_MSG_PUB.Count_And_Get (
3815: p_encoded => FND_API.G_FALSE,
3816: p_count => x_msg_count,
3817: p_data => x_msg_data
3818: );
3820: WHEN FND_API.G_EXC_ERROR THEN
3821: ROLLBACK TO Get_ChannelPerspectives_PVT;
3822: x_return_status := FND_API.G_RET_STS_ERROR;
3823: -- Standard call to get message count and if count=1, get the message
3824: FND_MSG_PUB.Count_And_Get (
3825: p_encoded => FND_API.G_FALSE,
3826: p_count => x_msg_count,
3827: p_data => x_msg_data
3828: );
3829: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3830: ROLLBACK TO Get_ChannelPerspectives_PVT;
3831: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3832: -- Standard call to get message count and if count=1, get the message
3833: FND_MSG_PUB.Count_And_Get (
3834: p_encoded => FND_API.G_FALSE,
3835: p_count => x_msg_count,
3836: p_data => x_msg_data
3837: );
3837: );
3838: WHEN OTHERS THEN
3839: ROLLBACK TO Get_ChannelPerspectives_PVT;
3840: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3841: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3842: THEN
3843: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3844: END IF;
3845: -- Standard call to get message count and if count=1, get the message
3839: ROLLBACK TO Get_ChannelPerspectives_PVT;
3840: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3841: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3842: THEN
3843: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3844: END IF;
3845: -- Standard call to get message count and if count=1, get the message
3846: FND_MSG_PUB.Count_And_Get (
3847: p_encoded => FND_API.G_FALSE,
3842: THEN
3843: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3844: END IF;
3845: -- Standard call to get message count and if count=1, get the message
3846: FND_MSG_PUB.Count_And_Get (
3847: p_encoded => FND_API.G_FALSE,
3848: p_count => x_msg_count,
3849: p_data => x_msg_data
3850: );
3931: THEN
3932: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3933: END IF;
3934: -- Debug Message
3935: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3936: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
3937: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
3938: FND_MSG_PUB.Add;
3939: END IF;
3934: -- Debug Message
3935: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3936: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
3937: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
3938: FND_MSG_PUB.Add;
3939: END IF;
3940: --Initialize message list if p_init_msg_list is TRUE.
3941: IF FND_API.To_Boolean (p_init_msg_list) THEN
3942: FND_MSG_PUB.initialize;
3938: FND_MSG_PUB.Add;
3939: END IF;
3940: --Initialize message list if p_init_msg_list is TRUE.
3941: IF FND_API.To_Boolean (p_init_msg_list) THEN
3942: FND_MSG_PUB.initialize;
3943: END IF;
3944: -- Get the current (login) user id.
3945: AMV_UTILITY_PVT.Get_UserInfo(
3946: x_resource_id => l_resource_id,
3952: IF (p_check_login_user = FND_API.G_TRUE) THEN
3953: -- Check if user is login and has the required privilege.
3954: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
3955: -- User is not login.
3956: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3957: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
3958: FND_MSG_PUB.Add;
3959: END IF;
3960: RAISE FND_API.G_EXC_ERROR;
3954: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
3955: -- User is not login.
3956: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3957: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
3958: FND_MSG_PUB.Add;
3959: END IF;
3960: RAISE FND_API.G_EXC_ERROR;
3961: END IF;
3962: END IF;
3981: x_error_token => l_Error_Token
3982: );
3983: -- change usergroups if the channel exists
3984: IF (l_channel_exist_flag = FND_API.G_FALSE) THEN
3985: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3986: THEN
3987: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
3988: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
3989: FND_MSG_PUB.Add;
3985: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3986: THEN
3987: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
3988: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
3989: FND_MSG_PUB.Add;
3990: END IF;
3991: RAISE FND_API.G_EXC_ERROR;
3992: ELSE
3993: --
4015: THEN
4016: l_update_channel_flag := FND_API.G_TRUE;
4017: ELSE
4018: -- user does not have privilege to create public channel
4019: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4020: THEN
4021: FND_MESSAGE.Set_Name('AMV', 'AMV_NO_ACCESS_ERROR');
4022: FND_MESSAGE.Set_Token('LEVEL','Channel');
4023: FND_MSG_PUB.Add;
4019: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4020: THEN
4021: FND_MESSAGE.Set_Name('AMV', 'AMV_NO_ACCESS_ERROR');
4022: FND_MESSAGE.Set_Token('LEVEL','Channel');
4023: FND_MSG_PUB.Add;
4024: END IF;
4025: RAISE FND_API.G_EXC_ERROR;
4026: END IF;
4027: END IF;
4026: END IF;
4027: END IF;
4028: ELSE
4029: -- error while user privilege check in Can_SetupChannel
4030: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4031: THEN
4032: FND_MESSAGE.Set_Name('AMV', 'AMV_SETUP_CHECK_ERROR');
4033: FND_MESSAGE.Set_Token('LEVEL','Channel');
4034: FND_MSG_PUB.Add;
4030: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4031: THEN
4032: FND_MESSAGE.Set_Name('AMV', 'AMV_SETUP_CHECK_ERROR');
4033: FND_MESSAGE.Set_Token('LEVEL','Channel');
4034: FND_MSG_PUB.Add;
4035: END IF;
4036: RAISE FND_API.G_EXC_ERROR;
4037: END IF;
4038: END IF;
4099: END IF;
4100: --
4101:
4102: -- Success message
4103: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
4104: THEN
4105: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
4106: FND_MESSAGE.Set_Token('ROW', l_full_name);
4107: FND_MSG_PUB.Add;
4103: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
4104: THEN
4105: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
4106: FND_MESSAGE.Set_Token('ROW', l_full_name);
4107: FND_MSG_PUB.Add;
4108: END IF;
4109: --Standard check of commit
4110: IF FND_API.To_Boolean ( p_commit ) THEN
4111: COMMIT WORK;
4110: IF FND_API.To_Boolean ( p_commit ) THEN
4111: COMMIT WORK;
4112: END IF;
4113: -- Debug Message
4114: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4115: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
4116: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
4117: FND_MSG_PUB.Add;
4118: END IF;
4113: -- Debug Message
4114: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4115: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
4116: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
4117: FND_MSG_PUB.Add;
4118: END IF;
4119: --Standard call to get message count and if count=1, get the message
4120: FND_MSG_PUB.Count_And_Get (
4121: p_encoded => FND_API.G_FALSE,
4116: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
4117: FND_MSG_PUB.Add;
4118: END IF;
4119: --Standard call to get message count and if count=1, get the message
4120: FND_MSG_PUB.Count_And_Get (
4121: p_encoded => FND_API.G_FALSE,
4122: p_count => x_msg_count,
4123: p_data => x_msg_data
4124: );
4126: WHEN FND_API.G_EXC_ERROR THEN
4127: ROLLBACK TO Set_ChannelItems_PVT;
4128: x_return_status := FND_API.G_RET_STS_ERROR;
4129: -- Standard call to get message count and if count=1, get the message
4130: FND_MSG_PUB.Count_And_Get (
4131: p_encoded => FND_API.G_FALSE,
4132: p_count => x_msg_count,
4133: p_data => x_msg_data
4134: );
4135: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4136: ROLLBACK TO Set_ChannelItems_PVT;
4137: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4138: -- Standard call to get message count and if count=1, get the message
4139: FND_MSG_PUB.Count_And_Get (
4140: p_encoded => FND_API.G_FALSE,
4141: p_count => x_msg_count,
4142: p_data => x_msg_data
4143: );
4143: );
4144: WHEN OTHERS THEN
4145: ROLLBACK TO Set_ChannelItems_PVT;
4146: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4147: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4148: THEN
4149: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4150: END IF;
4151: -- Standard call to get message count and if count=1, get the message
4145: ROLLBACK TO Set_ChannelItems_PVT;
4146: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4147: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4148: THEN
4149: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4150: END IF;
4151: -- Standard call to get message count and if count=1, get the message
4152: FND_MSG_PUB.Count_And_Get (
4153: p_encoded => FND_API.G_FALSE,
4148: THEN
4149: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4150: END IF;
4151: -- Standard call to get message count and if count=1, get the message
4152: FND_MSG_PUB.Count_And_Get (
4153: p_encoded => FND_API.G_FALSE,
4154: p_count => x_msg_count,
4155: p_data => x_msg_data
4156: );
4234: THEN
4235: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4236: END IF;
4237: -- Debug Message
4238: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4239: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
4240: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
4241: FND_MSG_PUB.Add;
4242: END IF;
4237: -- Debug Message
4238: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4239: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
4240: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
4241: FND_MSG_PUB.Add;
4242: END IF;
4243: --Initialize message list if p_init_msg_list is TRUE.
4244: IF FND_API.To_Boolean (p_init_msg_list) THEN
4245: FND_MSG_PUB.initialize;
4241: FND_MSG_PUB.Add;
4242: END IF;
4243: --Initialize message list if p_init_msg_list is TRUE.
4244: IF FND_API.To_Boolean (p_init_msg_list) THEN
4245: FND_MSG_PUB.initialize;
4246: END IF;
4247: -- Get the current (login) user id.
4248: AMV_UTILITY_PVT.Get_UserInfo(
4249: x_resource_id => l_resource_id,
4255: IF (p_check_login_user = FND_API.G_TRUE) THEN
4256: -- Check if user is login and has the required privilege.
4257: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
4258: -- User is not login.
4259: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4260: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
4261: FND_MSG_PUB.Add;
4262: END IF;
4263: RAISE FND_API.G_EXC_ERROR;
4257: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
4258: -- User is not login.
4259: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4260: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
4261: FND_MSG_PUB.Add;
4262: END IF;
4263: RAISE FND_API.G_EXC_ERROR;
4264: END IF;
4265: END IF;
4284: x_error_token => l_Error_Token
4285: );
4286: -- get channel groups if the channel exists
4287: IF (l_channel_exist_flag = FND_API.G_FALSE) THEN
4288: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4289: THEN
4290: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
4291: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
4292: FND_MSG_PUB.Add;
4288: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4289: THEN
4290: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
4291: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
4292: FND_MSG_PUB.Add;
4293: END IF;
4294: RAISE FND_API.G_EXC_ERROR;
4295: ELSE
4296: OPEN Get_ItemTypes;
4306: END IF;
4307: --
4308:
4309: -- Debug Message
4310: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4311: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
4312: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
4313: FND_MSG_PUB.Add;
4314: END IF;
4309: -- Debug Message
4310: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4311: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
4312: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
4313: FND_MSG_PUB.Add;
4314: END IF;
4315: --Standard call to get message count and if count=1, get the message
4316: FND_MSG_PUB.Count_And_Get (
4317: p_encoded => FND_API.G_FALSE,
4312: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
4313: FND_MSG_PUB.Add;
4314: END IF;
4315: --Standard call to get message count and if count=1, get the message
4316: FND_MSG_PUB.Count_And_Get (
4317: p_encoded => FND_API.G_FALSE,
4318: p_count => x_msg_count,
4319: p_data => x_msg_data
4320: );
4322: WHEN FND_API.G_EXC_ERROR THEN
4323: ROLLBACK TO Get_Get_ChannelItems_PVT;
4324: x_return_status := FND_API.G_RET_STS_ERROR;
4325: -- Standard call to get message count and if count=1, get the message
4326: FND_MSG_PUB.Count_And_Get (
4327: p_encoded => FND_API.G_FALSE,
4328: p_count => x_msg_count,
4329: p_data => x_msg_data
4330: );
4331: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4332: ROLLBACK TO Get_ChannelItems_PVT;
4333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4334: -- Standard call to get message count and if count=1, get the message
4335: FND_MSG_PUB.Count_And_Get (
4336: p_encoded => FND_API.G_FALSE,
4337: p_count => x_msg_count,
4338: p_data => x_msg_data
4339: );
4339: );
4340: WHEN OTHERS THEN
4341: ROLLBACK TO Get_ChannelItems_PVT;
4342: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4343: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4344: THEN
4345: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4346: END IF;
4347: -- Standard call to get message count and if count=1, get the message
4341: ROLLBACK TO Get_ChannelItems_PVT;
4342: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4343: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4344: THEN
4345: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4346: END IF;
4347: -- Standard call to get message count and if count=1, get the message
4348: FND_MSG_PUB.Count_And_Get (
4349: p_encoded => FND_API.G_FALSE,
4344: THEN
4345: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4346: END IF;
4347: -- Standard call to get message count and if count=1, get the message
4348: FND_MSG_PUB.Count_And_Get (
4349: p_encoded => FND_API.G_FALSE,
4350: p_count => x_msg_count,
4351: p_data => x_msg_data
4352: );
4434: THEN
4435: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4436: END IF;
4437: -- Debug Message
4438: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4439: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
4440: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
4441: FND_MSG_PUB.Add;
4442: END IF;
4437: -- Debug Message
4438: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4439: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
4440: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
4441: FND_MSG_PUB.Add;
4442: END IF;
4443: --Initialize message list if p_init_msg_list is TRUE.
4444: IF FND_API.To_Boolean (p_init_msg_list) THEN
4445: FND_MSG_PUB.initialize;
4441: FND_MSG_PUB.Add;
4442: END IF;
4443: --Initialize message list if p_init_msg_list is TRUE.
4444: IF FND_API.To_Boolean (p_init_msg_list) THEN
4445: FND_MSG_PUB.initialize;
4446: END IF;
4447: -- Get the current (login) user id.
4448: AMV_UTILITY_PVT.Get_UserInfo(
4449: x_resource_id => l_resource_id,
4455: IF (p_check_login_user = FND_API.G_TRUE) THEN
4456: -- Check if user is login and has the required privilege.
4457: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
4458: -- User is not login.
4459: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4460: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
4461: FND_MSG_PUB.Add;
4462: END IF;
4463: RAISE FND_API.G_EXC_ERROR;
4457: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
4458: -- User is not login.
4459: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4460: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
4461: FND_MSG_PUB.Add;
4462: END IF;
4463: RAISE FND_API.G_EXC_ERROR;
4464: END IF;
4465: END IF;
4484: x_error_token => l_Error_Token
4485: );
4486: -- change channel keywords if the channel exists
4487: IF (l_channel_exist_flag = FND_API.G_FALSE) THEN
4488: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4489: THEN
4490: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
4491: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
4492: FND_MSG_PUB.Add;
4488: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4489: THEN
4490: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
4491: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
4492: FND_MSG_PUB.Add;
4493: END IF;
4494: RAISE FND_API.G_EXC_ERROR;
4495: ELSE
4496: --
4518: THEN
4519: l_update_channel_flag := FND_API.G_TRUE;
4520: ELSE
4521: -- user does not have privilege to create public channel
4522: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4523: THEN
4524: FND_MESSAGE.Set_Name('AMV', 'AMV_NO_ACCESS_ERROR');
4525: FND_MESSAGE.Set_Token('LEVEL','Channel');
4526: FND_MSG_PUB.Add;
4522: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4523: THEN
4524: FND_MESSAGE.Set_Name('AMV', 'AMV_NO_ACCESS_ERROR');
4525: FND_MESSAGE.Set_Token('LEVEL','Channel');
4526: FND_MSG_PUB.Add;
4527: END IF;
4528: RAISE FND_API.G_EXC_ERROR;
4529: END IF;
4530: END IF;
4529: END IF;
4530: END IF;
4531: ELSE
4532: -- error while user privilege check in Can_SetupChannel
4533: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4534: THEN
4535: FND_MESSAGE.Set_Name('AMV', 'AMV_SETUP_CHECK_ERROR');
4536: FND_MESSAGE.Set_Token('LEVEL','Channel');
4537: FND_MSG_PUB.Add;
4533: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4534: THEN
4535: FND_MESSAGE.Set_Name('AMV', 'AMV_SETUP_CHECK_ERROR');
4536: FND_MESSAGE.Set_Token('LEVEL','Channel');
4537: FND_MSG_PUB.Add;
4538: END IF;
4539: RAISE FND_API.G_EXC_ERROR;
4540: END IF;
4541: END IF;
4601: END IF;
4602: --
4603:
4604: -- Success message
4605: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
4606: THEN
4607: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
4608: FND_MESSAGE.Set_Token('ROW', l_full_name);
4609: FND_MSG_PUB.Add;
4605: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
4606: THEN
4607: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
4608: FND_MESSAGE.Set_Token('ROW', l_full_name);
4609: FND_MSG_PUB.Add;
4610: END IF;
4611: --Standard check of commit
4612: IF FND_API.To_Boolean ( p_commit ) THEN
4613: COMMIT WORK;
4612: IF FND_API.To_Boolean ( p_commit ) THEN
4613: COMMIT WORK;
4614: END IF;
4615: -- Debug Message
4616: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4617: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
4618: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
4619: FND_MSG_PUB.Add;
4620: END IF;
4615: -- Debug Message
4616: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4617: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
4618: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
4619: FND_MSG_PUB.Add;
4620: END IF;
4621: --Standard call to get message count and if count=1, get the message
4622: FND_MSG_PUB.Count_And_Get (
4623: p_encoded => FND_API.G_FALSE,
4618: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
4619: FND_MSG_PUB.Add;
4620: END IF;
4621: --Standard call to get message count and if count=1, get the message
4622: FND_MSG_PUB.Count_And_Get (
4623: p_encoded => FND_API.G_FALSE,
4624: p_count => x_msg_count,
4625: p_data => x_msg_data
4626: );
4628: WHEN FND_API.G_EXC_ERROR THEN
4629: ROLLBACK TO Set_ChannelKeywords_PVT;
4630: x_return_status := FND_API.G_RET_STS_ERROR;
4631: -- Standard call to get message count and if count=1, get the message
4632: FND_MSG_PUB.Count_And_Get (
4633: p_encoded => FND_API.G_FALSE,
4634: p_count => x_msg_count,
4635: p_data => x_msg_data
4636: );
4637: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4638: ROLLBACK TO Set_ChannelKeywords_PVT;
4639: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4640: -- Standard call to get message count and if count=1, get the message
4641: FND_MSG_PUB.Count_And_Get (
4642: p_encoded => FND_API.G_FALSE,
4643: p_count => x_msg_count,
4644: p_data => x_msg_data
4645: );
4645: );
4646: WHEN OTHERS THEN
4647: ROLLBACK TO Set_ChannelKeywords_PVT;
4648: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4649: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4650: THEN
4651: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4652: END IF;
4653: -- Standard call to get message count and if count=1, get the message
4647: ROLLBACK TO Set_ChannelKeywords_PVT;
4648: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4649: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4650: THEN
4651: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4652: END IF;
4653: -- Standard call to get message count and if count=1, get the message
4654: FND_MSG_PUB.Count_And_Get (
4655: p_encoded => FND_API.G_FALSE,
4650: THEN
4651: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4652: END IF;
4653: -- Standard call to get message count and if count=1, get the message
4654: FND_MSG_PUB.Count_And_Get (
4655: p_encoded => FND_API.G_FALSE,
4656: p_count => x_msg_count,
4657: p_data => x_msg_data
4658: );
4737: THEN
4738: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4739: END IF;
4740: -- Debug Message
4741: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4742: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
4743: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
4744: FND_MSG_PUB.Add;
4745: END IF;
4740: -- Debug Message
4741: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4742: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
4743: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
4744: FND_MSG_PUB.Add;
4745: END IF;
4746: --Initialize message list if p_init_msg_list is TRUE.
4747: IF FND_API.To_Boolean (p_init_msg_list) THEN
4748: FND_MSG_PUB.initialize;
4744: FND_MSG_PUB.Add;
4745: END IF;
4746: --Initialize message list if p_init_msg_list is TRUE.
4747: IF FND_API.To_Boolean (p_init_msg_list) THEN
4748: FND_MSG_PUB.initialize;
4749: END IF;
4750: -- Get the current (login) user id.
4751: AMV_UTILITY_PVT.Get_UserInfo(
4752: x_resource_id => l_resource_id,
4758: IF (p_check_login_user = FND_API.G_TRUE) THEN
4759: -- Check if user is login and has the required privilege.
4760: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
4761: -- User is not login.
4762: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4763: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
4764: FND_MSG_PUB.Add;
4765: END IF;
4766: RAISE FND_API.G_EXC_ERROR;
4760: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
4761: -- User is not login.
4762: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4763: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
4764: FND_MSG_PUB.Add;
4765: END IF;
4766: RAISE FND_API.G_EXC_ERROR;
4767: END IF;
4768: END IF;
4787: x_error_token => l_Error_Token
4788: );
4789: -- get channel keywords if the channel exists
4790: IF (l_channel_exist_flag = FND_API.G_FALSE) THEN
4791: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4792: THEN
4793: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
4794: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
4795: FND_MSG_PUB.Add;
4791: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4792: THEN
4793: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
4794: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
4795: FND_MSG_PUB.Add;
4796: END IF;
4797: RAISE FND_API.G_EXC_ERROR;
4798: ELSE
4799: OPEN Get_Keywords;
4809: END IF;
4810: --
4811:
4812: -- Debug Message
4813: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4814: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
4815: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
4816: FND_MSG_PUB.Add;
4817: END IF;
4812: -- Debug Message
4813: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4814: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
4815: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
4816: FND_MSG_PUB.Add;
4817: END IF;
4818: --Standard call to get message count and if count=1, get the message
4819: FND_MSG_PUB.Count_And_Get (
4820: p_encoded => FND_API.G_FALSE,
4815: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
4816: FND_MSG_PUB.Add;
4817: END IF;
4818: --Standard call to get message count and if count=1, get the message
4819: FND_MSG_PUB.Count_And_Get (
4820: p_encoded => FND_API.G_FALSE,
4821: p_count => x_msg_count,
4822: p_data => x_msg_data
4823: );
4825: WHEN FND_API.G_EXC_ERROR THEN
4826: ROLLBACK TO Get_ChannelKeywords_PVT;
4827: x_return_status := FND_API.G_RET_STS_ERROR;
4828: -- Standard call to get message count and if count=1, get the message
4829: FND_MSG_PUB.Count_And_Get (
4830: p_encoded => FND_API.G_FALSE,
4831: p_count => x_msg_count,
4832: p_data => x_msg_data
4833: );
4834: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4835: ROLLBACK TO Get_ChannelKeywords_PVT;
4836: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4837: -- Standard call to get message count and if count=1, get the message
4838: FND_MSG_PUB.Count_And_Get (
4839: p_encoded => FND_API.G_FALSE,
4840: p_count => x_msg_count,
4841: p_data => x_msg_data
4842: );
4842: );
4843: WHEN OTHERS THEN
4844: ROLLBACK TO Get_ChannelKeywords_PVT;
4845: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4846: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4847: THEN
4848: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4849: END IF;
4850: -- Standard call to get message count and if count=1, get the message
4844: ROLLBACK TO Get_ChannelKeywords_PVT;
4845: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4846: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4847: THEN
4848: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4849: END IF;
4850: -- Standard call to get message count and if count=1, get the message
4851: FND_MSG_PUB.Count_And_Get (
4852: p_encoded => FND_API.G_FALSE,
4847: THEN
4848: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4849: END IF;
4850: -- Standard call to get message count and if count=1, get the message
4851: FND_MSG_PUB.Count_And_Get (
4852: p_encoded => FND_API.G_FALSE,
4853: p_count => x_msg_count,
4854: p_data => x_msg_data
4855: );
4937: THEN
4938: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4939: END IF;
4940: -- Debug Message
4941: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4942: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
4943: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
4944: FND_MSG_PUB.Add;
4945: END IF;
4940: -- Debug Message
4941: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
4942: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
4943: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
4944: FND_MSG_PUB.Add;
4945: END IF;
4946: --Initialize message list if p_init_msg_list is TRUE.
4947: IF FND_API.To_Boolean (p_init_msg_list) THEN
4948: FND_MSG_PUB.initialize;
4944: FND_MSG_PUB.Add;
4945: END IF;
4946: --Initialize message list if p_init_msg_list is TRUE.
4947: IF FND_API.To_Boolean (p_init_msg_list) THEN
4948: FND_MSG_PUB.initialize;
4949: END IF;
4950: -- Get the current (login) user id.
4951: AMV_UTILITY_PVT.Get_UserInfo(
4952: x_resource_id => l_resource_id,
4958: IF (p_check_login_user = FND_API.G_TRUE) THEN
4959: -- Check if user is login and has the required privilege.
4960: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
4961: -- User is not login.
4962: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4963: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
4964: FND_MSG_PUB.Add;
4965: END IF;
4966: RAISE FND_API.G_EXC_ERROR;
4960: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
4961: -- User is not login.
4962: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4963: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
4964: FND_MSG_PUB.Add;
4965: END IF;
4966: RAISE FND_API.G_EXC_ERROR;
4967: END IF;
4968: END IF;
4987: x_error_token => l_Error_Token
4988: );
4989: -- change authors if the channel exists
4990: IF (l_channel_exist_flag = FND_API.G_FALSE) THEN
4991: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4992: THEN
4993: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
4994: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
4995: FND_MSG_PUB.Add;
4991: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4992: THEN
4993: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
4994: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
4995: FND_MSG_PUB.Add;
4996: END IF;
4997: RAISE FND_API.G_EXC_ERROR;
4998: ELSE
4999: --
5021: THEN
5022: l_update_channel_flag := FND_API.G_TRUE;
5023: ELSE
5024: -- user does not have privilege to create public channel
5025: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
5026: THEN
5027: FND_MESSAGE.Set_Name('AMV', 'AMV_NO_ACCESS_ERROR');
5028: FND_MESSAGE.Set_Token('LEVEL','Channel');
5029: FND_MSG_PUB.Add;
5025: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
5026: THEN
5027: FND_MESSAGE.Set_Name('AMV', 'AMV_NO_ACCESS_ERROR');
5028: FND_MESSAGE.Set_Token('LEVEL','Channel');
5029: FND_MSG_PUB.Add;
5030: END IF;
5031: RAISE FND_API.G_EXC_ERROR;
5032: END IF;
5033: END IF;
5032: END IF;
5033: END IF;
5034: ELSE
5035: -- error while user privilege check in Can_SetupChannel
5036: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
5037: THEN
5038: FND_MESSAGE.Set_Name('AMV', 'AMV_SETUP_CHECK_ERROR');
5039: FND_MESSAGE.Set_Token('LEVEL','Channel');
5040: FND_MSG_PUB.Add;
5036: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
5037: THEN
5038: FND_MESSAGE.Set_Name('AMV', 'AMV_SETUP_CHECK_ERROR');
5039: FND_MESSAGE.Set_Token('LEVEL','Channel');
5040: FND_MSG_PUB.Add;
5041: END IF;
5042: RAISE FND_API.G_EXC_ERROR;
5043: END IF;
5044: END IF;
5104: END IF;
5105: --
5106:
5107: -- Success message
5108: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
5109: THEN
5110: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
5111: FND_MESSAGE.Set_Token('ROW', l_full_name);
5112: FND_MSG_PUB.Add;
5108: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
5109: THEN
5110: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
5111: FND_MESSAGE.Set_Token('ROW', l_full_name);
5112: FND_MSG_PUB.Add;
5113: END IF;
5114: --Standard check of commit
5115: IF FND_API.To_Boolean ( p_commit ) THEN
5116: COMMIT WORK;
5115: IF FND_API.To_Boolean ( p_commit ) THEN
5116: COMMIT WORK;
5117: END IF;
5118: -- Debug Message
5119: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5120: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
5121: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
5122: FND_MSG_PUB.Add;
5123: END IF;
5118: -- Debug Message
5119: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5120: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
5121: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
5122: FND_MSG_PUB.Add;
5123: END IF;
5124: --Standard call to get message count and if count=1, get the message
5125: FND_MSG_PUB.Count_And_Get (
5126: p_encoded => FND_API.G_FALSE,
5121: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
5122: FND_MSG_PUB.Add;
5123: END IF;
5124: --Standard call to get message count and if count=1, get the message
5125: FND_MSG_PUB.Count_And_Get (
5126: p_encoded => FND_API.G_FALSE,
5127: p_count => x_msg_count,
5128: p_data => x_msg_data
5129: );
5131: WHEN FND_API.G_EXC_ERROR THEN
5132: ROLLBACK TO Set_ChannelAuthors_PVT;
5133: x_return_status := FND_API.G_RET_STS_ERROR;
5134: -- Standard call to get message count and if count=1, get the message
5135: FND_MSG_PUB.Count_And_Get (
5136: p_encoded => FND_API.G_FALSE,
5137: p_count => x_msg_count,
5138: p_data => x_msg_data
5139: );
5140: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5141: ROLLBACK TO Set_ChannelAuthors_PVT;
5142: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5143: -- Standard call to get message count and if count=1, get the message
5144: FND_MSG_PUB.Count_And_Get (
5145: p_encoded => FND_API.G_FALSE,
5146: p_count => x_msg_count,
5147: p_data => x_msg_data
5148: );
5148: );
5149: WHEN OTHERS THEN
5150: ROLLBACK TO Set_ChannelAuthors_PVT;
5151: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5152: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5153: THEN
5154: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5155: END IF;
5156: -- Standard call to get message count and if count=1, get the message
5150: ROLLBACK TO Set_ChannelAuthors_PVT;
5151: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5152: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5153: THEN
5154: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5155: END IF;
5156: -- Standard call to get message count and if count=1, get the message
5157: FND_MSG_PUB.Count_And_Get (
5158: p_encoded => FND_API.G_FALSE,
5153: THEN
5154: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5155: END IF;
5156: -- Standard call to get message count and if count=1, get the message
5157: FND_MSG_PUB.Count_And_Get (
5158: p_encoded => FND_API.G_FALSE,
5159: p_count => x_msg_count,
5160: p_data => x_msg_data
5161: );
5239: THEN
5240: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5241: END IF;
5242: -- Debug Message
5243: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5244: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
5245: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
5246: FND_MSG_PUB.Add;
5247: END IF;
5242: -- Debug Message
5243: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5244: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
5245: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
5246: FND_MSG_PUB.Add;
5247: END IF;
5248: --Initialize message list if p_init_msg_list is TRUE.
5249: IF FND_API.To_Boolean (p_init_msg_list) THEN
5250: FND_MSG_PUB.initialize;
5246: FND_MSG_PUB.Add;
5247: END IF;
5248: --Initialize message list if p_init_msg_list is TRUE.
5249: IF FND_API.To_Boolean (p_init_msg_list) THEN
5250: FND_MSG_PUB.initialize;
5251: END IF;
5252: -- Get the current (login) user id.
5253: AMV_UTILITY_PVT.Get_UserInfo(
5254: x_resource_id => l_resource_id,
5260: IF (p_check_login_user = FND_API.G_TRUE) THEN
5261: -- Check if user is login and has the required privilege.
5262: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
5263: -- User is not login.
5264: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5265: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
5266: FND_MSG_PUB.Add;
5267: END IF;
5268: RAISE FND_API.G_EXC_ERROR;
5262: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
5263: -- User is not login.
5264: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5265: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
5266: FND_MSG_PUB.Add;
5267: END IF;
5268: RAISE FND_API.G_EXC_ERROR;
5269: END IF;
5270: END IF;
5289: x_error_token => l_Error_Token
5290: );
5291: -- get channel authors if the channel exists
5292: IF (l_channel_exist_flag = FND_API.G_FALSE) THEN
5293: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
5294: THEN
5295: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
5296: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
5297: FND_MSG_PUB.Add;
5293: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
5294: THEN
5295: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
5296: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
5297: FND_MSG_PUB.Add;
5298: END IF;
5299: RAISE FND_API.G_EXC_ERROR;
5300: ELSE
5301: OPEN Get_Authors;
5311: END IF;
5312: --
5313:
5314: -- Debug Message
5315: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5316: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
5317: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
5318: FND_MSG_PUB.Add;
5319: END IF;
5314: -- Debug Message
5315: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5316: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
5317: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
5318: FND_MSG_PUB.Add;
5319: END IF;
5320: --Standard call to get message count and if count=1, get the message
5321: FND_MSG_PUB.Count_And_Get (
5322: p_encoded => FND_API.G_FALSE,
5317: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
5318: FND_MSG_PUB.Add;
5319: END IF;
5320: --Standard call to get message count and if count=1, get the message
5321: FND_MSG_PUB.Count_And_Get (
5322: p_encoded => FND_API.G_FALSE,
5323: p_count => x_msg_count,
5324: p_data => x_msg_data
5325: );
5327: WHEN FND_API.G_EXC_ERROR THEN
5328: ROLLBACK TO Get_ChannelAuthors_PVT;
5329: x_return_status := FND_API.G_RET_STS_ERROR;
5330: -- Standard call to get message count and if count=1, get the message
5331: FND_MSG_PUB.Count_And_Get (
5332: p_encoded => FND_API.G_FALSE,
5333: p_count => x_msg_count,
5334: p_data => x_msg_data
5335: );
5336: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5337: ROLLBACK TO Get_ChannelAuthors_PVT;
5338: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5339: -- Standard call to get message count and if count=1, get the message
5340: FND_MSG_PUB.Count_And_Get (
5341: p_encoded => FND_API.G_FALSE,
5342: p_count => x_msg_count,
5343: p_data => x_msg_data
5344: );
5344: );
5345: WHEN OTHERS THEN
5346: ROLLBACK TO Get_ChannelAuthors_PVT;
5347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5348: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5349: THEN
5350: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5351: END IF;
5352: -- Standard call to get message count and if count=1, get the message
5346: ROLLBACK TO Get_ChannelAuthors_PVT;
5347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5348: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5349: THEN
5350: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5351: END IF;
5352: -- Standard call to get message count and if count=1, get the message
5353: FND_MSG_PUB.Count_And_Get (
5354: p_encoded => FND_API.G_FALSE,
5349: THEN
5350: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5351: END IF;
5352: -- Standard call to get message count and if count=1, get the message
5353: FND_MSG_PUB.Count_And_Get (
5354: p_encoded => FND_API.G_FALSE,
5355: p_count => x_msg_count,
5356: p_data => x_msg_data
5357: );
5487: THEN
5488: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5489: END IF;
5490: -- Debug Message
5491: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5492: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
5493: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
5494: FND_MSG_PUB.Add;
5495: END IF;
5490: -- Debug Message
5491: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5492: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
5493: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
5494: FND_MSG_PUB.Add;
5495: END IF;
5496: --Initialize message list if p_init_msg_list is TRUE.
5497: IF FND_API.To_Boolean (p_init_msg_list) THEN
5498: FND_MSG_PUB.initialize;
5494: FND_MSG_PUB.Add;
5495: END IF;
5496: --Initialize message list if p_init_msg_list is TRUE.
5497: IF FND_API.To_Boolean (p_init_msg_list) THEN
5498: FND_MSG_PUB.initialize;
5499: END IF;
5500: -- Get the current (login) user id.
5501: AMV_UTILITY_PVT.Get_UserInfo(
5502: x_resource_id => l_resource_id,
5508: IF (p_check_login_user = FND_API.G_TRUE) THEN
5509: -- Check if user is login and has the required privilege.
5510: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
5511: -- User is not login.
5512: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5513: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
5514: FND_MSG_PUB.Add;
5515: END IF;
5516: RAISE FND_API.G_EXC_ERROR;
5510: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
5511: -- User is not login.
5512: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5513: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
5514: FND_MSG_PUB.Add;
5515: END IF;
5516: RAISE FND_API.G_EXC_ERROR;
5517: END IF;
5518: END IF;
5525: -- Initialize API return status to sucess
5526: x_return_status := FND_API.G_RET_STS_SUCCESS;
5527:
5528: IF (p_channel_id IS NULL OR p_channel_name IS NULL) THEN
5529: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
5530: THEN
5531: FND_MESSAGE.Set_Name('AMV', 'AMV_CHN_ID_OR_NAME_NULL');
5532: FND_MSG_PUB.Add;
5533: END IF;
5528: IF (p_channel_id IS NULL OR p_channel_name IS NULL) THEN
5529: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
5530: THEN
5531: FND_MESSAGE.Set_Name('AMV', 'AMV_CHN_ID_OR_NAME_NULL');
5532: FND_MSG_PUB.Add;
5533: END IF;
5534: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5535: END IF;
5536: --
5545: x_error_msg => l_Error_Msg,
5546: x_error_token => l_Error_Token);
5547: -- get items if channel exists
5548: IF (l_channel_exist_flag = FND_API.G_FALSE) THEN
5549: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
5550: THEN
5551: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
5552: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
5553: FND_MSG_PUB.Add;
5549: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
5550: THEN
5551: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
5552: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
5553: FND_MSG_PUB.Add;
5554: END IF;
5555: RAISE FND_API.G_EXC_ERROR;
5556: ELSE
5557: x_return_status := FND_API.G_RET_STS_SUCCESS;
5623: END IF;
5624: --
5625:
5626: -- Debug Message
5627: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5628: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
5629: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
5630: FND_MSG_PUB.Add;
5631: END IF;
5626: -- Debug Message
5627: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5628: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
5629: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
5630: FND_MSG_PUB.Add;
5631: END IF;
5632: --Standard call to get message count and if count=1, get the message
5633: FND_MSG_PUB.Count_And_Get (
5634: p_encoded => FND_API.G_FALSE,
5629: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
5630: FND_MSG_PUB.Add;
5631: END IF;
5632: --Standard call to get message count and if count=1, get the message
5633: FND_MSG_PUB.Count_And_Get (
5634: p_encoded => FND_API.G_FALSE,
5635: p_count => x_msg_count,
5636: p_data => x_msg_data
5637: );
5639: WHEN FND_API.G_EXC_ERROR THEN
5640: ROLLBACK TO Get_ItemsPerChannel_PVT;
5641: x_return_status := FND_API.G_RET_STS_ERROR;
5642: -- Standard call to get message count and if count=1, get the message
5643: FND_MSG_PUB.Count_And_Get (
5644: p_encoded => FND_API.G_FALSE,
5645: p_count => x_msg_count,
5646: p_data => x_msg_data
5647: );
5648: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5649: ROLLBACK TO Get_ItemsPerChannel_PVT;
5650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5651: -- Standard call to get message count and if count=1, get the message
5652: FND_MSG_PUB.Count_And_Get (
5653: p_encoded => FND_API.G_FALSE,
5654: p_count => x_msg_count,
5655: p_data => x_msg_data
5656: );
5656: );
5657: WHEN OTHERS THEN
5658: ROLLBACK TO Get_ItemsPerChannel_PVT;
5659: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5660: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5661: THEN
5662: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5663: END IF;
5664: -- Standard call to get message count and if count=1, get the message
5658: ROLLBACK TO Get_ItemsPerChannel_PVT;
5659: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5660: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5661: THEN
5662: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5663: END IF;
5664: -- Standard call to get message count and if count=1, get the message
5665: FND_MSG_PUB.Count_And_Get (
5666: p_encoded => FND_API.G_FALSE,
5661: THEN
5662: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5663: END IF;
5664: -- Standard call to get message count and if count=1, get the message
5665: FND_MSG_PUB.Count_And_Get (
5666: p_encoded => FND_API.G_FALSE,
5667: p_count => x_msg_count,
5668: p_data => x_msg_data
5669: );
5746: THEN
5747: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5748: END IF;
5749: -- Debug Message
5750: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5751: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
5752: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
5753: FND_MSG_PUB.Add;
5754: END IF;
5749: -- Debug Message
5750: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5751: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
5752: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
5753: FND_MSG_PUB.Add;
5754: END IF;
5755: --Initialize message list if p_init_msg_list is TRUE.
5756: IF FND_API.To_Boolean (p_init_msg_list) THEN
5757: FND_MSG_PUB.initialize;
5753: FND_MSG_PUB.Add;
5754: END IF;
5755: --Initialize message list if p_init_msg_list is TRUE.
5756: IF FND_API.To_Boolean (p_init_msg_list) THEN
5757: FND_MSG_PUB.initialize;
5758: END IF;
5759: -- Get the current (login) user id.
5760: AMV_UTILITY_PVT.Get_UserInfo(
5761: x_resource_id => l_resource_id,
5767: IF (p_check_login_user = FND_API.G_TRUE) THEN
5768: -- Check if user is login and has the required privilege.
5769: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
5770: -- User is not login.
5771: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5772: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
5773: FND_MSG_PUB.Add;
5774: END IF;
5775: RAISE FND_API.G_EXC_ERROR;
5769: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
5770: -- User is not login.
5771: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5772: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
5773: FND_MSG_PUB.Add;
5774: END IF;
5775: RAISE FND_API.G_EXC_ERROR;
5776: END IF;
5777: END IF;
5796: x_error_token => l_Error_Token
5797: );
5798: -- set channel approval status if it exists
5799: IF (l_channel_exist_flag = FND_API.G_FALSE) THEN
5800: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
5801: THEN
5802: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
5803: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
5804: FND_MSG_PUB.Add;
5800: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
5801: THEN
5802: FND_MESSAGE.Set_Name('AMV', l_Error_Msg);
5803: FND_MESSAGE.Set_Token('TKN',l_Error_Token);
5804: FND_MSG_PUB.Add;
5805: END IF;
5806: RAISE FND_API.G_EXC_ERROR;
5807: ELSE
5808: UPDATE amv_c_chl_item_match
5816: END IF;
5817: --
5818:
5819: -- Success message
5820: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
5821: THEN
5822: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
5823: FND_MESSAGE.Set_Token('ROW', l_full_name);
5824: FND_MSG_PUB.Add;
5820: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
5821: THEN
5822: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
5823: FND_MESSAGE.Set_Token('ROW', l_full_name);
5824: FND_MSG_PUB.Add;
5825: END IF;
5826: --Standard check of commit
5827: IF FND_API.To_Boolean ( p_commit ) THEN
5828: COMMIT WORK;
5827: IF FND_API.To_Boolean ( p_commit ) THEN
5828: COMMIT WORK;
5829: END IF;
5830: -- Debug Message
5831: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5832: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
5833: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
5834: FND_MSG_PUB.Add;
5835: END IF;
5830: -- Debug Message
5831: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5832: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
5833: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
5834: FND_MSG_PUB.Add;
5835: END IF;
5836: --Standard call to get message count and if count=1, get the message
5837: FND_MSG_PUB.Count_And_Get (
5838: p_encoded => FND_API.G_FALSE,
5833: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
5834: FND_MSG_PUB.Add;
5835: END IF;
5836: --Standard call to get message count and if count=1, get the message
5837: FND_MSG_PUB.Count_And_Get (
5838: p_encoded => FND_API.G_FALSE,
5839: p_count => x_msg_count,
5840: p_data => x_msg_data
5841: );
5843: WHEN FND_API.G_EXC_ERROR THEN
5844: ROLLBACK TO Set_ChannelApprovalStatus_PVT;
5845: x_return_status := FND_API.G_RET_STS_ERROR;
5846: -- Standard call to get message count and if count=1, get the message
5847: FND_MSG_PUB.Count_And_Get (
5848: p_encoded => FND_API.G_FALSE,
5849: p_count => x_msg_count,
5850: p_data => x_msg_data
5851: );
5852: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5853: ROLLBACK TO Set_ChannelApprovalStatus_PVT;
5854: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5855: -- Standard call to get message count and if count=1, get the message
5856: FND_MSG_PUB.Count_And_Get (
5857: p_encoded => FND_API.G_FALSE,
5858: p_count => x_msg_count,
5859: p_data => x_msg_data
5860: );
5860: );
5861: WHEN OTHERS THEN
5862: ROLLBACK TO Set_ChannelApprovalStatus_PVT;
5863: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5864: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5865: THEN
5866: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5867: END IF;
5868: -- Standard call to get message count and if count=1, get the message
5862: ROLLBACK TO Set_ChannelApprovalStatus_PVT;
5863: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5864: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5865: THEN
5866: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5867: END IF;
5868: -- Standard call to get message count and if count=1, get the message
5869: FND_MSG_PUB.Count_And_Get (
5870: p_encoded => FND_API.G_FALSE,
5865: THEN
5866: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5867: END IF;
5868: -- Standard call to get message count and if count=1, get the message
5869: FND_MSG_PUB.Count_And_Get (
5870: p_encoded => FND_API.G_FALSE,
5871: p_count => x_msg_count,
5872: p_data => x_msg_data
5873: );
5982: THEN
5983: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5984: END IF;
5985: -- Debug Message
5986: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5987: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
5988: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
5989: FND_MSG_PUB.Add;
5990: END IF;
5985: -- Debug Message
5986: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
5987: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
5988: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
5989: FND_MSG_PUB.Add;
5990: END IF;
5991: --Initialize message list if p_init_msg_list is TRUE.
5992: IF FND_API.To_Boolean (p_init_msg_list) THEN
5993: FND_MSG_PUB.initialize;
5989: FND_MSG_PUB.Add;
5990: END IF;
5991: --Initialize message list if p_init_msg_list is TRUE.
5992: IF FND_API.To_Boolean (p_init_msg_list) THEN
5993: FND_MSG_PUB.initialize;
5994: END IF;
5995: -- Get the current (login) user id.
5996: AMV_UTILITY_PVT.Get_UserInfo(
5997: x_resource_id => l_resource_id,
6003: IF (p_check_login_user = FND_API.G_TRUE) THEN
6004: -- Check if user is login and has the required privilege.
6005: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
6006: -- User is not login.
6007: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6008: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
6009: FND_MSG_PUB.Add;
6010: END IF;
6011: RAISE FND_API.G_EXC_ERROR;
6005: IF (l_login_user_id = FND_API.G_MISS_NUM) THEN
6006: -- User is not login.
6007: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6008: FND_MESSAGE.Set_name('AMV','AMV_USER_NOT_LOGIN');
6009: FND_MSG_PUB.Add;
6010: END IF;
6011: RAISE FND_API.G_EXC_ERROR;
6012: END IF;
6013: END IF;
6397: */
6398: --
6399:
6400: -- Debug Message
6401: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
6402: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
6403: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
6404: FND_MSG_PUB.Add;
6405: END IF;
6400: -- Debug Message
6401: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
6402: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
6403: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
6404: FND_MSG_PUB.Add;
6405: END IF;
6406: --Standard call to get message count and if count=1, get the message
6407: FND_MSG_PUB.Count_And_Get (
6408: p_encoded => FND_API.G_FALSE,
6403: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
6404: FND_MSG_PUB.Add;
6405: END IF;
6406: --Standard call to get message count and if count=1, get the message
6407: FND_MSG_PUB.Count_And_Get (
6408: p_encoded => FND_API.G_FALSE,
6409: p_count => x_msg_count,
6410: p_data => x_msg_data
6411: );
6413: WHEN FND_API.G_EXC_ERROR THEN
6414: ROLLBACK TO Find_Channels_PVT;
6415: x_return_status := FND_API.G_RET_STS_ERROR;
6416: -- Standard call to get message count and if count=1, get the message
6417: FND_MSG_PUB.Count_And_Get (
6418: p_encoded => FND_API.G_FALSE,
6419: p_count => x_msg_count,
6420: p_data => x_msg_data
6421: );
6422: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6423: ROLLBACK TO Find_Channels_PVT;
6424: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6425: -- Standard call to get message count and if count=1, get the message
6426: FND_MSG_PUB.Count_And_Get (
6427: p_encoded => FND_API.G_FALSE,
6428: p_count => x_msg_count,
6429: p_data => x_msg_data
6430: );
6430: );
6431: WHEN OTHERS THEN
6432: ROLLBACK TO Find_Channels_PVT;
6433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6434: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6435: THEN
6436: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6437: END IF;
6438: -- Standard call to get message count and if count=1, get the message
6432: ROLLBACK TO Find_Channels_PVT;
6433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6434: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6435: THEN
6436: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6437: END IF;
6438: -- Standard call to get message count and if count=1, get the message
6439: FND_MSG_PUB.Count_And_Get (
6440: p_encoded => FND_API.G_FALSE,
6435: THEN
6436: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6437: END IF;
6438: -- Standard call to get message count and if count=1, get the message
6439: FND_MSG_PUB.Count_And_Get (
6440: p_encoded => FND_API.G_FALSE,
6441: p_count => x_msg_count,
6442: p_data => x_msg_data
6443: );