× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Thanks Kevin! I was about to reinvent that wheel. I'll give this a try
next week.

I would still like to see this implemented as a system-defined function.
But this will give me the functionality I need.

- Dan

On Tue, May 24, 2016 at 2:07 PM, Kevin Bucknum <Kevin@xxxxxxxxxxxxxxxxxxx>
wrote:

I was hoping that this would be an excuse to dig into the UDTF that
Birgitta wrote for
https://www.ibm.com/developerworks/ibmi/library/i-power-of-udtf/ but I
couldn't get it to join and return info for each row. I dug out another
little chunk of code from a utility service program, wrapped it as a UDF
and this works.

http://code.midrange.com/5eef431128.html Create the module/service
program/UDF and then just change your sql to:

SELECT A.DBXLIB as SRCPF_LIBR
, A.DBXFIL as SRCPF_NAME
, B.SYSTEM_TABLE_MEMBER as SrcMbrName

, UDFRTVMBRD(A.DBXLIB,A.DBXFIL,B.SYSTEM_TABLE_MEMBER) as SrcMbrDesc

, B.LAST_SOURCE_UPDATE_TIMESTAMP as SRCPF_UDAT
, B.SOURCE_TYPE as SRCPF_SRCTYPE
, b.CREATE_TIMESTAMP as Source_Create_Timestamp
, b.LAST_CHANGE_TIMESTAMP as Source_Type_Text_Change_Timestamp
FROM QSYS.QADBXATR A
, LATERAL
( SELECT * FROM TABLE
( QSYS2.PARTITION_STATISTICS(A.DBXLIB, A.DBXFIL)
) AS X
) AS B
WHERE A.DBXATR = 'PF'
and A.DBXREL = 'Y'
and A.DBXTYP = 'S'
AND B.SOURCE_TYPE IS NOT NULL

Kevin Bucknum
Senior Programmer Analyst


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.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 on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.