そのエラーは命令が2重定義されているという意味です。 DEF SPCHASE で検索すると2ヶ所ヒットするはずなので、要らない(内容が同じ)のであればもう片方を消せば良いと思います。必要なら名前を変えるとかでとりあえずエラーは出なくなると思います。