data dept;
input dept $ 7. name $ 9. salary;
call symput('new', dept);
datalines;
bedding Watlee 18000
bedding Parker 9000
bedding Joiner 8000
carpet Ray 12000
gifts Johnston 8000
kitchen White 8000
kitchen Marks 9000
tv Jones 9000
tv Rogers 15000
;
title "%qsysfunc(today(),worddate.)";
proc print data=dept;
run;
title "%sysfunc(today(),worddate.)";
proc print data=dept;
run;



雷达卡




京公网安备 11010802022788号







