SAS 定义三线表

%macro Threelines;
proc template;
define style Styles.Threelines;
parent = Styles.Default;

STYLE SystemTitle /
FONT_FACE = " 宋体"
FONT_SIZE = 2.8
FONT_WEIGHT = medium
FONT_STYLE = roman
FOREGROUND = black
BACKGROUND = white;

STYLE SystemFooter /
FONT_FACE = " 宋体"
FONT_SIZE =2.8
FONT_WEIGHT = medium
FONT_STYLE = roman
FOREGROUND = black
BACKGROUND = white;


STYLE Header /
FONT_FACE = " 宋体"
FONT_SIZE = 2.8
FONT_WEIGHT =BOLD
FONT_STYLE = roman
FOREGROUND = black
BACKGROUND = white;

STYLE RowHeader from header /
BACKGROUND = white
;

STYLE Data /
FONT_FACE = " 宋体"
FONT_SIZE = 2.8
FONT_WEIGHT = medium
FONT_STYLE = roman
FOREGROUND = black
BACKGROUND = white;

STYLE Table /
FOREGROUND = black
BACKGROUND = white
CELLSPACING = 0
CELLPADDING = 3
FRAME = HSIDES
RULES = groups
outputwidth = 100%;

STYLE Body /
FONT_FACE = " 宋体"
FONT_SIZE = 2.8
FONT_WEIGHT = medium
FONT_STYLE = roman
FOREGROUND = black
BACKGROUND = white
bottommargin = 20mm
topmargin = 20mm
rightmargin = 20mm
leftmargin = 20mm
;
STYLE SysTitleAndFooterContainer /
CELLSPACING=0
outputwidth = 100%
;
style notecontent from note /
just=left font_face="Courier New" cellwidth=1.5in;  


end;
run;

options NoCenter NoDate NoNumber NoMPrint NoMLogic NoSource NONOTES NOSOURCE2 orientation=landscape;

%mend Threelines;