The ENTDTALEN parameter on DSPJRN specifies how big you want JOESD to be.

It's all there in the online help behind the command :)

Kind Regards
Alan Jordan

RODIN by Coglin Mill | 507.282.4151 x 103 | 507.261.4495 Mobile |
Rochester, Minnesota USA |

From: "Stone, Joel" <Joel.Stone@xxxxxxxxxx>
To: "'Midrange Systems Technical Discussion'"
Date: 10/03/2012 05:31 PM
Subject: RE: make cust file look like a journal record - format
Sent by: midrange-l-bounces@xxxxxxxxxxxx

I am trying to do this. Where can I get a file format of the DSPJRN
*OUTFILE format?

I tried QSYS/QADSPJRN but that has a field JOESD of only 100 bytes long.

Is there a file to join to with a longer JOESD field?

Or do I have to create my own.


-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [
mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Ken Sims
Sent: Tuesday, October 02, 2012 9:52 PM
To: midrange-l@xxxxxxxxxxxx
Subject: Re: make cust file look like a journal record - format

Hi Joel -

On Tue, 2 Oct 2012 20:40:03 +0000, "Stone, Joel"
<Joel.Stone@xxxxxxxxxx> wrote:

Do you know how to have SQL move the entire record format (all columns:
packed, zoned, alpha) into a single field JOESD? (which is where the
journal system stores my CUST record)

How about creating a file with just one field that is as long as the
longest record format that you want to process, then use CPYF with
FMTOPT(*NOCHK) to load it. Then I think you could use SQL against
that file to load your DSPJRN look-alike. No actual journal
processing required.

Opinions expressed are my own and do not necessarily represent the views
of my employer or anyone in their right mind.

This thread ...


Return to Archive home page | Return to MIDRANGE.COM home page