I have two command RMVOBJLCKS (Remove Object Locks) and RMVTABLCKS (Remove
Table Locks) that use system API's to find locks and remove them that I
could send you.

Remove Object Locks (RMVOBJLCKS)

Type choices, press Enter.

Object name . . . . . . . . . . Name
Library . . . . . . . . . . . *LIBL Name, *LIBL
Object Type . . . . . . . . . . Character value
Exclude Beginning Names . . . . Character value
+ for more values

Remove Table Locks (RMVTABLCKS)

Type choices, press Enter.

Library name to check . . . . . Name
+ for more values
Exclude Beginning Names . . . . Character value
+ for more values
Exclude Lock States . . . . . . Character value
+ for more values

On Mon, Aug 25, 2014 at 2:50 PM, Stone, Joel <Joel.Stone@xxxxxxxxxx> wrote:

Each evening we bring down all users and run save-while-active on
production files.

Once in a while the save-while-active job cannot get a lock on a file.

After bringing down the online system, we would like to run a job prior to
the save that sends a text message to a few people showing the JOB/lib/file
of any production objects with a lock on them.

This would avoid the scenario where the SAVE job cannot get a lock on each
and every object for a moment.

Is a good method to DSPOBJD to an outfile of all PFs in the lib, and then
RCVF thru the outfile with ???

Would it only be necessary to check PFs? Ie would a LF lock also show
that the underlying PF has a lock?

Then what? ALCOBJ to each object, trying to get a *EXCL lock on it? And
if ALCOBJ fails, then send a text message?

Is there a TAATOOL that will accomplish this? Or maybe a different OS400


This outbound email has been scanned for all viruses by the MessageLabs
Skyscan service.
For more information please visit http://www.symanteccloud.com
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.

This thread ...


Return to Archive home page | Return to MIDRANGE.COM home page