Create "File In Use" Error on Purpose

[MFisher]

I am using Workato to Insert records to an IBMi file. The other day I got a "File in Use" error during the Insert. No idea why. But I want to put error handling in Workato and test it. How can I intentionally make an IBMi file "In Use" so I can test the error handling ?

Edit. Maybe ALCOBJ will do what I want.

[Vectorspace]

Correct, ALCOBJ OBJ((MYLIB/MYFILE *FILE *EXCL)) from a different job will do that. Note though that that will lock the file for everyone, not just you. DLCOBJ OBJ((MYLIB/MYFILE *FILE *EXCL)) from the same job as ALCOBJ will remove the lock