帶尾隨空格和引號的輸出變量

Question

如何輸出帶尾隨空格和引號的字符變量？

如：

data x; 
format x $quote17.; 
x='ruby'; 
put x=; 
run; 

(log extract) 
x="ruby" 

什麼是最有效的方式，得到以下結果？

x="ruby    " 

Answer 1

找到了一種方法..

data x; 
format x $19.; 
x='ruby'; 
x=quote(subpad(x,1,17)); 
put x=; 
run; 

不知道這是最有效的，但！

Answer 2

data x; 
    Format x $17. q$1.; 
    x='Ruby'; 
    q='"'; 
    qxq=cat(q,x,q); 
    Put qxq=; 
run;