HPE Community read-only access December 15, 2018
This is a maintenance upgrade. You will be able to read articles and posts, but not post or reply.
Hours:
Dec 15, 4:00 am to 10:00 am UTC
Dec 14, 10:00 pm CST to Dec 15, 4:00 am CST
Dec 14, 8:00 pm PST to Dec 15, 2:00 am PST
Operating System - OpenVMS
cancel
Showing results for 
Search instead for 
Did you mean: 

RMS- find record lock and display actual record

 
SOLVED
Go to solution
Layne Burleson_1
Regular Advisor

RMS- find record lock and display actual record

Does anyone have a procedure that will examine an RMS file and report records that are locked and locks that are waiting while displaying the ascii contents of the record in question. I've looked at the RMS freeware pgms called Blocking and Zap and have not found exactly what I need yet
7 REPLIES
David B Sneddon
Honored Contributor

Re: RMS- find record lock and display actual record

Layne,

Try DBS-SCANLOCKS from
http://www.users.bigpond.com/dbsneddon/software.htm
SCAN_FILE_LOCKS is the tool.
This will show you what locks, if any, exist against
the file. As far as the contents of the locked record,
you would have to bypass the locking to get the data.

Regards
Dave
Hein van den Heuvel
Honored Contributor

Re: RMS- find record lock and display actual record

I have mada a varianting on that 'blocking.c' tool which lists all locked records (with data).. but I can not get to it now from my vacation spot.
I'll submit that later...

The ZAP tool (if that is mine) would not help you. It only goes after on-disk indexed file buckets.

The RMS_TOOLS directory was not re-submitted for the V7 kit. It is on V6 and below.

Later,
Hein.
Layne Burleson_1
Regular Advisor

Re: RMS- find record lock and display actual record

Thanks Dave and Hein. I've looked at both the DBS and the BLOCKING programs. I'll look forward to your post, Hein.

Thanks again.
Garry Fruth
Trusted Contributor

Re: RMS- find record lock and display actual record

I have one I wrote; but have not used in a while. I think it works on VMS v6. If I get some time I'll see about making it work with 7.3-2. What version of VMS are you running?

http://home.socal.rr.com/gfruth/vmslock.htm
Please share any updates.
Hein van den Heuvel
Honored Contributor
Solution

Re: RMS- find record lock and display actual record

Ok, now I have access to a work system again.

See how close the attached 'rms_locks.c' program is to what you need....

It currently dumps the first 72 bytes of a record.
It should be a minor modification to function print_filename_and_record to just write the whole record, or put the record into a work file.

Enjoy,
Hein.
Garry Fruth
Trusted Contributor

Re: RMS- find record lock and display actual record

For the record, the program RMS_LOCKS.C from Hein is not the same RMS_LOCKS.C program mentioned in my link. Same name, different program, likely a similar purpose and output.
Layne Burleson_1
Regular Advisor

Re: RMS- find record lock and display actual record

Hein, the rms_locks.c program that you attached worked great!! Thank you very much for taking the time to modify it for me, especially since you were on vacation. Thanks again!!!

Garry, thanks for taking the time to share what you had written.