SAS 统计某个数据集各个字段频数，并汇集到一个表中

/*统计表的字段*/
PROC CONTENTS DATA=SASHELP.CLASS NOPRINT OUT=CA(KEEP=NAME);RUN;/*提取表的变量名*/
PROC SQL NOPRINT;
SELECT NAME INTO:A SEPARATED BY ' ' FROM CA;
RUN;
QUIT;%LET I=;/*计算各个变量的频数，并存放在一个数据集中*/%MACRO M_A();    PROC FREQ DATA=SASHELP.CLASS;
        %DO %UNTIL(%SCAN(&A.,&I,' ')=);            %LET NI=%SCAN(&A,&I,' ');
            TABLES &NI/MISSING OUT=&NI(RENAME=(&NI=NAME)) NOPRINT;            %LET i = %eval(&i.+);            %PUT "&I.=" &NI.;        %END;
    RUN;    %LET I=;
    %DO %UNTIL(%SCAN(&A.,&I,' ')=);        %LET NI=%SCAN(&A,&I,' ');        DATA &NI.;
            LENGTH VAR $. VAL $.;
            SET &NI.;
            VAR="&NI.";
            VAL=CATS(NAME,'');
            DROP NAME;
        RUN;
        PROC APPEND BASE=D DATA=&NI.;
        RUN;        %LET i = %EVAL(&i.+);        %PUT "&I.=SSSSSSS" &NI.;    %END;    PROC PRINT DATA=D;
    RUN;%MEND;%M_A();