Discussion :

[baime]

* Bonjour, *

Je cherche a faire un in dans une macro mais j'ai toujours une erreur. c'est un soucis de synthaxe ??

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
 
%macro main ;
 
    %if %sysfunc(putn(&dt_jour.,FRADFDWN.)) in ('Lundi','Mercredi') 
    %then 
        %goto fin ;
    %else 
        %do ;
        .
        .
        .
        %end ;
 
    %fin : ;
 
%mend main ;
 
%main ;

J'ai le message d'erreur

Code :

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

1
2
ERROR: Required operator not found in expression: %sysfunc(putn(&dt_jour.,FRADFDWN.)) in ('Lundi','Mercredi')
ERROR: The macro MAIN will stop executing.

Je peux m'en sortir avec des or mais si j'ai une dizaine de valeur dans mon in c'est galére

Code :

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

1
2
 
%if %sysfunc(putn(&dt_jour.,FRADFDWN.)) eq 'Lundi' or %sysfunc(putn(&dt_jour.,FRADFDWN.)) eq 'Mercredi'

Comment faire fonctionner ce IN ???

* Merci *

[olivier.decourt]

Bonjour.
Le IN a été ajouté comme opérateur pour les macro-conditions dans la version 9.0, retiré dans la 9.1 et enfin réintroduit dans la 9.2 (voir comment s'en servir ici : c'est pas léger quand même).
Une alternative : évaluer la condition dans une étape DATA _NULL_, après avoir récupéré la valeur de ta macro-variable via SYMGET. Tu crées (CALL SYMPUTX) une macro-variable CONDITION (par exemple) qui vaut 1 ou 0 selon les cas. Et ensuite tu testes &CONDITION = 1 dans ton %IF.

Code :

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

1
2
3
4
5
6
7
8
DATA _NULL_ ;
  Valeur = LEFT(PUT(INPUT(SYMGET("dt_jour"),6.),FRADFDWN.)) ;
  PUT valeur= ;
  condition=0 ;
  IF valeur IN: ("Lundi","Mercredi") THEN condition=1 ;
  CALL SYMPUTX("condition", condition) ;
RUN ;
%IF &condition=1 %THEN ...

Rien à voir mais remarque en passant : %GOTO fin et une étiquette %FIN: juste avant le %MEND ça marche mais c'est moins explicite que %ABORT;

Bon courage.
Olivier

[baime]

Super merci pour les 2 solutions.

J'ai été faineant je suis allé au plus rapide j'ai rajouté en début comme précisé dans la doc l'option

Code :

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

options minoperator mlogic ;

Je garde l'autre sous le coude pour des cas plus tordu.

Sinon pour ta remarque je remplace le %goto fin;par %abort et j'enléve aussi l'étiquette %fin :; et du coup ça sort proprement de la macro. C'est bien ça ?

[olivier.decourt]

Sinon pour ta remarque je remplace le %goto fin;par %abort et j'enléve aussi l'étiquette %fin :; et du coup ça sort proprement de la macro. C'est bien ça ?

Oui c'est exactement ça. La doc sur %ABORT est ici.