Discussion :

[JeromeMATHIAS]

Bonjour,

je viens de bloquer quelques heures sur un problème de macro code que j'ai finalement pu résoudre avec l'aide d'un collègue.

Voici le code écrit au départ et qui ne marche pas (à tester !!)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
data a; adr1='92000 chatillon';adr2='BE10001 BRUXELLES';adr3='10500 BERLIN';run;
 
%macro cherche_CP (DATA=,OUT=,Var=ADR1 ADR2 ADR3);
 
%LET nbvar=%SYSFUNC(COUNTW(&var));
 
%DO I=1 %TO &nbvar ;
%LET mot&i=%QSCAN(&var,&i,%STR( ));
%END;
 
%IF &OUT= %THEN %LET OUT=&DATA ;
 
DATA a ;
SET &DATA;
 
 
%DO I=1 %TO &nbvar;
_&&mot&i=&&mot&i;
%END;
 
RUN;
%mend;
 
 
%cherche_cp(data=a,out=,var=adr1 adr2 adr3);run;

et voici le code qui marche

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
data a; adr1='92000 chatillon';adr2='BE10001 BRUXELLES';adr3='10500 BERLIN';run;
 
%macro cherche_CP (DATA=,OUT=,Var=ADR1 ADR2 ADR3);
 
%LET nbvar=%SYSFUNC(COUNTW(&var));
 
%DO I=1 %TO &nbvar ;
%LET mot&i=%QSCAN(&var,&i,%STR( ));
%END;
 
%IF &OUT= %THEN %LET OUT=&DATA ;
 
DATA a ;
SET &DATA;
 
 
%DO I=1 %TO &nbvar;
_%SYSFUNC(COMPRESS(&&mot&i))=&&mot&i;
%END;
 
RUN;
%mend;
 
 
%cherche_cp(data=a,out=,var=adr1 adr2 adr3);run;

...

la différence ? une seule ligne

_&&mot&i=&&mot&i; dans le premier code remplacé par _%SYSFUNC(COMPRESS(&&mot&i))=&&mot&i; dans le second...

ce qui me gêne ? C'est que j'ai l'impression d'avoir écrit des dizaines de fois un code similaire au premier sans avoir de problèmes... Au delà de cette impression, je ne comprend pas ce qui cause le malaise au macro code au point qu'on doivent encapsuler le &&mot&i dans %sysfunc(compress( )) alors que dans le second membre (qui est quasi la même chose... :S ) on en a pas besoin...

Qui a des idées sur la nature des problèmes rencontré par l'interprétateur du macro code ou sur ce qui pose problème dans ce code ?

Merci.

[suistrop]

Bonjour,

Je pense que c'est à cause de l'utilisation de QSCAN qui garde tout les trucs "bizzares" que la fonction rencontre. En utilisant SCAN ca fonctionne.

Dans ton code qui ne fonctionne pas, si tu fais afficher les variables :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 %put _LOCAL_ ;

On obtient :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
CHERCHE_CP MOT1 adr1
CHERCHE_CP MOT2 adr2
CHERCHE_CP MOT3 adr3

Avec des gros "carrés".


Question annexe : quel est l'interet d'utiliser %STR( ) plutot que " ".

Merci à vous

Cordialement,

[JeromeMATHIAS]

Bonjour,
très bien pour cette résolution du problème !
Même si au final je ne vois pas d'où viennent les caractères bizarres récupérés par la QSCAN... et encore moins pourquoi au final ça marche à droite et pas à gauche dans l'expression _&&mot&i=&&mot&iQuand à %STR( ) j'ai repris ça dans un code existant sans trop y réfléchir, ça semblait juste faire ce que je voulais...

Je prend ta solution ça m'évitera d'alourdir de %sysfunc(compress()) un peu partout le code chaque fois qu'aurait pu survenir de nouveau ce problème.

Merci !

[JeromeMATHIAS]

Pour te répondre complètement, je me suis basé sur le code présenté ici

http://support.sas.com/kb/26/152.html

, et un peu détourné de son utilisation initiale. Voici le pourquoi de mon utilisation de %QSCAN et de %STR( ).