m.brahim

Bonjour,
Je souhaite partager cette solution avec vous:

Code SAS :

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
 
data test;
 input @1 id $3.
 @5 var $5.;
datalines;
001 acbf
002 abxde
003 12cce
004 abc e
; run;
 
data test1(drop=i ver diff_car
           rename=(diff_car1=diff_car));
		   retain id var ref diff_car;
set test;
length diff_car1 $10.;
retain diff_car1;
by id;
if first.id then do;
diff_car1="";
end;
do i=1 to length(var);
ref='abc';
diff_car=char(var,i);
ver=verify(diff_car,ref);
if diff_car=' ' then diff_car="~";
if ver=1 then diff_car1=catx(',',diff_car1,diff_car);
end ;
run;

Cordialement