Re: Append to IFS File

[Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx>]

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!