Jointure avec boucle [Résolu]

[damien29]

Bonjour,

J'ai 500 bases de données avec des noms incrémentés et plusieurs autres indépendantes.
Je souhaiterais les joindre en un seul fichier.
Chaque base de données contient un identifiant pays.

J'ai trié toutes les bases de données avant la jointure

Code :

1
2
3
4
5
6
7
8
 
        do num = 1 TO 20 ;
 
	DATA work.Donnees_macro;
	merge work.base_&num (IN = a) Base_brevets (IN = c);
	BY code;
	IF a OR c ;
	run;

J'ai essayé le code ci-dessus mais il me garde que la dernière base de données joint.

Est ce que quelqu'un aurait un idée?

Merci

[MEGAMIND2]

Salut,
Je te propose ce code

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
/* paramètre num=nombre de tables indexées notamment 500*/
 
%MACRO JOINTURE(num=);
 
DATA work.Donnees_macro; 
	MERGE %DO j=1 %TO &num.; work.base_&j.(IN=a) Base_brevets(IN=c) %END;;
	BY code;
	IF a OR c;
RUN;
 
%MEND;
 
%JOINTURE(num=500);

Bon courage!

[s_a_m]

Je crois qu'il faut mettre (in=a&j) puis if a&j or c;

Code :

1
2
3
work.base_&j.(IN=a&j.)....;
BY code;
IF a&j OR c;

Espèrent que damien29 a bien trié toutes tables avec la clé de jointure qui est code ?

[damien29]

Merci beaucoup cela marche très bien

[MEGAMIND2]

@ sam:

J'ai testé le code en remplaçant le OR par AND mais ça ne donne pas le résultat attendu.

Code :

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
27
28
29
30
31
32
33
34
35
36
37
38
39
DATA work.base_1;
input code Y;
cards;
1 78
2 98
3 98
;
run;
DATA work.base_2;
input code Y2;
cards;
1 783
2 986
3 989
;
run;
DATA work.Base_brevets;
input code Y3;
cards;
1 7
2 9
3 9
4 3
;
run;
 
/* paramètre num=nombre de tables indexées notamment 500*/
 
%MACRO JOINTURE(num=);
 
DATA work.Donnees_macro; 
	MERGE %DO j=1 %TO &num.; work.base_&j.(IN=a&j.) Base_brevets(IN=c) %END;;
	BY code;
	IF a&j AND c ;
RUN;
 
%MEND;
 
%JOINTURE(num=2);

[s_a_m]

oui t'as raison et c'est normal, car il fallait inclure le by et le if dans la jointure:

Code :

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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
 
DATA work.base_1;
	input code Y;
	cards;
1 78
2 98
3 98
;
run;
 
DATA work.base_2;
	input code Y2;
	cards;
1 783
2 986
3 989
;
run;
 
DATA work.Base_brevets;
	input code Y3;
	cards;
1 7
2 9
3 9
4 3
;
run;
 
/* paramètre num=nombre de tables indexées notamment 500*/
%MACRO JOINTURE(num=);
 
	DATA work.Donnees_macro;
		%DO j=1 %TO &num.;
			MERGE work.base_&j.(IN=a&j.) work.Base_brevets(IN=c);
			BY code;
 
			IF a&j. AND c;
		%end;
	RUN;
 
%MEND;
 
%JOINTURE(num=2);

[s_a_m]

Pour damien29, il faut utiliser, mais apparemment il a solutionné son problème

Code :

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
27
28
29
30
31
32
33


	
Code  :
        
	
1234567891011121314151617
/* paramètre num=nombre de tables indexées notamment 500*/
 
%MACRO JOINTURE(num=);
 
DATA work.Donnees_macro; 
%DO j=1 %TO &num.; 
 
	MERGE work.base_&j.(IN=a&j.) Base_brevets(IN=c);
	BY code;
 
	IF a&j. OR c;
 %END;
RUN;
 
%MEND;
 
%JOINTURE(num=500);

[MEGAMIND2]

Bien sur qu'il ya le BY Sam, excuses moi si je t'ai reveillé

[s_a_m]

Envoyé par MEGAMIND2

Bien sur qu'il ya le BY Sam, excuses moi si je t'ai reveillé

=====> Presque .

[MEGAMIND2]

Envoyé par s_a_m

=====> Presque .

Soit tu reprends ta sièste, soit tu vas à la machine à potin

[bahraoui]

Envoyé par MEGAMIND2

@ sam:

J'ai testé le code en remplaçant le OR par AND mais ça ne donne pas le résultat attendu.

Code :

Bonjour,
Dans l'exemple ci-dessus, seul deux tables contribuent dans la jointure, la table base_brevets et la base_&j tels que &j égal à num.
Il me semble qu'il manque une boucle après le IF pour que toutes les tables contribuent dans la jointure.
Cordialement

[MEGAMIND2]

J'ai testé avec la boucle mais sans succès. La solution la plus facile est de générer une table SAS à partir d'un fichier Excel contenant le nom de toutes les tables, générer une deuxième colonne: table1(in=a1) table2(in=2),...,table500(in=a500) ainsi qu'une troisième colonne: a1 or a2, ..., or a500 puis stocker tout ça dans 2 macros liste puis les appeler (pas besoin de faire une boucle), mais c'est pas sexy!

[bahraoui]

tu ne peux pas automatiser ce genre de traitement (créer un fichier excel avec 500 lignes...) si le nombre de tables change, tu fais comment?
il faut faire attention à la longueur d'une macro variables...

[MEGAMIND2]

C'est pour ça que j'ai dit que c'est pas sexy

[bahraoui]

Envoyé par MEGAMIND2

J'ai testé avec la boucle mais sans succès. La solution la plus facile est de générer une table SAS à partir d'un fichier Excel contenant le nom de toutes les tables, générer une deuxième colonne: table1(in=a1) table2(in=2),...,table500(in=a500) ainsi qu'une troisième colonne: a1 or a2, ..., or a500 puis stocker tout ça dans 2 macros liste puis les appeler (pas besoin de faire une boucle), mais c'est pas sexy!

tu dis que la boucle ne marhce pas, pourquoi?

[bahraoui]

Code :

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
27
28
29
30
31
32
33
34
35
36
37
38
39
DATA work.base_1;
input code Y;
cards;
1 78
2 98
3 98
;
run;
DATA work.base_2;
input code Y2;
cards;
1 783
2 986
3 989
;
run;
DATA work.Base_brevets;
input code Y3;
cards;
1 7
2 9
3 9
4 3
;
run;
 
/* paramètre num=nombre de tables indexées notamment 500*/
 OPTION mprint;
%MACRO JOINTURE(num=);
 
DATA work.Donnees_macro; 
	MERGE %DO j=1 %TO &num.; work.base_&j.(IN=a&j.)%END; Base_brevets(IN=c) ;
	BY code;
	IF %DO j=1 %TO &num.; a&j AND %end;  c ;
RUN;
 
%MEND;
 
%JOINTURE(num=2);

j'ai modifié un peu ton code

[s_a_m]

Excusez moi,
mais je crois qu'il faut inclure le by code dans la boucle.
@megamed: t'as testé ma solution ?

[MEGAMIND2]

@Sam: Désolé Sam, j'avais pas compris, ça marche nickel!!

[s_a_m]

Envoyé par MEGAMIND2

@Sam: Désolé Sam, j'avais pas compris, ça marche nickel!!

je peux retourner à ma sièste.

[damien29]

J'avais pas vu qu'il me manqué des lignes.

Encore merci