MIDRANGE dot COM Mailing List Archive



Home » MIDRANGE-L » February 2014

Re: X-LIB LF cause RSTLIBBRM to fail with CPI321E



fixed

On 26-Feb-2014 07:51 -0800, rob@xxxxxxxxx wrote:
I just built a DDS cross library logical and the following didn't
find it:

SELECT SYSTEM_INDEX_NAME, SYSTEM_INDEX_SCHEMA
, SYSTEM_TABLE_NAME, SYSTEM_TABLE_SCHEMA
FROM qsys2.sysindexes
WHERE system_index_schema<>system_table_schema
ORDER BY system_index_schema, system_index_name

And it wasn't found in SYSVIEWS either.

A DDS LF is neither a VIEW nor an INDEX. The SYSINDEXES omits all but DBXATR='IX' and the SYSVIEWS omits all but DBXATR='VW'. Thus a similar query [optionally encapsulated in a VIEW] that includes all LFs [and MQTs] should suffice to effect a similar inquiry about cross-library dependencies from the System Database Cross-Reference Files.

This may help:

DSPFD FILE(ROB/IICL01) TYPE(*MBR) OUTPUT(*OUTFILE) FILEATR(*LF)
OUTFILE(QTEMP/DSPFD)

SELECT MBLIB, MBFILE, MBBOL, MBBOF, MBBOM
FROM qtemp/dspfd
WHERE MBLIB<>MBBOL

Library File Library Physical Member
File
ROB IICL01 ERPLXF IIC IIC

Might need some tweaking for Join LF's...

As I recall, the Join logical files should have the same information whereby there may be multiple rows for any one logical file member; i.e. one row for each referenced\based-on file member.






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

This mailing list archive is Copyright 1997-2014 by MIDRANGE dot COM and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available here. If you have questions about this, please contact