Re: Append to IFS File -- RPG400-L

× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.

Hi Stephen,

There isn't a lot of information, here, but... from the symptoms, I'd guess that the length that you're passing to write() (SecondFileSize) is wrong. How are you reading the file and calculating the length?

-SK

On 3/20/19 12:21 PM, Stephen Piland wrote:

I believe I have a CCSID but I'm not sure...

I'm trying to add several smaller IFS files together into one. I build the first one, close it, and it looks good on IFS with CCSID 1208. Next, I build the 2nd IFS file and it looks good one IFS as CCSID 1208.

I try and open the first file (and masterFd=1) using...
masterFd = open(%trim(masterFilename):O_WRONLY+O_CREAT+O_APPEND:1208);

Next I try and write/append the 2nd IFS file but I get junk looking characters (see below), using...
callp write(masterFd:%addr(SecondFilename):SecondFileSize);

{"type":"string1","externalId":"FOOBAR1","description":"FOOBAR description1","description2":"FOOBAR description21","description3":"F
OOBAR description31"} Na a a a a m m K

Thoughts? Thanks!

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.