109: IF FND_GLOBAL.User_Id IS NULL
110: THEN
111: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
112: THEN
113: FND_MESSAGE.Set_Name(' + appShortName +',
114: 'UT_CANNOT_GET_PROFILE_VALUE');
115: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
116: FND_MSG_PUB.ADD;
117: END IF;
111: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
112: THEN
113: FND_MESSAGE.Set_Name(' + appShortName +',
114: 'UT_CANNOT_GET_PROFILE_VALUE');
115: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
116: FND_MSG_PUB.ADD;
117: END IF;
118: RAISE FND_API.G_EXC_ERROR;
119: END IF;
177: -- Progress Message
178: --
179: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
180: THEN
181: FND_MESSAGE.Set_Name ('AS', 'API_PROCESSING_ROW');
182: FND_MESSAGE.Set_Token ('ROW', 'AS_LEAD_COMPETITOR', TRUE);
183: FND_MESSAGE.Set_Token ('RECORD_NUM', to_char(l_curr_row), FALSE);
184: FND_MSG_PUB.Add;
185: END IF;
178: --
179: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
180: THEN
181: FND_MESSAGE.Set_Name ('AS', 'API_PROCESSING_ROW');
182: FND_MESSAGE.Set_Token ('ROW', 'AS_LEAD_COMPETITOR', TRUE);
183: FND_MESSAGE.Set_Token ('RECORD_NUM', to_char(l_curr_row), FALSE);
184: FND_MSG_PUB.Add;
185: END IF;
186:
179: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
180: THEN
181: FND_MESSAGE.Set_Name ('AS', 'API_PROCESSING_ROW');
182: FND_MESSAGE.Set_Token ('ROW', 'AS_LEAD_COMPETITOR', TRUE);
183: FND_MESSAGE.Set_Token ('RECORD_NUM', to_char(l_curr_row), FALSE);
184: FND_MSG_PUB.Add;
185: END IF;
186:
187: l_competitor_rec := P_Competitor_Tbl(l_curr_row);
503: -- Progress Message
504: --
505: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
506: THEN
507: FND_MESSAGE.Set_Name ('AS', 'API_PROCESSING_ROW');
508: FND_MESSAGE.Set_Token ('ROW', 'AS_LEAD_COMPETITOR', TRUE);
509: FND_MESSAGE.Set_Token ('RECORD_NUM', to_char(l_curr_row), FALSE);
510: FND_MSG_PUB.Add;
511: END IF;
504: --
505: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
506: THEN
507: FND_MESSAGE.Set_Name ('AS', 'API_PROCESSING_ROW');
508: FND_MESSAGE.Set_Token ('ROW', 'AS_LEAD_COMPETITOR', TRUE);
509: FND_MESSAGE.Set_Token ('RECORD_NUM', to_char(l_curr_row), FALSE);
510: FND_MSG_PUB.Add;
511: END IF;
512:
505: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
506: THEN
507: FND_MESSAGE.Set_Name ('AS', 'API_PROCESSING_ROW');
508: FND_MESSAGE.Set_Token ('ROW', 'AS_LEAD_COMPETITOR', TRUE);
509: FND_MESSAGE.Set_Token ('RECORD_NUM', to_char(l_curr_row), FALSE);
510: FND_MSG_PUB.Add;
511: END IF;
512:
513: l_competitor_rec := P_Competitor_Tbl(l_curr_row);
525:
526: If ( C_Get_competitor%NOTFOUND) Then
527: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
528: THEN
529: FND_MESSAGE.Set_Name('AS', 'API_MISSING_UPDATE_TARGET');
530: FND_MESSAGE.Set_Token ('INFO', 'competitor', FALSE);
531: FND_MSG_PUB.Add;
532: END IF;
533: raise FND_API.G_EXC_ERROR;
526: If ( C_Get_competitor%NOTFOUND) Then
527: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
528: THEN
529: FND_MESSAGE.Set_Name('AS', 'API_MISSING_UPDATE_TARGET');
530: FND_MESSAGE.Set_Token ('INFO', 'competitor', FALSE);
531: FND_MSG_PUB.Add;
532: END IF;
533: raise FND_API.G_EXC_ERROR;
534: END IF;
543: If (l_Competitor_rec.last_update_date is NULL or
544: l_Competitor_rec.last_update_date = FND_API.G_MISS_Date ) Then
545: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
546: THEN
547: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
548: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
549: FND_MSG_PUB.ADD;
550: END IF;
551: raise FND_API.G_EXC_ERROR;
544: l_Competitor_rec.last_update_date = FND_API.G_MISS_Date ) Then
545: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
546: THEN
547: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
548: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
549: FND_MSG_PUB.ADD;
550: END IF;
551: raise FND_API.G_EXC_ERROR;
552: End if;
553: -- Check Whether record has been changed by someone else
554: If (l_Competitor_rec.last_update_date <> l_last_update_date) Then
555: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
556: THEN
557: FND_MESSAGE.Set_Name('AS', 'API_RECORD_CHANGED');
558: FND_MESSAGE.Set_Token('INFO', 'competitor', FALSE);
559: FND_MSG_PUB.ADD;
560: END IF;
561: raise FND_API.G_EXC_ERROR;
554: If (l_Competitor_rec.last_update_date <> l_last_update_date) Then
555: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
556: THEN
557: FND_MESSAGE.Set_Name('AS', 'API_RECORD_CHANGED');
558: FND_MESSAGE.Set_Token('INFO', 'competitor', FALSE);
559: FND_MSG_PUB.ADD;
560: END IF;
561: raise FND_API.G_EXC_ERROR;
562: End if;
870: -- Progress Message
871: --
872: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
873: THEN
874: FND_MESSAGE.Set_Name ('AS', 'API_PROCESSING_ROW');
875: FND_MESSAGE.Set_Token ('ROW', 'AS_LEAD_COMPETITOR', TRUE);
876: FND_MESSAGE.Set_Token ('RECORD_NUM', to_char(l_curr_row), FALSE);
877: FND_MSG_PUB.Add;
878: END IF;
871: --
872: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
873: THEN
874: FND_MESSAGE.Set_Name ('AS', 'API_PROCESSING_ROW');
875: FND_MESSAGE.Set_Token ('ROW', 'AS_LEAD_COMPETITOR', TRUE);
876: FND_MESSAGE.Set_Token ('RECORD_NUM', to_char(l_curr_row), FALSE);
877: FND_MSG_PUB.Add;
878: END IF;
879:
872: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
873: THEN
874: FND_MESSAGE.Set_Name ('AS', 'API_PROCESSING_ROW');
875: FND_MESSAGE.Set_Token ('ROW', 'AS_LEAD_COMPETITOR', TRUE);
876: FND_MESSAGE.Set_Token ('RECORD_NUM', to_char(l_curr_row), FALSE);
877: FND_MSG_PUB.Add;
878: END IF;
879:
880: l_competitor_rec := P_Competitor_Tbl(l_curr_row);