Discussion :

[le sasseur]

Bonjour,

J'ai à ma disposition une table sas contenant des valeurs numériques manquantes et des champs caractères.
Une valeur d'un champ caractère (cod_mod_veh) contient une sous-chaine encadrée par des doubles quotes : aaaa "bbbb" cccc

J'ai codé ceci :

Code :

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

1
2
3
4
5
data _null_;
file "/datvol4/iler/export/test.txt" lrecl = 32767 delimiter = '|'  dsd;
set tbsas.test;
put num_visit km_veh cod_mrq_veh cod_mod_veh;
run;

L'option dsd permet de ne pas afficher les points pour les valeurs numériques manquantes, cependant cette option crée un problème pour ma valeur de cod_mod_veh.
Elle crée des doubles-quotes indésirables : "aaaa""bbbb""cccc"

Ma question est la suivante: Comment exporter ces données sans mettre des points pour les valeurs numériques manquantes ni dénaturer les valeurs de mes champs caractères ?

Merci d'avance de votre aide.

[m.brahim]

Bonjour,

Je te propose cette solution:

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
option missing='';
 
data test;
input var1 var2 $ var3 $ var4 ;
cards;
1 "test" test 2
2 "test1" test . 
3 test2 "test" 3
;run;
 
data _null_;
  set test;
  file "test.txt" lrecl = 32767 delimiter = '|' ;
  put var1 var2 $ var3 $ var4;
run;

COrdialement

[le sasseur]

Bonjour,

Merci pour votre proposition de solution.
Cependant cela laisse un espace pour les valeurs numériques manquantes, or je souhaiterais vraiment n'avoir aucun caractère.

Avez-vous une solution ?

Bien cordialement,

[m.brahim]

Pourrais-tu nous donner un échantillon de la table avant l'export et l'export souhaité en format txt
Merci

[le sasseur]

Voici la table en question:



Voici l'export (fichier texte) souhaité:

188885754|104279|CITROEN|C4 PICASSO
188885755||CITROEN|C1
188885756||RENAULT|CLIO
188885757|155001|RENAULT|MASTER
188885758|129801|MERCEDES BENZ|CLASSE B
188885759||RENAULT|MEGANE SCENIC
188885760||CITROEN|C4
186310019|352284|OPEL|ZAFIRA "LTED ED"1.9 CDTI 100

Donc pas d'espace ni de point pour les valeurs numériques manquantes et je souhaite que la dernière valeur de la dernière colonne reste inchangée.

Merci pour votre aide.

[m.brahim]

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
option missing='';
 
data test;
input var1 var2 var3 :$20.  var4 $ ;
cards;
1 . "test" test 
2 . t"test1"test test 
3 6 t"test1"test test
;run;
 
 
data _null_;
 set sashelp.vcolumn(keep=libname memname name type where=(libname='WORK' and memname='TEST')) end=last;
 if _n_ eq 1 then call execute('proc sql; create table test1 as select ');
 if type='char' then call execute(' '||strip(name)||' format=$50. length=50 as '||strip(name));
  else call execute('put('||strip(name)||',best32. -l) length=50 as '||strip(name));
 if not last then call execute(',');
  else call execute(' from test;quit;');
run;
 
 
data test2(drop= i  );
set test1;
array X(*) _all_;
do i=1 to dim(x);
   if x(i)='' then do;
   x(i)='|';
 end;
 end;
run;
 
data test2 ;
set test2;
length varg $1000.;
array X(*) _all_;
varg=strip(tranwrd(catx('|', of x(*)),'|||','||'));
run;
 
data _null_;
  set test2;
  file "test.txt" lrecl = 32767  ;
  put varg;
run;

Cordialement

[le sasseur]

C'est brillant, cela fonctionne !

En vous remerciant vivement !