Re: How do I retrieve the RRN of a PF or LF in a RPG program.

Darryl,

If the only thing you "need" the RRN for is to find out the job holding the lock, I think you may be trying to do this "the hard way"...   See this article:

    http://www.as400pro.com/tipView.php?cat=RPG&key=218

Hope that helps,

Mark S. Waterbury





On Tuesday, August 25, 2020, 5:28:26 PM EDT, dfreinkel <dfreinkel@xxxxxxxxxxxxxxxxx> wrote:





Thanks all so far.

The program is a RPG/400 and I cannot find the maximum length of the data
structure. The positions Paul gave return the value 1077952576.

I should be seeing 94.

Maybe what I want to do is not doable. Unfortunately I cannot upgrade the
program to ILE. So here is my problem. I read file in a loop simply using
READ. The first record is locked to another job. I need to be able to get
the RRN of the locked record so that I can retrieve the job details locking
the record and end the job.

I have monitored for the error indicator and that is working. My problem is
getting the RRN.

Thanks


Darryl Freinkel
A4G.
Tel: 770.321.8562 | Cell: 678.355.8562