Actually I would be quite interested in the code. If you wish not to
publicly post it, I understand, but possible you could forward it my
direction directly. I still do quite some work in COBOL and am always
looking to expand my code snippet base of usable routines.


-----Original Message-----
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of
Michael Quigley
Sent: Monday, December 30, 2019 19:31
To: 'Midrange Systems Technical Discussion' <midrange-l@xxxxxxxxxxxxxxxxxx>
Subject: RE: mkdir() API and IFS authorities

Kevin/Scott and others,

Kevin--Yes that's what we're talking about.

Thanks to all who responded.

The issue came down to the requirement for the Mode to be passed by value.
The requirements for the system where this is being run are that this
routine be written in COBOL. (Hence, I haven't posted the sample code as
most on this list wouldn't follow it.)

I added the "BY VALUE" phrase for Mode and now I'm getting the expected
results. I found this before IBM got back to me on the Case (formerly known
as PMR) by searching through previous code working in the IFS.

Thanks for the responses to Kevin and all who responded.

Michael Quigley
Computer Services
The Way international

-----Original Message-----
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of
Kevin Bucknum
Sent: Monday, December 30, 2019 3:54 PM
To: Midrange Systems Technical Discussion <midrange-
Subject: RE: mkdir() API and IFS authorities

Actually your copybook does use the options(*string), but I just
code out off a fix format program and it compiled and worked, so
didn't bother fixing it up. I'm not having the issue. My example is
how it is
for me, which is the way I expect it to, and the way it is documented
It's not working for Michael, and I think he is going to open up a
PMR. My example was just to make sure Michael and I were talking apples to

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


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

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
but the
old way still works.

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


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


On 12/30/2019 1:14 PM, Kevin Bucknum wrote:
I'm in the root file system. I threw together an example of what I'm
just to make sure we are talking about the same things. And I'm on
V7R3 btw.


This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link:

As an Amazon Associate we earn from qualifying purchases.

This thread ...


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

This mailing list archive is Copyright 1997-2022 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.