サブルーチンかDEFを使った関数で エラーが起こった場合にはどうすれば いいでしょうか？