556: THEN
557: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
558: END IF;
559: -- Debug Message
560: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
561: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
562: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
563: FND_MSG_PUB.Add;
564: END IF;
559: -- Debug Message
560: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
561: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
562: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
563: FND_MSG_PUB.Add;
564: END IF;
565: --Initialize message list if p_init_msg_list is TRUE.
566: IF FND_API.To_Boolean (p_init_msg_list) THEN
567: FND_MSG_PUB.initialize;
563: FND_MSG_PUB.Add;
564: END IF;
565: --Initialize message list if p_init_msg_list is TRUE.
566: IF FND_API.To_Boolean (p_init_msg_list) THEN
567: FND_MSG_PUB.initialize;
568: END IF;
569: -- Initialize API return status to sucess
570: x_return_status := FND_API.G_RET_STS_SUCCESS;
571:
639: */
640: --
641: --ELSE
642: -- -- User Id is not valid.
643: -- IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
644: -- FND_MESSAGE.Set_name('AMV','AMV_USER_ID_INVALID');
645: -- FND_MESSAGE.Set_Token('TKN',p_user_id);
646: -- FND_MSG_PUB.Add;
647: -- END IF;
642: -- -- User Id is not valid.
643: -- IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
644: -- FND_MESSAGE.Set_name('AMV','AMV_USER_ID_INVALID');
645: -- FND_MESSAGE.Set_Token('TKN',p_user_id);
646: -- FND_MSG_PUB.Add;
647: -- END IF;
648: -- RAISE FND_API.G_EXC_ERROR;
649: -- END IF;
650: --
649: -- END IF;
650: --
651:
652: -- Success message
653: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
654: THEN
655: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
656: FND_MESSAGE.Set_Token('ROW', l_full_name);
657: FND_MSG_PUB.Add;
653: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
654: THEN
655: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
656: FND_MESSAGE.Set_Token('ROW', l_full_name);
657: FND_MSG_PUB.Add;
658: END IF;
659: -- Debug Message
660: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
661: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
656: FND_MESSAGE.Set_Token('ROW', l_full_name);
657: FND_MSG_PUB.Add;
658: END IF;
659: -- Debug Message
660: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
661: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
662: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
663: FND_MSG_PUB.Add;
664: END IF;
659: -- Debug Message
660: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
661: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
662: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
663: FND_MSG_PUB.Add;
664: END IF;
665: --Standard call to get message count and if count=1, get the message
666: FND_MSG_PUB.Count_And_Get (
667: p_encoded => FND_API.G_FALSE,
662: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
663: FND_MSG_PUB.Add;
664: END IF;
665: --Standard call to get message count and if count=1, get the message
666: FND_MSG_PUB.Count_And_Get (
667: p_encoded => FND_API.G_FALSE,
668: p_count => x_msg_count,
669: p_data => x_msg_data
670: );
672: WHEN FND_API.G_EXC_ERROR THEN
673: ROLLBACK TO Get_UserTicker;
674: x_return_status := FND_API.G_RET_STS_ERROR;
675: -- Standard call to get message count and if count=1, get the message
676: FND_MSG_PUB.Count_And_Get (
677: p_encoded => FND_API.G_FALSE,
678: p_count => x_msg_count,
679: p_data => x_msg_data
680: );
681: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
682: ROLLBACK TO Get_UserTicker;
683: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
684: -- Standard call to get message count and if count=1, get the message
685: FND_MSG_PUB.Count_And_Get (
686: p_encoded => FND_API.G_FALSE,
687: p_count => x_msg_count,
688: p_data => x_msg_data
689: );
689: );
690: WHEN OTHERS THEN
691: ROLLBACK TO Get_UserTicker;
692: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
693: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
694: THEN
695: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
696: END IF;
697: -- Standard call to get message count and if count=1, get the message
691: ROLLBACK TO Get_UserTicker;
692: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
693: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
694: THEN
695: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
696: END IF;
697: -- Standard call to get message count and if count=1, get the message
698: FND_MSG_PUB.Count_And_Get (
699: p_encoded => FND_API.G_FALSE,
694: THEN
695: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
696: END IF;
697: -- Standard call to get message count and if count=1, get the message
698: FND_MSG_PUB.Count_And_Get (
699: p_encoded => FND_API.G_FALSE,
700: p_count => x_msg_count,
701: p_data => x_msg_data
702: );
781: THEN
782: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
783: END IF;
784: -- Debug Message
785: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
786: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
787: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
788: FND_MSG_PUB.Add;
789: END IF;
784: -- Debug Message
785: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
786: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
787: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
788: FND_MSG_PUB.Add;
789: END IF;
790: --Initialize message list if p_init_msg_list is TRUE.
791: IF FND_API.To_Boolean (p_init_msg_list) THEN
792: FND_MSG_PUB.initialize;
788: FND_MSG_PUB.Add;
789: END IF;
790: --Initialize message list if p_init_msg_list is TRUE.
791: IF FND_API.To_Boolean (p_init_msg_list) THEN
792: FND_MSG_PUB.initialize;
793: END IF;
794: -- Initialize API return status to sucess
795: x_return_status := FND_API.G_RET_STS_SUCCESS;
796:
819: END LOOP;
820: --
821:
822: -- Success message
823: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
824: THEN
825: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
826: FND_MESSAGE.Set_Token('ROW', l_full_name);
827: FND_MSG_PUB.Add;
823: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
824: THEN
825: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
826: FND_MESSAGE.Set_Token('ROW', l_full_name);
827: FND_MSG_PUB.Add;
828: END IF;
829: -- Debug Message
830: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
831: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
826: FND_MESSAGE.Set_Token('ROW', l_full_name);
827: FND_MSG_PUB.Add;
828: END IF;
829: -- Debug Message
830: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
831: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
832: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
833: FND_MSG_PUB.Add;
834: END IF;
829: -- Debug Message
830: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
831: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
832: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
833: FND_MSG_PUB.Add;
834: END IF;
835: --Standard call to get message count and if count=1, get the message
836: FND_MSG_PUB.Count_And_Get (
837: p_encoded => FND_API.G_FALSE,
832: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
833: FND_MSG_PUB.Add;
834: END IF;
835: --Standard call to get message count and if count=1, get the message
836: FND_MSG_PUB.Count_And_Get (
837: p_encoded => FND_API.G_FALSE,
838: p_count => x_msg_count,
839: p_data => x_msg_data
840: );
842: WHEN FND_API.G_EXC_ERROR THEN
843: ROLLBACK TO Get_StockDetails;
844: x_return_status := FND_API.G_RET_STS_ERROR;
845: -- Standard call to get message count and if count=1, get the message
846: FND_MSG_PUB.Count_And_Get (
847: p_encoded => FND_API.G_FALSE,
848: p_count => x_msg_count,
849: p_data => x_msg_data
850: );
851: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
852: ROLLBACK TO Get_StockDetails;
853: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
854: -- Standard call to get message count and if count=1, get the message
855: FND_MSG_PUB.Count_And_Get (
856: p_encoded => FND_API.G_FALSE,
857: p_count => x_msg_count,
858: p_data => x_msg_data
859: );
859: );
860: WHEN OTHERS THEN
861: ROLLBACK TO Get_StockDetails;
862: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
863: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
864: THEN
865: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
866: END IF;
867: -- Standard call to get message count and if count=1, get the message
861: ROLLBACK TO Get_StockDetails;
862: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
863: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
864: THEN
865: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
866: END IF;
867: -- Standard call to get message count and if count=1, get the message
868: FND_MSG_PUB.Count_And_Get (
869: p_encoded => FND_API.G_FALSE,
864: THEN
865: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
866: END IF;
867: -- Standard call to get message count and if count=1, get the message
868: FND_MSG_PUB.Count_And_Get (
869: p_encoded => FND_API.G_FALSE,
870: p_count => x_msg_count,
871: p_data => x_msg_data
872: );
948: THEN
949: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
950: END IF;
951: -- Debug Message
952: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
953: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
954: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
955: FND_MSG_PUB.Add;
956: END IF;
951: -- Debug Message
952: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
953: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
954: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
955: FND_MSG_PUB.Add;
956: END IF;
957: --Initialize message list if p_init_msg_list is TRUE.
958: IF FND_API.To_Boolean (p_init_msg_list) THEN
959: FND_MSG_PUB.initialize;
955: FND_MSG_PUB.Add;
956: END IF;
957: --Initialize message list if p_init_msg_list is TRUE.
958: IF FND_API.To_Boolean (p_init_msg_list) THEN
959: FND_MSG_PUB.initialize;
960: END IF;
961: -- Initialize API return status to sucess
962: x_return_status := FND_API.G_RET_STS_SUCCESS;
963:
1023: Update_Symbols( p_user_id, l_symbols_array);
1024:
1025: --ELSE
1026: -- -- User Id is not valid.
1027: -- IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1028: -- FND_MESSAGE.Set_name('AMV','AMV_USER_ID_INVALID');
1029: -- FND_MESSAGE.Set_Token('TKN',p_user_id);
1030: -- FND_MSG_PUB.Add;
1031: -- END IF;
1026: -- -- User Id is not valid.
1027: -- IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1028: -- FND_MESSAGE.Set_name('AMV','AMV_USER_ID_INVALID');
1029: -- FND_MESSAGE.Set_Token('TKN',p_user_id);
1030: -- FND_MSG_PUB.Add;
1031: -- END IF;
1032: -- RAISE FND_API.G_EXC_ERROR;
1033: --END IF;
1034: --
1033: --END IF;
1034: --
1035:
1036: -- Success message
1037: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1038: THEN
1039: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1040: FND_MESSAGE.Set_Token('ROW', l_full_name);
1041: FND_MSG_PUB.Add;
1037: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1038: THEN
1039: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1040: FND_MESSAGE.Set_Token('ROW', l_full_name);
1041: FND_MSG_PUB.Add;
1042: END IF;
1043: --Standard check of commit
1044: IF FND_API.To_Boolean ( p_commit ) THEN
1045: COMMIT WORK;
1044: IF FND_API.To_Boolean ( p_commit ) THEN
1045: COMMIT WORK;
1046: END IF;
1047: -- Debug Message
1048: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1049: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1050: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1051: FND_MSG_PUB.Add;
1052: END IF;
1047: -- Debug Message
1048: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1049: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1050: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1051: FND_MSG_PUB.Add;
1052: END IF;
1053: --Standard call to get message count and if count=1, get the message
1054: FND_MSG_PUB.Count_And_Get (
1055: p_encoded => FND_API.G_FALSE,
1050: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1051: FND_MSG_PUB.Add;
1052: END IF;
1053: --Standard call to get message count and if count=1, get the message
1054: FND_MSG_PUB.Count_And_Get (
1055: p_encoded => FND_API.G_FALSE,
1056: p_count => x_msg_count,
1057: p_data => x_msg_data
1058: );
1060: WHEN FND_API.G_EXC_ERROR THEN
1061: ROLLBACK TO Update_UserTicker;
1062: x_return_status := FND_API.G_RET_STS_ERROR;
1063: -- Standard call to get message count and if count=1, get the message
1064: FND_MSG_PUB.Count_And_Get (
1065: p_encoded => FND_API.G_FALSE,
1066: p_count => x_msg_count,
1067: p_data => x_msg_data
1068: );
1069: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1070: ROLLBACK TO Update_UserTicker;
1071: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
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: );
1077: );
1078: WHEN OTHERS THEN
1079: ROLLBACK TO Update_UserTicker;
1080: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1081: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1082: THEN
1083: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1084: END IF;
1085: -- Standard call to get message count and if count=1, get the message
1079: ROLLBACK TO Update_UserTicker;
1080: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1081: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1082: THEN
1083: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1084: END IF;
1085: -- Standard call to get message count and if count=1, get the message
1086: FND_MSG_PUB.Count_And_Get (
1087: p_encoded => FND_API.G_FALSE,
1082: THEN
1083: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1084: END IF;
1085: -- Standard call to get message count and if count=1, get the message
1086: FND_MSG_PUB.Count_And_Get (
1087: p_encoded => FND_API.G_FALSE,
1088: p_count => x_msg_count,
1089: p_data => x_msg_data
1090: );
1178: THEN
1179: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1180: END IF;
1181: -- Debug Message
1182: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1183: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1184: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
1185: FND_MSG_PUB.Add;
1186: END IF;
1181: -- Debug Message
1182: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1183: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1184: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
1185: FND_MSG_PUB.Add;
1186: END IF;
1187: --Initialize message list if p_init_msg_list is TRUE.
1188: IF FND_API.To_Boolean (p_init_msg_list) THEN
1189: FND_MSG_PUB.initialize;
1185: FND_MSG_PUB.Add;
1186: END IF;
1187: --Initialize message list if p_init_msg_list is TRUE.
1188: IF FND_API.To_Boolean (p_init_msg_list) THEN
1189: FND_MSG_PUB.initialize;
1190: END IF;
1191: -- Initialize API return status to sucess
1192: x_return_status := FND_API.G_RET_STS_SUCCESS;
1193:
1211: CLOSE Get_VenMissStk_csr;
1212: --
1213:
1214: -- Success message
1215: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1216: THEN
1217: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1218: FND_MESSAGE.Set_Token('ROW', l_full_name);
1219: FND_MSG_PUB.Add;
1215: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1216: THEN
1217: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1218: FND_MESSAGE.Set_Token('ROW', l_full_name);
1219: FND_MSG_PUB.Add;
1220: END IF;
1221: -- Debug Message
1222: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1223: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1218: FND_MESSAGE.Set_Token('ROW', l_full_name);
1219: FND_MSG_PUB.Add;
1220: END IF;
1221: -- Debug Message
1222: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1223: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1224: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1225: FND_MSG_PUB.Add;
1226: END IF;
1221: -- Debug Message
1222: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1223: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1224: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1225: FND_MSG_PUB.Add;
1226: END IF;
1227: --Standard call to get message count and if count=1, get the message
1228: FND_MSG_PUB.Count_And_Get (
1229: p_encoded => FND_API.G_FALSE,
1224: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1225: FND_MSG_PUB.Add;
1226: END IF;
1227: --Standard call to get message count and if count=1, get the message
1228: FND_MSG_PUB.Count_And_Get (
1229: p_encoded => FND_API.G_FALSE,
1230: p_count => x_msg_count,
1231: p_data => x_msg_data
1232: );
1234: WHEN FND_API.G_EXC_ERROR THEN
1235: ROLLBACK TO Get_VendorMissedStocks;
1236: x_return_status := FND_API.G_RET_STS_ERROR;
1237: -- Standard call to get message count and if count=1, get the message
1238: FND_MSG_PUB.Count_And_Get (
1239: p_encoded => FND_API.G_FALSE,
1240: p_count => x_msg_count,
1241: p_data => x_msg_data
1242: );
1243: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1244: ROLLBACK TO Get_VendorMissedStocks;
1245: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1246: -- Standard call to get message count and if count=1, get the message
1247: FND_MSG_PUB.Count_And_Get (
1248: p_encoded => FND_API.G_FALSE,
1249: p_count => x_msg_count,
1250: p_data => x_msg_data
1251: );
1251: );
1252: WHEN OTHERS THEN
1253: ROLLBACK TO Get_VendorMissedStocks;
1254: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1255: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1256: THEN
1257: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1258: END IF;
1259: -- Standard call to get message count and if count=1, get the message
1253: ROLLBACK TO Get_VendorMissedStocks;
1254: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1255: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1256: THEN
1257: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1258: END IF;
1259: -- Standard call to get message count and if count=1, get the message
1260: FND_MSG_PUB.Count_And_Get (
1261: p_encoded => FND_API.G_FALSE,
1256: THEN
1257: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1258: END IF;
1259: -- Standard call to get message count and if count=1, get the message
1260: FND_MSG_PUB.Count_And_Get (
1261: p_encoded => FND_API.G_FALSE,
1262: p_count => x_msg_count,
1263: p_data => x_msg_data
1264: );
1338: THEN
1339: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1340: END IF;
1341: -- Debug Message
1342: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1343: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1344: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
1345: FND_MSG_PUB.Add;
1346: END IF;
1341: -- Debug Message
1342: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1343: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1344: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
1345: FND_MSG_PUB.Add;
1346: END IF;
1347: --Initialize message list if p_init_msg_list is TRUE.
1348: IF FND_API.To_Boolean (p_init_msg_list) THEN
1349: FND_MSG_PUB.initialize;
1345: FND_MSG_PUB.Add;
1346: END IF;
1347: --Initialize message list if p_init_msg_list is TRUE.
1348: IF FND_API.To_Boolean (p_init_msg_list) THEN
1349: FND_MSG_PUB.initialize;
1350: END IF;
1351: -- Initialize API return status to sucess
1352: x_return_status := FND_API.G_RET_STS_SUCCESS;
1353:
1398: END IF;
1399: --
1400:
1401: -- Success message
1402: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1403: THEN
1404: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1405: FND_MESSAGE.Set_Token('ROW', l_full_name);
1406: FND_MSG_PUB.Add;
1402: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1403: THEN
1404: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1405: FND_MESSAGE.Set_Token('ROW', l_full_name);
1406: FND_MSG_PUB.Add;
1407: END IF;
1408: --Standard check of commit
1409: IF FND_API.To_Boolean ( p_commit ) THEN
1410: COMMIT WORK;
1409: IF FND_API.To_Boolean ( p_commit ) THEN
1410: COMMIT WORK;
1411: END IF;
1412: -- Debug Message
1413: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1414: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1415: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1416: FND_MSG_PUB.Add;
1417: END IF;
1412: -- Debug Message
1413: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1414: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1415: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1416: FND_MSG_PUB.Add;
1417: END IF;
1418: --Standard call to get message count and if count=1, get the message
1419: FND_MSG_PUB.Count_And_Get (
1420: p_encoded => FND_API.G_FALSE,
1415: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1416: FND_MSG_PUB.Add;
1417: END IF;
1418: --Standard call to get message count and if count=1, get the message
1419: FND_MSG_PUB.Count_And_Get (
1420: p_encoded => FND_API.G_FALSE,
1421: p_count => x_msg_count,
1422: p_data => x_msg_data
1423: );
1425: WHEN FND_API.G_EXC_ERROR THEN
1426: ROLLBACK TO Insert_StockVendorKeys;
1427: x_return_status := FND_API.G_RET_STS_ERROR;
1428: -- Standard call to get message count and if count=1, get the message
1429: FND_MSG_PUB.Count_And_Get (
1430: p_encoded => FND_API.G_FALSE,
1431: p_count => x_msg_count,
1432: p_data => x_msg_data
1433: );
1434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1435: ROLLBACK TO Insert_StockVendorKeys;
1436: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1437: -- Standard call to get message count and if count=1, get the message
1438: FND_MSG_PUB.Count_And_Get (
1439: p_encoded => FND_API.G_FALSE,
1440: p_count => x_msg_count,
1441: p_data => x_msg_data
1442: );
1442: );
1443: WHEN OTHERS THEN
1444: ROLLBACK TO Insert_StockVendorKeys;
1445: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1446: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1447: THEN
1448: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1449: END IF;
1450: -- Standard call to get message count and if count=1, get the message
1444: ROLLBACK TO Insert_StockVendorKeys;
1445: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1446: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1447: THEN
1448: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1449: END IF;
1450: -- Standard call to get message count and if count=1, get the message
1451: FND_MSG_PUB.Count_And_Get (
1452: p_encoded => FND_API.G_FALSE,
1447: THEN
1448: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1449: END IF;
1450: -- Standard call to get message count and if count=1, get the message
1451: FND_MSG_PUB.Count_And_Get (
1452: p_encoded => FND_API.G_FALSE,
1453: p_count => x_msg_count,
1454: p_data => x_msg_data
1455: );
1542: THEN
1543: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1544: END IF;
1545: -- Debug Message
1546: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1547: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1548: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
1549: FND_MSG_PUB.Add;
1550: END IF;
1545: -- Debug Message
1546: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1547: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1548: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
1549: FND_MSG_PUB.Add;
1550: END IF;
1551: --Initialize message list if p_init_msg_list is TRUE.
1552: IF FND_API.To_Boolean (p_init_msg_list) THEN
1553: FND_MSG_PUB.initialize;
1549: FND_MSG_PUB.Add;
1550: END IF;
1551: --Initialize message list if p_init_msg_list is TRUE.
1552: IF FND_API.To_Boolean (p_init_msg_list) THEN
1553: FND_MSG_PUB.initialize;
1554: END IF;
1555: -- Initialize API return status to sucess
1556: x_return_status := FND_API.G_RET_STS_SUCCESS;
1557:
1595: END IF;
1596: --
1597:
1598: -- Success message
1599: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1600: THEN
1601: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1602: FND_MESSAGE.Set_Token('ROW', l_full_name);
1603: FND_MSG_PUB.Add;
1599: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1600: THEN
1601: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1602: FND_MESSAGE.Set_Token('ROW', l_full_name);
1603: FND_MSG_PUB.Add;
1604: END IF;
1605: -- Debug Message
1606: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1607: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1602: FND_MESSAGE.Set_Token('ROW', l_full_name);
1603: FND_MSG_PUB.Add;
1604: END IF;
1605: -- Debug Message
1606: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1607: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1608: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1609: FND_MSG_PUB.Add;
1610: END IF;
1605: -- Debug Message
1606: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1607: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1608: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1609: FND_MSG_PUB.Add;
1610: END IF;
1611: --Standard call to get message count and if count=1, get the message
1612: FND_MSG_PUB.Count_And_Get (
1613: p_encoded => FND_API.G_FALSE,
1608: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1609: FND_MSG_PUB.Add;
1610: END IF;
1611: --Standard call to get message count and if count=1, get the message
1612: FND_MSG_PUB.Count_And_Get (
1613: p_encoded => FND_API.G_FALSE,
1614: p_count => x_msg_count,
1615: p_data => x_msg_data
1616: );
1618: WHEN FND_API.G_EXC_ERROR THEN
1619: ROLLBACK TO Get_UserSelectedKeys;
1620: x_return_status := FND_API.G_RET_STS_ERROR;
1621: -- Standard call to get message count and if count=1, get the message
1622: FND_MSG_PUB.Count_And_Get (
1623: p_encoded => FND_API.G_FALSE,
1624: p_count => x_msg_count,
1625: p_data => x_msg_data
1626: );
1627: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1628: ROLLBACK TO Get_UserSelectedKeys;
1629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1630: -- Standard call to get message count and if count=1, get the message
1631: FND_MSG_PUB.Count_And_Get (
1632: p_encoded => FND_API.G_FALSE,
1633: p_count => x_msg_count,
1634: p_data => x_msg_data
1635: );
1635: );
1636: WHEN OTHERS THEN
1637: ROLLBACK TO Get_UserSelectedKeys;
1638: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1639: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1640: THEN
1641: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1642: END IF;
1643: -- Standard call to get message count and if count=1, get the message
1637: ROLLBACK TO Get_UserSelectedKeys;
1638: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1639: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1640: THEN
1641: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1642: END IF;
1643: -- Standard call to get message count and if count=1, get the message
1644: FND_MSG_PUB.Count_And_Get (
1645: p_encoded => FND_API.G_FALSE,
1640: THEN
1641: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1642: END IF;
1643: -- Standard call to get message count and if count=1, get the message
1644: FND_MSG_PUB.Count_And_Get (
1645: p_encoded => FND_API.G_FALSE,
1646: p_count => x_msg_count,
1647: p_data => x_msg_data
1648: );
1727: THEN
1728: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1729: END IF;
1730: -- Debug Message
1731: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1732: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1733: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
1734: FND_MSG_PUB.Add;
1735: END IF;
1730: -- Debug Message
1731: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1732: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1733: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
1734: FND_MSG_PUB.Add;
1735: END IF;
1736: --Initialize message list if p_init_msg_list is TRUE.
1737: IF FND_API.To_Boolean (p_init_msg_list) THEN
1738: FND_MSG_PUB.initialize;
1734: FND_MSG_PUB.Add;
1735: END IF;
1736: --Initialize message list if p_init_msg_list is TRUE.
1737: IF FND_API.To_Boolean (p_init_msg_list) THEN
1738: FND_MSG_PUB.initialize;
1739: END IF;
1740: -- Initialize API return status to sucess
1741: x_return_status := FND_API.G_RET_STS_SUCCESS;
1742:
1789: END IF;
1790: --
1791:
1792: -- Success message
1793: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1794: THEN
1795: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1796: FND_MESSAGE.Set_Token('ROW', l_full_name);
1797: FND_MSG_PUB.Add;
1793: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1794: THEN
1795: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1796: FND_MESSAGE.Set_Token('ROW', l_full_name);
1797: FND_MSG_PUB.Add;
1798: END IF;
1799: --Standard check of commit
1800: IF FND_API.To_Boolean ( p_commit ) THEN
1801: COMMIT WORK;
1800: IF FND_API.To_Boolean ( p_commit ) THEN
1801: COMMIT WORK;
1802: END IF;
1803: -- Debug Message
1804: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1805: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1806: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1807: FND_MSG_PUB.Add;
1808: END IF;
1803: -- Debug Message
1804: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1805: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1806: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1807: FND_MSG_PUB.Add;
1808: END IF;
1809: --Standard call to get message count and if count=1, get the message
1810: FND_MSG_PUB.Count_And_Get (
1811: p_encoded => FND_API.G_FALSE,
1806: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1807: FND_MSG_PUB.Add;
1808: END IF;
1809: --Standard call to get message count and if count=1, get the message
1810: FND_MSG_PUB.Count_And_Get (
1811: p_encoded => FND_API.G_FALSE,
1812: p_count => x_msg_count,
1813: p_data => x_msg_data
1814: );
1816: WHEN FND_API.G_EXC_ERROR THEN
1817: ROLLBACK TO Insert_VendorNews;
1818: x_return_status := FND_API.G_RET_STS_ERROR;
1819: -- Standard call to get message count and if count=1, get the message
1820: FND_MSG_PUB.Count_And_Get (
1821: p_encoded => FND_API.G_FALSE,
1822: p_count => x_msg_count,
1823: p_data => x_msg_data
1824: );
1825: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1826: ROLLBACK TO Insert_VendorNews;
1827: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1828: -- Standard call to get message count and if count=1, get the message
1829: FND_MSG_PUB.Count_And_Get (
1830: p_encoded => FND_API.G_FALSE,
1831: p_count => x_msg_count,
1832: p_data => x_msg_data
1833: );
1833: );
1834: WHEN OTHERS THEN
1835: ROLLBACK TO Insert_VendorNews;
1836: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1837: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1838: THEN
1839: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1840: END IF;
1841: -- Standard call to get message count and if count=1, get the message
1835: ROLLBACK TO Insert_VendorNews;
1836: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1837: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1838: THEN
1839: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1840: END IF;
1841: -- Standard call to get message count and if count=1, get the message
1842: FND_MSG_PUB.Count_And_Get (
1843: p_encoded => FND_API.G_FALSE,
1838: THEN
1839: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1840: END IF;
1841: -- Standard call to get message count and if count=1, get the message
1842: FND_MSG_PUB.Count_And_Get (
1843: p_encoded => FND_API.G_FALSE,
1844: p_count => x_msg_count,
1845: p_data => x_msg_data
1846: );
1930: THEN
1931: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1932: END IF;
1933: -- Debug Message
1934: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1935: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1936: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
1937: FND_MSG_PUB.Add;
1938: END IF;
1933: -- Debug Message
1934: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1935: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1936: FND_MESSAGE.Set_Token('ROW',l_full_name||': Start');
1937: FND_MSG_PUB.Add;
1938: END IF;
1939: --Initialize message list if p_init_msg_list is TRUE.
1940: IF FND_API.To_Boolean (p_init_msg_list) THEN
1941: FND_MSG_PUB.initialize;
1937: FND_MSG_PUB.Add;
1938: END IF;
1939: --Initialize message list if p_init_msg_list is TRUE.
1940: IF FND_API.To_Boolean (p_init_msg_list) THEN
1941: FND_MSG_PUB.initialize;
1942: END IF;
1943: -- Initialize API return status to sucess
1944: x_return_status := FND_API.G_RET_STS_SUCCESS;
1945:
1953: CLOSE Get_News_csr;
1954: --
1955:
1956: -- Success message
1957: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1958: THEN
1959: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1960: FND_MESSAGE.Set_Token('ROW', l_full_name);
1961: FND_MSG_PUB.Add;
1957: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1958: THEN
1959: FND_MESSAGE.Set_Name('AMV', 'AMV_API_SUCCESS_MESSAGE');
1960: FND_MESSAGE.Set_Token('ROW', l_full_name);
1961: FND_MSG_PUB.Add;
1962: END IF;
1963: --Standard check of commit
1964: IF FND_API.To_Boolean ( p_commit ) THEN
1965: COMMIT WORK;
1964: IF FND_API.To_Boolean ( p_commit ) THEN
1965: COMMIT WORK;
1966: END IF;
1967: -- Debug Message
1968: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1969: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1970: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1971: FND_MSG_PUB.Add;
1972: END IF;
1967: -- Debug Message
1968: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1969: FND_MESSAGE.Set_Name('AMV','AMV_API_DEBUG_MESSAGE');
1970: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1971: FND_MSG_PUB.Add;
1972: END IF;
1973: --Standard call to get message count and if count=1, get the message
1974: FND_MSG_PUB.Count_And_Get (
1975: p_encoded => FND_API.G_FALSE,
1970: FND_MESSAGE.Set_Token('ROW',l_full_name||': End');
1971: FND_MSG_PUB.Add;
1972: END IF;
1973: --Standard call to get message count and if count=1, get the message
1974: FND_MSG_PUB.Count_And_Get (
1975: p_encoded => FND_API.G_FALSE,
1976: p_count => x_msg_count,
1977: p_data => x_msg_data
1978: );
1980: WHEN FND_API.G_EXC_ERROR THEN
1981: ROLLBACK TO Get_CompanyNews;
1982: x_return_status := FND_API.G_RET_STS_ERROR;
1983: -- Standard call to get message count and if count=1, get the message
1984: FND_MSG_PUB.Count_And_Get (
1985: p_encoded => FND_API.G_FALSE,
1986: p_count => x_msg_count,
1987: p_data => x_msg_data
1988: );
1989: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1990: ROLLBACK TO Get_CompanyNews;
1991: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1992: -- Standard call to get message count and if count=1, get the message
1993: FND_MSG_PUB.Count_And_Get (
1994: p_encoded => FND_API.G_FALSE,
1995: p_count => x_msg_count,
1996: p_data => x_msg_data
1997: );
1997: );
1998: WHEN OTHERS THEN
1999: ROLLBACK TO Get_CompanyNews;
2000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2001: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2002: THEN
2003: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2004: END IF;
2005: -- Standard call to get message count and if count=1, get the message
1999: ROLLBACK TO Get_CompanyNews;
2000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2001: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2002: THEN
2003: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2004: END IF;
2005: -- Standard call to get message count and if count=1, get the message
2006: FND_MSG_PUB.Count_And_Get (
2007: p_encoded => FND_API.G_FALSE,
2002: THEN
2003: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2004: END IF;
2005: -- Standard call to get message count and if count=1, get the message
2006: FND_MSG_PUB.Count_And_Get (
2007: p_encoded => FND_API.G_FALSE,
2008: p_count => x_msg_count,
2009: p_data => x_msg_data
2010: );