427: END IF;
428:
429: -- Debug Message
430: IF (AMS_DEBUG_HIGH_ON) THEN
431: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
432: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Maint_PVT.Create_Source_View: Start', TRUE);
433: FND_MSG_PUB.Add;
434: END IF;
435:
428:
429: -- Debug Message
430: IF (AMS_DEBUG_HIGH_ON) THEN
431: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
432: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Maint_PVT.Create_Source_View: Start', TRUE);
433: FND_MSG_PUB.Add;
434: END IF;
435:
436: -- Initialize API return status to success
536: -- Success Message
537: -- MMSG
538: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
539: THEN
540: FND_MESSAGE.Set_Name('AMS', 'API_SUCCESS');
541: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Maint_PVT.Create_Source_View', TRUE);
542: FND_MSG_PUB.Add;
543: END IF;
544:
537: -- MMSG
538: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
539: THEN
540: FND_MESSAGE.Set_Name('AMS', 'API_SUCCESS');
541: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Maint_PVT.Create_Source_View', TRUE);
542: FND_MSG_PUB.Add;
543: END IF;
544:
545:
543: END IF;
544:
545:
546: IF (AMS_DEBUG_HIGH_ON) THEN
547: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
548: FND_MESSAGE.Set_Token('ROW','AMS_List_Maint_PVT.Create_Source_View: END', TRUE);
549: FND_MSG_PUB.Add;
550: END IF;
551:
544:
545:
546: IF (AMS_DEBUG_HIGH_ON) THEN
547: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
548: FND_MESSAGE.Set_Token('ROW','AMS_List_Maint_PVT.Create_Source_View: END', TRUE);
549: FND_MSG_PUB.Add;
550: END IF;
551:
552:
863:
864: -- Debug Message
865: IF (AMS_DEBUG_HIGH_ON) THEN
866: THEN
867: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
868: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Maint_PVT.Copy_List: Start', TRUE);
869: FND_MSG_PUB.Add;
870: END IF;
871:
864: -- Debug Message
865: IF (AMS_DEBUG_HIGH_ON) THEN
866: THEN
867: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
868: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Maint_PVT.Copy_List: Start', TRUE);
869: FND_MSG_PUB.Add;
870: END IF;
871:
872: -- Initialize API return status to success
878: IF(p_list_used_by_id IS NOT NULL and p_arc_list_used_by IS NOT NULL)THEN
879: IF ( Check_List_Association(p_arc_list_used_by,p_list_used_by_id) = FND_API.g_false )THEN
880: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
881: THEN
882: FND_MESSAGE.set_name('AMS', 'AMS_LIST_BAD_USED_BY_ID');
883: FND_MSG_PUB.add;
884: END IF;
885: x_return_status := FND_API.g_ret_sts_error;
886: RETURN;
895: p_lookup_type => 'AMS_LIST_TYPE',
896: p_lookup_code => p_list_type) = FND_API.g_false THEN
897:
898: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
899: FND_MESSAGE.set_name('AMS', 'AMS_LIST_BAD_TYPE');
900: FND_MSG_PUB.add;
901: END IF;
902:
903: x_return_status := FND_API.g_ret_sts_error;
913:
914: IF(C_ListHeader_Dets%NOTFOUND)THEN
915: CLOSE C_ListHeader_Dets;
916: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
917: FND_MESSAGE.Set_Name('AMS', 'AMS_LIST_ID_NOT_EXIST');
918: FND_MSG_PUB.Add;
919: END IF;
920: x_return_status := FND_API.G_RET_STS_ERROR;
921: RETURN;
923: CLOSE C_ListHeader_Dets;
924:
925: IF(g_listheader_rec.generation_type = 'INCREMENTAL')THEN
926: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
927: FND_MESSAGE.Set_Name('AMS', 'AMS_LIST_BAD_COPY_INC');
928: FND_MSG_PUB.Add;
929: END IF;
930: x_return_status := FND_API.G_RET_STS_ERROR;
931: RETURN;
1106: END IF;
1107:
1108: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1109: THEN
1110: FND_MESSAGE.Set_Name('AMS', 'API_SUCCESS');
1111: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Maint_PVT.Copy_List', TRUE);
1112: FND_MSG_PUB.Add;
1113: END IF;
1114:
1107:
1108: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1109: THEN
1110: FND_MESSAGE.Set_Name('AMS', 'API_SUCCESS');
1111: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Maint_PVT.Copy_List', TRUE);
1112: FND_MSG_PUB.Add;
1113: END IF;
1114:
1115:
1114:
1115:
1116: IF (AMS_DEBUG_HIGH_ON) THEN
1117: THEN
1118: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
1119: FND_MESSAGE.Set_Token('ROW','AMS_List_Maint_PVT.Copy_List: END', TRUE);
1120: FND_MSG_PUB.Add;
1121: END IF;
1122:
1115:
1116: IF (AMS_DEBUG_HIGH_ON) THEN
1117: THEN
1118: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
1119: FND_MESSAGE.Set_Token('ROW','AMS_List_Maint_PVT.Copy_List: END', TRUE);
1120: FND_MSG_PUB.Add;
1121: END IF;
1122:
1123: -- Standard call to get message count AND IF count is 1, get message info.
1265: FETCH C_ListEntry_Dets INTO x_listentry_rec;
1266: IF C_ListEntry_Dets%NOTFOUND THEN
1267: CLOSE C_ListEntry_Dets;
1268: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1269: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
1270: FND_MSG_PUB.add;
1271: END IF;
1272: RAISE FND_API.g_exc_error;
1273: END IF;