Re: Permissions of IFS file created with QZRUCLSP

On 3/16/11 12:58 PM, Dennis wrote:

Folks, I have posted MI code at
http://code.midrange.com/9176a9360c.html that:
- Deletes file mi-ifs-file.txt from the current directory
- Creates a new file by same name in the current directory
- Writes a line if all successful
- Closes that file

It creates the file just fine, except that there are no permissions
(flags ----------). I am absolutely convinced that this is my error
(I used the same concept in RPG and it worked great), but my eyes
don't see where I might have gone wrong. Would some kind soul mind
steering me in the right direction?

<<SNIP>>

I created an equivalent CALL to the Call Service Program Procedure (QZRUCLSP) API from a CLP to invoke the open procedure in QP0LLIB1 and I got what I infer are the same [at least similar] results creating a file in my directory under /home; i.e. *NONE data authority was the effect. When I changed the oflag mask to include O_INHERITMODE I got the same authorities to both *PUBLIC and to my user\owner as those which were set for my directory under /home. However attempts at changing the permissions mask for the mode parameter in that same CLP saw no change for any of the owner, group, or public data authorities even when passing 0d511. :-(

Regards, Chuck