× 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.


  1.  Home
  2. MIDRANGE-L
  3. April 2023

RE: SQL display_journal

We kind of grew our own journal data converter that's fairly simple.

In SQL you can CREATE TABLE LIKE the DSPJRN output and drop the JOESD field from that copy using ALTER TABLE. This is fast because the LIKE table contains no records.

Then create another file as a join between the previously created copy and the file that you'd like to see the field data on "with no data". Again, no records involved.

Finally, copy the original DSPJRN output onto that 3rd file using FMTOPT(*NOCHK).

-----Original Message-----
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Michael Mayer
Sent: Thursday, April 6, 2023 2:17 PM
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxxxxxxxx>
Subject: RE: SQL display_journal

CAUTION: This email originated from outside of the organization. Do not click links or open attachments unless you recognize the sender and know the content is safe.


Continuing this thread:

I installed Steven’s DMPJRN library on a partition.
Ran the addlible DMPJRN command.

Instead of running Steven’s DMPJRN command which doesn’t have the starting date / time parms, I ran a small sampling of a journaled file using the normal DSPJRN command to an outfile like this:
DSPJRN JRN(abclib/abcjrn) FILE((defdta/def)) RCVRNG(*CURRENT) FROMTIM
E(040623 123000) TOTIME(040623 124500) OUTPUT(*OUTFILE) OUTFILE(DMPJRN/MMJRNTEST)

I then ran his command:
CVTJRNDTA DSPJRNOUTF(DMPJRN/MMJRNTEST) CVTOUTF(DMPJRN/MMJRNTEST1)

Then I used ACS Run SQL Scripts as follows:
select * from dmpjrn.mmjrntest1

And the results were correct. The validation of the SQL the PF were right.



Respectfully,
Michael Mayer
IBM i on Power System Admin
ERMCO-ECI
2225 Industrial Rd
Dyersburg, Tennessee 38024
Office and OnCall: 731.676.4318
Cell: 518.641.8906
Email: michael.mayer@xxxxxxxxxxxxx<mailto:michael.mayer@xxxxxxxxxxxxx>
https://www.ermco-eci.com<https://www.ermco-eci.com/>
IBM i Personal Blog: https://ibmireference.blogspot.com<https://ibmireference.blogspot.com/>
“Success is not final. Failure is not fatal. It is the courage to continue that counts”.


[cid:image001.gif@01D96888.F4A03000]





From: Michael Mayer
Sent: Thursday, April 6, 2023 11:57 AM
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxxxxxxxx>
Subject: RE: SQL display_journal

Thanks Jim. I’m a half way decent IBM i admin. Writing code is not my thing.
Never been good at it except for perhaps my own admin tools every so often.


Respectfully,
Michael Mayer
IBM i on Power System Admin
ERMCO-ECI
2225 Industrial Rd
Dyersburg, Tennessee 38024
Office and OnCall: 731.676.4318
Cell: 518.641.8906
Email: michael.mayer@xxxxxxxxxxxxx<mailto:michael.mayer@xxxxxxxxxxxxx>
https://www.ermco-eci.com<https://www.ermco-eci.com/>
IBM i Personal Blog: https://ibmireference.blogspot.com<https://ibmireference.blogspot.com/>
“Success is not final. Failure is not fatal. It is the courage to continue that counts”.


[cid:image001.gif@01D96888.F4A03000]





From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx<mailto:midrange-l-bounces@xxxxxxxxxxxxxxxxxx>> On Behalf Of Jim Oberholtzer
Sent: Thursday, April 6, 2023 11:53 AM
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxxxxxxxx<mailto:midrange-l@xxxxxxxxxxxxxxxxxx>>
Subject: Re: SQL display_journal

I’m sure if you coded it up, Steven would include it and credit for your contribution.

On Thu, Apr 6, 2023 at 10:55 AM Michael Mayer <michael.mayer@xxxxxxxxxxxxx<mailto:michael.mayer@xxxxxxxxxxxxx>>
wrote:

Thank you Mark.
This is a really nice piece of freeware/shareware.
I installed it on 1 of my LAPR’s yesterday and ran it.
The one disappointment for us is on the DMPJRN command there is no
date/time selection like on the DSPJRN command.

THAT would have made this software REALLY good.

Respectfully,
Michael Mayer
IBM i on Power System Admin
ERMCO-ECI
2225 Industrial Rd
Dyersburg, Tennessee 38024
Office and OnCall: 731.676.4318
Cell: 518.641.8906
Email:
michael.mayer@xxxxxxxxxxxxx<mailto:michael.mayer@xxxxxxxxxxxxx<mailto:
michael.mayer@xxxxxxxxxxxxx%3cmailto:michael.mayer@xxxxxxxxxxxxx>>
https://www.ermco-eci.com<https://www.ermco-eci.com><https://www.ermco
-eci.com/<https://www.ermco-eci.com/>>
IBM i Personal Blog:
https://ibmireference.blogspot.com<https://ibmireference.blogspot.com>
<
https://ibmireference.blogspot.com/<https://ibmireference.blogspot.com
/>> “Success is not final. Failure is not fatal. It is the courage to
continue that counts”.


