The following lines contain the word 'select', 'insert', 'update' or 'delete':
Cursor c2 is SELECT iex_strategy_work_items_S.nextval from dual;
IEX_DEBUG_PUB.LogMessage('Create_strategy_work_items: ' || 'Before Calling iex_strategies_pkg.insert_row');
IEX_STRATEGY_WORK_ITEMS_PKG.Insert_Row(
x_rowid =>v_rowid
,x_WORK_ITEM_ID => v_WORK_ITEM_ID
,x_STRATEGY_ID => p_strategy_work_item_rec.STRATEGY_ID
,x_RESOURCE_ID => p_strategy_work_item_rec.RESOURCE_ID
,x_STATUS_CODE => p_strategy_work_item_rec.STATUS_CODE
,x_LAST_UPDATED_BY => FND_GLOBAL.USER_ID
,x_LAST_UPDATE_LOGIN => FND_GLOBAL.CONC_LOGIN_ID
,x_CREATION_DATE => SYSDATE
,x_CREATED_BY => FND_GLOBAL.USER_ID
,x_PROGRAM_ID => p_strategy_work_item_rec.PROGRAM_ID
,x_OBJECT_VERSION_NUMBER => v_OBJECT_VERSION_NUMBER
,x_REQUEST_ID => p_strategy_work_item_rec.REQUEST_ID
,x_LAST_UPDATE_DATE => SYSDATE
,x_WORK_ITEM_TEMPLATE_ID => p_strategy_work_item_rec.WORK_ITEM_TEMPLATE_ID
,x_PROGRAM_APPLICATION_ID => p_strategy_work_item_rec.PROGRAM_APPLICATION_ID
,x_PROGRAM_UPDATE_DATE => p_strategy_work_item_rec.PROGRAM_UPDATE_DATE
,x_EXECUTE_START => p_strategy_work_item_rec.EXECUTE_START
,x_EXECUTE_END => p_strategy_work_item_rec.EXECUTE_END
,x_SCHEDULE_START => p_strategy_work_item_rec.SCHEDULE_START
,x_SCHEDULE_END => p_strategy_work_item_rec.SCHEDULE_END
,x_STRATEGY_TEMP_ID => p_strategy_work_item_rec.STRATEGY_TEMP_ID
,x_WORK_ITEM_ORDER => p_strategy_work_item_rec.WORK_ITEM_ORDER
,x_ESCALATED_YN => p_strategy_work_item_rec.ESCALATED_YN
);
PROCEDURE Update_strategy_work_items(
P_Api_Version_Number IN NUMBER,
P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
P_Commit IN VARCHAR2 := FND_API.G_TRUE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
P_strategy_work_item_Rec IN strategy_work_item_Rec_Type,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2,
XO_OBJECT_VERSION_NUMBER OUT NOCOPY NUMBER
)
IS
/*
Cursor C_Get_strategy_work_items(WORK_ITEM_ID Number) IS
Select rowid,
WORK_ITEM_ID,
STRATEGY_ID,
COMPETENCE_ID,
CATEGORY_TYPE,
RESOURCE_ID,
REQUIRED_YN,
STATUS_CODE,
PRIORITY_ID,
PRE_EXECUTION_WAIT,
POST_EXECUTION_WAIT,
CLOSURE_DATE_LIMIT,
EXECUTE_DATE_LIMIT,
SEEDED_WORKFLOW_YN,
WORKFLOW_ITEM_TYPE,
WORKFLOW_PROCESS_NAME,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
CREATION_DATE,
CREATED_BY,
PROGRAM_ID,
OBJECT_VERSION_NUMBER,
REQUEST_ID,
WORK_TYPE,
LAST_UPDATE_DATE,
WORK_ITEM_TEMPLATE_ID
From IEX_STRATEGY_WORK_ITEMS
-- Hint: Developer need to provide Where clause
For Update NOWAIT;
l_api_name CONSTANT VARCHAR2(200) := 'Update_strategy_work_items';
IEX_DEBUG_PUB.LogMessage ('********* Start of Procedure =>IEX_strategy_work_items_PVT.update_strategy_work_items ******** ');
SAVEPOINT UPDATE_strategy_work_items_PVT;
IEX_STRATEGY_WORK_ITEMS_PKG.Update_Row(
x_WORK_ITEM_ID => p_strategy_work_item_rec.WORK_ITEM_ID
,x_STRATEGY_ID => p_strategy_work_item_rec.STRATEGY_ID
,x_RESOURCE_ID => p_strategy_work_item_rec.RESOURCE_ID
,x_STATUS_CODE => p_strategy_work_item_rec.STATUS_CODE
,x_LAST_UPDATED_BY => FND_GLOBAL.USER_ID
,x_LAST_UPDATE_LOGIN => FND_GLOBAL.CONC_LOGIN_ID
,x_PROGRAM_ID => p_strategy_work_item_rec.PROGRAM_ID
,x_OBJECT_VERSION_NUMBER => l_OBJECT_VERSION_NUMBER +1
,x_REQUEST_ID => p_strategy_work_item_rec.REQUEST_ID
,x_LAST_UPDATE_DATE => SYSDATE
,x_WORK_ITEM_TEMPLATE_ID => p_strategy_work_item_rec.WORK_ITEM_TEMPLATE_ID
,x_PROGRAM_APPLICATION_ID => p_strategy_work_item_rec.PROGRAM_APPLICATION_ID
,x_PROGRAM_UPDATE_DATE => p_strategy_work_item_rec.PROGRAM_UPDATE_DATE
,x_EXECUTE_START => p_strategy_work_item_rec.EXECUTE_START
,x_EXECUTE_END => p_strategy_work_item_rec.EXECUTE_END
,x_SCHEDULE_START => p_strategy_work_item_rec.SCHEDULE_START
,x_SCHEDULE_END => p_strategy_work_item_rec.SCHEDULE_END
,x_STRATEGY_TEMP_ID => p_strategy_work_item_rec.STRATEGY_TEMP_ID
,x_WORK_ITEM_ORDER => p_strategy_work_item_rec.WORK_ITEM_ORDER
,x_ESCALATED_YN => p_strategy_work_item_rec.ESCALATED_YN
);
IEX_DEBUG_PUB.LogMessage('Update_strategy_work_items: ' || 'In VIMPIIIIIIII '||l_work_item_id);
IEX_STRY_UWQ_PVT.Update_uwq_item(
p_api_version => 1.0,
p_init_msg_list => FND_API.G_TRUE,
p_commit => p_commit,
p_work_item_id => p_strategy_work_item_rec.WORK_ITEM_ID,
P_strategy_work_item_Rec => p_strategy_work_item_rec,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data) ;
IEX_DEBUG_PUB.LogMessage('Update_strategy_work_items: ' || 'No Data Found');
IEX_DEBUG_PUB.LogMessage('Update_strategy_work_items: ' || 'Create UwqmProcedure failed');
IEX_DEBUG_PUB.LogMessage('Update_strategy_work_items: ' || 'In if metaphor');
IEX_STRY_UWQ_PVT.Update_uwq_item(
p_api_version => 1.0,
p_init_msg_list => FND_API.G_TRUE,
p_commit => FND_API.G_TRUE,
p_work_item_id => p_strategy_work_item_rec.WORK_ITEM_ID,
P_strategy_work_item_Rec => p_strategy_work_item_rec,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data) ;
IEX_DEBUG_PUB.LogMessage('Update_strategy_work_items: ' || 'In if metaphor');
IEX_DEBUG_PUB.LogMessage ('********* end of Procedure =>IEX_strategy_work_items_PVT.update_strategy_work_items ******** ');
End Update_strategy_work_items;
PROCEDURE Delete_strategy_work_items(
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_WORK_ITEM_ID IN NUMBER,
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_strategy_work_items';
SAVEPOINT DELETE_strategy_work_items_PVT;
IEX_STRATEGY_WORK_ITEMS_PKG.Delete_Row(p_WORK_ITEM_ID);
End Delete_strategy_work_items;