Discussion :

[titejohanna1]

Bonjour,

Voici le résumé de ma demande :
*
CONTEXTE*:
*
A aujourd’hui j’ai une table mensuelle qui se crée sous le format TABLE_AAMM avec à l’intérieur 2 variables*: id_client et note (score mensuel).
Afin de suivre l’évolution des notes, j’avais créé un programme pour avoir une table (avec note en ligne et date en colonne) que j’exporte ensuite sous Excel afin de créer un graphique automatique.
*
Voici le programme*:
*

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
PROC SQL;
CREATE TABLE TABLE1 AS
*
(*** SELECT note, COUNT(ID_CLIENT) as NOTE_1612
**** FROM TABLE_1612
**** GROUP BY note
);
QUIT;
RUN;
*
*
PROC SQL;
CREATE TABLE TABLE2 AS
*
(*** SELECT note, COUNT(ID_CLIENT) as NOTE_1701
**** FROM TABLE_1701
**** GROUP BY note
);
QUIT;
RUN;
*
/*... pour chaque mois...*/
*
DATA* TABLE FINALE;
MERGE
**** TABLE1
**** TABLE2
…;
BY note;
RUN;

*
BUT*:
*
Le but est d’optimiser le programme afin de le rendre le plus automatique possible.
Celui-ci n’est pas du tout optimisé car tous les mois je dois ajouter du code…
*
Pourriez vous m’aider sur la construction de ce bout de programme*?

En vous remerciant.

Cordialement,

[s_a_m]

Hello,
Je te donne un exemple en Call Execute, mais c'est tout à fait possible de le faire avec un macro programme :

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
44
 
 
data test_1;
set sashelp.class (keep=Age sex);
run;
 
data test_2;
set sashelp.class (keep=Age sex);
run;
 
data test_3;
set sashelp.class (keep=Age sex);
run;
 
proc sql;
create table list_tabs as select memname, scan(memname, -1,'_') as increment from sashelp.vtable where upcase(libname)='WORK' 
and upcase(memname) like 'TEST%'
;
quit;
 
data _null_;
set list_tabs;
 
call execute  (" proc sql; create table tab_" !!left(_n_) !! " as select sex,avg(age)as m_age_"!! increment !!"  from  "!! memname !! " group by sex;quit;"
);
run; 
 
proc sql;
select memname into : tabs separated by " "  from sashelp.vtable where upcase(libname)='WORK' 
and upcase(memname) like 'TAB_%'
;
quit;
 
 
 
 
data final;
merge &tabs ;
by sex;
run;
 
proc delete  data=&tabs;
;
run;

[titejohanna1]

Merci pour ton retour.
Mais je pense qu'une macro serait plus approprié car tous les mois une nouvelle table arrive et donc je veux pas forcément ajouter du code...

[s_a_m]

Tu n'as peut être pas compris mon programme, mais il est 100% automatique... suffit de le tester et l'adapter aux noms de tes tables.