sasjs/core
1
0
Fork 0
mirror of https://github.com/sasjs/core.git synced 2025-12-15 16:14:36 +00:00
Code Issues Projects Releases Wiki Activity

feat: adding new mf_deletefile macro (and test)

Browse Source 
Also, update to mm_spkexport macro
This commit is contained in:
munja
2022-03-11 15:03:59 +00:00
parent 76207c443c
commit 8ffd06343a
4 changed files with 116 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
meta/mm_spkexport.sas
View File

@@ -102,7 +102,7 @@
%let platform_object_path=%mf_loc(POF);
%let ds=%mf_getuniquename(prefix=spkexportable);
%mm_tree(root=%str(&metaloc) ,types=EXPORTABLE ,outds=&ds)
%mm_tree(root=%str(&metaloc),types=EXPORTABLE ,outds=&ds)
%if %mf_isblank(&outref)=1 %then %let outref=%mf_getuniquefileref();
@@ -111,19 +111,27 @@ data _null_;
file &outref lrecl=32767;
length str $32767;
if _n_=1 then do;
put "# Script generated by &sysuserid on %sysfunc(datetime(),datetime19.)";
put "cd ""&platform_object_path"" \";
put "; ./ExportPackage -host &host -port &port -user &mmxuser \";
put " -disableX11 -password &mmxpass \"
put " -disableX11 -password &mmxpass \";
put " -package ""&cmdoutloc/&cmdoutname..spk"" \";
end;
/* exclude particular patterns from the exported SPK */
%if "&excludevars" ne "0" %then %do;
/* ignore top level folder else all subcontent will be exported regardless */
if _n_>1;
%do i=1 %to %sysfunc(countw(&excludevars));
%let var=%scan(&excludevars,&i);
if index(path,symget("&var")) ne 0;
if _n_=1 then do;
length excludestr&i $1000;
retain excludestr&i;
excludestr&i=symget("&var");
putlog excludestr&i=;
putlog path=;
end;
if index(path,cats(excludestr&i))=0 and index(name,cats(excludestr&i))=0;
%end;
/* ignore top level folder else all subcontent will be exported regardless */
if _n_>1;
%end;
str=' -objects '!!cats('"',path,'/',name,"(",publictype,')" \');
put str;