problème de concaténation de variables Alphanumériques [Résolu]

[MDsas]

Bonjour la compagnie!

je voudrais créer une variable à partir d'une autre avec un test sur le nombre de caractère et en supprimant un caractère.

Exemple: t_num_dossier=2005/780

je veux créer à la fin t_num_evenement=200500780

comme apparement j'arrive pas à concatener trois élément en un seul coup (si c'est possible je suis preneuse)!
je le fais par étape:

t_num_evenement1=scan(t_num_dossier,1,"/")!!"00" and
t_num_evenement=t_num_evenement1!!scan(t_num_dossier,2,"/");

sauf qu'au final la première instruction marche et que la seconde concatenation non.

Merci d'avance pouvotre aide.

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
DATA fichier_administratif1;
SET Fichier_administratif;
format taille best12.;
format t_num_evenement $20.;
format t_num_evenement1 $20.;
taille=length(t_num_dossier);
IF taille=6 then do;
t_num_evenement1=scan(t_num_dossier,1,"/")!!"0000";
t_num_evenement=t_num_evenement1!!scan(t_num_dossier,2,"/");
end;
IF taille=7 then do;
t_num_evenement1=scan(t_num_dossier,1,"/")!!"000";
t_num_evenement=t_num_evenement1!!scan(t_num_dossier,2,"/");
end;
IF taille=8 then  do;
t_num_evenement1=scan(t_num_dossier,1,"/")!!"00" AND
t_num_evenement=t_num_evenement1!!scan(t_num_dossier,2,"/");
end;
IF taille=9 then do;
t_num_evenement1=scan(t_num_dossier,1,"/")!!"0";
t_num_evenement=t_num_evenement1!!scan(t_num_dossier,2,"/");
end;
run;

j'ai la version 8.

[fafabzh6]

Bonjour,
Tu veux créer une variable sur une table ou une macro variable.
Si c'est une variable dans une base, le programme ci-dessous marche

Code :

1
2
3
4
5
6
7
8
9
DATA base;
input t_num_dossier$;
cards;
2005/780
;
DATA base2;
SET base;
v2=scan(t_num_dossier,1,"/")!!"00"!!scan(t_num_dossier,2,"/");
run;

[bahraoui]

Il manque un compress

Code :

1
2
3
4
5
6
7
8
9
DATA t;
a="bon";
b="nj";
c="our";
chaine=a||b||c;
t_num_dossier="2005/780";
t_num_evenement1=scan(t_num_dossier,1,"/")!!"0000";
t_num_evenement=compress(t_num_evenement1!!scan(t_num_dossier,2,"/"));
run;

[MDsas]

C'est cool, il manquait effectivement un "compress" sinon deux concaténation à la suite marche aussi.
Merci.