Added create procedure