[DATA] Exit les caractères spéciaux [Résolu]

[jerome_pdv2]

Bonjour,

J'ai toujours un certain nombre de variables "polluées" par des caractères spéciaux...

J'en traite certains préalablement (majuscules accentuées par exemple) au cas par cas.

Ensuite il me reste toujours un certain nombre de caractères "scories" qui ne sont ni des lettres majuscules non accentuées, ni des chiffres.

Ces caractères , en fin de traitement ne m'intéresse pas, et "polluent" mes variables (qui sont a priori des collection de chiffres, nombres, lettres ou mots).

Je souhaiterais les remplacer tous par un unique caractère spécial


Exemple

Code :

1
2
obs var
1     LA PETITE MAISON %% DA§NS LA PRAIRIE EPISODE #6

je voudrais que ça devienne

Code :

1
2
obs var
2     LA PETITE MAISON @@ DA@NS LA PRAIRIE EPISODE @6

Ceci y compris pour les caractères de contrôle biensûr que j'inclue dans les caractères "spéciaux"

Y a t il une solution ?

A défaut, je souhaiterais les remplacer des blancs.

Merci de votre aide.

[z6c3po]

Bonjour,

pour simplement retirer ces différents caractères, il y a la fonction COMPRESS

Code :

1
2
3
4
5
6
7
 
DATA toto;
x="LA PETITE MAISON %% DA§NS LA PRAIRIE EPISODE #6";
x=compress(x,"&#§%");
run; 
 
proc print;run;

Code :

1
2
3
Obs                         x
 
 1     LA PETITE MAISON  DANS LA PRAIRIE EPISODE 6

et voilà !

[boutchiwah]

Sinon tu peux aussi résoudre ce problème avec les fonctions ANY et NOT.
Ici la fonction NOTNAME vaut 1 si la chaine de caractères n'est pas une chaine valide pour un nom de table ou de variable (caractères accentués, espaces, caractères spéciaux ...) et la fonction NOTSPACE vaut 1 si la chaine ne contient pas d'espace.

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
DATA tutu;
input let$80.;
cards;
LA PETITE MAISON %% DA§NS LA PRAIRIE EPISODE #6
;
run;
 
 
DATA lettres ;
SET tutu; 
do i=1 TO length(let);
	IF notname(substr(let,i,1)) = 1 AND notspace(substr(let,i,1)) = 1 then
	substr(let,i,1)='@';
end;
run;

[jerome_pdv2]

Merci je ne connaissais pas ces fonctions.
En fait même avec ces fonctions il me restait encore des cas de caractères particuliers à traiter...j'ai donc utilisé un translate "massif" (en fait plusieurs lignes de translate) en citant tous les caractères que je voulais effacer.