Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

  1. #1
    Nouveau Candidat au Club
    Exporter les tables des deux dernières année en fichiers plats
    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

  2. #2
    Membre habitué
    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;

###raw>template_hook.ano_emploi###