topic Terminating by condition and informing about it in log in SAS Programming

Terminating by condition and informing about it in log

Ninna1 — Sat, 26 Sep 2020 14:45:34 GMT

Hello everyone,

What is wrong here?

%macro HELLO;
%global game;
%let game = 0;
run;
%mend HELLO;
%HELLO;

data out.TV (KEEP=STUDYID DOMAIN VISITNUM VISIT VISITDY ARMCD ARM TVSTRL TVENRL);
	retain STUDYID DOMAIN VISITNUM; 							
	set TV;

		if &game. ne 0 then abort cancel;
		if &game. ne 0 then 
		
		putlog'WARNING: A prior error has occurred or environment is not correctly initialised. WARNING: SDTME_TV_ALL_V01 terminated';

		if &game. eq 0 then
%do;
/*And then the rest of the program follows*/

The task is to terminate the program without output if the global macro variable is not 0, and then write the warning in the log.

I hope you can help me. Iv'e never worked with global macro variable before, or tried to write something in the log.

Best regards,

Re: Terminating by condition and informing about it in log

Kurt_Bremser — Sat, 26 Sep 2020 15:13:31 GMT

You have a %DO in open code:

		if &game. eq 0 then
%do;

Re: Terminating by condition and informing about it in log

jimbarbour — Sun, 27 Sep 2020 02:01:27 GMT

Hello, @Ninna1,

@Kurt_Bremser is quite correct. You cannot have a %do inside of a Data step as part of the Data step logic. I would change your code as shown below.

Comments:

Take the RUN out of your Hello macro. It doesn't belong there.
Create a little macro to abort the program if needed. In my environment, I put this macro in an Autocall library so that all my programs can use it.
Use a macro IF statement to check the macro variable that holds your code (&Game). It's not necessary to put a Macro IF statement inside a %Macro - %Mend structure as of SAS 9.4 M5 (but you must use a %Do - %End, and you cannot nest %IF statements). The macro %IF statement issues the warning and aborts the program before any subsequent code even starts. The data set Out.TV cannot be affected, and your Data step doesn't have a lot of extraneous code in it.
The %BQUOTE protects you if a non-numeric value (or no value at all) is in the macro variable &Game.

%macro HELLO;
    %global game;
    %let game = 0;
%mend HELLO;
%HELLO;

%MACRO  Abort_Pgm;
    %ABORT CANCEL;
%MEND;

%IF  %BQUOTE(&Game) ^= 0  THEN
    %DO;
        %PUT  WARNING: A prior error has occurred or environment is not correctly initialized. ;
        %PUT  WARNING: SDTME_TV_ALL_V01 terminated';
        %Abort_Pgm;
    %END;

data out.TV (KEEP=STUDYID DOMAIN VISITNUM VISIT VISITDY ARMCD ARM TVSTRL TVENRL);
	retain STUDYID DOMAIN VISITNUM; 							
	set TV;
/* the rest of the program follows*/

Regards,

Jim

Re: Terminating by condition and informing about it in log

Ninna1 — Mon, 28 Sep 2020 10:54:07 GMT

Thank you so much!

Re: Terminating by condition and informing about it in log

jimbarbour — Mon, 28 Sep 2020 23:03:41 GMT

You are welcome. Good luck with your program. 🙂

Jim