RTF 表格：footnote前空行字体如何调整

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

现在表格中footnote前面空白行字体为12pt， 现在需要调整为9pt。 请问如何用sas实现。

表格截图：


程序部分：
%let line="@R/RTF'\fs0\brdrb\brdrs\brdrw30";

proc template;
  define style styles.kltnr_9_uk;
  parent=styles.rtf;
replace fonts/
  'TitleFont'= ("Courier New", 9pt)
  'TitleFont2'= ("Courier New", 9pt, Bold)
  'FixedFont'= ("Courier New", 9pt, Bold)
  'StrongFont'= ("Courier New", 9pt, Bold)
  'docFont'= ("Courier New", 9pt)
   'footFont'= ("Courier New", 9pt)

  'EmphasisFont' = ("Courier New", 9pt,normal)
  'headingFont' = ("Courier New", 9pt)

   'headingEmphasisFont' = ("Courier New", 9pt)
   'FixedEmphasisFont' = ("Courier New", 9pt)
   'FixedStrongFont' = ("Courier New", 9pt)
   'FixedHeadingFont' = ("Courier New", 9pt)
   'BatchFixedFont' = ("Courier New", 9pt);

replace color_list /
  'link' = blue
  'bgH' = white
  'fg' = black
  'bg' = white;

replace body from Document/
  bottommargin=1.26in
  topmargin=1.26in
  rightmargin=1in
  leftmargin=1in;

replace table from output/
  frame = box
  rules = all
  cellpadding = 0
  cellspacing=0
  borderwidth=0;
  end;
run;

data class;
    set sashelp.class;
    page=ceil(_n_/10);
    heightc=catx(' - ',put(height,best.),put(weight,best.));
run;

options papersize=letter orientation=landscape nodate nonumber nobyline center missing=" ";
options formchar="|----|+|---+=|-/\<>*";
ods escapechar="@";
ods listing close;

title 'title title';
footnote 'footnote footnotefootnotefootnotefootnotefootnotefootnotefootnotefootnotefootnote';

ods rtf file="G:\Projects\SST6006\007-01\csr\user\dxh\Footnote\footnote.rtf" style=kltnr_9_uk ;

proc report data=class split='~' missing nocenter nowd headline headskip;

    column page name sex age heightc weight;

    define page  /order noprint;
    define name  /display "Name" &line. style(header)=[just=left asis=on] style(column)=[cellwidth=2.9in just=left asis=on];
    define sex   /display "Sex" &line. style(header)=[just=center asis=on] style(column)=[cellwidth=1.5in just=center asis=on];
    define age   /display "Age" &line. style(header)=[just=center asis=on] style(column)=[cellwidth=1.5in just=center asis=on];
    define heightc   /display "Height" &line. style(header)=[just=center asis=on] style(column)=[cellwidth=1.5in just=d asis=on];
    define weight   /display "Weight" &line. style(header)=[just=center asis=on] style(column)=[cellwidth=1.5in just=center asis=on];
   

    compute before _page_ ;
        line &line.;
    endcomp;

/*    break after page/page;*/

    compute after _page_ ;
        line &line.;
    endcomp;
run;


ods rtf close;
ods listing;

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：footnote note foot not FOO replace parent style 如何 程序