podzial_zmiennych

/* sztuczka z odpalaniem procedury dla kazdego wiersza tabeli */
/* https://www.lexjansen.com/phuse/2014/cc/CC06.pdf */

/* HPBIN procedure - overview */
/* http://support.sas.com/documentation/cdl/en/prochp/67530/HTML/default/viewer.htm#prochp_hpbin_overview.htm */

/* sciaganie nazw zmiennych do tabeli */
proc transpose data=p_prod.production out=nazwy_zmiennych(keep=_NAME_);

run;

/* zmiana nazwy zmiennej _NAME_ - moze mozna prosciej?*/
data nazwy_zmiennych;
    set nazwy_zmiennych(rename=(_NAME_=zmienna));

run;

/* makro tworzace podzial - wejsce: zmienna do podzialu*/
/* to do - skminic dobrze jak dziala i moze polepszyc */
%macro podzial(variable=);
    proc hpbin data=p_prod.production numbin=3 pseudo_quantile;
        var &variable;
    run;
%mend podzial;

/* wolanie tego makra dla kazdej zmiennej - patrz pierwszy link dla wyjasnien*/
data _null_;
    set nazwy_zmiennych
    (firstobs=1
    obs=5)
    ;
    call execute('%podzial(variable='||zmienna||');');
run;