topic Re: Need Help writing macro array and transpose statements in SAS Programming

Need Help writing macro array and transpose statements

mishrass — Mon, 08 Aug 2016 11:33:24 GMT

*Working code...;

data test;

set ssh.sshbindicatorstable28jul2016;

run;

proc contents data=test; run;

proc sort data =test;

by hsnum year sex age arhsres: wt: disadvqt denom schpatt sch supptype year: agegrp region

ariaplusc lhd10 phn_2015_code pcode pcoderes indigene;

run;

Data m_mental5 (keep= hsnum year sex age arhsres: wt: disadvqt denom schpatt sch supptype year: agegrp region

ariaplusc lhd10 phn_2015_code pcode pcoderes indigene m_mental5 m_mental5_txt);

set test;

m_mental5_txt_1=m_mental5_1_txt;

m_mental5_txt_2=m_mental5_2_txt;

m_mental5_txt_3=m_mental5_3_txt;

m_mental5_txt_4=m_mental5_4_txt;

m_mental5_txt_5=m_mental5_5_txt;

m_mental5_txt_6=m_mental5_6_txt;

m_mental5_txt_7=m_mental5_7_txt;

m_mental5_txt_8=m_mental5_8_txt;

array a (8) m_mental5_1-m_mental5_8;

array b (8) m_mental5_txt_1-m_mental5_txt_8;

do i=1 to 8;

m_mental5= a(i);

m_mental5_txt=b(i);

if not missing (m_mental5_txt) then output;

end;

run;

*Macro code generating error;

%macro multiresponse (ds=);

Data &ds (keep= hsnum year sex age arhsres: wt: disadvqt denom schpatt sch supptype year: agegrp region

ariaplusc lhd10 phn_2015_code pcode pcoderes indigene &ds &ds._txt);

set test;

%do i=1 %to 8;

&&ds_txt_i=&&ds_i_txt;

%end;

run;

array a (*) &ds_1-&ds_8;

array b (*) &ds._txt_1-&ds._txt_8;

do i=1 to dim(&ds._txt_8)

&ds= a(i);

&ds_txt=b(i);

if not missing (&ds._txt) then output;

run;

end;

%mend;

%multiresponse (ds=m_mental5);

*Also tried using transpose but again generating error;

%macro msh(ds=, vars=);

proc transpose data=test out=&ds (drop=_name_ rename=(_label_=Category Col1=Value));

by hsnum year sex age arhsres: wt: disadvqt denom schpatt sch supptype year: agegrp region

ariaplusc lhd10 phn_2015_code pcode pcoderes indigene;

VAR &vars;

run;

%mend;

%msh(ds=m_mental5, vars=&ds1 &ds2 &ds3 &ds4);

Re: Need Help writing macro array and transpose statements

LinusH — Mon, 08 Aug 2016 11:35:50 GMT

So, what's the error?

Re: Need Help writing macro array and transpose statements

RW9 — Mon, 08 Aug 2016 12:03:13 GMT

Hi,

Lets take a step back. Post some test data:
https://communities.sas.com/t5/SAS-Communities-Library/How-to-create-a-data-step-version-of-your-data-AKA-generate/ta-p/258712

With what you have, and show an example of what you want the output to look like. Most of that code posted there looks to be redundant, but until I see input/output its hard to say.

Re: Need Help writing macro array and transpose statements

Patrick — Mon, 08 Aug 2016 12:29:39 GMT

Everything @LinusH and @RW9 said.

...but what certainly will throw an error is a "run" statement in the middle of a data step

*Macro code generating error;
%macro multiresponse (ds=);
 
Data &ds.....
set test;
.....
run;
array a (*) &ds_1-&ds_8;
.....
run;
end;
%mend;

...oh... and an "end" which is not an "%end" after a "run" statement.

What you probably should do: Make your data step work as a sample outside of a macro and only "macrotize" it once it works.

Re: Need Help writing macro array and transpose statements

mishrass — Mon, 08 Aug 2016 12:44:46 GMT

Thank you.

Re: Need Help writing macro array and transpose statements

Astounding — Mon, 08 Aug 2016 12:52:21 GMT

In addition, note that your definition of the elements in the array A is incorrect. The array B is correct, but A should use similar syntax:

&ds._1 - &ds._2