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

fix: iftrue parameter for mp_binarycopy. Closes #277

Browse Source
This commit is contained in:
Allan Bowe
2022-07-07 10:28:24 +00:00
parent d97efdff61
commit 899b94bb6e
2 changed files with 10 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
all.sas
View File

@@ -3505,6 +3505,7 @@ run;
@param [in] mode (CREATE) Valid values: @param [in] mode (CREATE) Valid values:
@li CREATE - Create the file (even if it already exists) @li CREATE - Create the file (even if it already exists)
@li APPEND - Append to the file (don't overwrite) @li APPEND - Append to the file (don't overwrite)
@param iftrue= (1=1) Supply a condition for which the macro should be executed
@returns nothing @returns nothing
@@ -3518,8 +3519,12 @@ run;
,inref=____in /* override default to use own filerefs */ ,inref=____in /* override default to use own filerefs */
,outref=____out /* override default to use own filerefs */ ,outref=____out /* override default to use own filerefs */
,mode=CREATE ,mode=CREATE
,iftrue=%str(1=1)
)/*/STORE SOURCE*/; )/*/STORE SOURCE*/;
%local mod; %local mod;
%if not(%eval(%unquote(&iftrue))) %then %return;
%if &mode=APPEND %then %let mod=mod; %if &mode=APPEND %then %let mod=mod;
/* these IN and OUT filerefs can point to anything */ /* these IN and OUT filerefs can point to anything */

5
base/mp_binarycopy.sas
View File

@@ -31,6 +31,7 @@
@param [in] mode (CREATE) Valid values: @param [in] mode (CREATE) Valid values:
@li CREATE - Create the file (even if it already exists) @li CREATE - Create the file (even if it already exists)
@li APPEND - Append to the file (don't overwrite) @li APPEND - Append to the file (don't overwrite)
@param iftrue= (1=1) Supply a condition for which the macro should be executed
@returns nothing @returns nothing
@@ -44,8 +45,12 @@
,inref=____in /* override default to use own filerefs */ ,inref=____in /* override default to use own filerefs */
,outref=____out /* override default to use own filerefs */ ,outref=____out /* override default to use own filerefs */
,mode=CREATE ,mode=CREATE
,iftrue=%str(1=1)
)/*/STORE SOURCE*/; )/*/STORE SOURCE*/;
%local mod; %local mod;
%if not(%eval(%unquote(&iftrue))) %then %return;
%if &mode=APPEND %then %let mod=mod; %if &mode=APPEND %then %let mod=mod;
/* these IN and OUT filerefs can point to anything */ /* these IN and OUT filerefs can point to anything */