Comparaison des valeurs numériques macro

Essayez d'utiliser best32. Mais pourquoi voulez-vous faire une boucle, lorsque votre ensemble de données est écrasé pour chaque boucle. Veuillez vérifier le journal pour chacune des étapes ci-dessous. Comme à @Reeza dans les commentaires explique ci-dessous, vous ne faites même pas une déclaration d'entrée Options mprint;

   /* do this*/
    %macro fail;
   %let i =15;
    data failcrs;
          set sashelp.class;

          if age lt input(&i, best32.)  then output;
      run;
   %mend fail;

  %fail

   /* dataset overwritten every time to finally pick up 15 as value check in the log*/
   %macro fail1;
   %do i = 1 %to 15;
    data failcrs1;
          set sashelp.class;

          if age lt input(i, best32.) then output;
      run;
  %end;
 %mend fail1;

%fail1

Vous rencontrez quelques problèmes. Les boucles de macro fonctionnent mieux avec les entiers, mais une solution de contournement simple est une boucle% DO% UNTIL à la place.

1. Le nom de% MEND est différent de celui de% MACRO
2. Valeurs non valides pour la boucle% DO% I.

3. Nom de jeu de données non unique, ce qui signifie que la sortie s’écrase elle-même.

   *fake data to work with;  
   data fail;
       do f_p=0 to 0.2 by 0.01;
           output;
       end;
   run;
   
   %macro fail;
       %let i=0;
         %do %until(&i = 0.2); /*2*/
             data failcrs_%sysevalf(&i*100); /*3*/
                 set fail;
                 if f_p>=&i then output;
             run;
             %let i = %sysevalf(&i + 0.05);
         %end;
   %mend fail; /*3*/
   
   *test macro;
   %fail;
   

Les chiffres dans les commentaires correspondent aux problèmes identifiés.

%macro fail;
        %let i=0;
        %do %until(&i = 0.2);
            data failcrs; 
                set crse_grade_dist_fail;
                if f_p>=&i then output;
                run;

        proc sql;
            create table count_failclass as
            select strm, count(class_nbr) as numfclass_%sysevalf(&i*100)
            from failcrs
            group by strm;
        quit;

        proc sql;
            create table failfaculty as
            select strm, instructor_id, instructor, count(class_nbr) as numfclass
            from failcrs
            group by strm, instructor_id, instructor;
        quit;

        proc sql;
            create table count_failfaculty as
            select strm, count(instructor) as numffaculty_%sysevalf(&i*100)
            from failfaculty
        group by strm;
        quit;

        data count_class_faculty;
            set count_class_faculty;
            set count_failclass;
            set count_failfaculty;
        run;

        %let i = %sysevalf(&i + 0.05);
    %end;
%mend fail;
Good thing is my data doesn't have f_p=0, all of them is greater than zero. Because I only want to count failed courses.

Les tests conditionnels en code macro (% if , % jusqu'à , % while , etc.) utilisent % eval () fonction de macro qui ne fait que l'arithmétique entière. Cela inclut les incréments et les tests effectués dans une boucle% do-% to-% by.

Pour utiliser l'arithmétique en virgule flottante, vous devez utiliser la fonction macro % sysvalf () .

%do j=0 %to 20 %by 5 ;
   %let i=%sysevalf(&j/100);
   ...
%end;

%let i=0;
%do %while( %sysevalf( &I <= 0.2 ) );
   ...
   %let i=%sysevalf(&i + 0.05);
%end;

La documentation est écrite pour être lue, une simple recherche de "SAS 9.4 Macro Do" devrait tout expliquer - start, stop et by sont des entiers - des entiers dans le sens où toute expression de macro source à leur place évalue implicitement ou explicitement à un entier au besoin.

La macro que vous avez codée est un peu étrange. Il générera plusieurs étapes de données qui écraseront toutes le même ensemble de données. Vous voudrez peut-être vous concentrer sur le fait de ne pas écrire d'abord le code de macro et de passer à celui-ci lorsque vous devez soumettre un code standard répétitif. Ecrire un bon code de macro signifie que vous devez penser en termes de "cela va-t-il générer un code source approprié et quel effet secondaire auront ces instructions de macro dans leur portée de résolution"

% DOIt. p>

% DO macro-variable = start % TO stop <% BY incrément >;

Instructions en langage texte et macro

<₹%END;

Arguments obligatoires

<^macro-variable