IBM OS/2 LAN Server REXX Utility DLL


Inf-HTML [About][Toc][Index] 0.9b (c) 1995 Peter Childs


CopyDirAcls()


This function copies Directory Access Control Profiles specified in the 
source location to the destination location. 
The source directory will be created if it does not exist.   
Syntax 

MyRc = CopyDirAcls(srcDir, destDir)

  
Parameters 
The parameters specified are: 
srcDir            The path to the source directory, which must exist 
destDir           The destination directory 
  
Note 
The function requires that the source directory path exists.   
Example   

/* Copy ACLs from source to destination */

parse arg srcDir destdir

call RxFuncAdd 'LoadLsRxutFuncs', 'LSRXUT', 'LoadLsRxutFuncs'
call LoadLsRxutFuncs

say 'Source:' srcDir
say 'Destination:' destDir

MyRc = CopyDirAcls( srcDir, destDir )
say 'Returncode from CopyDirAcls(srcDir, destDir):' MyRc

call DropLsRxutFuncs
call RxFuncDrop 'LoadLsRxutFuncs'

exit 0

  
Example Output   

Source: D:\APPS\BOOKS
Destination: F:\APPS\BOOKS
Returncode from CopyDirAcls(srcDir, destDir): 0



Inf-HTML End Run - Successful