×
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.
This needs some work but it does provide some interesting information:
SELECT OBJECT, PROGRAM_NAME, PROGRAM_LIBRARY, MAX(ENTRY_TIMESTAMP) AS
Last_Updated
FROM TABLE (QSYS2.Display_Journal(
JOURNAL_LIBRARY => '#MXJRN',
JOURNAL_NAME => 'BPCS_ALL',
STARTING_TIMESTAMP => TIMESTAMP('2017-01-01-00.00.01'),
STARTING_RECEIVER_NAME => '*CURCHAIN',
OBJECT_LIBRARY => 'ERPLXF',
OBJECT_OBJTYPE => '*FILE'
) ) AS X
GROUP BY OBJECT, PROGRAM_NAME, PROGRAM_LIBRARY
;
http://ibm.biz/DB2foriServices
IDK why I am getting some of these rows, when I thought I selected only
library ERPLXF
OBJECT
QDDSSRC ERPLXUSRS RSE6837718
ALLRCV7213#MXJRN
QDDSSRC ERPLXUSRT AOEH
IIM ERPLXF IIM
KFP ERPLXF KFP
ZQL ERPLXF ZQL
QDDSSRC ERPLXUSRS RSE6837718
ZQWRP ERPLXF ZQWRP
EUP ERPLXF EUP
GJR ERPLXF GJR
QCLSRC ERPLXUSRS COGNOS_SAC
QRPGLESRC ERPLXUSRT SS6106R
AOED ERPLXUSRF
CMF ERPLXF CMF
QRPGLESRC ERPLXUSRT SS5127
AOED ERPLXUSRT AOED
FMA ERPLXF FMA
AOEH ERPLXUSRT AOEH
GLLINED ERPLXUSRF HISTORY
IIM ERPLXF IIM
QRPGLESRC ERPLXUSRT SS6176
EDIWPONH ERPLXUSRF EDIWPONH
Rob Berendt
midrange.com
