Removing line break/vertical spaces between procs when using ods rtf

audreybr — Wed, 20 May 2020 06:20:32 GMT

Hi,

I would like to have more control on my rtf output, by removing if possible line breaks that appear automatically between two proc (in my example proc odstext, and proclist)

Here is my code:

proc template;
define style Styles.Custom; parent = Styles.Printer;
replace fonts /
'TitleFont' = ("Arial-BoldMT",13pt,Bold Italic) 
'TitleFont2' = ("Arial-BoldMT",12pt,Bold Italic) 
'EmphasisFont' = ("Arial",10pt,Italic)
'headingEmphasisFont' = ("Arial",11pt,Bold Italic)
'headingFont' = ("Arial",11pt,Bold) 
'docFont' = ("Arial",10pt) 
'footFont' = ("Arial",13pt) 
'FixedEmphasisFont' = ("Courier",9pt,Italic)
'FixedStrongFont' = ("Courier",9pt,Bold)
'FixedHeadingFont' = ("Courier",9pt,Bold)
'BatchFixedFont' = ("Courier",6.7pt)
'FixedFont' = ("Courier",9pt);
replace color_list /
'link' = blue 
'bgH' = vligb 
'bgT' = white 
'bgD' = white 
'fg' = black 
'bg' = white;
replace GraphFonts /
'GraphDataFont' = ("Arial",8pt)
'GraphUnicodeFont' = ("Arial",9pt)
'GraphValueFont' = ("Arial",10pt)
'GraphLabelFont' = ("Arial",11pt,bold)
'GraphFootnoteFont' = ("Arial",11pt,bold)
'GraphTitleFont' = ("Arial",12pt,bold)
'GraphAnnoFont' = ("Arial",10pt);
replace Table from Output /
frame = hsides
rules = none 
cellpadding = 4pt 
cellspacing = 0.25pt
borderwidth = 0.75pt ;
* Leave code below this line alone ;
style parskip / fontsize=1pt;
style SystemFooter from SystemFooter / font = fonts("footFont");
style Data from Data / background=color_list('bgD');
class UserText / font_size=10pt;
style paragraph from UserText "Controls the TEXT= style" /
outputwidth=100% 
protectspecialchars=off;
class body /topmargin = 0.75in
leftmargin = 0.75in
rightmargin = 0.75in
bottommargin=0.75in
outputwidth=100% ;
end;
run;
options compress=yes
nodate
nonumber
center
orientation=portrait;
ods escapechar='^';
ods rtf
file="&path\Résultats\tableaux\test.rtf"
bodytitle style=styles.custom startpage=no keepn style = Custom NOGTITLE nogfootnote
notoc_data ;

proc odstext;
p "Rédacteurs :";
run;
proc odslist;
item "^S={fontsize=10pt color=black}M ...." / style={liststyletype="diamond" color=blue fontsize=7pt};
item "blabla" / style={liststyletype="none" };
item "^S={fontsize=10pt color=black}M. ..." / style={liststyletype="diamond" color=blue fontsize=7pt};
item "blabla" / style={liststyletype="none" };
end;
proc odstext;
p "Relecteurs ";
run;

ods rtf close;

Re: Removing line break/vertical spaces between procs when using ods rtf

ballardw — Wed, 20 May 2020 13:39:54 GMT

You can try using ODS TAGSETS.RTF instead of RTF. Most of the options are similar but the TAGSET has additional options. What you would add to your ods tagsets.rtf would be an OPTIONS section that would look like:

ods tagsets.rtf file="<path>\filename.rtf" Options( Vspace='OFF' ) ;

Be advised that since basically all the output is a table you may end up with some appearance that you don't want.

Re: Removing line break/vertical spaces between procs when using ods rtf

audreybr — Mon, 25 May 2020 05:54:26 GMT

Ok, thank you. Indeed, it is working using ODS TAGSETS.RTF. But some of my other options are not working now. I'll have to make choices...

topic Re: Removing line break/vertical spaces between procs when using ods rtf in ODS and Base Reporting

Removing line break/vertical spaces between procs when using ods rtf

Re: Removing line break/vertical spaces between procs when using ods rtf

Re: Removing line break/vertical spaces between procs when using ods rtf