[cid:image001.gif@01D96872.EE415600]





From: MIDRANGE-L
<midrange-l-bounces@xxxxxxxxxxxxxxxxxx<mailto:midrange-l-bounces@lists
.midrange.com>> On Behalf Of Mark Waterbury
Sent: Wednesday, April 5, 2023 10:12 AM
To: Midrange Systems Technical Discussion
<midrange-l@xxxxxxxxxxxxxxxxxx<mailto:midrange-l@xxxxxxxxxxxxxxxxxx>>
Subject: Re: SQL display_journal

For anyone interested ...

You can read about Steven Wolk's presentation and obtain his published
code here:

https://www.itjungle.com/2013/03/06/fhg030613-story01/<https://www.itj
ungle.com/2013/03/06/fhg030613-story01><
https://www.itjungle.com/2013/03/06/fhg030613-story01<https://www.itju
ngle.com/2013/03/06/fhg030613-story01>>

-- the download link on that page is broken, but can be found here:

https://web.archive.org/web/20160121205605/https://www.itjungle.com/fh
g/fhg030613-story01.zip<https://web.archive.org/web/20160121205605/htt
ps://www.itjungle.com/fhg/fhg030613-story01.zip>
<
https://web.archive.org/web/20160121205605/https://www.itjungle.com/fh
g/fhg030613-story01.zip<https://web.archive.org/web/20160121205605/htt
ps://www.itjungle.com/fhg/fhg030613-story01.zip>


Steven also presented this topic at LISUG -- see:
http://www.lisug.org/lisug_presentation.php?r=48<http://www.lisug.org/
lisug_presentation.php?r=48><
http://www.lisug.org/lisug_presentation.php?r=48<http://www.lisug.org/
lisug_presentation.php?r=48>>

This page has a download for a presentation handout .PDF and code
download .ZIP.

Mark S. Waterbury

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx<mailto<mailto:MIDRANGE-L@xxxxxxxxxxxxxxxxxx%3cmailto>:
MIDRANGE-L@xxxxxxxxxxxxxxxxxx<mailto:MIDRANGE-L@xxxxxxxxxxxxxxxxxx>>
To subscribe, unsubscribe, or change list options,
visit:
https://lists.midrange.com/mailman/listinfo/midrange-l<https://lists.m
idrange.com/mailman/listinfo/midrange-l><
https://lists.midrange.com/mailman/listinfo/midrange-l<https://lists.m
idrange.com/mailman/listinfo/midrange-l>>
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx<mailto<mailto:MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx%3cmailto>:
MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx<mailto:MIDRANGE-L-request@lists.
midrange.com>> Before posting, please take a moment to review the
archives at
https://archive.midrange.com/midrange-l<https://archive.midrange.com/m
idrange-l><
https://archive.midrange.com/midrange-l<https://archive.midrange.com/midrange-l>>.

Please contact support@xxxxxxxxxxxxxxxxxxxx<mailto<mailto:support@xxxxxxxxxxxxxxxxxxxx%3cmailto>:
support@xxxxxxxxxxxxxxxxxxxx<mailto:support@xxxxxxxxxxxxxxxxxxxx>> for any subscription related questions.


The information in this email may be confidential. It is intended only
for the person(s) named above. If you are not the intended recipient,
please notify the sender and do not review, distribute, or duplicate this email.
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list To post a message email:
MIDRANGE-L@xxxxxxxxxxxxxxxxxx<mailto:MIDRANGE-L@xxxxxxxxxxxxxxxxxx>
To subscribe, unsubscribe, or change list options,
visit:
https://lists.midrange.com/mailman/listinfo/midrange-l<https://lists.m
idrange.com/mailman/listinfo/midrange-l>
or email:
MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx<mailto:MIDRANGE-L-request@lists.
midrange.com> Before posting, please take a moment to review the
archives at
https://archive.midrange.com/midrange-l<https://archive.midrange.com/midrange-l>.

Please contact
support@xxxxxxxxxxxxxxxxxxxx<mailto:support@xxxxxxxxxxxxxxxxxxxx> for any subscription related questions.

--

--
Jim Oberholtzer
Chief Technical Architect
Agile Technology Architects
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx<mailto:MIDRANGE-L@xxxxxxxxxxxxxxxxxx>
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l<https://lists.midrange.com/mailman/listinfo/midrange-l>
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx<mailto:MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx>
Before posting, please take a moment to review the archives at https://archive.midrange.com/midrange-l<https://archive.midrange.com/midrange-l>.

Please contact support@xxxxxxxxxxxxxxxxxxxx<mailto:support@xxxxxxxxxxxxxxxxxxxx> for any subscription related questions.


The information in this email may be confidential. It is intended only for the person(s) named above. If you are not the intended recipient, please notify the sender and do not review, distribute, or duplicate this email.
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.


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.