Appel d'une marco dans un macro

Bonjour à tous,
J'ai défini une macro qui compte simplement le nombre de valeurs dans une liste. Je voudrais ensuite utiliser ce nombre dans une autre macro. Explications :

Code:

---

1 2 3 4 5 6 7 8 9

/*Cette macro compte simplement le nombre d'éléments dans liste*/ %macro nb_elements(liste); %let i=1; %do %while(%length(%scan(&liste,&i))NE 0); %let i=%eval(&i+1); %end; %let nb=%eval(&i-1); %mend nb_elements;

---

Je voudrais ensuite utiliser cette macro dans dans une autre macro

Code:

---

1 2 3 4 5 6 7 8 9 10

%macro parangons(table,ident,listevar,classe); %let n=%nb_elements(&listevar); %put &n; proc means data=&table mean std; var &listevar; class &classe; output out=moyennes mean=m1-m&n std=sigma1-sigma&n; run; %mend parangons;

---

J'ai fait exprès de mettre le %put pour vérifier que le nombre d'éléments a été bien récupéré.
Mais quand j’exécute la macro parangons :

Code:

---

1 2 3 4 5

%parangons(matable, cle, v1 v2 v3 v4 v5 v6 v7 v8, cluster);

---

Mais j'ai une erreur :

Code:

---

1 2 3

ERREUR: m n'a pas un suffixe numérique. ERREUR: sigma n'a pas un suffixe numérique.

---

Donc il ne me reconnait pas le m. Pourtant dans la première macro je récupère bien le nombre. Je n'arrive pas à comprendre pourquoi.

Merci de votre aide.

Citation:

---

Envoyé par ibrahima13

J'ai fait exprès de mettre le %put pour vérifier que le nombre d'éléments a été bien récupéré.

---

Et a priori ton %PUT n'affiche rien. Car le macro-programme %NB_ELEMENTS compte bien, crée bien en interne une macro-variable &NB qui lui est locale, et quand il a fini de s'exécuter, cette valeur est perdue.
2 solutions sont possibles :
1) soit déclarer &NB comme globale (elle existera même quand %NB_ELEMENTS aura fini de s'exécuter) et l'utiliser ensuite plutôt que &N dans %PARANGONS
2) soit faire de %NB_ELEMENTS une macro-fonctions : c'est ainsi que tu veux l'utiliser mais pour le moment ce n'est pas ce qu'elle fait car elle ne renvoie aucune information.
Comme la solution 2 me semble plus dans le fil de ce que tu as déjà écrit, voilà comment je modifierais %NB_ELEMENTS.

Code:

---

1 2 3 4 5 6 7

%macro nb_elements(liste); %let i=1; %do %while(%length(%scan(&liste,&i))NE 0); %let i=%eval(&i+1); %end; %eval(&i-1); %mend nb_elements;

---

Juste avant le %MEND, on "pousse" une valeur plutôt que de la stocker dans un macro-variable.

Et accessoirement il y a une solution 3 sans utiliser un sous-macro-programme puisque tu peux compter les éléments d'une liste avec la formule

Code:

---

%EVAL(1+%SYSFUNC(COUNTC(&listeVar,%STR( ))))

---

Bon courage.
Olivier

Merci Olivier. :ccool:

Je ne connaissais pas la troisième solution que tu proposes. elle est beaucop plus simple