Expert: Concise Systems/Laird Scranton - 5/29/2001

Question
Hello

I got a corrupted file on our AS400, I can
copy off the data fine, but I can't delete the
file itself as the member is not closed. It wants
me to use commit or rollback on it. If I run jobs
against an cpyf version of this file it runs fine,
however it crashes with an array error on the old
object. I need to delete this object (old) and replace it.

Answer
First, I would try to find the job that has the file locked, using the WRKOBJLCK command and if appropriate, cancel that job with the OPTION(*IMMED)parameter.  If nothing turns up with the WRKOBJLCK, then an IPL is probably called for at the earliest opportunity that works for your users.  If there is STILL a lock on the file after an IPL, then this is an issue for IBM.  In any case, the original file should perform just like the copied file unless you are omitting data when you do the CPYF.  You may want to report this to IBM even if you resolve it - a program fix is called for!

Laird Scranton
Concise Systems