add procedure ParseUrl