RE: Determine if a uniquely keyed logical exists for a given physical

Charles,

Here is an SQL that you can run to find unique keys for a PF.

Select dbflib, dbffil from qadxref
join   qadbfdep  on dbxfil = dbffil
Where dbxlib = 'yourlib' and dbxfil = 'your_pf' and dbxunq = 'U'

I am not currently attached to an AS400 to verify this but it should work
for you.  It will return the name of all dependent logicals over
YourLib/your_pf with a unique key in any library.

Don Tully
Tully Consulting LLC


>>
I've got a physical file that was defined without a unique key.

Is there some way to tell if some logical over that physical has a unique
key?

Of course I could always do it the hard way:
1) Look at the source or the DSPFD output for every logical
2) Try to write some duplicate records.

But I'm wondering if there's someplace on the system that tracks if a
physical file has some unique key defined somewhere.

Thanks,


Charles Wilt
iSeries Systems Administrator / Developer
Mitsubishi Electric Automotive America
ph: 513-573-4343
fax: 513-398-1121