Exporter les tables des deux dernières année en fichiers plats

[Blizzard123]

Bonjour tout le monde,

je débute avec sas, pouvez vous m'aider à développer une macro pour exporter des tables sas en fichiers plats des deux dernières années sachant que chaque table se nome avec la date de la fin de chaque mois

Code :

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

1
2
3
4
5
6
7
8
9
DATA _NULL_;
		SET &nom_table._&jjmmaa.;
		FILE "&rep_exp./&nom_table." LRECL = 4000 MOD DLM=";";
		PUT nom des champs
                       .
                       .
                       .
                       .;
run;

merci beaucoup

cordialement

[jlp65]

Bonjour,

Voici une macro qui devrait faire l'affaire !

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
 
%macro m;
	%let liste_annees = "17" "18";
 
	PROC SQL  ;
		/* Liste des tables dans la librairie (la WORK, ici) */
	  CREATE TABLE lst_tables AS
	  SELECT MEMNAME,substr(MEMNAME,6,2) as annee
	  FROM DICTIONARY.COLUMNS WHERE UPCASE (LIBNAME)='WORK' ;
 
		/* Liste des tables des années voulues  */
	  SELECT MEMNAME
	  INTO: liste SEPARATED BY " "
	  FROM lst_tables (where = (annee in (&liste_annees.)) ) ;
	QUIT;		
 
	/* Export */	
	%do i = 1 %to %sysfunc(countw(&liste.));
		%let table  = %scan(&liste.,&i.);
		%let export = C:\&table..csv;	
		proc export data = &table. outfile = "&export." DBMS=CSV REPLACE ; RUN;
	%end;
%mend m;
%m;