The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT 'X' FROM AML_SALES_LEAD_TIMEFRAMES
WHERE decision_timeframe_code = p_timeframe_rec.decision_timeframe_code
AND enabled_flag = 'Y';
AML_SALES_LEAD_TIMEFRAMES_PKG.Insert_Row(
px_TIMEFRAME_ID => x_TIMEFRAME_ID
,p_DECISION_TIMEFRAME_CODE => l_timeframe_rec.DECISION_TIMEFRAME_CODE
,p_TIMEFRAME_DAYS => l_timeframe_rec.TIMEFRAME_DAYS
,p_CREATION_DATE => sysdate --l_timeframe_rec.CREATION_DATE
,p_CREATED_BY => FND_GLOBAL.USER_ID --l_timeframe_rec.CREATED_BY
,p_LAST_UPDATE_DATE => sysdate --l_timeframe_rec.LAST_UPDATE_DATE
,p_LAST_UPDATED_BY => FND_GLOBAL.USER_ID -- l_timeframe_rec.LAST_UPDATED_BY
,p_LAST_UPDATE_LOGIN => FND_GLOBAL.CONC_LOGIN_ID --l_timeframe_rec.LAST_UPDATE_LOGIN
, p_ENABLED_FLAG => NVL(l_timeframe_rec.ENABLED_FLAG, 'N')
);
PROCEDURE Update_timeframe(
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_timeframe_Rec IN AML_TIMEFRAME_PUB.timeframe_Rec_Type,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2
)
IS
/*
Cursor C_Get_timeframe(TIMEFRAME_ID Number) IS
Select rowid,
TIMEFRAME_ID,
DECISION_TIMEFRAME_CODE,
TIMEFRAME_DAYS
From AML_SALES_LEAD_TIMEFRAMES
-- Hint: Developer need to provide Where clause
For Update NOWAIT;
l_api_name CONSTANT VARCHAR2(30) := 'Update_timeframe';
SELECT 'X' FROM AML_SALES_LEAD_TIMEFRAMES
WHERE decision_timeframe_code = p_timeframe_rec.decision_timeframe_code
and timeframe_id <> p_timeframe_rec.timeframe_id
AND enabled_flag = 'Y';
SAVEPOINT UPDATE_TIMEFRAME_PVT;
'Private API: - Open Cursor to Select');
If (l_tar_timeframe_rec.last_update_date is NULL or
l_tar_timeframe_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_timeframe_rec.last_update_date <> l_ref_timeframe_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_decision_timeframe_code => l_tar_timeframe_rec.DECISION_TIMEFRAME_CODE,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
P_Validation_mode => AS_UTILITY_PVT.G_UPDATE,
p_timeframe_days => l_tar_timeframe_rec.timeframe_days,
X_Return_Status => x_return_status,
X_Msg_Count => x_msg_count,
X_Msg_Data => x_msg_data
);
'Private API: Calling update table handler');
AML_SALES_LEAD_TIMEFRAMES_PKG.Update_Row(
p_TIMEFRAME_ID => p_timeframe_rec.TIMEFRAME_ID
,p_DECISION_TIMEFRAME_CODE => p_timeframe_rec.DECISION_TIMEFRAME_CODE
,p_TIMEFRAME_DAYS => p_timeframe_rec.TIMEFRAME_DAYS
,p_CREATION_DATE => p_timeframe_rec.CREATION_DATE
,p_CREATED_BY => p_timeframe_rec.CREATED_BY
,p_LAST_UPDATE_DATE => sysdate
,p_LAST_UPDATED_BY => FND_GLOBAL.user_id
,p_LAST_UPDATE_LOGIN => FND_GLOBAL.CONC_LOGIN_ID --FND_GLOBAL.user_id
, p_ENABLED_FLAG => NVL(p_timeframe_rec.ENABLED_FLAG, 'N')
);
End Update_timeframe;
PROCEDURE Delete_timeframe(
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_timeframe_Rec IN AML_TIMEFRAME_PUB.timeframe_Rec_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_timeframe';
SAVEPOINT DELETE_TIMEFRAME_PVT;
FND_MESSAGE.SET_NAME('AS', 'AS_SEEDED_TIMEFRAME_NO_DELETE');
FND_MESSAGE.SET_NAME('AS', 'AS_ENABLED_TIMEFRAME_NO_DELETE');
'Private API: Calling delete table handler');
AML_SALES_LEAD_TIMEFRAMES_PKG.Delete_Row(
p_TIMEFRAME_ID => p_timeframe_rec.TIMEFRAME_ID);
End Delete_timeframe;
ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
-- Hint: Validate data
-- IF p_TIMEFRAME_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 = X_Lookup_Type
and lookup_code = X_Lookup_Code
-- ffang 012501
and enabled_flag = 'Y';