Dedoubler une colonne [Résolu]

[lalodev]

Bonjour,

Je dispose de variable constituées de 2, 3 ou 4 variables.
Le séparateur est +.
J'utilise les fonctions Scan et count sans soucis pour les extraire.
Mais je voudrais les extraire en créant une nouvelle ligne (et pas une nouvelle variable).

Ma table contiend 3 types de donnees :
Nom; date; Var1;
Titi; 01/01/2009; A+B
Toto; 03/02/2010; A+C
Tata; 05/02/2009;B+C

Ce que je voudrai obtenir c'est :
Nom; date; Var1;
Titi; 01/01/2009; A
Titi; 01/01/2009; B
Toto; 03/02/2010; A
Toto; 03/02/2010; C
Tata; 05/02/2009;B
Tata; 05/02/2009;C

Je pense qu'il faudrait que j'insère des OUTPUT au bon endroit mais ça ne passe pas.

Code :

1
2
3
4
5
6
7
8
9
10
11
12
DATA test1;
  SET test0;
   cpt=count(var1,"+");
   IF cpt > 0 then do;
      do until (cpt LE 0);
         var1=scan(var1,cpt,"+");
	     cpt=cpt-1;
		 output ;
      end; 
   end;
   output ;
run;

[bahraoui]

Avec quelques modification on trouve la solution

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
DATA test;
informat Nom $6. d ddmmyy10. Var1 $5.;
format Nom $6. d ddmmyy10. Var1 $5.;
input Nom $ d Var1 $;
cards;
Titi 01/01/2009 A+B
Toto 03/02/2010 A+C
Tata 05/02/2009 B+C
;
run;
 
DATA test1;
SET test;
cpt=count(var1,"+");
IF cpt > 0 then do;
	do i=1 TO cpt+1;
		t= scan(var1,i,"+");
		output;
	end;
end;
run;

[MEGAMIND2]

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
DATA test;
informat Nom $6. date ddmmyy10. Var1 $5.;
format Nom $6. date ddmmyy10. Var1 $5.;
 
input Nom $ date Var1 ;cards;
Titi 01/01/2009 A+B
Toto 03/02/2010 A+C
Tata 05/02/2009 B+C
;
run;
 
 
DATA test1;
SET test;
var2=substr(var1,1,1);
var3=substr(var1,3,1);
DROP var1;
array x(*)  Var2 var3;
do i=1 TO 2;
new=x(i);
output;
end;
DROP Var2 var3 i;
run;

Bon courage

[lalodev]

Effectivement le do fonctionne mieux que le do until.
Merci beaucoup

[bahraoui]

ta solution impose que Var1 contient un seul "+" avec deux éléments
Ex : A+B

[bahraoui]

Tu peux utiliser un do until
il y avait les problèmes ci-dessous:
boucle : il faut ajouter 1 au nb de +.

var1=scan(var1,nb,"+"): tu écrases var1 => tu n'as qu'une seule valeur dans ta table
tu avait un output en trop.

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
 
DATA test1;
  SET test;
   cpt=count(var1,"+");
   nb=cpt+1;
   IF cpt > 0 then do;
      do until (nb = 0);
         var=scan(var1,nb,"+");
	     nb=nb-1;
		 output ;
      end; 
   end;
run;

[MEGAMIND2]

Envoyé par bahraoui

ta solution impose que Var1 contient un seul "+" avec deux éléments
Ex : A+B

Ben oui, il ya un seul séparateur + barahoui !
+1

[bahraoui]