RE: [External] Find source of object lock?

I believe if you press F6, it will display the hard locks on the object.


-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Justin Taylor
Sent: Monday, February 8, 2021 5:13 PM
To: rpg400-l@xxxxxxxxxxxxxxxxxx
Subject: [External] Find source of object lock?

I have a never-ending program that every few weeks holds an unexpected object lock on a PF. It takes several hours for the user(s) to report the problem, and I can't say for sure when it starts. I've been through the code, but nothing obvious jumps out at me. A 5250 WRKOBJLCK command shows multiple *SHRRD locks for the offending job.

Can anyone offer any suggestions to track this down?
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: https://linkprotect.cudasvc.com/url?a=https%3a%2f%2flists.midrange.com%2fmailman%2flistinfo%2frpg400-l&c=E,1,RhHJpk3Tf_OiWPmHrsHBdTIlElhRGUiujnKZ5IzG2lyNE6SeB01piPeDVu6iyfh8van4X8OHznZBMRgSAUOLFi0Jtn5VHYRQSk-15BNpwyCu0Fr-&typo=1
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at https://linkprotect.cudasvc.com/url?a=https%3a%2f%2farchive.midrange.com%2frpg400-l.&c=E,1,G_-Y1DaHX56frae2bdS0Ynfrfus9PNmCaVgAhGEhKu8zTvQCI6VmyB112EYv3Qyg9dtZKHBaHdZz3wcF3ZiHmq4FfjFMNYOjthSWQOYPDK7rZFUz6g,,&typo=1

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.

Help support https://linkprotect.cudasvc.com/url?a=https%3a%2f%2fmidrange.com&c=E,1,lYtRYYfEbXcqc7i5oyqJqIk9f5UD7w3iBVO1cwu2mvpuAomnz_KzvYQE7umqIvDY-KXU8cQuiO_R4K3dFkIZIfWGZxuu2Pm-GnrOiOid_4IjmwUKIYqwyA,,&typo=1 by shopping at amazon.com with our affiliate link: https://linkprotect.cudasvc.com/url?a=https%3a%2f%2famazon.midrange.com&c=E,1,bKD-TvyMB6Rrwek0vUOwpY2rjAKx9jJKY81xs0yRe2U3u0ujCarMpAfi2j0P1E9qWs8eiFLEVpi5VsstonDNwtfoa2n3KREgT2vv1BO6NWO5w1udR-Vd&typo=1