RE: make cust file look like a journal record - format

Thanks I will give that a try.


-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Roger Harman
Sent: Wednesday, October 03, 2012 5:37 PM
To: 'Midrange Systems Technical Discussion'
Subject: RE: make cust file look like a journal record - format

I think you want QADSPJR5. It's a variable length field - initial
allocation of 100 bytes.


-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Stone, Joel
Sent: Wednesday, October 03, 2012 3:32 PM
To: 'Midrange Systems Technical Discussion'
Subject: RE: make cust file look like a journal record - format

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.

Thanks





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

Ken
Opinions expressed are my own and do not necessarily represent the views of
my employer or anyone in their right mind.
--
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.


________________________________________________________________________
This inbound email has been scanned for all viruses by the MessageLabs
SkyScan service.
________________________________________________________________________

______________________________________________________________________
This outbound email has been scanned for all viruses by the MessageLabs
Skyscan service.
For more information please visit http://www.symanteccloud.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.