Discussion :

[R87Jerem]

Bonjour,

je voudrais créer une macro fonction appelée ma_macro, qui afficherait les informations suivantes :
nom_client,ancienneté, catégorie, statut seulement si le client est un bon payeur ("good" dans ma variable "score"), sinon, je voudrais voir apparaître "mauvais payeur".
le data set se nomme data_client.

le paramètre de ma_macro devra être le nom_client.

Voilà ce que je fais, mais cela ne fonctionne pas ( je sais cela doit être truffé d'erreurs c'est ma première):

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
%macro ma_macro;
%if &score.="good" %then %do;
proc print data = &data_client. (nom_client,anciennete ,catégorie,statut);
run;
%end
%else %do;
proc print data= "mauvais payeur";
run;
%end;
%mend evaluation

merci pour votre aide.

[R87Jerem]

Pas de réponse ? Est-ce que mon message manque de clarté ? il me ferait plaisir de le refaire si c'est le cas.

[JQuem]

Je ne vois pas bien l'intérêt d'utiliser le macro-langage pour votre cas. Pourquoi ne pas simplement utiliser un datastep ou une proc sql?

[jlp65]

Bonjour,

Je ne vois pas bien l'intérêt d'utiliser le macro-langage pour votre cas. Pourquoi ne pas simplement utiliser un datastep ou une proc sql?

Tout à fait d'accord ! L'usage d'une macro ne s'impose pas ici, a priori.
Voici un code qui fait ce que vous cherchez : le calcul du message à afficher se fait à l'intérieur d'une étape data

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
 
data table_clients;
	nom_client = "Dudule";
	anciennete = 6 ;
	categorie = "cat. A";
	statut = "statut B";
	score = "good";
	output;
	nom_client = "Martin";
	anciennete = 4 ;
	categorie = "cat. X";
	statut = "statut Y";
	score = "bad";
	output;
run;
proc print data = table_clients;title Table initiale;run;
data table_clients;
	/*length a_ecrire $ 200 ;*/
	set table_clients;
	if score = "good" then a_ecrire = nom_client !! " : " !! anciennete !!  " " !! categorie !!  " " !! statut ;
	else a_ecrire = nom_client !! " : " !! "Mauvais payeur";
run;
proc print data = table_clients noobs;var a_ecrire;title Résultat final;run;
title; /* pour supprimer les titres */