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
    Membre régulier
    Macro avec paramètres stockés dans une table
    Bonjour,

    Je souhaiterais exécuter une macro en faisant appel à des paramètres stockés dans une table.

    Je dispose de la table tab_parametre contenant 5 variables : age, profil, sexe, ville, salaire avec 2000 lignes.

    En parallèle, je dispose des tables : BORDEAUX_seniors, PARIS_seniors, PARIS_jeunes, PARIS_familles etc....

    J'ai écrit la macro suivante (c'est un exemple pour illustré) :

    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
     
     
    data compilation ;
    run ;
     
    %macro salaire_moyen(age, profil, sexe, salaire, ville ) ;
     
    data base_calcul ;
    set &profil._&ville. ;
    if salaire > &salaire. ;
    run ;
     
    data compilation ;
    set compilation base_calcul  ;
    run ;


    Pour faire appel à ma macro, j'ai écrit le code suivant (2000 lignes d'appels à la macro) :

    Code :Sélectionner tout -Visualiser dans une fenêtre à part
    1
    2
    %salaire_moyen(22,jeunes,masculin,1500,PARIS) ;
    %salaire_moyen(60,seniors,masculin,2000,PARIS) ;


    etc...

    Les paramètres faisant référence aux données contenues dans la table tab_parametre.

    Pour éviter de surcharger mon programme avec ces 2000 lignes d'appel à la macro, je souhaiterais faire appel à une boucle... J'ai commencé à écrire 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
     
    /*Nombre lignes table*/
    proc sql noprint;
    select distinct count(*) into: nb_lignes
    from tab_parametre;
    quit;
    %put &nb_lignes. ;
     
    %macro appel_macro ;
    data tab2;
    set tab1;
     
    %DO i = 1 %TO &nb_lignes. ;
     
    ???
     
    %END ;
    run ;
    %mend ;
    %appel_macro ;


    Mais je ne sais pas comment faire pour que SAS exécute ma macro %salaire_moyen à partir des modalités de ma table tab_parametre.

    Merci d'avance pour votre aide !

  2. #2
    Membre régulier
    Je m'en suis sortie toute seule comme une grande .

    Je partage mon code, ça pourra peut être servir à quelqu'un... :


    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
    /*Appel de la macro à l'aide des valeurs de la table de réf*/
    /*Nombre lignes table*/
    proc sql noprint;
    select distinct count(*) into: nb_lignes
    from table_ref;
    quit;
    %put &nb_lignes. ;
     
    /*j'incrémente un num à chaque ligne*/
    data table_ref_boucle ;
    set table_ref;
    num_ligne = _N_ ;
    run ;
     
    %macro appel_macro;
    %DO i = 1 %TO &nb_lignes. ;
    proc sql;
       select distinct var1, /*variable de référence dans ma table*/
    					var2, 
    					var3, 
    					var4, 
    					var5
     
                  into : var1, /*macro variables pour appel de la macro ci-dessous*/
                       : var2,
    				   : var3,
    				   : var4,
    				   : var5
     
           from table_ref_boucle 
    		where num_ligne = &i.;  
    quit;
     
    %revenu_moyen(&var1.,&var2.,&var3.,&var4.,&var5.);
     
    %END ;
    run ;
    %mend ;
    %appel_macro;

###raw>template_hook.ano_emploi###