コメントありがとうございます。 御助言いただいた通り、K[I]が使われていませんでした。 SPUSEDを使っていない管理番号を取り除いたところ作動するようになりました。 時間をさいていただき、ありがとうございました。