Discussion :

[debutant_sas]

Bonjour à tous!!

Ceci est mon premier message sur le forum et certainement le premier d'une longue liste

Je débute en macro langage

Voici mon problème :

J'ai une table avec des régions j'ai réussi à faire le code pour une région et
j’essaie de généraliser ce code suivant à toutes les régions sans succès!!

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 _null_;
	set donnees.regions;
	call symput ("regions",compress(regions)) ;
	call symput("nb_regions",_N_) ;
	call symput("rep"!!LEFT(_N_),regions);
	call symput ("mv_cle"!!LEFT(_N_),volume_anomalies) ;
run;
 
 
/* Dans cette macro on obtient les anomalies pour la région,les controles et le volume d'anomalies souhaités */
%macro ano_region;
 
%do i=1 %to &nb_regions;
%do j=1 %TO &NBTABLE;
proc sql outobs = &mv_cle ;
create table donnees.&regions%eval(&j) as select * from donnees.Anomalie&j
where RES_REG_LIB = "&&rep&i";
quit;
%end;
%end;
%end;
%mend ;
%ano_region

Quelqu'un pourrait il m'aider ?

Merci d'avance!!

[xav2229]

pour un premier message c'est assez clair.

Tu indique ce que tu cherches a faire et tu postes ce a quoi tu es deja arrivé.

good

mais indique ton problème : erreur ou autre.

[mohamed_]

Bonjour,

Tu pourrais boucler sur les régions. Tu récupères ta liste de région avec une SQL.

Code :

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

1
2
3
4
5
6
7
PROC SQL NOPRINT ;
      SELECT STRIP(regions)
      INTO : listregions SEPARATED BY 'ù'
      FROM donnees.regions ;
QUIT ;
/* Affichage de la valeur des macrovariables */
%PUT &listregions. ;

Puis tu boucles sur ces différentes régions avec un %do %while :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
/* on boucle sur les régions */
	%let i=1;
	%DO %while(%scan(&listregions,&i.,ù) ne );
		%let rep&i.=%scan(&listregions,&i.,ù) ;
 
		proc sql outobs = &mv_cle ;
		CREATE TABLE donnees.&regions%eval(&j) AS 
                                      SELECT * FROM donnees.Anomalie&j
			WHERE RES_REG_LIB = "&&rep&i";
		quit;
		%let i=%eval(&i+1);
	%END;

J'espère que ça va t'aider un peu.