data a; input x; cards; 1.55555555589 2.33000000 3.8888888888888 ; run; proc print data=a; format x 8.1; run; proc print data=a; format x 8.4; run; proc print data=a; format x 16.13; run; data b; set a; x2=put(x, 8.1); x3=put(x, 8.4); run; proc print data=b; run;