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 45
|
data parametres;
input num_liste param1 param2 param3 ;
datalines;
1 4 5 6
2 8 9 9
3 1 2 3
;
run;
data les_freres_a_toto;
input individus :$6. ;
datalines ;
toto
titi
tutu
tautau
;
run;
%macro m(parametre1=,parametre2=,parametre3=);
PUT ¶metre1 = ¶metre2= ¶metre3 = ;
%mend;
data _null_;
if 0 then set parametres;
set les_freres_a_toto;
if _n_=1 then
do;
declare hash param(ordered:"y",dataset:"parametres");
param.definekey("num_liste");
param.definedata(all:'yes') ;
param.definedone();
declare hiter iparam('param');
end;
PUT individus= ;
IRC=iparam.first();
DO WHILE (IRC=0);
%m(parametre1=param1,parametre2=param2,parametre3=param3);
IRC=iparam.next();
END;
run; |
Partager