topic Re: Conditional iteration - how can I leave the macro at the end? in ODS and Base Reporting

Conditional iteration - how can I leave the macro at the end?

Yoko — Fri, 03 Dec 2021 17:47:36 GMT

I created a macro with iteration of 3000. The first part looks like this:

The last part looks like this (there are more codes between these):

I want to end the iteration at the end if hosp_2more_timeframe1 = 1, and want to keep going if it's not 1.

Does anyone know how to do this?

Thank you,

Yoko

Re: Conditional iteration - how can I leave the macro at the end?

Reeza — Fri, 03 Dec 2021 17:55:24 GMT

Some options:

Create a macro variable to store the value of the hosp_2more_timeframe1.
Change your %DO to a %DO + %WHILE/%UNTIL loop
or add an %IF/%THEN to check if the loop should run and add a %LEAVE

%WHILE
https://documentation.sas.com/doc/en/pgmsascdc/9.4_3.5/mcrolref/p0kqh50asw98oyn18n5motyx4bpz.htm

%UNTIL
https://documentation.sas.com/doc/en/pgmsascdc/9.4_3.5/mcrolref/p1838snxda3yvhn1o0jg6bnv5xyw.htm

%IF/%THEN
https://documentation.sas.com/doc/en/pgmsascdc/9.4_3.5/mcrolref/n18fij8dqsue9pn1lp8436e5mvb7.htm

@Yoko wrote:

I created a macro with iteration of 3000. The first part looks like this:

The last part looks like this (there are more codes between these):

I want to end the iteration at the end if hosp_2more_timeframe1 = 1, and want to keep going if it's not 1.

Does anyone know how to do this?

Thank you,

Yoko

Re: Conditional iteration - how can I leave the macro at the end?

Astounding — Fri, 03 Dec 2021 18:07:12 GMT

Quite similar to @Reeza suggestion:

Add just after the %macro statement:

%let stop = no;

Next, modify this statement:

if hosp_visit_&i >= 2 then hosp_2more_timeframe1=1;

Instead, use:

if hosp_visit_&i >= 2 then do;
   hosp_2more_timeframe1=1;
   call symputx('stop', 'yes');
end;

Finally, just before the %END statement, add a statement:

%if &stop = yes %then %let i=4000;

Re: Conditional iteration - how can I leave the macro at the end?

Tom — Fri, 03 Dec 2021 18:32:07 GMT

A simple way to exit is to use the %GOTO statement.

%macro test(limit);
%local index;
%do index=1 %to 10;
  %put &=index;
  %if &index >= &limit %then %goto quit;
%end;
%put Limit not reached.;
%quit:
%mend test;
%test(limit=5);
%test(limit=15);

It the condition you want to test is based on data then you can use SAS code to generate a macro variable that the macro code can then test.

%do i=1 %to 3000;
...
%let stop=0;
data _null_;
  set ;
  if hosp_2more_timeframe1=1 then call symputx('stop','1');
run;
%if &stop=1 %then %goto quit;
%end;
%quit:
...

Re: Conditional iteration - how can I leave the macro at the end?

Yoko — Fri, 03 Dec 2021 19:19:04 GMT

I tried your method and it worked (I had to add % to 'then' though.). Thank you. Can I ask you one more thing?

I have a section above hosp_2more_timeframe1.

I want the program iterate until it finds ed_2more_timeframe1.

Once ed_2more_timeframe1 is found, it should go to the next section to find hosp_2more_timeframe1.

I do not think the first %if &stop = yes %then %let i = 3000 works.

Do you have any suggestions?

Re: Conditional iteration - how can I leave the macro at the end?

Tom — Fri, 03 Dec 2021 19:42:07 GMT

Change that first %IF to a %IF /%THEN/%DO/%END block around the part the code you want to execute conditionally.

Note that posting photographs of text is silly. It makes it hard to provide a detailed response.