标题: MORE CUSTOMIZATION?: CREATING SYMBOLS IN RTF FILES USING ODS [打印本页] 作者: shiyiming 时间: 2011-6-18 23:19 标题: MORE CUSTOMIZATION?: CREATING SYMBOLS IN RTF FILES USING ODS From LCChien's blog on blogspot
原文載點:<a href="http://www.lexjansen.com/pharmasug/2004/technicaltechniques/tt12.pdf"><!-- m --><a class="postlink" href="http://www.lexjansen.com/pharmasug/2004/technicaltechniques/tt12.pdf">http://www.lexjansen.com/pharmasug/2004 ... s/tt12.pdf</a><!-- m --></a><br /><br />有時候想要在 SAS 輸出報表裡面寫一些標題或註解,需要加上一些科學符號、希臘字母、甚至是邏輯運算子等特殊符號時,得使用特別的方法顯示出來。這一篇 2004 年的 PHARMASUG 技術文件可供參考。<br /><br /><a name='more'></a>首先必須先去查這些特殊符號的 Unicode decimal number,因為 SAS 必須藉由這些代碼才能對應到特殊符號。查詢的網址如下:<br /><br /><a href="http://www.alanwood.net/unicode/index.html"><!-- m --><a class="postlink" href="http://www.alanwood.net/unicode/index.html">http://www.alanwood.net/unicode/index.html</a><!-- m --></a><br /><br /><a href="http://www.unicode.org/"><!-- m --><a class="postlink" href="http://www.unicode.org/">http://www.unicode.org/</a><!-- m --></a><br /><br />以"alpha"這個希臘字母當做範例,程式如下:<br /><pre><code>ods escapechar="^";<br />%let symbol_alpha=%bquote(^R/RTF"\u<b><span class="Apple-style-span" style="color: red;">945</span></b>\") ;</code></pre><br />第一行用ods escapechar來定義一個轉義字母,在此設定為"^"。SAS 看到轉義字母才知道後面的 Unicode 代碼是要轉成什麼特殊符號。接著用 %bquote 函式來把特殊符號做出來。把上面的程式複製到 SAS,再把紅色的 Unicode 換成你想要的 Unicode 即可。<br /><br />一些常用的特殊符號的 Unicode 代碼:<br />希臘字母:<a href="http://www.alanwood.net/unicode/greek.html"><!-- m --><a class="postlink" href="http://www.alanwood.net/unicode/greek.html">http://www.alanwood.net/unicode/greek.html</a><!-- m --></a><br />數學符號運算子:<a href="http://www.alanwood.net/unicode/mathematical_operators.html"><!-- m --><a class="postlink" href="http://www.alanwood.net/unicode/mathematical_operators.html">http://www.alanwood.net/unicode/mathema ... ators.html</a><!-- m --></a><br />箭頭:<a href="http://www.alanwood.net/unicode/arrows.html"><!-- m --><a class="postlink" href="http://www.alanwood.net/unicode/arrows.html">http://www.alanwood.net/unicode/arrows.html</a><!-- m --></a><br />羅馬數字和分數:<a href="http://www.alanwood.net/unicode/number_forms.html"><!-- m --><a class="postlink" href="http://www.alanwood.net/unicode/number_forms.html">http://www.alanwood.net/unicode/number_forms.html</a><!-- m --></a><br />上標與下標:<a href="http://www.alanwood.net/unicode/superscripts_and_subscripts.html"><!-- m --><a class="postlink" href="http://www.alanwood.net/unicode/superscripts_and_subscripts.html">http://www.alanwood.net/unicode/supersc ... ripts.html</a><!-- m --></a><br />其他:<a href="http://www.alanwood.net/unicode/letterlike_symbols.html"><!-- m --><a class="postlink" href="http://www.alanwood.net/unicode/letterlike_symbols.html">http://www.alanwood.net/unicode/letterlike_symbols.html</a><!-- m --></a><br /><br />原文提供一個範例。假設要製作下列表格的註解:<br /><div class="separator" style="clear: both; text-align: center;"><a href="http://3.bp.blogspot.com/-ww361cGKeNw/TfUmAD1S6sI/AAAAAAAAF6M/0jAz1SCVBbo/s1600/tt12.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="363" src="http://3.bp.blogspot.com/-ww361cGKeNw/TfUmAD1S6sI/AAAAAAAAF6M/0jAz1SCVBbo/s640/tt12.png" width="640" /></a></div><br />程式如下:<br /><pre><code>footer f1 ;<br />define f1 ;<br />text<br /> " +Above Normal Range" "^1n"<br /> "-Below Normal Range" "^1n"<br /> "A reading &symbol_ge 40 for SGPT/ALT is considered Above Normal" "^1n"<br /> "A reading &symbol_le 30 for SGPT/ALT is considered Below Normal" "^1n" <br /> "An example of &symbol_alpha." "^2n "<br /> "&font9.Output:" " &tab.&outdir.\&pgmonly..rtf" "^1n"<br /> "Source:&tab.&source." ;<br /> style={font_face=Arial font_size=2.5 font_weight=medium background=white} ;<br /> just=left ;<br />end ; </code></pre><br />如果覺得這樣太麻煩,就送去Word編輯吧!<br /><br /><b>CONTACT INFORMATION</b><br /><br />Richard Rowell<br />Connetics Corporation<br />3290 West Bayshore Road<br />Work: (650) 843-2876<br /><!-- e --><a href="mailto:rrowell@connetics.com">rrowell@connetics.com</a><!-- e --><br />Jim Lenihan<br />15 Moonlight Ct<br />South San Francisco, CA 94080<br />Work: (650) 742-0131<br /><!-- e --><a href="mailto:jameslenihan@sbcglobal.net">jameslenihan@sbcglobal.net</a><!-- e --><div class="blogger-post-footer"><img width='1' height='1' src='https://blogger.googleusercontent.com/tracker/6268919072942670865-2086101820374400309?l=sugiclub.blogspot.com' alt='' /></div>