On Thu, 21 Apr 2016 16:50:20 +0000, Tracy Adams <[email protected]> wrote:

> Yes, I am allowed to su with no complaints 

Ok.  And I saw in another post you confirmed the Reason code (errnojrs) that is 
being displayed back to you (although it doesn't look correct).   Did you
check syslog at the time of the error to see if there are any hints there?

If it were me, I'd probably copy "copytree" and turn on some rexx tracing
also. 

I have used copytree, but I also use this exec (typically in batch) to copy
from one file system (or dir) to another.  It has the "from" and "to" 
directories
hard coded.  Mostly I used this when migrating everything from HFS to zFS
years ago.  I assume it would have the same error, but maybe adding
a TRACE I or TRACE R would confirm you are getting the same reason 
code as displayed in copytree.  



 /* rexx */                                            
 /*=================================*/                 
   fromdir = '/etc/'                                   
   todir   = '/service/'                               
 /*=================================*/                 
   call syscalls 'ON'                                  
   address syscall 'geteuid'                           
   uidval = retval                                     
   say 'Current UID = 'uidval                          
   if uidval <> 0 then do                              
     say 'Attempting to set to UID=0'                  
     address syscall 'setreuid 0 0'                    
   /* address syscall 'seteuid 0' */                   
     uidval2 = retval                                  
     if uidval2 <> 0 then do                           
       say 'Unable to set to UID=0'                    
       exit 12                                         
     end                                               
     Else say 'New UID = 'uidval2                      
   end                                                 
   address syscall 'chdir' fromdir                     
   say 'Copying files from' fromdir 'to' todir         
   call bpxwunix 'pax -rwvCMX -p eW . ' todir          



Best regards,

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS
ITIL v3 Foundation Certified
mailto:[email protected]
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html
Systems Programming expert at http://search390.techtarget.com/ateExperts/
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to