Discussion :

[juliep]

Bonjour,

Quelqu'un peut-il m'expliquer pourquoi le code ci-dessous ne fonctionne pas ?

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
%macro essai; 
 
    %let a=1.0000; 
    %let b=-1.4512;
 
    %if (&a) > 0 %then %put "a positif" ; 
    %else %put "a negatif"; 
 
    %if (&b) > 0 %then %put "b positif" ; 
    %else %put "b negatif"; 
 
 
%mend essai; 
 
%essai;

J'ai essayé d'utiliser un %eval / %sysevalf. J'arrive à avoir un résultat pour a qui est positif, mais le fait que b soit négatif créé une erreur.
Voici l'erreur obtenue :

"a positif"

ERROR: A character operand was found in the %EVAL function or %IF condition where a numeric
operand is required. The condition was: (&b) > 0
ERROR: The macro ESSAI will stop executing.

Merci beaucoup de votre aide.

[hossward]

Bonjour,
Vous devez utiliser la fonction SYSEVALF% pour évaluer les expressions logiques contenant la virgule flottante pour les valeurs des deux macros. Voici votre code rectifié et ça va marcher.

Code :

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

1
2
3
4
5
6
7
8
9
10
 
%macro essai;
%let a=1.0000;
%let b=-1.4512;
%if %sysevalf(&a > 0) %then %put "a positif" ;
%else %put "a negatif";
 
%if %sysevalf(&b > 0) %then %put "b positif" ;
%else %put "b negatif";
%mend essai;	%essai;

Cordialement
Ward

[juliep]

Bonjour,
C'est nickel !
Merci beaucoup pour votre retour rapide.