108: IF FND_GLOBAL.User_Id IS NULL
109: THEN
110: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
111: THEN
112: FND_MESSAGE.Set_Name(' + appShortName +', 'UT_CANNOT_GET_PROFILE_VALUE');
113: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
114: FND_MSG_PUB.ADD;
115: END IF;
116: RAISE FND_API.G_EXC_ERROR;
109: THEN
110: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
111: THEN
112: FND_MESSAGE.Set_Name(' + appShortName +', 'UT_CANNOT_GET_PROFILE_VALUE');
113: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
114: FND_MSG_PUB.ADD;
115: END IF;
116: RAISE FND_API.G_EXC_ERROR;
117: END IF;
359:
360: If ( C_Get_price_rltship%NOTFOUND) Then
361: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
362: THEN
363: FND_MESSAGE.Set_Name('ASO', 'API_MISSING_UPDATE_TARGET');
364: FND_MESSAGE.Set_Token ('INFO', 'price_adj_rltship', FALSE);
365: FND_MSG_PUB.Add;
366: END IF;
367: raise FND_API.G_EXC_ERROR;
360: If ( C_Get_price_rltship%NOTFOUND) Then
361: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
362: THEN
363: FND_MESSAGE.Set_Name('ASO', 'API_MISSING_UPDATE_TARGET');
364: FND_MESSAGE.Set_Token ('INFO', 'price_adj_rltship', FALSE);
365: FND_MSG_PUB.Add;
366: END IF;
367: raise FND_API.G_EXC_ERROR;
368: END IF;
375: If (l_tar_PRICE_ADJ_RLTSHIP_rec.last_update_date is NULL or
376: l_tar_PRICE_ADJ_RLTSHIP_rec.last_update_date = FND_API.G_MISS_Date ) Then
377: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
378: THEN
379: FND_MESSAGE.Set_Name('ASO', 'API_MISSING_ID');
380: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
381: FND_MSG_PUB.ADD;
382: END IF;
383: raise FND_API.G_EXC_ERROR;
376: l_tar_PRICE_ADJ_RLTSHIP_rec.last_update_date = FND_API.G_MISS_Date ) Then
377: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
378: THEN
379: FND_MESSAGE.Set_Name('ASO', 'API_MISSING_ID');
380: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
381: FND_MSG_PUB.ADD;
382: END IF;
383: raise FND_API.G_EXC_ERROR;
384: End if;
385: -- Check Whether record has been changed by someone else
386: If (l_tar_PRICE_ADJ_RLTSHIP_rec.last_update_date <> l_ref_PRICE_ADJ_RLTSHIP_rec.last_update_date) Then
387: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
388: THEN
389: FND_MESSAGE.Set_Name('ASO', 'API_RECORD_CHANGED');
390: FND_MESSAGE.Set_Token('INFO', 'price_adj_rltship', FALSE);
391: FND_MSG_PUB.ADD;
392: END IF;
393: raise FND_API.G_EXC_ERROR;
386: If (l_tar_PRICE_ADJ_RLTSHIP_rec.last_update_date <> l_ref_PRICE_ADJ_RLTSHIP_rec.last_update_date) Then
387: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
388: THEN
389: FND_MESSAGE.Set_Name('ASO', 'API_RECORD_CHANGED');
390: FND_MESSAGE.Set_Token('INFO', 'price_adj_rltship', FALSE);
391: FND_MSG_PUB.ADD;
392: END IF;
393: raise FND_API.G_EXC_ERROR;
394: End if;
604: IF FND_GLOBAL.User_Id IS NULL
605: THEN
606: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
607: THEN
608: FND_MESSAGE.Set_Name(' + appShortName +', 'UT_CANNOT_GET_PROFILE_VALUE');
609: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
610: FND_MSG_PUB.ADD;
611: END IF;
612: RAISE FND_API.G_EXC_ERROR;
605: THEN
606: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
607: THEN
608: FND_MESSAGE.Set_Name(' + appShortName +', 'UT_CANNOT_GET_PROFILE_VALUE');
609: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
610: FND_MSG_PUB.ADD;
611: END IF;
612: RAISE FND_API.G_EXC_ERROR;
613: END IF;