Discussion :

[Aurianelm]

Bonjour tout le monde !

Voilà, j'ai 3 tables avec chacune une dizaine de variables.

Pour la 1ère table je souhaite ajouter un "1_" devant toutes les variables.
Pour la 2ème table je souhaite ajouter un "2_" devant toutes les variables.
Pour la 3ème table je souhaite ajouter un "3_" devant toutes les variables.

Je ne sais pas du tout comment procéder. Auriez-vous une idée ?

Merci d'avance !!

Auriane

[s_a_m]

Hello,
Il n'est pas possible de commencer le nom des variables par du numérique, en revanche tu peux faire ceci :

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
 
DATA test1 test2 test3;
SET sashelp.class;
run;
 
%macro rename ( table,mv_num);
 
proc sql noprint;
   SELECT name, max (monotonic()) INTO: old_var separated BY ',' ,: nbr 
   FROM dictionary.COLUMNS WHERE upcase(libname)='WORK' AND upcase(memname)="&table" ;
quit;
 
DATA &table.      ;
 
SET &table. ;
 
      %do i=1 %TO &nbr.;
         rename %scan("&old_var",&i,",")=%sysfunc(cats(&mv_num.,%scan("&old_var",&i,",")));
      %end;
run;
%mend;
 
%rename ( TEST1, _01_);
%rename ( TEST2, _02_);
%rename ( TEST3, _03_);

[Aurianelm]

Merci mais j'ai essayé et dans le journal il me met :

Code :

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

1
2
3
4
5
6
 
ERROR: Opérande caractère trouvé dans la fonction %EVAL ou condition %IF là où un opérande numérique
       est requis. La condition était : &nbr.
ERROR: La valeur %TO de la boucle %DO I est incorrecte.
ERROR: L'exécution de la macro RENAME va s'arrêter.
897  %RENAME ( bibli.Liste_OPP_vie, _02_);

Une idée ? Désolée mais je débute donc je n'y connais pas grand chose...

J'ai mis :

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
DATA bibli.Export_vie bibli.Liste_OPP_vie bibli.ExportPers;
SET sashelp.class;
run;
 
%macro RENAME ( TABLE,mv_num);
 
proc sql noprint;
   SELECT name, max (monotonic()) INTO: old_var separated BY ',' ,: nbr 
   FROM dictionary.COLUMNS WHERE upcase(libname)='WORK' AND upcase(memname)="&table" ;
quit;
 
DATA &TABLE.      ;
 
SET &TABLE. ;
 
      %do i=1 %TO &nbr.;
         RENAME %scan("&old_var",&i,",")=%sysfunc(cats(&mv_num.,%scan("&old_var",&i,",")));
      %end;
run;
%mend;
 
%RENAME ( bibli.Export_vie, _01_);
%RENAME ( bibli.Liste_OPP_vie, _02_);
%RENAME ( bibli.ExportPers, _03_);

[s_a_m]

Essaie plutôt ceci :

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
 
DATA bibli.Export_vie bibli.Liste_OPP_vie bibli.ExportPers;
SET sashelp.class;
run;
 
%macro RENAME ( TABLE,mv_num);
 
proc sql noprint;
   SELECT name, max (monotonic()) INTO: old_var separated BY ',' ,: nbr 
   FROM dictionary.COLUMNS WHERE upcase(libname)='BIBLI'AND upcase(memname)="&table" ;
quit;
 
DATA &TABLE.      ;
 
SET &TABLE. ;
 
      %do i=1 %TO &nbr.;
         RENAME %scan("&old_var",&i,",")=%sysfunc(cats(&mv_num.,%scan("&old_var",&i,",")));
      %end;
run;
%mend;
 
%RENAME ( Export_vie, _01_);
%RENAME ( Liste_OPP_vie, _02_);
%RENAME ( ExportPers, _03_);

[Aurianelm]

La bibliothèque j'avais remarqué j'avais déjà essayé mais ça me fait la même remarque...

[s_a_m]

Si la bibliothèque BIBLI existe bien , il faut mettre le nom des tables en majuscule :

Code :

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

1
2
3
4
 
%RENAME ( EXPORT_VIE, _01_);
%RENAME ( LISTE_OPP_VIE, _02_);
%RENAME ( EXPORTPERS, _03_);

[Aurianelm]

Merci pour toutes ces réponses mais finalement je l'ai fait à la main... C'était une demande urgente de mes supérieurs.