Re: Permissions of IFS file created with QZRUCLSP

Thanks, Mark, for the quick response!  

I'm fairly sure.  Binary value 438 (if we ignore the leftmost two bytes, which I believe are not used anyway) equates to hex 01B6, or binary 0001 1011 0110. . . Expressed as octal values 0 6 6 6.  That's what I want. 

"M. Lazarus" <[email protected]> wrote:

>Dennis,
>
>  Are you sure about the value in:
>
>DCL DD     permission BIN(4) INIT(438)  /* rw-rw-rw- */ ;
>
>  Should it be the ASCII or EBCDIC equivalent?
>
>  -mark
>
>
>At 3/16/2011 03:58 PM, you 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?
>>
>>The all-upper-case labels/names are for convenience of 
>>debugging.  If there is a way to make the debugger work with 
>>mixed-case names, I'd really like to know about it.
>>
>>This is an extract of a much larger source, dummied up to make it 
>>useable for this topic.
>>
>>Thanks,
>>Dennis
>
>_______________________________________________
>This is the MI Programming on the AS400 / iSeries (MI400) mailing list
>To post a message email: MI400-Zwy7GipZuJhWk0Htik3J/[email protected]
>To subscribe, unsubscribe, or change list options,
>visit: http://lists.midrange.com/mailman/listinfo/mi400
>or email: MI400-request-Zwy7GipZuJhWk0Htik3J/[email protected]
>Before posting, please take a moment to review the archives
>at http://archive.midrange.com/mi400.

--  
Sent from my Galaxy tablet phone with with K-9 Mail. Please excuse my brevity.
_______________________________________________
This is the MI Programming on the AS400 / iSeries (MI400) mailing list
To post a message email: MI400-Zwy7GipZuJhWk0Htik3J/[email protected]
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/mi400
or email: MI400-request-Zwy7GipZuJhWk0Htik3J/[email protected]
Before posting, please take a moment to review the archives
at http://archive.midrange.com/mi400.