The following lines contain the word 'select', 'insert', 'update' or 'delete':
select st.WIN_LOSS_INDICATOR
from as_statuses_b st,
as_leads_all ld
where st.STATUS_CODE = ld.STATUS
and ld.LEAD_ID = c_LEAD_ID;
select 'Y'
from as_lead_comp_products
where lead_line_id = p_Competitor_Prod_rec.lead_line_id
and competitor_product_id = p_Competitor_Prod_rec.competitor_product_id;
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 => P_Competitor_Prod_Tbl(1).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_COMP_PRODUCTS_PKG.Insert_Row(
p_ATTRIBUTE15 => l_competitor_prod_rec.ATTRIBUTE15,
p_ATTRIBUTE14 => l_competitor_prod_rec.ATTRIBUTE14,
p_ATTRIBUTE13 => l_competitor_prod_rec.ATTRIBUTE13,
p_ATTRIBUTE12 => l_competitor_prod_rec.ATTRIBUTE12,
p_ATTRIBUTE11 => l_competitor_prod_rec.ATTRIBUTE11,
p_ATTRIBUTE10 => l_competitor_prod_rec.ATTRIBUTE10,
p_ATTRIBUTE9 => l_competitor_prod_rec.ATTRIBUTE9,
p_ATTRIBUTE8 => l_competitor_prod_rec.ATTRIBUTE8,
p_ATTRIBUTE7 => l_competitor_prod_rec.ATTRIBUTE7,
p_ATTRIBUTE6 => l_competitor_prod_rec.ATTRIBUTE6,
p_ATTRIBUTE4 => l_competitor_prod_rec.ATTRIBUTE4,
p_ATTRIBUTE5 => l_competitor_prod_rec.ATTRIBUTE5,
p_ATTRIBUTE2 => l_competitor_prod_rec.ATTRIBUTE2,
p_ATTRIBUTE3 => l_competitor_prod_rec.ATTRIBUTE3,
p_ATTRIBUTE1 => l_competitor_prod_rec.ATTRIBUTE1,
p_ATTRIBUTE_CATEGORY => l_competitor_prod_rec.ATTRIBUTE_CATEGORY,
p_PROGRAM_ID => l_competitor_prod_rec.PROGRAM_ID,
p_PROGRAM_UPDATE_DATE => l_competitor_prod_rec.PROGRAM_UPDATE_DATE,
p_PROGRAM_APPLICATION_ID => l_competitor_prod_rec.PROGRAM_APPLICATION_ID,
p_REQUEST_ID => l_competitor_prod_rec.REQUEST_ID,
p_WIN_LOSS_STATUS => l_competitor_prod_rec.WIN_LOSS_STATUS,
p_COMPETITOR_PRODUCT_ID => l_competitor_prod_rec.COMPETITOR_PRODUCT_ID,
p_LEAD_LINE_ID => l_competitor_prod_rec.LEAD_LINE_ID,
p_LEAD_ID => l_competitor_prod_rec.LEAD_ID,
px_LEAD_COMPETITOR_PROD_ID => l_LEAD_COMPETITOR_PROD_ID,
p_LAST_UPDATE_LOGIN => FND_GLOBAL.CONC_LOGIN_ID,
p_LAST_UPDATED_BY => FND_GLOBAL.USER_ID,
p_LAST_UPDATE_DATE => SYSDATE,
p_CREATED_BY => FND_GLOBAL.USER_ID,
p_CREATION_DATE => SYSDATE);
UPDATE AS_LEADS_ALL
SET object_version_number = nvl(object_version_number,0) + 1, CLOSE_COMPETITOR_ID =
( select competitor_party_id
from ams_competitor_products_b
where competitor_product_id = l_competitor_prod_rec.COMPETITOR_PRODUCT_ID )
WHERE lead_id = l_competitor_prod_rec.LEAD_ID
AND CLOSE_COMPETITOR_ID is null;
PROCEDURE Update_competitor_prods(
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_Prod_Tbl IN AS_OPPORTUNITY_PUB.Competitor_Prod_Tbl_Type,
X_competitor_prod_out_tbl OUT NOCOPY AS_OPPORTUNITY_PUB.competitor_prod_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_prod(c_LEAD_COMPETITOR_PROD_ID Number) IS
Select LAST_UPDATE_DATE
From AS_LEAD_COMP_PRODUCTS
WHERE LEAD_COMPETITOR_PROD_ID = c_LEAD_COMPETITOR_PROD_ID
For Update NOWAIT;
L_Api_Name CONSTANT VARCHAR2(30) := 'Update_competitor_prods';
L_Last_Update_Date DATE;
l_module CONSTANT VARCHAR2(255) := 'as.plsql.cpdpv.Update_competitor_prods';
SAVEPOINT UPDATE_COMPETITOR_PRODS_PVT;
AS_CALLOUT_PKG.Update_competitor_prods_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_Prod_Rec => P_Competitor_Prod_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 => P_Competitor_Prod_Tbl(1).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_prod into l_last_update_date;
FND_MESSAGE.Set_Name('AS', 'API_MISSING_UPDATE_TARGET');
If (l_Competitor_Prod_rec.last_update_date is NULL or
l_Competitor_Prod_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_Prod_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_Prod_Rec => l_Competitor_Prod_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_COMP_PRODUCTS_PKG.Update_Row(
p_ATTRIBUTE15 => l_competitor_prod_rec.ATTRIBUTE15,
p_ATTRIBUTE14 => l_competitor_prod_rec.ATTRIBUTE14,
p_ATTRIBUTE13 => l_competitor_prod_rec.ATTRIBUTE13,
p_ATTRIBUTE12 => l_competitor_prod_rec.ATTRIBUTE12,
p_ATTRIBUTE11 => l_competitor_prod_rec.ATTRIBUTE11,
p_ATTRIBUTE10 => l_competitor_prod_rec.ATTRIBUTE10,
p_ATTRIBUTE9 => l_competitor_prod_rec.ATTRIBUTE9,
p_ATTRIBUTE8 => l_competitor_prod_rec.ATTRIBUTE8,
p_ATTRIBUTE7 => l_competitor_prod_rec.ATTRIBUTE7,
p_ATTRIBUTE6 => l_competitor_prod_rec.ATTRIBUTE6,
p_ATTRIBUTE4 => l_competitor_prod_rec.ATTRIBUTE4,
p_ATTRIBUTE5 => l_competitor_prod_rec.ATTRIBUTE5,
p_ATTRIBUTE2 => l_competitor_prod_rec.ATTRIBUTE2,
p_ATTRIBUTE3 => l_competitor_prod_rec.ATTRIBUTE3,
p_ATTRIBUTE1 => l_competitor_prod_rec.ATTRIBUTE1,
p_ATTRIBUTE_CATEGORY => l_competitor_prod_rec.ATTRIBUTE_CATEGORY,
p_PROGRAM_ID => l_competitor_prod_rec.PROGRAM_ID,
p_PROGRAM_UPDATE_DATE => l_competitor_prod_rec.PROGRAM_UPDATE_DATE,
p_PROGRAM_APPLICATION_ID => l_competitor_prod_rec.PROGRAM_APPLICATION_ID,
p_REQUEST_ID => l_competitor_prod_rec.REQUEST_ID,
p_WIN_LOSS_STATUS => l_competitor_prod_rec.WIN_LOSS_STATUS,
p_COMPETITOR_PRODUCT_ID => l_competitor_prod_rec.COMPETITOR_PRODUCT_ID,
p_LEAD_LINE_ID => l_competitor_prod_rec.LEAD_LINE_ID,
p_LEAD_ID => l_competitor_prod_rec.LEAD_ID,
p_LEAD_COMPETITOR_PROD_ID => l_competitor_prod_rec.LEAD_COMPETITOR_PROD_ID,
p_LAST_UPDATE_LOGIN => FND_GLOBAL.CONC_LOGIN_ID,
p_LAST_UPDATED_BY => FND_GLOBAL.USER_ID,
p_LAST_UPDATE_DATE => SYSDATE,
p_CREATED_BY => FND_API.G_MISS_NUM,
p_CREATION_DATE => l_competitor_prod_rec.CREATION_DATE);
AS_CALLOUT_PKG.Update_competitor_prods_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_Prod_Prod_Rec => P_Competitor_Prod_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_competitor_prods;
PROCEDURE Delete_competitor_prods(
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_Prod_Tbl IN AS_OPPORTUNITY_PUB.Competitor_Prod_Tbl_Type,
X_competitor_prod_out_tbl OUT NOCOPY AS_OPPORTUNITY_PUB.competitor_prod_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_competitor_prods';
l_module CONSTANT VARCHAR2(255) := 'as.plsql.cpdpv.Delete_competitor_prods';
SAVEPOINT DELETE_COMPETITOR_PRODS_PVT;
AS_CALLOUT_PKG.Delete_competitor_prods_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_Prod_Rec => P_Competitor_Prod_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_Prod_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_COMP_PRODUCTS_PKG.Delete_Row(
p_LEAD_COMPETITOR_PROD_ID => l_Competitor_Prod_rec.LEAD_COMPETITOR_PROD_ID);
AS_CALLOUT_PKG.Delete_competitor_prods_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_Prod_Prod_Rec => P_Competitor_Prod_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_competitor_prods;
ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
-- Hint: Validate data
-- IF p_REQUEST_ID <> G_MISS_CHAR
-- verify if data is valid
-- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
SELECT 'X'
FROM as_lookups
WHERE lookup_type = c_lookup_type
and lookup_code = c_Lookup_Code;
select 'X'
from ams_competitor_products_b
where competitor_product_id = c_COMPETITOR_PRODUCT_ID;
SELECT 'X'
FROM as_lead_lines
WHERE lead_line_id = c_Lead_Line_Id;
SELECT 'X'
FROM as_leads
WHERE lead_id = c_Lead_Id;
SELECT 'X'
FROM as_lead_comp_products
WHERE lead_competitor_prod_id = c_Lead_Competitor_Prod_Id;
ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
-- validate NOT NULL column
IF (p_LEAD_COMPETITOR_PROD_ID is NULL) or (p_LEAD_COMPETITOR_PROD_ID = FND_API.G_MISS_NUM)
THEN
-- AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
-- 'Private API: Violate NOT NULL constraint(LEAD_COMPETITOR_PROD_ID)');