We developed a method to generate a dynamic outfile that can be queried
using some tricks you might say.
You can use dynamic SQL to build a table with every field from the
QADSPJR* outfile template, and "join" the * fields in the outfile you're
interested in journaling. This gives you a file with the usual journal
fields, and then the journal specific entries layed out in the correct
field format. Then you generate the DSPJRN data to a standard outfile,
and use CPYF with FMTOPT(*NOCHK) to copy from the standard outfile to the
custom outfile, described above, to split the fields into a viewable form.
Its not particularly efficient, since you're copying the data after its
generated, but the main time drain is in generating the journal data
anway, so, the inefficiency represents a small percentage of the
generation time.
We've wrapped all this into a command and program series to automate the
whole process.
___________________________________
Darren Strong
Dekko
From: "Bradley Stone" <bvstone@xxxxxxxxx>
To: "Midrange Systems Technical Discussion" <midrange-l@xxxxxxxxxxxx>
Date: 05/30/2018 08:41 AM
Subject: Journaled File Record Display Options?
Sent by: "MIDRANGE-L" <midrange-l-bounces@xxxxxxxxxxxx>
I have a client looking for some software, or an easy way to create an
application, that you can view changes to journaled files. Something like
a side by side view of original, changed, etc, in order of time/date
changed.
Is there anything like that out there, or some new SQL functions that
would
make this an easy to build app? Most likely would be a web app as there
isn't much 5250 real estate for something like this.
This is going to be for specific records in a file (keyed), so there will
be drilling down to find specific sets of data, and then wanting to view
the changes for the record(s) in question.
Think of book editing and wanting to see certain sentence(s) and or
paragraph(s). It's not that, but similar.
Bradley V. Stone
www.bvstools.com
MAILTOOL Benefit #4 <
https://www.bvstools.com/mailtool.html>: Easily add
attachments of any type from the IFS to outgoing emails.
midrange.com
