I have this working pretty well, with one unexplained quirk that I can work 
around.  I have a script containing:

#                                                                               
                   
# $1 - Input MVS dataset name                                                   
                   
# $2 - Output directory                                                         
                   
# $3 - Output file name                                                         
                   
#                                                                               
                   
export TSOALLOC=inmvs:outzfs                                                    
                   
#                                                                               
                   
export inmvs="alloc da('$1') shr"                                               
                   
#                                                                               
                   
export outzfs="alloc path('/u/tzeke/$3') PATHDISP(KEEP,DELETE) 
PATHOPTS(OWRONLY,OCREAT,OEXCL)\     
PATHMODE(SIRUSR,SIWUSR,SIRGRP,SIWGRP,SIROTH,SIWOTH)"                            
                   
#                                                                               
                   
tso -t "OCOPY INDD(INMVS) OUTDD(OUTZFS) TEXT CONVERT(YES) PATHOPTS(USE)"        
                   
#    
...
                                                                                
              
                                                                                
                   
If I look at the file after the OCOPY, permissions are this:

-rw-r--r--   1 DMITCHE  SYS1      281556 Apr  9 12:56 shzbinf

I've tried different combinations of PATHMODEs, and it appears it doesn't let 
me assign update for the group or everyone,  any idea what would be 
interfereing with that?  PATHMODE coded on DD in JCL seems to work just as 
expected....

Dana      

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to