× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Scott,

It's not Kevin's problem. I'm the one with a problem. He was simply posting an example of how it's working as expected for him. My code is basically the same. (Mode actually ends up being 511 for me--I want everything for now. I will eventually trim that back before my code goes to production.) I am also on 7.3

I've opened a CASE with IBM Support.

The authority I end up with on the new folder is

Data --Object Authorities--
User Authority Exist Mgt Alter Ref

*PUBLIC *EXCLUDE
PGMMJQ *NONE X X X X

Thanks,
Michael Quigley
Computer Services
The Way international
www.TheWay.org


-----Original Message-----
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf
Of Scott Klement
Sent: Monday, December 30, 2019 3:42 PM
To: midrange-l@xxxxxxxxxxxxxxxxxx
Subject: Re: mkdir() API and IFS authorities

Kevin,

Thanks for the example. From what you've posted there, you are doing this:

Mode = S_Ixusr // My user profile - *X only
+ S_Iroth + S_Iwoth; // Other (*PUBLIC) *RW Path =
'/kevin/mkdirtest/newfolder' + x'00'; Mkdir(%Addr(Path):Mode);

This code looks like it was written for V3R2 with the manual x'00' and
%addr(). It'd be nice to modernize that a bit to use options(*string), but the
old way still works.

As the comments say, you're asking for your user profile to have *X and the
public to have *RW. in your screenshot that follows the code you show this:

*PUBLIC *RW
KEVIN *X

As far as I can tell, this is exactly what was expected. Can you explain what
the trouble is?

-SK




As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.