sasjs/core
1
0
Fork 0
mirror of https://github.com/sasjs/core.git synced 2025-12-11 06:24:35 +00:00
Code Issues Projects Releases Wiki Activity

fix: adding cond/endcond to mp_ds2cards

Browse Source
This commit is contained in:
munja
2022-04-13 21:32:47 +01:00
parent 8eb495890d
commit 26623ba085
3 changed files with 15 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
all.sas
View File

@@ -4545,6 +4545,7 @@ drop table &out_ds;
@version 9.2
@author Allan Bowe
@cond
**/
%macro mp_ds2cards(base_ds=, tgt_ds=
@@ -4716,7 +4717,8 @@ data _null_;
put ' @file';
put " @brief Datalines for %upcase(%scan(&base_ds,2)) dataset";
put " @details Generated by %nrstr(%%)mp_ds2cards()";
put " Available on github.com/sasjs/core";
put " Source: https://github.com/sasjs/core";
put ' @cond ';
put '**/';
put "data &tgt_ds &indexes;";
put "attrib ";
@@ -4761,6 +4763,7 @@ data _null_;
if __lastobs then do;
put ';;;;';
put 'run;';
put '/** @endcond **/';
stop;
end;
run;
@@ -4780,7 +4783,9 @@ quit;
%put NOTE-;%put NOTE-;
%put NOTE- %sysfunc(dequote(&cards_file.));
%put NOTE-;%put NOTE-;
%mend mp_ds2cards;/**
%mend mp_ds2cards;
/** @endcond **/
/**
@file
@brief Export a dataset to a CSV file WITH leading blanks
@details Export a dataset to a file or fileref, retaining leading blanks.
@@ -19149,7 +19154,7 @@ run;
%end;
%mend ms_runstp;/**
@file
@brief Send data to/from @sasjs/server
@brief Send data to/from sasjs/server
@details This macro should be added to the start of each web service,
**immediately** followed by a call to:

6
base/mp_ds2cards.sas
View File

@@ -48,6 +48,7 @@
@version 9.2
@author Allan Bowe
@cond
**/
%macro mp_ds2cards(base_ds=, tgt_ds=
@@ -219,7 +220,8 @@ data _null_;
put ' @file';
put " @brief Datalines for %upcase(%scan(&base_ds,2)) dataset";
put " @details Generated by %nrstr(%%)mp_ds2cards()";
put " Available on github.com/sasjs/core";
put " Source: https://github.com/sasjs/core";
put ' @cond ';
put '**/';
put "data &tgt_ds &indexes;";
put "attrib ";
@@ -264,6 +266,7 @@ data _null_;
if __lastobs then do;
put ';;;;';
put 'run;';
put '/** @endcond **/';
stop;
end;
run;
@@ -284,3 +287,4 @@ quit;
%put NOTE- %sysfunc(dequote(&cards_file.));
%put NOTE-;%put NOTE-;
%mend mp_ds2cards;
/** @endcond **/

2
server/ms_webout.sas
View File

@@ -1,6 +1,6 @@
/**
@file
@brief Send data to/from @sasjs/server
@brief Send data to/from sasjs/server
@details This macro should be added to the start of each web service,
**immediately** followed by a call to: