diff --git a/base/mp_copyfolder.sas b/base/mp_copyfolder.sas index 837882b..b53fd37 100644 --- a/base/mp_copyfolder.sas +++ b/base/mp_copyfolder.sas @@ -18,6 +18,9 @@ @param source Unquoted path to the folder to copy from. @param target Unquoted path to the folder to copy to. + @param [in] copymax=(MAX) Set to a positive integer to indicate the level of + subdirectory copy recursion - eg 3, to go `./3/levels/deep`. For unlimited + recursion, set to MAX.

SAS Macros

@li mf_getuniquename.sas @@ -31,7 +34,7 @@ **/ -%macro mp_copyfolder(source,target); +%macro mp_copyfolder(source,target,copymax=MAX); %mp_abort(iftrue=(%mf_isdir(&source)=0) ,mac=&sysmacroname @@ -50,7 +53,7 @@ %let tempds=%mf_getuniquename(); /* recursive directory listing */ - %mp_dirlist(path=&source,outds=work.&tempds, maxdepth=MAX) + %mp_dirlist(path=&source,outds=work.&tempds,maxdepth=©max) /* create folders and copy content */ data _null_;