The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Update_Target_Level
( p_api_version IN NUMBER
, p_commit IN VARCHAR2 := FND_API.G_FALSE
, p_Target_Level_Rec IN BIS_Target_Level_PUB.Target_Level_Rec_Type
, x_return_status OUT NOCOPY VARCHAR2
, x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
)
IS
l_Target_Level_Rec BIS_Target_Level_PUB.Target_Level_Rec_Type;
BIS_Target_Level_PVT.Update_Target_Level
( p_api_version => p_api_version
, p_commit => p_commit
, p_Target_Level_Rec => l_Target_Level_Rec
, p_owner => BIS_UTILITIES_PUB.G_CUSTOM_OWNER
, x_return_status => x_return_status
, x_error_Tbl => x_error_Tbl
);
, p_error_proc_name => G_PKG_NAME||'.Update_Target_Level'
, p_error_table => l_error_tbl
, x_error_table => x_error_tbl
);
END Update_Target_Level;
PROCEDURE Delete_Target_Level
( p_api_version IN NUMBER
, p_commit IN VARCHAR2 := FND_API.G_FALSE
, p_Target_Level_Rec IN BIS_Target_Level_PUB.Target_Level_Rec_Type
, x_return_status OUT NOCOPY VARCHAR2
, x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
)
IS
l_Target_Level_Rec BIS_Target_Level_PUB.Target_Level_Rec_Type;
BIS_Target_Level_PVT.Delete_Target_Level
( p_api_version => p_api_version
, p_commit => p_commit
, p_Target_Level_Rec => l_Target_Level_Rec
, x_return_status => x_return_status
, x_error_Tbl => x_error_Tbl
);
, p_error_proc_name => G_PKG_NAME||'.Delete_Target_Level'
, p_error_table => l_error_tbl
, x_error_table => x_error_tbl
);
END Delete_Target_Level;
select user_id into x_user_id
from fnd_user where user_name = p_user_name
and start_date <= sysdate
and NVL(end_date,sysdate) >= sysdate;
BIS_TARGET_LEVEL_PVT.Update_Target_Level
( p_api_version => p_api_version
, p_commit => p_commit
, p_validation_level => p_validation_level
, p_Target_Level_Rec => l_Target_Level_Rec
, p_owner => p_owner
, p_up_loaded => p_up_loaded
, x_return_status => x_return_status
, x_error_Tbl => x_error_Tbl
);