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 => P_Obstacle_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_OBSTACLES_PKG.Insert_Row(
px_LEAD_OBSTACLE_ID => l_LEAD_OBSTACLE_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 => p_Obstacle_tbl(I).REQUEST_ID,
p_PROGRAM_APPLICATION_ID => p_Obstacle_tbl(I).PROGRAM_APPLICATION_ID,
p_PROGRAM_ID => p_Obstacle_tbl(I).PROGRAM_ID,
p_PROGRAM_UPDATE_DATE => p_Obstacle_tbl(I).PROGRAM_UPDATE_DATE,
p_LEAD_ID => p_Obstacle_tbl(I).LEAD_ID,
p_OBSTACLE_CODE => p_Obstacle_tbl(I).OBSTACLE_CODE,
p_OBSTACLE => p_Obstacle_tbl(I).OBSTACLE,
p_OBSTACLE_STATUS => p_Obstacle_tbl(I).OBSTACLE_STATUS,
p_COMMENTS => p_Obstacle_tbl(I).COMMENTS,
p_ATTRIBUTE_CATEGORY => p_Obstacle_tbl(I).ATTRIBUTE_CATEGORY,
p_ATTRIBUTE1 => p_Obstacle_tbl(I).ATTRIBUTE1,
p_ATTRIBUTE2 => p_Obstacle_tbl(I).ATTRIBUTE2,
p_ATTRIBUTE3 => p_Obstacle_tbl(I).ATTRIBUTE3,
p_ATTRIBUTE4 => p_Obstacle_tbl(I).ATTRIBUTE4,
p_ATTRIBUTE5 => p_Obstacle_tbl(I).ATTRIBUTE5,
p_ATTRIBUTE6 => p_Obstacle_tbl(I).ATTRIBUTE6,
p_ATTRIBUTE7 => p_Obstacle_tbl(I).ATTRIBUTE7,
p_ATTRIBUTE8 => p_Obstacle_tbl(I).ATTRIBUTE8,
p_ATTRIBUTE9 => p_Obstacle_tbl(I).ATTRIBUTE9,
p_ATTRIBUTE10 => p_Obstacle_tbl(I).ATTRIBUTE10,
p_ATTRIBUTE11 => p_Obstacle_tbl(I).ATTRIBUTE11,
p_ATTRIBUTE12 => p_Obstacle_tbl(I).ATTRIBUTE12,
p_ATTRIBUTE13 => p_Obstacle_tbl(I).ATTRIBUTE13,
p_ATTRIBUTE14 => p_Obstacle_tbl(I).ATTRIBUTE14,
p_ATTRIBUTE15 => p_Obstacle_tbl(I).ATTRIBUTE15);
PROCEDURE Update_obstacles(
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_Obstacle_tbl IN AS_OPPORTUNITY_PUB.Obstacle_tbl_type,
X_LEAD_OBSTACLE_out_tbl OUT NOCOPY AS_OPPORTUNITY_PUB.obstacle_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_obstacle(c_LEAD_OBSTACLE_ID Number) IS
Select rowid,
LEAD_OBSTACLE_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
REQUEST_ID,
PROGRAM_APPLICATION_ID,
PROGRAM_ID,
PROGRAM_UPDATE_DATE,
LEAD_ID,
OBSTACLE_CODE,
OBSTACLE,
OBSTACLE_STATUS,
COMMENTS,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15
-- ? SECURITY_GROUP_ID
From AS_LEAD_OBSTACLES
WHERE LEAD_OBSTACLE_ID = c_LEAD_OBSTACLE_ID
-- Hint: Developer need to provide Where clause
For Update NOWAIT;
l_api_name CONSTANT VARCHAR2(30) := 'Update_obstacles';
l_module CONSTANT VARCHAR2(255) := 'as.plsql.lobpv.Update_obstacles';
SAVEPOINT UPDATE_OBSTACLES_PVT;
AS_CALLOUT_PKG.Update_obstacle_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_Obstacle_Rec => P_Obstacle_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_Obstacle_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_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: - Open Cursor to Select');
l_ref_Obstacle_rec.LAST_UPDATE_DATE,
l_ref_Obstacle_rec.LAST_UPDATED_BY,
l_ref_Obstacle_rec.CREATION_DATE,
l_ref_Obstacle_rec.CREATED_BY,
l_ref_Obstacle_rec.LAST_UPDATE_LOGIN,
l_ref_Obstacle_rec.REQUEST_ID,
l_ref_Obstacle_rec.PROGRAM_APPLICATION_ID,
l_ref_Obstacle_rec.PROGRAM_ID,
l_ref_Obstacle_rec.PROGRAM_UPDATE_DATE,
l_ref_Obstacle_rec.LEAD_ID,
l_ref_Obstacle_rec.OBSTACLE_CODE,
l_ref_Obstacle_rec.OBSTACLE,
l_ref_Obstacle_rec.OBSTACLE_STATUS,
l_ref_Obstacle_rec.COMMENTS,
l_ref_Obstacle_rec.ATTRIBUTE_CATEGORY,
l_ref_Obstacle_rec.ATTRIBUTE1,
l_ref_Obstacle_rec.ATTRIBUTE2,
l_ref_Obstacle_rec.ATTRIBUTE3,
l_ref_Obstacle_rec.ATTRIBUTE4,
l_ref_Obstacle_rec.ATTRIBUTE5,
l_ref_Obstacle_rec.ATTRIBUTE6,
l_ref_Obstacle_rec.ATTRIBUTE7,
l_ref_Obstacle_rec.ATTRIBUTE8,
l_ref_Obstacle_rec.ATTRIBUTE9,
l_ref_Obstacle_rec.ATTRIBUTE10,
l_ref_Obstacle_rec.ATTRIBUTE11,
l_ref_Obstacle_rec.ATTRIBUTE12,
l_ref_Obstacle_rec.ATTRIBUTE13,
l_ref_Obstacle_rec.ATTRIBUTE14,
l_ref_Obstacle_rec.ATTRIBUTE15;
FND_MESSAGE.Set_Name('AS', 'API_MISSING_UPDATE_TARGET');
If (l_tar_Obstacle_rec.last_update_date is NULL or
l_tar_Obstacle_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_tar_Obstacle_rec.last_update_date <> l_ref_Obstacle_rec.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_Obstacle_Rec => l_Obstacle_Rec,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Calling update table handler');
AS_LEAD_OBSTACLES_PKG.Update_Row(
p_LEAD_OBSTACLE_ID => p_Obstacle_tbl(I).LEAD_OBSTACLE_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 => p_Obstacle_tbl(I).REQUEST_ID,
p_PROGRAM_APPLICATION_ID => p_Obstacle_tbl(I).PROGRAM_APPLICATION_ID,
p_PROGRAM_ID => p_Obstacle_tbl(I).PROGRAM_ID,
p_PROGRAM_UPDATE_DATE => p_Obstacle_tbl(I).PROGRAM_UPDATE_DATE,
p_LEAD_ID => p_Obstacle_tbl(I).LEAD_ID,
p_OBSTACLE_CODE => p_Obstacle_tbl(I).OBSTACLE_CODE,
p_OBSTACLE => p_Obstacle_tbl(I).OBSTACLE,
p_OBSTACLE_STATUS => p_Obstacle_tbl(I).OBSTACLE_STATUS,
p_COMMENTS => p_Obstacle_tbl(I).COMMENTS,
p_ATTRIBUTE_CATEGORY => p_Obstacle_tbl(I).ATTRIBUTE_CATEGORY,
p_ATTRIBUTE1 => p_Obstacle_tbl(I).ATTRIBUTE1,
p_ATTRIBUTE2 => p_Obstacle_tbl(I).ATTRIBUTE2,
p_ATTRIBUTE3 => p_Obstacle_tbl(I).ATTRIBUTE3,
p_ATTRIBUTE4 => p_Obstacle_tbl(I).ATTRIBUTE4,
p_ATTRIBUTE5 => p_Obstacle_tbl(I).ATTRIBUTE5,
p_ATTRIBUTE6 => p_Obstacle_tbl(I).ATTRIBUTE6,
p_ATTRIBUTE7 => p_Obstacle_tbl(I).ATTRIBUTE7,
p_ATTRIBUTE8 => p_Obstacle_tbl(I).ATTRIBUTE8,
p_ATTRIBUTE9 => p_Obstacle_tbl(I).ATTRIBUTE9,
p_ATTRIBUTE10 => p_Obstacle_tbl(I).ATTRIBUTE10,
p_ATTRIBUTE11 => p_Obstacle_tbl(I).ATTRIBUTE11,
p_ATTRIBUTE12 => p_Obstacle_tbl(I).ATTRIBUTE12,
p_ATTRIBUTE13 => p_Obstacle_tbl(I).ATTRIBUTE13,
p_ATTRIBUTE14 => p_Obstacle_tbl(I).ATTRIBUTE14,
p_ATTRIBUTE15 => p_Obstacle_tbl(I).ATTRIBUTE15);
AS_CALLOUT_PKG.Update_obstacle_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_Obstacle_Rec => P_Obstacle_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_obstacles;
PROCEDURE Delete_obstacles(
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_profile_tbl IN AS_UTILITY_PUB.PROFILE_TBL_TYPE,
P_identity_salesforce_id IN NUMBER := NULL,
p_partner_cont_party_id IN NUMBER := FND_API.G_MISS_NUM,
P_Obstacle_tbl IN AS_OPPORTUNITY_PUB.Obstacle_tbl_type,
X_LEAD_OBSTACLE_out_tbl OUT NOCOPY AS_OPPORTUNITY_PUB.obstacle_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_obstacles';
l_module CONSTANT VARCHAR2(255) := 'as.plsql.lobpv.Delete_obstacles';
SAVEPOINT DELETE_OBSTACLES_PVT;
AS_CALLOUT_PKG.Delete_obstacle_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_Obstacle_Rec => P_Obstacle_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_Obstacle_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_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Calling delete table handler');
AS_LEAD_OBSTACLES_PKG.Delete_Row(
p_LEAD_OBSTACLE_ID => p_Obstacle_tbl(I).LEAD_OBSTACLE_ID);
AS_CALLOUT_PKG.Delete_obstacle_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_Obstacle_Rec => P_Obstacle_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_obstacles;
SELECT 'X'
FROM as_lead_obstacles
WHERE lead_Obstacle_id = c_Lead_Obstacle_Id;
ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
IF (p_LEAD_OBSTACLE_ID is NULL) or (p_LEAD_OBSTACLE_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_OBSTACLE_ID');
SELECT 'X'
FROM as_leads_all
WHERE lead_id = c_Lead_Id;
SELECT 'X'
FROM as_lookups
WHERE lookup_type = c_lookup_type
and lookup_code = c_OBSTACLE_CODE
and enabled_flag = 'Y';