sasjs/core
1
0
Fork 0
mirror of https://github.com/sasjs/core.git synced 2026-01-10 10:50:04 +00:00
Code Issues Projects Releases Wiki Activity

feat: Adding copymax parameter

Browse Source
This commit is contained in:
Ivor Townsend
2022-05-17 08:53:06 +01:00
parent b31f960635
commit 906f9a139d
1 changed files with 5 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
base/mp_copyfolder.sas
View File

@@ -18,6 +18,9 @@
@param source Unquoted path to the folder to copy from. @param source Unquoted path to the folder to copy from.
@param target Unquoted path to the folder to copy to. @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.
<h4> SAS Macros </h4> <h4> SAS Macros </h4>
@li mf_getuniquename.sas @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) %mp_abort(iftrue=(%mf_isdir(&source)=0)
,mac=&sysmacroname ,mac=&sysmacroname
@@ -50,7 +53,7 @@
%let tempds=%mf_getuniquename(); %let tempds=%mf_getuniquename();
/* recursive directory listing */ /* recursive directory listing */
%mp_dirlist(path=&source,outds=work.&tempds, maxdepth=MAX) %mp_dirlist(path=&source,outds=work.&tempds,maxdepth=&copymax)
/* create folders and copy content */ /* create folders and copy content */
data _null_; data _null_;