The following lines contain the word 'select', 'insert', 'update' or 'delete':
p_LAST_UPDATE_DATE DATE,
p_LAST_UPDATED_BY NUMBER,
p_CREATION_DATE DATE,
p_CREATED_BY NUMBER,
p_LAST_UPDATE_LOGIN NUMBER,
x_prof_color_rec OUT NOCOPY prof_color_Rec_Type
)
IS
BEGIN
x_prof_color_rec.COLOR_CODE := p_COLOR_CODE;
x_prof_color_rec.last_updated_by := p_last_updated_by;
x_prof_color_rec.last_update_date := p_last_update_date;
x_prof_color_rec.last_update_login := p_last_update_login;
p_LAST_UPDATE_DATE IN DATE,
p_LAST_UPDATED_BY IN NUMBER,
p_CREATION_DATE IN DATE,
p_CREATED_BY IN NUMBER,
p_LAST_UPDATE_LOGIN IN NUMBER,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2
)
IS
l_prof_color_rec prof_color_Rec_Type;
p_LAST_UPDATE_DATE => p_LAST_UPDATE_DATE ,
p_LAST_UPDATED_BY=>p_LAST_UPDATED_BY ,
p_CREATION_DATE => p_CREATION_DATE ,
p_CREATED_BY => p_CREATED_BY ,
p_LAST_UPDATE_LOGIN => p_LAST_UPDATE_LOGIN ,
x_prof_color_rec=> l_prof_color_rec );
CSC_COLOR_CODES_PKG.Insert_Row(
px_COLOR_CODE => px_COLOR_CODE,
p_RATING_CODE => P_prof_color_rec.RATING_CODE,
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 => p_prof_color_rec.LAST_UPDATE_LOGIN);
PROCEDURE Update_prof_color_code(
P_Api_Version_Number IN NUMBER,
P_Init_Msg_List IN VARCHAR2 := CSC_CORE_UTILS_PVT.G_FALSE,
P_Commit IN VARCHAR2 := CSC_CORE_UTILS_PVT.G_FALSE,
p_validation_level IN NUMBER := CSC_CORE_UTILS_PVT.G_VALID_LEVEL_FULL,
p_COLOR_CODE IN VARCHAR2,
p_RATING_CODE IN VARCHAR2,
p_LAST_UPDATE_DATE IN DATE,
p_LAST_UPDATED_BY IN NUMBER,
p_CREATION_DATE IN DATE DEFAULT NULL,
p_CREATED_BY IN NUMBER DEFAULT NULL,
p_LAST_UPDATE_LOGIN IN NUMBER,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2
)
IS
l_prof_color_rec prof_color_Rec_Type;
p_LAST_UPDATE_DATE ,
p_LAST_UPDATED_BY ,
p_CREATION_DATE ,
p_CREATED_BY ,
p_LAST_UPDATE_LOGIN ,
l_prof_color_rec );
Update_prof_color_code(
P_Api_Version_Number => P_Api_Version_Number,
P_Init_Msg_List => P_Init_Msg_List,
P_Commit => P_Commit,
p_validation_level => p_validation_level,
P_prof_color_rec => l_prof_color_rec,
X_Return_Status => X_Return_Status,
X_Msg_Count => X_Msg_Count,
X_Msg_Data => X_Msg_Data );
END Update_prof_color_code;
PROCEDURE Update_prof_color_code(
P_Api_Version_Number IN NUMBER,
P_Init_Msg_List IN VARCHAR2 := CSC_CORE_UTILS_PVT.G_FALSE,
P_Commit IN VARCHAR2 := CSC_CORE_UTILS_PVT.G_FALSE,
p_validation_level IN NUMBER := CSC_CORE_UTILS_PVT.G_VALID_LEVEL_FULL,
P_prof_color_rec IN prof_color_Rec_Type,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2
)
IS
Cursor C_Get_prof_color_code(c_RATING_CODE VARCHAR2) IS
Select rowid,
COLOR_CODE,
RATING_CODE,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN
From CSC_COLOR_CODES
Where RATING_CODE = c_RATING_CODE
For Update NOWAIT;
l_api_name CONSTANT VARCHAR2(30) := 'Update_prof_color_code';
SAVEPOINT UPDATE_PROF_COLOR_CODE_PVT;
l_old_prof_color_rec.LAST_UPDATE_DATE,
l_old_prof_color_rec.LAST_UPDATED_BY,
l_old_prof_color_rec.CREATION_DATE,
l_old_prof_color_rec.CREATED_BY,
l_old_prof_color_rec.LAST_UPDATE_LOGIN;
p_validation_mode => CSC_CORE_UTILS_PVT.G_UPDATE,
P_prof_color_rec_type_Rec => P_prof_color_rec,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
CSC_COLOR_CODES_PKG.Update_Row(
p_COLOR_CODE =>csc_core_utils_pvt.Get_G_Miss_Char(p_prof_color_rec.COLOR_CODE,l_old_prof_color_rec.COLOR_CODE),
p_RATING_CODE =>csc_core_utils_pvt.Get_G_Miss_Char(p_prof_color_rec.RATING_CODE,l_old_prof_color_rec.RATING_CODE),
p_LAST_UPDATE_DATE => SYSDATE,
p_LAST_UPDATED_BY => FND_GLOBAL.USER_ID,
p_LAST_UPDATE_LOGIN =>csc_core_utils_pvt.Get_G_Miss_Char(p_prof_color_rec.LAST_UPDATE_LOGIN,l_old_prof_color_rec.LAST_UPDATE_LOGIN));
ROLLBACK TO UPDATE_PROF_COLOR_CODE_PVT;
ROLLBACK TO UPDATE_PROF_COLOR_CODE_PVT;
ROLLBACK TO UPDATE_PROF_COLOR_CODE_PVT;
End Update_prof_color_code;
PROCEDURE Delete_prof_color_code(
P_Api_Version_Number IN NUMBER,
P_Init_Msg_List IN VARCHAR2 := CSC_CORE_UTILS_PVT.G_FALSE,
P_Commit IN VARCHAR2 := CSC_CORE_UTILS_PVT.G_FALSE,
p_validation_level IN NUMBER := CSC_CORE_UTILS_PVT.G_VALID_LEVEL_FULL,
P_COLOR_CODE IN VARCHAR2,
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_prof_color_code';
SAVEPOINT DELETE_PROF_COLOR_CODE_PVT;
CSC_COLOR_CODES_PKG.Delete_Row(
p_COLOR_CODE => p_COLOR_CODE);
ROLLBACK TO DELETE_PROF_COLOR_CODE_PVT;
ROLLBACK TO DELETE_PROF_COLOR_CODE_PVT;
ROLLBACK TO DELETE_PROF_COLOR_CODE_PVT;
End Delete_prof_color_code;
ELSIF(p_validation_mode = CSC_CORE_UTILS_PVT.G_UPDATE)
THEN
-- Hint: Validate data
IF p_COLOR_CODE is not NULL and p_COLOR_CODE <> CSC_CORE_UTILS_PVT.G_MISS_CHAR THEN
-- **********************
-- No Validation for Color codes for now...
-- *********************
NULL;
select null
from csc_lookups
where lookup_type = 'CSC_PROF_RATINGS'
and lookup_code = p_rating_code
and enabled_flag = 'Y'
and trunc(sysdate) between trunc(nvl(start_date_Active,sysdate))
and trunc(nvl(end_date_active,sysdate));
select null
from csc_color_codes
where rating_code = p_rating_code;