_handleerror.sas

Go to the documentation of this file.

 
%MACRO _handleError (i_macroname      
                    ,i_errorcode      
                    ,i_condition      
                    ,i_text           
                    ,i_verbose=0       
                    );

%IF %unquote(&i_condition) %THEN %DO;
   1
   %PUT;
   %PUT --------------------------------------------------------------------------------;
   %PUT ERROR(SASUNIT) &i_errorcode in Makro &i_macroname (Condition: &i_condition);
   %IF "&i_text" NE ""
      %THEN %PUT &i_text;
   %PUT --------------------------------------------------------------------------------;
   %PUT;
   %LET g_error_code = &i_errorcode;
   %LET g_error_msg  = &i_text;
   %LET g_error_macro= &i_macroname;
%END;
%ELSE %DO;
   0
   %IF &i_verbose %THEN %DO;
      %PUT;
      %PUT handleError: OK: &i_errorcode &i_macroname (Condition: &i_condition);
      %PUT;
   %END;
%END;
%MEND _handleError;