Re: Problem writing to a IFS file -- RPG400-L


On 21/01/2006, at 10:20 AM, Grizzly Malchow wrote:

StringVal = 'LINE 1                   ';
StringValW = %TrimR(StringVal) + CRLF;
Fd=write(RC2:%addr(stringvalW):%Len(%Trim(stringvalW)));

StringVal = 'LINE 2    ';
StringValW = %TrimR(StringVal) + CRLF;
Fd=write(RC2:%addr(stringvalW):%Len(%Trim(stringvalW)));


Take a really close look at what you are doing here:
        1) You are performing a concatenation using %TRIMR
        2) You are determining the resulting length using %TRIM

thus any line containing leading spaces will be truncated when thewrite() occurs.

If StringValW is not large enough for the trimmed content of StringVal+ 2 bytes (for CRLF) then the result may be missing the CRLF whichwould also cause the effect you observe.

Your example code above will work because the sample data isleft-aligned (and I presume StringValW is large enough) but real datamay not be as forgiving.


Other points:
        a) The code seems confused over the use of RC2 and Fd.

I can't seem to figure out what I'm doing wrong. Any ideas? Would I be
better off using O_TEXTDATA in place of O_CODEPAGE if I was dealingwith
a text file/HTML file?

b) These values aren't alternatives. There is a relationship betweenO_TEXTDATA and O_CODEPAGE. O_TEXTDATA says you are processing the dataas TEXT rather than BINARY. In this case the OS will perform characterconversion using the specified code page if O_CODEPAGE is alsospecified or the code page of the job otherwise. O_CODEPAGE is similarto the later flag O_CCSID except that O_CCSID is better because itprovides a more complete set of conversions. Whether you specifyO_TEXTDATA or not depends on the file content and how you want toprocess it. Given that you are using code page 819 then I presume thedata is text in which case you probably do want to specify O_TEXTDATA.

Note:- If you are creating the file then you will probably need to openthe file once without O_TEXTDATA to create it with the correct codepage (or CCSID), close it, and open it again with O_TEXTDATA to get theOS to do the conversion. Without the double open the OS will expect youto provide the data in the specified code page (or CCSID). On laterreleases (520 and above) you can use the O_TEXT_CREAT flag to get theOS to do the data conversion in one step.


Regards,
Simon Coulter.
--------------------------------------------------------------------
   FlyByNight Software         AS/400 Technical Specialists

   http://www.flybynight.com.au/
   Phone: +61 3 9419 0175   Mobile: +61 0411 091 400        /"\
   Fax:   +61 3 9419 0175                                   \ /
                                                             X
                 ASCII Ribbon campaign against HTML E-Mail  / \
--------------------------------------------------------------------