Viewing job/record locks

[Guest.Visitor]

HELP: Has anyone out there written a utility or aware of some available code that allows a locked-out user to view who/what job is locking the record for which they're waiting? Ideally, I'd like to pass in a user name or job number, and have it respond with the name of the user who has the lock.

[Guest.Visitor]

If you are doing this in RPG, when you chain to a file specified as update, use the (e) extender on the chain opcode. If there is an error on the chain, your record is probably locked, then look in the program status data structure positions 91-170 for the error message. From there you should be able to parse out the user and job number.

[Guest.Visitor]

Thanks for the response. Unfortunately, I'm finding that because are files are set at *NOMAX for the record wait parameter on the files, the RPG chain sits there and waits for the record to be released. I can't change the record-wait on the files, because that would put our programs at risk - I don't think they'd properly handle a failure to retrieve the record.