Removed old unused procedure