/�����������/
    libname loan “d:\2019xyt”;
    proc contents data=loan.Practice_2 out=a noprint;run;
    data a;set a;if name=”v_5” then delete;run;
    proc sql noprint;select name into:varlist separated by ‘ ‘ from a;quit;

    proc import datafile=”C:\Users\yingtaoxiang\Desktop\SASTT\����.xlsx”
    out=loan.varname dbms=xlsx replace;
    getnames=yes;
    datarow=2;
    run;
    data loan.varname;
    set loan.varname;
    rename var1=origin_name var2=label var3=name;
    run;

    data a1;
    set a(keep=name);
    run;
    proc sort data=a1;by name;run;
    proc sort data=loan.varname;by name;run;
    data loan.practice_2name;
    set a1;set loan.varname;
    by name;
    run;

    proc sql;
    create table practice_2name as
    select * from loan.varname

    where name=( select name from a1 )
    ;
    quit;

    proc sql;
    create table practice_2name as
    select *
    from a1 right join loan.varname
    on a1.name=varname.name;
    quit;

    data loan.practice_2name;
    set practice_2name;
    if name=” “ then delete;
    run;