sasjs/core
1
0
Fork 0
mirror of https://github.com/sasjs/core.git synced 2026-01-15 20:40:05 +00:00
Code Issues Projects Releases Wiki Activity

fix: reduce logging when debug is off

Browse Source
This commit is contained in:
munja
2022-06-29 20:09:00 +01:00
parent 31702df19b
commit cdf339d077
3 changed files with 9 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
all.sas
View File

@@ -17304,7 +17304,7 @@ data _null_;
cnt=1; cnt=1;
do while (metadata_getnasn(uri,"Notes",cnt,tsuri)>0); do while (metadata_getnasn(uri,"Notes",cnt,tsuri)>0);
rc=metadata_getattr(tsuri,"Name",value); rc=metadata_getattr(tsuri,"Name",value);
put tsuri= value=; &mD.put tsuri= value=;
if value="SourceCode" then do; if value="SourceCode" then do;
/* found it! */ /* found it! */
rc=metadata_getattr(tsuri,"Id",value); rc=metadata_getattr(tsuri,"Id",value);
@@ -18760,7 +18760,9 @@ data _null_;
cnt=1; cnt=1;
do while (metadata_getnasn(uri,"Notes",cnt,tsuri)>0); do while (metadata_getnasn(uri,"Notes",cnt,tsuri)>0);
rc=metadata_getattr(tsuri,"Name",value); rc=metadata_getattr(tsuri,"Name",value);
%if &mdebug=1 %then %do;
put tsuri= value=; put tsuri= value=;
%end;
if value="SourceCode" then do; if value="SourceCode" then do;
/* found it! */ /* found it! */
rc=metadata_getattr(tsuri,"Id",value); rc=metadata_getattr(tsuri,"Id",value);
@@ -18843,7 +18845,8 @@ run;
filename &frefout clear; filename &frefout clear;
%end; %end;
%mend mm_updatestpsourcecode;/** %mend mm_updatestpsourcecode;
/**
@file mm_webout.sas @file mm_webout.sas
@brief Send data to/from SAS Stored Processes @brief Send data to/from SAS Stored Processes
@details This macro should be added to the start of each Stored Process, @details This macro should be added to the start of each Stored Process,

2
meta/mm_getstpcode.sas
View File

@@ -58,7 +58,7 @@ data _null_;
cnt=1; cnt=1;
do while (metadata_getnasn(uri,"Notes",cnt,tsuri)>0); do while (metadata_getnasn(uri,"Notes",cnt,tsuri)>0);
rc=metadata_getattr(tsuri,"Name",value); rc=metadata_getattr(tsuri,"Name",value);
put tsuri= value=; &mD.put tsuri= value=;
if value="SourceCode" then do; if value="SourceCode" then do;
/* found it! */ /* found it! */
rc=metadata_getattr(tsuri,"Id",value); rc=metadata_getattr(tsuri,"Id",value);

4
meta/mm_updatestpsourcecode.sas
View File

@@ -43,7 +43,9 @@ data _null_;
cnt=1; cnt=1;
do while (metadata_getnasn(uri,"Notes",cnt,tsuri)>0); do while (metadata_getnasn(uri,"Notes",cnt,tsuri)>0);
rc=metadata_getattr(tsuri,"Name",value); rc=metadata_getattr(tsuri,"Name",value);
%if &mdebug=1 %then %do;
put tsuri= value=; put tsuri= value=;
%end;
if value="SourceCode" then do; if value="SourceCode" then do;
/* found it! */ /* found it! */
rc=metadata_getattr(tsuri,"Id",value); rc=metadata_getattr(tsuri,"Id",value);
@@ -126,4 +128,4 @@ run;
filename &frefout clear; filename &frefout clear;
%end; %end;
%mend mm_updatestpsourcecode; %mend mm_updatestpsourcecode;