topic SAS Macro passing multiple variables in Developers

SAS Macro passing multiple variables

gstover — Sat, 23 Jan 2021 00:06:16 GMT

I am trying to create a macro surrounding the following code:

if put(dx1,$oudfmt.) = '1'
then
ED_OUD_flag = 1 ;
else
ED_OUD_flag = 0 ;

I have 87 diagnoses codes and want to create a macro that passes the 87 variables and set my flag based on a format. I have tried numerous things and am a little weary right now, and help is greatly appreciated.

Re: SAS Macro passing multiple variables

SASKiwi — Sat, 23 Jan 2021 01:07:19 GMT

No macro is needed. Use arrays instead:

data want;
  set have;
  array dx (*) dx1 - dx87;
  array ED_OUD_flag (*) ED_OUD_flag1 - ED_OUD_flag87;
  do i = 1 to dim(dx);
   ED_OUD_flag(i) = (put(dx(i),$oudfmt.) = '1');
  end;
run;

Re: SAS Macro passing multiple variables

gstover — Sat, 23 Jan 2021 01:26:44 GMT

Thank you! This works great, however I would like only one ED_OUD_flag, is there a way to do this?

Re: SAS Macro passing multiple variables

SASKiwi — Sat, 23 Jan 2021 01:41:19 GMT

@gstover - So what is your logic then? Do all 87 dx variables have to be equal to 1 to set ED_OUD_flag to 1?

Re: SAS Macro passing multiple variables

gstover — Sat, 23 Jan 2021 01:44:33 GMT

Correct. 1 if it hits the format, or 0 if it's not in the format

Re: SAS Macro passing multiple variables

SASKiwi — Sat, 23 Jan 2021 01:56:08 GMT

Try this (untested):

data want;
  set have;
  array dx (*) dx1 - dx87;
  do i = 1 to dim(dx);
   ED_OUD_flags + (put(dx(i),$oudfmt.) = '1');
  end;
  ED_OUD_flag = (ED_OUD_flags = 87);
run;

Re: SAS Macro passing multiple variables

gstover — Fri, 29 Jan 2021 19:57:56 GMT

Wanted to share my final successful code.

array dx (*) dx1 - dx80;
do i = 1 to dim(dx);
if (put(dx(i),$odfmt.) = '1')
then ED_OD_FLAG = 1 ;

end ;

This worked very well - thank you so much for your help!