The following lines contain the word 'select', 'insert', 'update' or 'delete':
AS_ACCESS_PUB.Has_updateOpportunityAccess(
p_api_version_number => 2.0,
p_init_msg_list => p_init_msg_list,
p_validation_level => p_validation_level,
p_access_profile_rec => l_access_profile_rec,
p_admin_flag => p_admin_flag,
p_admin_group_id => p_admin_group_id,
p_person_id =>
l_identity_sales_member_rec.employee_person_id,
p_opportunity_id => l_Competitor_rec.LEAD_ID,
p_check_access_flag => 'Y',
p_identity_salesforce_id => p_identity_salesforce_id,
p_partner_cont_party_id => NULL,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
x_update_access_flag => l_access_flag);
'API_NO_UPDATE_PRIVILEGE');
AS_LEAD_COMPETITORS_PKG.Insert_Row(
px_LEAD_COMPETITOR_ID => l_LEAD_COMPETITOR_ID,
p_LAST_UPDATE_DATE => SYSDATE,
p_LAST_UPDATED_BY => FND_GLOBAL.USER_ID,
p_CREATION_DATE => SYSDATE,
p_CREATED_BY => FND_GLOBAL.USER_ID,
p_LAST_UPDATE_LOGIN => FND_GLOBAL.CONC_LOGIN_ID,
p_REQUEST_ID => l_Competitor_rec.REQUEST_ID,
p_PROGRAM_APPLICATION_ID =>l_Competitor_rec.PROGRAM_APPLICATION_ID,
p_PROGRAM_ID => l_Competitor_rec.PROGRAM_ID,
p_PROGRAM_UPDATE_DATE => l_Competitor_rec.PROGRAM_UPDATE_DATE,
p_LEAD_ID => l_Competitor_rec.LEAD_ID,
p_COMPETITOR_CODE => l_Competitor_rec.COMPETITOR_CODE,
p_COMPETITOR => l_Competitor_rec.COMPETITOR,
p_PRODUCTS => l_Competitor_rec.PRODUCTS,
p_COMMENTS => l_Competitor_rec.COMMENTS,
p_ATTRIBUTE_CATEGORY => l_Competitor_rec.ATTRIBUTE_CATEGORY,
p_ATTRIBUTE1 => l_Competitor_rec.ATTRIBUTE1,
p_ATTRIBUTE2 => l_Competitor_rec.ATTRIBUTE2,
p_ATTRIBUTE3 => l_Competitor_rec.ATTRIBUTE3,
p_ATTRIBUTE4 => l_Competitor_rec.ATTRIBUTE4,
p_ATTRIBUTE5 => l_Competitor_rec.ATTRIBUTE5,
p_ATTRIBUTE6 => l_Competitor_rec.ATTRIBUTE6,
p_ATTRIBUTE7 => l_Competitor_rec.ATTRIBUTE7,
p_ATTRIBUTE8 => l_Competitor_rec.ATTRIBUTE8,
p_ATTRIBUTE9 => l_Competitor_rec.ATTRIBUTE9,
p_ATTRIBUTE10 => l_Competitor_rec.ATTRIBUTE10,
p_ATTRIBUTE11 => l_Competitor_rec.ATTRIBUTE11,
p_ATTRIBUTE12 => l_Competitor_rec.ATTRIBUTE12,
p_ATTRIBUTE13 => l_Competitor_rec.ATTRIBUTE13,
p_ATTRIBUTE14 => l_Competitor_rec.ATTRIBUTE14,
p_ATTRIBUTE15 => l_Competitor_rec.ATTRIBUTE15,
p_WIN_LOSS_STATUS => l_Competitor_rec.WIN_LOSS_STATUS,
p_COMPETITOR_RANK => l_Competitor_rec.COMPETITOR_RANK,
p_RELATIONSHIP_PARTY_ID => l_Competitor_rec.RELATIONSHIP_PARTY_ID,
p_COMPETITOR_ID => l_Competitor_rec.COMPETITOR_ID);
PROCEDURE Update_competitors(
P_Api_Version_Number IN NUMBER,
P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
P_Commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
P_Check_Access_Flag IN VARCHAR2 := FND_API.G_FALSE,
P_Admin_Flag IN VARCHAR2 := FND_API.G_FALSE,
P_Admin_Group_Id IN NUMBER,
P_Identity_Salesforce_Id IN NUMBER,
P_profile_tbl IN AS_UTILITY_PUB.PROFILE_TBL_TYPE,
P_Partner_Cont_Party_id IN NUMBER := FND_API.G_MISS_NUM,
P_Competitor_Tbl IN AS_OPPORTUNITY_PUB.Competitor_Tbl_Type,
X_competitor_out_tbl OUT NOCOPY AS_OPPORTUNITY_PUB.competitor_out_tbl_type,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2
)
IS
Cursor C_Get_competitor(c_LEAD_COMPETITOR_ID Number) IS
Select LAST_UPDATE_DATE
From AS_LEAD_COMPETITORS
WHERE LEAD_COMPETITOR_ID = c_LEAD_COMPETITOR_ID
For Update NOWAIT;
L_Api_Name CONSTANT VARCHAR2(30) := 'Update_competitors';
L_Last_Update_Date DATE;
l_module CONSTANT VARCHAR2(255) := 'as.plsql.cmppv.Update_competitors';
SAVEPOINT UPDATE_COMPETITORS_PVT;
AS_CALLOUT_PKG.Update_competitors_BU(
p_api_version_number => 2.0,
p_init_msg_list => FND_API.G_FALSE,
p_commit => FND_API.G_FALSE,
p_validation_level => p_validation_level,
p_identity_salesforce_id => p_identity_salesforce_id,
P_Competitor_Rec => P_Competitor_Rec,
-- Hint: Add detail tables as parameter lists if it's master-detail
-- relationship.
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
AS_ACCESS_PUB.Has_updateOpportunityAccess(
p_api_version_number => 2.0,
p_init_msg_list => p_init_msg_list,
p_validation_level => p_validation_level,
p_access_profile_rec => l_access_profile_rec,
p_admin_flag => p_admin_flag,
p_admin_group_id => p_admin_group_id,
p_person_id =>
l_identity_sales_member_rec.employee_person_id,
p_opportunity_id => l_Competitor_rec.LEAD_ID,
p_check_access_flag => 'Y',
p_identity_salesforce_id => p_identity_salesforce_id,
p_partner_cont_party_id => NULL,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
x_update_access_flag => l_access_flag);
'API_NO_UPDATE_PRIVILEGE');
'Private API: - Open Cursor to Select');
Fetch C_Get_competitor into l_last_update_date;
FND_MESSAGE.Set_Name('AS', 'API_MISSING_UPDATE_TARGET');
If (l_Competitor_rec.last_update_date is NULL or
l_Competitor_rec.last_update_date = FND_API.G_MISS_Date ) Then
IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
THEN
FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
If (l_Competitor_rec.last_update_date <> l_last_update_date) Then
IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
THEN
FND_MESSAGE.Set_Name('AS', 'API_RECORD_CHANGED');
p_validation_mode => AS_UTILITY_PVT.G_UPDATE,
P_Competitor_Rec => l_Competitor_Rec,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
'Private API: Calling update table handler');
AS_LEAD_COMPETITORS_PKG.Update_Row(
p_LEAD_COMPETITOR_ID => l_Competitor_rec.LEAD_COMPETITOR_ID,
p_LAST_UPDATE_DATE => SYSDATE,
p_LAST_UPDATED_BY => FND_GLOBAL.USER_ID,
p_CREATION_DATE => SYSDATE,
p_CREATED_BY => FND_GLOBAL.USER_ID,
p_LAST_UPDATE_LOGIN => FND_GLOBAL.CONC_LOGIN_ID,
p_REQUEST_ID => l_Competitor_rec.REQUEST_ID,
p_PROGRAM_APPLICATION_ID =>l_Competitor_rec.PROGRAM_APPLICATION_ID,
p_PROGRAM_ID => l_Competitor_rec.PROGRAM_ID,
p_PROGRAM_UPDATE_DATE => l_Competitor_rec.PROGRAM_UPDATE_DATE,
p_LEAD_ID => l_Competitor_rec.LEAD_ID,
p_COMPETITOR_CODE => l_Competitor_rec.COMPETITOR_CODE,
p_COMPETITOR => l_Competitor_rec.COMPETITOR,
p_PRODUCTS => l_Competitor_rec.PRODUCTS,
p_COMMENTS => l_Competitor_rec.COMMENTS,
p_ATTRIBUTE_CATEGORY => l_Competitor_rec.ATTRIBUTE_CATEGORY,
p_ATTRIBUTE1 => l_Competitor_rec.ATTRIBUTE1,
p_ATTRIBUTE2 => l_Competitor_rec.ATTRIBUTE2,
p_ATTRIBUTE3 => l_Competitor_rec.ATTRIBUTE3,
p_ATTRIBUTE4 => l_Competitor_rec.ATTRIBUTE4,
p_ATTRIBUTE5 => l_Competitor_rec.ATTRIBUTE5,
p_ATTRIBUTE6 => l_Competitor_rec.ATTRIBUTE6,
p_ATTRIBUTE7 => l_Competitor_rec.ATTRIBUTE7,
p_ATTRIBUTE8 => l_Competitor_rec.ATTRIBUTE8,
p_ATTRIBUTE9 => l_Competitor_rec.ATTRIBUTE9,
p_ATTRIBUTE10 => l_Competitor_rec.ATTRIBUTE10,
p_ATTRIBUTE11 => l_Competitor_rec.ATTRIBUTE11,
p_ATTRIBUTE12 => l_Competitor_rec.ATTRIBUTE12,
p_ATTRIBUTE13 => l_Competitor_rec.ATTRIBUTE13,
p_ATTRIBUTE14 => l_Competitor_rec.ATTRIBUTE14,
p_ATTRIBUTE15 => l_Competitor_rec.ATTRIBUTE15,
p_WIN_LOSS_STATUS => l_Competitor_rec.WIN_LOSS_STATUS,
p_COMPETITOR_RANK => l_Competitor_rec.COMPETITOR_RANK,
p_RELATIONSHIP_PARTY_ID => l_Competitor_rec.RELATIONSHIP_PARTY_ID,
p_COMPETITOR_ID => l_Competitor_rec.COMPETITOR_ID);
AS_CALLOUT_PKG.Update_competitors_AU(
p_api_version_number => 2.0,
p_init_msg_list => FND_API.G_FALSE,
p_commit => FND_API.G_FALSE,
p_validation_level => p_validation_level,
p_identity_salesforce_id => p_identity_salesforce_id,
P_Competitor_Rec => P_Competitor_Rec,
-- Hint: Add detail tables as parameter lists if it's master-detail
-- relationship.
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
End Update_competitors;
PROCEDURE Delete_competitors(
P_Api_Version_Number IN NUMBER,
P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
P_Commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
P_Check_Access_Flag IN VARCHAR2 := FND_API.G_FALSE,
P_Admin_Flag IN VARCHAR2 := FND_API.G_FALSE,
P_Admin_Group_Id IN NUMBER,
P_Identity_Salesforce_Id IN NUMBER,
P_profile_tbl IN AS_UTILITY_PUB.PROFILE_TBL_TYPE,
P_Partner_Cont_Party_id IN NUMBER := FND_API.G_MISS_NUM,
P_Competitor_Tbl IN AS_OPPORTUNITY_PUB.Competitor_Tbl_Type,
X_competitor_out_tbl OUT NOCOPY AS_OPPORTUNITY_PUB.competitor_out_tbl_type,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2
)
IS
L_Api_Name CONSTANT VARCHAR2(30) := 'Delete_competitors';
l_module CONSTANT VARCHAR2(255) := 'as.plsql.cmppv.Delete_competitors';
SAVEPOINT DELETE_COMPETITORS_PVT;
AS_CALLOUT_PKG.Delete_competitors_BD(
p_api_version_number => 2.0,
p_init_msg_list => FND_API.G_FALSE,
p_commit => FND_API.G_FALSE,
p_validation_level => p_validation_level,
p_identity_salesforce_id => p_identity_salesforce_id,
P_Competitor_Rec => P_Competitor_Rec,
-- Hint: Add detail tables as parameter lists if it's master-detail relationship.
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
AS_ACCESS_PUB.Has_updateOpportunityAccess(
p_api_version_number => 2.0,
p_init_msg_list => p_init_msg_list,
p_validation_level => p_validation_level,
p_access_profile_rec => l_access_profile_rec,
p_admin_flag => p_admin_flag,
p_admin_group_id => p_admin_group_id,
p_person_id =>
l_identity_sales_member_rec.employee_person_id,
p_opportunity_id => l_Competitor_rec.LEAD_ID,
p_check_access_flag => 'Y',
p_identity_salesforce_id => p_identity_salesforce_id,
p_partner_cont_party_id => NULL,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
x_update_access_flag => l_access_flag);
'API_NO_UPDATE_PRIVILEGE');
'Private API: Calling delete table handler');
AS_LEAD_COMPETITORS_PKG.Delete_Row(
p_LEAD_COMPETITOR_ID => l_Competitor_rec.LEAD_COMPETITOR_ID);
AS_CALLOUT_PKG.Delete_competitors_AD(
p_api_version_number => 2.0,
p_init_msg_list => FND_API.G_FALSE,
p_commit => FND_API.G_FALSE,
p_validation_level => p_validation_level,
p_identity_salesforce_id => p_identity_salesforce_id,
P_Competitor_Rec => P_Competitor_Rec,
-- Hint: Add detail tables as parameter lists if it's master-detail relationship.
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
End Delete_competitors;
SELECT 'X'
FROM as_lead_competitors
WHERE lead_competitor_id = c_Lead_Competitor_Id;
ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
IF (p_LEAD_COMPETITOR_ID is NULL) or (p_LEAD_COMPETITOR_ID = FND_API.G_MISS_NUM)
THEN
AS_UTILITY_PVT.Set_Message(
p_module => l_module,
p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
p_msg_name => 'API_MISSING_LEAD_COMPETITOR_ID');
SELECT 'X'
FROM as_leads_all
WHERE lead_id = c_Lead_Id;
SELECT 'X'
FROM HZ_PARTIES
WHERE party_id = c_cmp_Id
AND STATUS in ('A', 'I');