Re: Help with create file on IFS

[Rory Hewitt <rory.hewitt@xxxxxxxxx>]

What's that "Inherit authority" parameter doing there?

On Tue, Aug 28, 2012 at 10:24 AM, Jeff Young <jyoung0950@xxxxxxxxx> wrote:

> All,
> I have the following code:
>
> FileDs = Open(%Trim(IFS_File_Name) // Path & File Nmae
>
> : O_CREAT + // Create File
>
> O_WRONLY + // Write Only
>
> O_CCSID + // Use Code Page
>
> O_TEXTDATA + // Text Data
>
> O_TEXT_CREAT + // Create File
>
> O_INHERITMODE // Inherit Mode
>
> : 0 // Inherit Authority
>
> : 1252 // PC CCSID
>
> : 0 // Text Create CCSID
>
> );
>
> p_ErrNo = sys_errno;
>
> p_Msg = strerror (errno);
> The file specified in IFS_File_Name did not exist prior to the Open, and
> was created after.
> The varue for Errno which is based on p_ErrNo is 0.
> The value for FileDS is 0.
>
> Since the FileDs value is 0, all of my Write statements complete with no
> error, but no data is written.
>
> What am I missing?
>
> Thanks,
>
> --
> Jeff Young
> Sr. Programmer Analyst
> --
> This is the RPG programming on the IBM i / System i (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.