Re: DSPJRN

Hello David,

The TYPE1 journal outfile format should not have a length value preceding the 
data in the JOESD field.  The 
JOESD field will usually be large enough for the longest record (unless you 
explicitly requested a shorter 
length).  The actual length is calculated by subtracting the fixed length (125) 
from the value in the JO???? 
field.

I have checked this on V3R2 and V3R7 (I don't currently have access to anything 
more recent) and the record 
data always starts in the first position of the JOESD field.

Regards,
Simon Coulter.

//----------------------------------------------------------
// FlyByNight Software         AS/400 Technical Specialists
// Phone: +61 3 9419 0175      Mobile: +61 0411 091 400
// Fax:   +61 3 9419 0175      E-mail: shc@flybynight.com.au
// 
// Windoze should not be open at Warp speed.
 

//--- forwarded letter -------------------------------------------------------
> X-Mailer: Microsoft Internet Mail 4.70.1155
> Date: Tue, 30 Jun 98 18:24:19 -0400
> From: "David Prowak" <prowakd@emi.com>
> To: "midrange list" <midrange-l@midrange.com>
> Reply-To: MIDRANGE-L@midrange.com
> Subject: DSPJRN

> 
> Hi,
> I am building an outfile using DSPJRN to examine
> changes made to a MASTER file.  I use
> OUTFILFMT(*TYPE1)  and   ENTDTALEN(*CALC).
> 
> The resulting outfile has a length = 257 bytes.
> The fixed portion of the journal entry = 125 bytes.
> The variable-length portion for output format  *TYPE1 
> consists of an entry specific data field, JOESD.
> This should contain the before or after image of the rec for
> journal entry code R transactions.
> The length of JOESD = 132 bytes.
> The length of a rec in the MASTER file is 128 bytes.
> How come JOESD takes up the 132 bytes rather
> then 128 bytes?  (I'm guessing that the 4 bytes is
> storing in binary format the length of JOESD, but I couldn't
> find any supporting documentation.)
> TIA

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---