The following lines contain the word 'select', 'insert', 'update' or 'delete':
IF p_Res_rec.last_updated_by_name IS NULL
THEN
l_return_status := FND_API.G_RET_STS_ERROR;
p_token1_value => 'last_updated_by_name');
SELECT 'VALID'
INTO l_dummy
FROM mtl_parameters mp
WHERE mp.organization_id = p_Res_rec.organization_id
AND mp.project_reference_enabled = 1
AND mp.project_control_level = 2;
IF p_Res_rec.last_updated_by IS NOT NULL AND
( p_Res_rec.last_updated_by <>
p_old_Res_rec.last_updated_by OR
p_old_Res_rec.last_updated_by IS NULL )
THEN
IF NOT WIP_Validate.Last_Updated_By(p_Res_rec.last_updated_by) THEN
x_return_status := FND_API.G_RET_STS_ERROR;
IF p_Res_rec.last_updated_by_name IS NOT NULL AND
( p_Res_rec.last_updated_by_name <>
p_old_Res_rec.last_updated_by_name OR
p_old_Res_rec.last_updated_by_name IS NULL )
THEN
IF NOT WIP_Validate.Last_Updated_By_Name(p_Res_rec.last_updated_by_name) THEN
x_return_status := FND_API.G_RET_STS_ERROR;
IF p_Res_rec.last_update_date IS NOT NULL AND
( p_Res_rec.last_update_date <>
p_old_Res_rec.last_update_date OR
p_old_Res_rec.last_update_date IS NULL )
THEN
IF NOT WIP_Validate.Last_Update_Date(p_Res_rec.last_update_date) THEN
x_return_status := FND_API.G_RET_STS_ERROR;
IF p_Res_rec.last_update_login IS NOT NULL AND
( p_Res_rec.last_update_login <>
p_old_Res_rec.last_update_login OR
p_old_Res_rec.last_update_login IS NULL )
THEN
IF NOT WIP_Validate.Last_Update_Login(p_Res_rec.last_update_login) THEN
x_return_status := FND_API.G_RET_STS_ERROR;
IF p_Res_rec.program_update_date IS NOT NULL AND
( p_Res_rec.program_update_date <>
p_old_Res_rec.program_update_date OR
p_old_Res_rec.program_update_date IS NULL )
THEN
IF NOT WIP_Validate.Program_Update_Date(p_Res_rec.program_update_date) THEN
x_return_status := FND_API.G_RET_STS_ERROR;