Discussion :

[salahsassi]

Bonjour,
j'ai un problème un peu délicat qui me bloque, prenons l'exemple du table ci dessous. En fait mon but est de voir la première colonne du tableau "LB_BO" et si une variable se répète comme "BO_VIE2000" dans l'exemple, je dois parcourir le deux lignes et si je trouve deux cases differentes "OK" et " Bloquant" je garde que la case indiquant le mot "Bloquant" sinon je change Rien.. :/ :/ :/

[Invité]

Bonjour,

Si j'ai bien compris, tu as une table où un identifiant peut apparaître sur plusieurs lignes. Tu veux une table une table où les identifiants n’apparaissent qu'une fois, et dans ce cas, pour des colonnes contenant "bloquant" ou "OK", tu souhaites garder la modalité "bloquant" dès lors qu'elle apparaissait au moins une fois. Ai-je bon ?

Dans ce cas, je propose cela :

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
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
data tableAvecDoublon;
length ident 8 x y $8;
input ident x $ y $;
datalines;
1 OK bloquant
1 bloquant OK
2 bloquant OK
2 bloquant OK
3 OK bloquant
4 bloquant bloquant
5 OK OK
6 OK bloquant
6 bloquant OK
6 OK bloquant
run;
 
proc sort data=tableAVecDoublon; by ident; run;
data tableSansDoublon;
	set tableAVecDoublon;
	by ident;
 
	array ar_var[*] $ /* liste des colonnes qu on va regarder */ x y ;
	array ar_lag [2/* autant que ar_var */] $ _temporary_ ;
	array ar_final [2 /* autant que ar_var */]$ _temporary_ ;
 
	do i = 1 to dim(ar_var);
		ar_lag(i) = lag(ar_var(i));
	end;
 
	if first.ident then do;
		do i = 1 to dim(ar_var);
			ar_final(i) = ar_var(i);
		end;
	end;
	else do;
		do i = 1 to dim(ar_var);
			if ar_var(i) = "bloquant" then ar_final(i)="bloquant";
			else ar_final(i) = ar_lag(i);
		end;
	end;
 
	if last.ident then do;
		do i = 1 to dim(ar_var);
			ar_var(i) = ar_final(i);
		end;
		drop i;
		output;
	end;
run;

[salahsassi]

Bonjour,
Oui exactement ça, Merci beaucoup

[Invité]

Désolé, il y a une erreur dans mon programme. Il faut supprimer la ligne 38 :

Code :

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

else ar_final(i) = ar_lag(i);