Re: WG: SQL to IFS wrong CCSID

Hello,

On 10/10/2011 10:53 AM, DeLong, Eric wrote:

// Create an empty file:
callp close( open( lPath + '/' + lFile
: O_WRONLY + O_TRUNC + O_CREAT + O_CCSID
: S_IWUSR + S_IRUSR + S_IRGRP + S_IROTH
: 1252 )
);

Consider making this tiny adjustment to Eric's clever code:

// Create an empty file:
unlink( lPath + '/' + lFile);
callp close( open( lPath + '/' + lFile
: O_WRONLY + O_CREAT + O_CCSID + O_INHERITMODE
: 0
: 1252 )
);

The unlink() deletes the file if it exists. (a CCSID is only assigned when a new file is created.)

O_TRUNC isn't necessary -- that clears an existing file, and I've already told it to delete the existing file.

O_INHERITMODE derives the file's 'mode' (authorites) from that of the directory. Depending on your purpose, this may be a better default than hardcoding -rw-r--r--.