Thought I would give this a try to look at QAUDJRN.
Select * from table( QSYS2.DISPLAY_JOURNAL('QSYS', 'QAUDJRN')) as AJ
I'm getting a DIPSLAY_JOURNAL IN QSYS2 type *N not found.
I'm on V7R1 with TR11 installed.
Any idea what I might be missing?
Thanks
mike
-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of rob@xxxxxxxxx
Sent: Wednesday, February 17, 2016 10:16 AM
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
Subject: Re: Journal for an order
Then again, there's always another way.
SELECT journal_code, journal_entry_type, object, object_type, X.* FROM TABLE (
QSYS2.Display_Journal(
'#MXJRN', 'BPCS_ALL',
OBJECT_LIBRARY=>'ERPLXF', OBJECT_NAME=>'IIM',
OBJECT_OBJTYPE=>'*FILE', OBJECT_MEMBER=>'IIM'
) ) AS X
ORDER BY entry_timestamp DESC
http://www-01.ibm.com/support/knowledgecenter/ssw_ibm_i_72/rzajq/rzajqudfdisplayjournal.htm?lang=en
The trick is converting ENTRY_DATA from a blob to something useful and parsing it out. This helps with the conversion:
SELECT journal_code, journal_entry_type, object, object_type,
cast(entry_data as char(12000)),X.* FROM TABLE (
QSYS2.Display_Journal(
'#MXJRN', 'BPCS_ALL',
OBJECT_LIBRARY=>'ERPLXF', OBJECT_NAME=>'IIM',
OBJECT_OBJTYPE=>'*FILE', OBJECT_MEMBER=>'IIM'
) ) AS X
ORDER BY entry_timestamp DESC
Rob Berendt
--
IBM Certified System Administrator - IBM i 6.1 Group Dekko Dept 1600 Mail to: 2505 Dekko Drive
Garrett, IN 46738
Ship to: Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com
--
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:
http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at
http://archive.midrange.com/midrange-l.
Please contact support@xxxxxxxxxxxx for any subscription related questions.
NOTICE: This message, including any attachment, is intended as a confidential and privileged communication. If you have received this message in error, or are not the named recipient(s), please immediately notify the sender and delete this message.
midrange.com
