|
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 +---
As an Amazon Associate we earn from qualifying purchases.
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.