In order to find cross attached logical files and indexes that are in other
libraries from the table/physical for a specific library:
/* Produce a list of all physical files */
DSPFD FILE(&LIB/*ALL) TYPE(*ATR) OUTPUT(*OUTFILE) +
FILEATR(*PF) OUTFILE(QTEMP/QAFDPHY)
/* Produce a list of all of the logical files */
OVRDBF FILE(QAFDPHY) TOFILE(QTEMP/QAFDPHY)
READLOOP:
RCVF
MONMSG MSGID(CPF0864) EXEC(GOTO CMDLBL(CHKLST))
DSPDBR FILE(&PHLIB/&PHFILE) OUTPUT(*OUTFILE) +
OUTFILE(QTEMP/QADSPDBR) OUTMBR(*FIRST *ADD)
MONMSG MSGID(CPF3012)
GOTO CMDLBL(READLOOP)
The file QADSPDBR in QTEMP will have a list of all the physical and logical
files for a given library. Clearly just add a wrapper that call this for
each library you need to look at and your done.
I'm guessing you could get it from the QSYS2 library and the SQL services as
well but I've not developed a tool for that. Maybe Rob has one.
--
Jim Oberholtzer
Agile Technology Architects
-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of T.
Adair
Sent: Wednesday, March 28, 2018 2:33 PM
To: midrange-l@xxxxxxxxxxxx
Subject: LF in different library
Several years ago, I had a command that I would use to find PF vs. LF
library mismatches. I would give it a library name and, depending on the
other parms, it would show me either...:
PFs in that library that had LFs in other libraries.
- or -
LFs in that library that had their PFs in other libraries.
It may have been a system command, or it could've been a user-written
utility. I really don't remember (old age, and all that). Whatever it is
(or was), I can't seem to locate any info on it. I suppose it could've been
a TAATOOL.
Is this ringing a bell with anyone else?
Thanks.
~TA~
--
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:
https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at
https://archive.midrange.com/midrange-l.
Please contact support@xxxxxxxxxxxx for any subscription related questions.
Help support midrange.com by shopping at amazon.com with our affiliate link:
http://amzn.to/2dEadiD
midrange.com
