BookmarkSubscribeRSS Feed
scttttt
Calcite | Level 5

Is there a way to underline a Variable using ODS output and a Put Statement?  I found the logic below for underlining text but not sure if there is similar syntax for underlining variables in a customer report using data _null_ and Put statement.  Recently converted to PC SAS from mainframe SAS.  Using mainframe SAS with JCL control statements, the Overprint statement worked well for underlining Variables in a customer report.  After converting to PC SAS and running the same report the Overprint statement just adds a line below the variable and prints the underline. 

 

OPTIONS FORMCHAR="|----|+|---+=|-/\<>*";

ods escapechar='^';
ods rtf file='underline.rtf';

data _null_;
file print;

/* syntax if ESCAPECHAR used has special meaning in RTF */
*text='^S={protectspecialchars=off}\ul Underline keywords\ul0 only.';

/* syntax if ESCAPECHAR used does not have special meaning in RTF */
text='^\ul Underline keywords^\ul0 for emphasis.';

put text;
run;

ods rtf close;

4 REPLIES 4
Reeza
Super User

What ODS destination are you using, they all vary a little bit.

 

Excel, HTML, PDF, XML?

rogerjdeangelis
Barite | Level 11

ods escapechar='^';
ods rtf file='d:/rtf/underline1.rtf';
data _null_;
file print ods;
px= "^R/RTF'\brdrb\brdrs\brdrw19 ' undeline";
put _ods_;
run;
ods rtf close;

 

Other goodies?

 

title;
footnote;
%let ods_ul = %str(^R/RTF'\brdrb\brdrs\brdrw19 '); /* RTF sequence for cell underline */
%let ods_space = %str(^R/RTF'\~'); /* RTF sequence for single blank space */
%let ods_le = %str(^R/RTF'{\uc1\u8804\~}'); /* RTF character for less than or equal to */
%let ods_ne = %str(^R/RTF'{\uc1\u8800\~}'); /* RTF character for not equal to */
%let ods_mu = %str(^R/RTF'{\uc1\u956\~}') ; /* RTF character for Greek mu */
%let ods_ge = %str(^R/RTF'{\uc1\u8805\~}'); /* RTF character for greater than or equal to */
%let ods_dg = %str(^R/RTF'{\uc1\u176\~}') ; /* RTF character for degree C */

/* T808880 Nice sample of RTF tages from Pharmasug


Bob Hull, SynteractHCR, Inc., Carlsbad, CA
Robert Howard, Veridical Solutions, Del Mar, CA

talicize \i title '\i italicized title';
Underline \ul title '\ul underline title';
Double underline \dul title '\dul title';
New line \line title 'this is the first \line this is the second ';
Bullet \bullet title '\bullet bullet preceding title';
Emboss \embo title '\embo embossed title';
Engrave \impr title '\impr engraved title';
Subscript \sub title 'This is a subscript T\sub 1';
Superscript \super title 'This is a subscript T\super 2';
Outline \outl title '\outl This is outlined';
Shadow \shad title '\shad This is shadowed';
Strike \strike title '\strike This is striked';
double strike \strikedl
dotted underline \uld title '\uld dotted underline';
Wave underline \ulw title '\ulw wave underline';
Thick underline \ulth title '\ulth thick underline';
foreground color \cfn title '\cf2 foreground color';
Font size in half points \fs24 title '\fs40 fonts increased';
Highlight \highlightN title '\highlight2';
Bold \b title '\b bold title';
Left aligned \ql title '\ql left aligned.
Right aligned \qr title '\qr right aligned.
centered \qc title '\qc left aligned.
*/

%include "c:\oto\utl_rtflan100.sas";
%utl_rtflan100;
ods escapechar='~';
title "~S={font_weight=bold}RTF Syntax ~S={}";
data example;
set sashelp.class;
if _n_<=4;
*example to show plain, italic and bold text;
if _n_=1 then
a="plain ~S={font_style=italic} italic ~S={font_weight=bold}Bold";
*create a character return display a greater than or equal to sign;
if _n_=2 then a="Force ~n Break ~{unicode 2264}";
*underline text;
if _n_=3 then a='Plain {\ul UnderlineMe} Plain~{super 7}';
*change the font color to red;
if _n_=4 then a="~S={foreground=red}Red!~S={}";
run;
ods rtf file="c:\utl\rtf.rtf" style=utl_rtflan100;
proc report data=example nowindows style(header column)=[protectspecialchars=off];
columns a ("\brdrb\brdrs\brdrw1 spanning " name weight) ;
define a /display "" style(column)=[cellwidth=1.5 in];
define name /display "Name~{super 7}";
define weight /display "~{unicode 2265} Weight~{sub 5}" style(column)=[font_weight=bold];
run;
ods rtf close;

 

%Let Gre =%str(\R/RTF""\u8805\%'76""); /* greater-than or equal to, U+2265 ISOtech */

%Let AELIG =%str(\R/RTF""\u198\%'02""); /* latin capital letter AE = latin capital ligature AE, U+00C6 ISOlat1 */
%Let AACUTE =%str(\R/RTF""\u193\%'03""); /* latin capital letter A with acute, U+00C1 ISOlat1 */
%Let ACIRC =%str(\R/RTF""\u194\%'04""); /* latin capital letter A with circumflex, U+00C2 ISOlat1 */
%Let AGRAVE =%str(\R/RTF""\u192\%'05""); /* latin capital letter A with grave = latin capital letter A grave, U+00C0 ISOlat1 */
%Let ALPHA =%str(\R/RTF""\u913\%'06""); /* greek capital letter alpha, U+0391 */
%Let ARING =%str(\R/RTF""\u197\%'07""); /* latin capital letter A with ring above = latin capital letter A ring, U+00C5 ISOlat */
%Let ATILDE =%str(\R/RTF""\u195\%'08""); /* latin capital letter A with tilde, U+00C3 ISOlat1 */
%Let AUML =%str(\R/RTF""\u196\%'09""); /* latin capital letter A with diaeresis, U+00C4 ISOlat1 */
%Let BETA =%str(\R/RTF""\u914\%'0A""); /* greek capital letter beta, U+0392 */
%Let CCEDIL =%str(\R/RTF""\u199\%'0B""); /* latin capital letter C with cedilla, U+00C7 ISOlat1 */
%Let CHI =%str(\R/RTF""\u935\%'0C""); /* greek capital letter chi, U+03A7 */
%Let DAGGER =%str(\R/RTF""\u8225\%'0D""); /* double dagger, U+2021 ISOpub */
%Let DELTA =%str(\R/RTF""\u916\%'0E""); /* greek capital letter delta, U+0394 ISOgrk3 */
%Let ETH =%str(\R/RTF""\u208\%'0F""); /* latin capital letter ETH, U+00D0 ISOlat1 */
%Let EACUTE =%str(\R/RTF""\u201\%'10""); /* latin capital letter E with acute, U+00C9 ISOlat1 */
%Let ECIRC =%str(\R/RTF""\u202\%'11""); /* latin capital letter E with circumflex, U+00CA ISOlat1 */
%Let EGRAVE =%str(\R/RTF""\u200\%'12""); /* latin capital letter E with grave, U+00C8 ISOlat1 */
%Let EPSILON =%str(\R/RTF""\u917\%'13""); /* greek capital letter epsilon, U+0395 */
%Let ETA =%str(\R/RTF""\u919\%'14""); /* greek capital letter eta, U+0397 */
%Let EUML =%str(\R/RTF""\u203\%'15""); /* latin capital letter E with diaeresis, U+00CB ISOlat1 */
%Let GAMMA =%str(\R/RTF""\u915\%'16""); /* greek capital letter gamma, U+0393 ISOgrk3 */
%Let IACUTE =%str(\R/RTF""\u205\%'17""); /* latin capital letter I with acute, U+00CD ISOlat1 */
%Let ICIRC =%str(\R/RTF""\u206\%'18""); /* latin capital letter I with circumflex, U+00CE ISOlat1 */
%Let IGRAVE =%str(\R/RTF""\u204\%'19""); /* latin capital letter I with grave, U+00CC ISOlat1 */
%Let IOTA =%str(\R/RTF""\u921\%'1A""); /* greek capital letter iota, U+0399 */
%Let IUML =%str(\R/RTF""\u207\%'1B""); /* latin capital letter I with diaeresis, U+00CF ISOlat1 */
%Let KAPPA =%str(\R/RTF""\u922\%'1C""); /* greek capital letter kappa, U+039A */
%Let LAMBDA =%str(\R/RTF""\u923\%'1D""); /* greek capital letter lambda, U+039B ISOgrk3 */
%Let MU =%str(\R/RTF""\u924\%'1E""); /* greek capital letter mu, U+039C */
%Let NTILDE =%str(\R/RTF""\u209\%'1F""); /* latin capital letter N with tilde, U+00D1 ISOlat1 */
%Let NU =%str(\R/RTF""\u925\%'20""); /* greek capital letter nu, U+039D */
%Let OELIG =%str(\R/RTF""\u338\%'21""); /* latin capital ligature OE, U+0152 ISOlat2 */
%Let OACUTE =%str(\R/RTF""\u211\%'22""); /* latin capital letter O with acute, U+00D3 ISOlat1 */
%Let OCIRC =%str(\R/RTF""\u212\%'23""); /* latin capital letter O with circumflex, U+00D4 ISOlat1 */
%Let OGRAVE =%str(\R/RTF""\u210\%'24""); /* latin capital letter O with grave, U+00D2 ISOlat1 */
%Let OMEGA =%str(\R/RTF""\u937\%'25""); /* greek capital letter omega, U+03A9 ISOgrk3 */
%Let OMICRON =%str(\R/RTF""\u927\%'26""); /* greek capital letter omicron, U+039F */
%Let OSLASH =%str(\R/RTF""\u216\%'27""); /* latin capital letter O with stroke = latin capital letter O slash, U+00D8 ISOlat1 */
%Let OTILDE =%str(\R/RTF""\u213\%'28""); /* latin capital letter O with tilde, U+00D5 ISOlat1 */
%Let OUML =%str(\R/RTF""\u214\%'29""); /* latin capital letter O with diaeresis, U+00D6 ISOlat1 */
%Let PHI =%str(\R/RTF""\u934\%'2A""); /* greek capital letter phi, U+03A6 ISOgrk3 */
%Let PI =%str(\R/RTF""\u928\%'2B""); /* greek capital letter pi, U+03A0 ISOgrk3 */
%Let PRIME =%str(\R/RTF""\u8243\%'2C""); /* double prime = seconds = inches, U+2033 ISOtech */
%Let PSI =%str(\R/RTF""\u936\%'2D""); /* greek capital letter psi, U+03A8 ISOgrk3 */
%Let RHO =%str(\R/RTF""\u929\%'2E""); /* greek capital letter rho, U+03A1 */
%Let SCARON =%str(\R/RTF""\u352\%'2F""); /* latin capital letter S with caron, U+0160 ISOlat2 */
%Let SIGMA =%str(\R/RTF""\u931\%'30""); /* greek capital letter sigma, U+03A3 ISOgrk3 */
%Let THORN =%str(\R/RTF""\u222\%'31""); /* latin capital letter THORN, U+00DE ISOlat1 */
%Let TAU =%str(\R/RTF""\u932\%'32""); /* greek capital letter tau, U+03A4 */
%Let THETA =%str(\R/RTF""\u920\%'33""); /* greek capital letter theta, U+0398 ISOgrk3 */
%Let UACUTE =%str(\R/RTF""\u218\%'34""); /* latin capital letter U with acute, U+00DA ISOlat1 */
%Let UCIRC =%str(\R/RTF""\u219\%'35""); /* latin capital letter U with circumflex, U+00DB ISOlat1 */
%Let UGRAVE =%str(\R/RTF""\u217\%'36""); /* latin capital letter U with grave, U+00D9 ISOlat1 */
%Let UPSILON =%str(\R/RTF""\u933\%'37""); /* greek capital letter upsilon, U+03A5 ISOgrk3 */
%Let UUML =%str(\R/RTF""\u220\%'38""); /* latin capital letter U with diaeresis, U+00DC ISOlat1 */
%Let XI =%str(\R/RTF""\u926\%'39""); /* greek capital letter xi, U+039E ISOgrk3 */
%Let YACUTE =%str(\R/RTF""\u221\%'3A""); /* latin capital letter Y with acute, U+00DD ISOlat1 */
%Let YUML =%str(\R/RTF""\u376\%'3B""); /* latin capital letter Y with diaeresis, U+0178 ISOlat2 */
%Let ZETA =%str(\R/RTF""\u918\%'3C""); /* greek capital letter zeta, U+0396 */
%Let AACUTES =%str(\R/RTF""\u225\%'3D""); /* latin small letter a with acute, U+00E1 ISOlat1 */
%Let ACIRCS =%str(\R/RTF""\u226\%'3E""); /* latin small letter a with circumflex, U+00E2 ISOlat1 */
%Let ACUTES =%str(\R/RTF""\u180\%'3F""); /* acute accent = spacing acute, U+00B4 ISOdia */
%Let AELIGS =%str(\R/RTF""\u230\%'40""); /* latin small letter ae = latin small ligature ae, U+00E6 ISOlat1 */
%Let AGRAVES =%str(\R/RTF""\u224\%'41""); /* latin small letter a with grave = latin small letter a grave, U+00E0 ISOlat1 */
%Let ALEFSYM =%str(\R/RTF""\u8501\%'42""); /* alef symbol = first transfinite cardinal, U+2135 NEW */
%Let ALPHAS =%str(\R/RTF""\u945\%'43""); /* greek small letter alpha, U+03B1 ISOgrk3 */
%Let AMPS =%str(\R/RTF""\u38\%'44""); /* ampersand, U+0026 ISOnum */
%Let AND =%str(\R/RTF""\u8743\%'45""); /* logical and = wedge, U+2227 ISOtech */
%Let ANG =%str(\R/RTF""\u8736\%'46""); /* angle, U+2220 ISOamso */
%Let ARINGS =%str(\R/RTF""\u229\%'47""); /* latin small letter a with ring above = latin small letter a ring, U+00E5 ISOlat1 */
%Let ASYMP =%str(\R/RTF""\u8776\%'48""); /* almost equal to = asymptotic to, U+2248 ISOamsr */
%Let ATILDES =%str(\R/RTF""\u227\%'49""); /* latin small letter a with tilde, U+00E3 ISOlat1 */
%Let AUMLS =%str(\R/RTF""\u228\%'4A""); /* latin small letter a with diaeresis, U+00E4 ISOlat1 */
%Let BDQUO =%str(\R/RTF""\u8222\%'4B""); /* double low-9 quotation mark, U+201E NEW */
%Let BETAS =%str(\R/RTF""\u946\%'4C""); /* greek small letter beta, U+03B2 ISOgrk3 */
%Let BRVBAR =%str(\R/RTF""\u166\%'4D""); /* broken bar = broken vertical bar, U+00A6 ISOnum */
%Let BULL =%str(\R/RTF""\u8226\%'4E""); /* bullet = black small circle, U+2022 ISOpub */
%Let CAP =%str(\R/RTF""\u8745\%'4F""); /* intersection = cap, U+2229 ISOtech */
%Let CCEDILS =%str(\R/RTF""\u231\%'50""); /* latin small letter c with cedilla, U+00E7 ISOlat1 */
%Let CEDILS =%str(\R/RTF""\u184\%'51""); /* cedilla = spacing cedilla, U+00B8 ISOdia */
%Let CENT =%str(\R/RTF""\u162\%'52""); /* cent sign, U+00A2 ISOnum */
%Let CHIS =%str(\R/RTF""\u967\%'53""); /* greek small letter chi, U+03C7 ISOgrk3 */
%Let CIRC =%str(\R/RTF""\u710\%'54""); /* modifier letter circumflex accent, U+02C6 ISOpub */
%Let CLUBS =%str(\R/RTF""\u9827\%'55""); /* black club suit = shamrock, U+2663 ISOpub */
%Let CONG =%str(\R/RTF""\u8773\%'56""); /* approximately equal to, U+2245 ISOtech */
%Let COPY =%str(\R/RTF""\u169\%'57""); /* copyright sign, U+00A9 ISOnum */
%Let CRARR =%str(\R/RTF""\u8629\%'58""); /* downwards arrow with corner leftwards = carriage return, U+21B5 NEW */
%Let CUP =%str(\R/RTF""\u8746\%'59""); /* union = cup, U+222A ISOtech */
%Let CURREN =%str(\R/RTF""\u164\%'5A""); /* currency sign, U+00A4 ISOnum */
%Let DARR =%str(\R/RTF""\u8659\%'5B""); /* downwards double arrow, U+21D3 ISOamsa */
%Let DAGGER =%str(\R/RTF""\u8224\%'5C""); /* dagger, U+2020 ISOpub */
%Let DARR =%str(\R/RTF""\u8595\%'5D""); /* downwards arrow, U+2193 ISOnum */
%Let DEG =%str(\R/RTF""\u176\%'5E""); /* degree sign, U+00B0 ISOnum */
%Let DELTAS =%str(\R/RTF""\u948\%'5F""); /* greek small letter delta, U+03B4 ISOgrk3 */
%Let DIAMS =%str(\R/RTF""\u9830\%'60""); /* black diamond suit, U+2666 ISOpub */
%Let DIVIDE =%str(\R/RTF""\u247\%'61""); /* division sign, U+00F7 ISOnum */
%Let EACUTES =%str(\R/RTF""\u233\%'62""); /* latin small letter e with acute, U+00E9 ISOlat1 */
%Let ECIRCS =%str(\R/RTF""\u234\%'63""); /* latin small letter e with circumflex, U+00EA ISOlat1 */
%Let EGRAVES =%str(\R/RTF""\u232\%'64""); /* latin small letter e with grave, U+00E8 ISOlat1 */
%Let EMPTY =%str(\R/RTF""\u8709\%'65""); /* empty set = null set = diameter, U+2205 ISOamso */
%Let EMSP =%str(\R/RTF""\u8195\%'66""); /* em space, U+2003 ISOpub */
%Let ENSP =%str(\R/RTF""\u8194\%'67""); /* en space, U+2002 ISOpub */
%Let EPSILONS =%str(\R/RTF""\u949\%'68""); /* greek small letter epsilon, U+03B5 ISOgrk3 */
%Let EQUIV =%str(\R/RTF""\u8801\%'69""); /* identical to, U+2261 ISOtech */
%Let ETAS =%str(\R/RTF""\u951\%'6A""); /* greek small letter eta, U+03B7 ISOgrk3 */
%Let ETHS =%str(\R/RTF""\u240\%'6B""); /* latin small letter eth, U+00F0 ISOlat1 */
%Let EUMLS =%str(\R/RTF""\u235\%'6C""); /* latin small letter e with diaeresis, U+00EB ISOlat1 */
%Let EURO =%str(\R/RTF""\u8364\%'6D""); /* euro sign, U+20AC NEW */
%Let EXIST =%str(\R/RTF""\u8707\%'6E""); /* there exists, U+2203 ISOtech */
%Let FNOFS =%str(\R/RTF""\u402\%'6F""); /* latin small f with hook = function = florin, U+0192 ISOtech */
%Let FORALL =%str(\R/RTF""\u8704\%'70""); /* for all, U+2200 ISOtech */
%Let FRAC12 =%str(\R/RTF""\u189\%'71""); /* vulgar fraction one half = fraction one half, U+00BD ISOnum */
%Let FRAC14 =%str(\R/RTF""\u188\%'72""); /* vulgar fraction one quarter = fraction one quarter, U+00BC ISOnum */
%Let FRAC34 =%str(\R/RTF""\u190\%'73""); /* vulgar fraction three quarters = fraction three quarters, U+00BE ISOnum */
%Let FRASL =%str(\R/RTF""\u8260\%'74""); /* fraction slash, U+2044 NEW */
%Let GAMMAS =%str(\R/RTF""\u947\%'75""); /* greek small letter gamma, U+03B3 ISOgrk3 */
%Let Gre =%str(\R/RTF""\u8805\%'76""); /* greater-than or equal to, U+2265 ISOtech */
%Let GrtT =%str(\R/RTF""\u62\%'77""); /* greater-than sign, U+003E ISOnum */
%Let HARR =%str(\R/RTF""\u8660\%'78""); /* left right double arrow, U+21D4 ISOamsa */
%Let HARR =%str(\R/RTF""\u8596\%'79""); /* left right arrow, U+2194 ISOamsa */
%Let HEARTS =%str(\R/RTF""\u9829\%'7A""); /* black heart suit = valentine, U+2665 ISOpub */
%Let HELLIP =%str(\R/RTF""\u8230\%'7B""); /* horizontal ellipsis = three dot leader, U+2026 ISOpub */
%Let IACUTES =%str(\R/RTF""\u237\%'7C""); /* latin small letter i with acute, U+00ED ISOlat1 */
%Let ICIRCS =%str(\R/RTF""\u238\%'7D""); /* latin small letter i with circumflex, U+00EE ISOlat1 */
%Let IEXCL =%str(\R/RTF""\u161\%'7E""); /* inverted exclamation mark, U+00A1 ISOnum */
%Let IGRAVES =%str(\R/RTF""\u236\%'7F""); /* latin small letter i with grave, U+00EC ISOlat1 */
%Let IMAGE =%str(\R/RTF""\u8465\%'80""); /* blackletter capital I = imaginary part, U+2111 ISOamso */
%Let INFIN =%str(\R/RTF""\u8734\%'81""); /* infinity, U+221E ISOtech */
%Let INT =%str(\R/RTF""\u8747\%'82""); /* integral, U+222B ISOtech */
%Let IOTA =%str(\R/RTF""\u953\%'83""); /* greek small letter iota, U+03B9 ISOgrk3 */
%Let IQUEST =%str(\R/RTF""\u191\%'84""); /* inverted question mark = turned question mark, U+00BF ISOnum */
%Let ISIN =%str(\R/RTF""\u8712\%'85""); /* element of, U+2208 ISOtech */
%Let IUMLS =%str(\R/RTF""\u239\%'86""); /* latin small letter i with diaeresis, U+00EF ISOlat1 */
%Let KAPPAS =%str(\R/RTF""\u954\%'87""); /* greek small letter kappa, U+03BA ISOgrk3 */
%Let LARR =%str(\R/RTF""\u8656\%'88""); /* leftwards double arrow, U+21D0 ISOtech */
%Let LAMBDAS =%str(\R/RTF""\u955\%'89""); /* greek small letter lambda, U+03BB ISOgrk3 */
%Let LANG =%str(\R/RTF""\u9001\%'8A""); /* left-pointing angle bracket = bra, U+2329 ISOtech */
%Let LAQUO =%str(\R/RTF""\u171\%'8B""); /* left-pointing double angle quotation mark = left pointing guillemet, U+00AB */
%Let LARR =%str(\R/RTF""\u8592\%'8C""); /* leftwards arrow, U+2190 ISOnum */
%Let LCEIL =%str(\R/RTF""\u8968\%'8D""); /* left ceiling = apl upstile, U+2308 ISOamsc */
%Let LDQUO =%str(\R/RTF""\u8220\%'8E""); /* left double quotation mark, U+201C ISOnum */
%Let Lse =%str(\R/RTF""\u8804\%'8F""); /* less-than or equal to, U+2264 ISOtech */
%Let LFLOOR =%str(\R/RTF""\u8970\%'90""); /* left floor = apl downstile, U+230A ISOamsc */
%Let LOWAST =%str(\R/RTF""\u8727\%'91""); /* asterisk operator, U+2217 ISOtech */
%Let LOZ =%str(\R/RTF""\u9674\%'92""); /* lozenge, U+25CA ISOpub */
%Let LRM =%str(\R/RTF""\u8206\%'93""); /* left-to-right mark, U+200E NEW RFC 2070 */
%Let LSAQUO =%str(\R/RTF""\u8249\%'94""); /* single left-pointing angle quotation mark, U+2039 ISO proposed */
%Let LSQUO =%str(\R/RTF""\u8216\%'95""); /* left single quotation mark, U+2018 ISOnum */
%Let Lst =%str(\R/RTF""\u60\%'96""); /* less-than sign, U+003C ISOnum */
%Let MACR =%str(\R/RTF""\u175\%'97""); /* macron = spacing macron = overline = APL overbar, U+00AF ISOdia */
%Let MDASH =%str(\R/RTF""\u8212\%'98""); /* em dash, U+2014 ISOpub */
%Let MICRO =%str(\R/RTF""\u181\%'99""); /* micro sign, U+00B5 ISOnum */
%Let MIDDOT =%str(\R/RTF""\u183\%'9A""); /* middle dot = Georgian comma = Greek middle dot, U+00B7 ISOnum */
%Let MINUS =%str(\R/RTF""\u8722\%'9B""); /* minus sign, U+2212 ISOtech */
%Let MUS =%str(\R/RTF""\u956\%'9C""); /* greek small letter mu, U+03BC ISOgrk3 */
%Let NABLA =%str(\R/RTF""\u8711\%'9D""); /* nabla = backward difference, U+2207 ISOtech */
%Let NBSP =%str(\R/RTF""\u160\%'9E""); /* no-break space = non-breaking space, U+00A0 ISOnum */
%Let NDASH =%str(\R/RTF""\u8211\%'9F""); /* en dash, U+2013 ISOpub */
%Let NEq =%str(\R/RTF""\u8800\%'A0""); /* not equal to, U+2260 ISOtech */
%Let NI =%str(\R/RTF""\u8715\%'A1""); /* contains as member, U+220B ISOtech */
%Let NOTeq =%str(\R/RTF""\u172\%'A2""); /* not sign = discretionary hyphen, U+00AC ISOnum */
%Let NOTIN =%str(\R/RTF""\u8713\%'A3""); /* not an element of, U+2209 ISOtech */
%Let NSUBS =%str(\R/RTF""\u8836\%'A4""); /* not a subset of, U+2284 ISOamsn */
%Let NTILDES =%str(\R/RTF""\u241\%'A5""); /* latin small letter n with tilde, U+00F1 ISOlat1 */
%Let NUS =%str(\R/RTF""\u957\%'A6""); /* greek small letter nu, U+03BD ISOgrk3 */
%Let OACUTES =%str(\R/RTF""\u243\%'A7""); /* latin small letter o with acute, U+00F3 ISOlat1 */
%Let OCIRCS =%str(\R/RTF""\u244\%'A8""); /* latin small letter o with circumflex, U+00F4 ISOlat1 */
%Let OELIGS =%str(\R/RTF""\u339\%'A9""); /* latin small ligature oe, U+0153 ISOlat2 */
%Let OGRAVES =%str(\R/RTF""\u242\%'AA""); /* latin small letter o with grave, U+00F2 ISOlat1 */
%Let OLINE =%str(\R/RTF""\u8254\%'AB""); /* overline = spacing overscore, U+203E NEW */
%Let OMEGAS =%str(\R/RTF""\u969\%'AC""); /* greek small letter omega, U+03C9 ISOgrk3 */
%Let OMICRONS =%str(\R/RTF""\u959\%'AD""); /* greek small letter omicron, U+03BF NEW */
%Let OPLUS =%str(\R/RTF""\u8853\%'AE""); /* circled plus = direct sum, U+2295 ISOamsb */
%Let OR =%str(\R/RTF""\u8744\%'AF""); /* logical or = vee, U+2228 ISOtech */
%Let ORDF =%str(\R/RTF""\u170\%'B0""); /* feminine ordinal indicator, U+00AA ISOnum */
%Let ORDM =%str(\R/RTF""\u186\%'B1""); /* masculine ordinal indicator, U+00BA ISOnum */
%Let OSLASHS =%str(\R/RTF""\u248\%'B2""); /* latin small letter o with stroke, = latin small letter o slash, U+00F8 ISOlat1 */
%Let OTILDES =%str(\R/RTF""\u245\%'B3""); /* latin small letter o with tilde, U+00F5 ISOlat1 */
%Let OTIMES =%str(\R/RTF""\u8855\%'B4""); /* circled times = vector product, U+2297 ISOamsb */
%Let OUMLS =%str(\R/RTF""\u246\%'B5""); /* latin small letter o with diaeresis, U+00F6 ISOlat1 */
%Let PARA =%str(\R/RTF""\u182\%'B6""); /* pilcrow sign = paragraph sign, U+00B6 ISOnum */
%Let PART =%str(\R/RTF""\u8706\%'B7""); /* partial differential, U+2202 ISOtech */
%Let PERMIL =%str(\R/RTF""\u8240\%'B8""); /* per mille sign, U+2030 ISOtech */
%Let PERP =%str(\R/RTF""\u8869\%'B9""); /* up tack = orthogonal to = perpendicular, U+22A5 ISOtech */
%Let PHIS =%str(\R/RTF""\u966\%'BA""); /* greek small letter phi, U+03C6 ISOgrk3 */
%Let PIS =%str(\R/RTF""\u960\%'BB""); /* greek small letter pi, U+03C0 ISOgrk3 */
%Let PIVS =%str(\R/RTF""\u982\%'BC""); /* greek pi symbol, U+03D6 ISOgrk3 */
%Let PLUSMN =%str(\R/RTF""\u177\%'BD""); /* plus-minus sign = plus-or-minus sign, U+00B1 ISOnum */
%Let POUND =%str(\R/RTF""\u163\%'BE""); /* pound sign, U+00A3 ISOnum */
%Let PRIME =%str(\R/RTF""\u8242\%'BF""); /* prime = minutes = feet, U+2032 ISOtech */
%Let PROD =%str(\R/RTF""\u8719\%'C0""); /* n-ary product = product sign, U+220F ISOamsb */
%Let PROP =%str(\R/RTF""\u8733\%'C1""); /* proportional to, U+221D ISOtech */
%Let PSIS =%str(\R/RTF""\u968\%'C2""); /* greek small letter psi, U+03C8 ISOgrk3 */
%Let QUOT =%str(\R/RTF""\u34\%'C3""); /* quotation mark = APL quote, U+0022 ISOnum */
%Let RARR =%str(\R/RTF""\u8658\%'C4""); /* rightwards double arrow, U+21D2 ISOtech */
%Let RADIC =%str(\R/RTF""\u8730\%'C5""); /* square root = radical sign, U+221A ISOtech */
%Let RANG =%str(\R/RTF""\u9002\%'C6""); /* right-pointing angle bracket = ket, U+232A ISOtech */
%Let RAQUO =%str(\R/RTF""\u187\%'C7""); /* right-pointing double angle quotation mark = right pointing guillemet, U+00BB */
%Let RARR =%str(\R/RTF""\u8594\%'C8""); /* rightwards arrow, U+2192 ISOnum */
%Let RCEIL =%str(\R/RTF""\u8969\%'C9""); /* right ceiling, U+2309 ISOamsc */
%Let RDQUO =%str(\R/RTF""\u8221\%'CA""); /* right double quotation mark, U+201D ISOnum */
%Let REAL =%str(\R/RTF""\u8476\%'CB""); /* blackletter capital R = real part symbol, U+211C ISOamso */
%Let REG =%str(\R/RTF""\u174\%'CC""); /* registered sign = registered trade mark sign, U+00AE ISOnum */
%Let RFLOOR =%str(\R/RTF""\u8971\%'CD""); /* right floor, U+230B ISOamsc */
%Let RHOS =%str(\R/RTF""\u961\%'CE""); /* greek small letter rho, U+03C1 ISOgrk3 */
%Let RLM =%str(\R/RTF""\u8207\%'CF""); /* right-to-left mark, U+200F NEW RFC 2070 */
%Let RSAQUO =%str(\R/RTF""\u8250\%'D0""); /* single right-pointing angle quotation mark, U+203A ISO proposed */
%Let RSQUO =%str(\R/RTF""\u8217\%'D1""); /* right single quotation mark, U+2019 ISOnum */
%Let SBQUO =%str(\R/RTF""\u8218\%'D2""); /* single low-9 quotation mark, U+201A NEW */
%Let SCARONS =%str(\R/RTF""\u353\%'D3""); /* latin small letter s with caron, U+0161 ISOlat2 */
%Let SDOT =%str(\R/RTF""\u8901\%'D4""); /* dot operator, U+22C5 ISOamsb */
%Let SECT =%str(\R/RTF""\u167\%'D5""); /* section sign, U+00A7 ISOnum */
%Let SHY =%str(\R/RTF""\u173\%'D6""); /* soft hyphen = discretionary hyphen, U+00AD ISOnum */
%Let SIGMAS =%str(\R/RTF""\u963\%'D7""); /* greek small letter sigma, U+03C3 ISOgrk3 */
%Let SIGMAF =%str(\R/RTF""\u962\%'D8""); /* greek small letter final sigma, U+03C2 ISOgrk3 */
%Let SIM =%str(\R/RTF""\u8764\%'D9""); /* tilde operator = varies with = similar to, U+223C ISOtech */
%Let SPADES =%str(\R/RTF""\u9824\%'DA""); /* black spade suit, U+2660 ISOpub */
%Let SUB =%str(\R/RTF""\u8834\%'DB""); /* subset of, U+2282 ISOtech */
%Let SUBE =%str(\R/RTF""\u8838\%'DC""); /* subset of or equal to, U+2286 ISOtech */
%Let SUM =%str(\R/RTF""\u8721\%'DD""); /* n-ary sumation, U+2211 ISOamsb */
%Let SUP =%str(\R/RTF""\u8835\%'DE""); /* superset of, U+2283 ISOtech */
%Let SPP1 =%str(\R/RTF""\u185\%'DF""); /* superscript one = superscript digit one, U+00B9 ISOnum */
%Let SPP2 =%str(\R/RTF""\u178\%'E0""); /* superscript two = superscript digit two = squared, U+00B2 ISOnum */
%Let SPP3 =%str(\R/RTF""\u179\%'E1""); /* superscript three = superscript digit three = cubed, U+00B3 ISOnum */
%Let SUPE =%str(\R/RTF""\u8839\%'E2""); /* superset of or equal to, U+2287 ISOtech */
%Let SZLIGS =%str(\R/RTF""\u223\%'E3""); /* latin small letter sharp s = ess-zed, U+00DF ISOlat1 */
%Let TAUS =%str(\R/RTF""\u964\%'E4""); /* greek small letter tau, U+03C4 ISOgrk3 */
%Let THERE4 =%str(\R/RTF""\u8756\%'E5""); /* therefore, U+2234 ISOtech */
%Let THETAS =%str(\R/RTF""\u952\%'E6""); /* greek small letter theta, U+03B8 ISOgrk3 */
%Let THETASYM =%str(\R/RTF""\u977\%'E7""); /* greek small letter theta symbol, U+03D1 NEW */
%Let THINSP =%str(\R/RTF""\u8201\%'E8""); /* thin space, U+2009 ISOpub */
%Let THORNS =%str(\R/RTF""\u254\%'E9""); /* latin small letter thorn with, U+00FE ISOlat1 */
%Let TILDES =%str(\R/RTF""\u732\%'EA""); /* small tilde, U+02DC ISOdia */
%Let TIMES =%str(\R/RTF""\u215\%'EB""); /* multiplication sign, U+00D7 ISOnum */
%Let TRADE =%str(\R/RTF""\u8482\%'EC""); /* trade mark sign, U+2122 ISOnum */
%Let UARRS =%str(\R/RTF""\u8657\%'ED""); /* upwards double arrow, U+21D1 ISOamsa */
%Let UACUTE =%str(\R/RTF""\u250\%'EE""); /* latin small letter u with acute, U+00FA ISOlat1 */
%Let UARRS =%str(\R/RTF""\u8593\%'EF""); /* upwards arrow, U+2191 ISOnum */
%Let UCIRCS =%str(\R/RTF""\u251\%'F0""); /* latin small letter u with circumflex, U+00FB ISOlat1 */
%Let UGRAVE =%str(\R/RTF""\u249\%'F1""); /* latin small letter u with grave, U+00F9 ISOlat1 */
%Let UML =%str(\R/RTF""\u168\%'F2""); /* diaeresis = spacing diaeresis, U+00A8 ISOdia */
%Let UPSIHS =%str(\R/RTF""\u978\%'F3""); /* greek upsilon with hook symbol, U+03D2 NEW */
%Let UPSILONS =%str(\R/RTF""\u965\%'F4""); /* greek small letter upsilon, U+03C5 ISOgrk3 */
%Let UUML =%str(\R/RTF""\u252\%'F5""); /* latin small letter u with diaeresis, U+00FC ISOlat1 */ ______________________________________________________________*\
%Let WEIERPS =%str(\R/RTF""\u8472\%'F6""); /* script capital P = power set = Weierstrass p, U+2118 ISOamso */ |
%Let XIS =%str(\R/RTF""\u958\%'F7""); /* greek small letter xi, U+03BE ISOgrk3 */ e n d p r o g r a m |
%Let YACUTES =%str(\R/RTF""\u253\%'F8""); /* latin small letter y with acute, U+00FD ISOlat1 */ _______________________________________________________________|
%Let YEN =%str(\R/RTF""\u165\%'F9""); /* yen sign = yuan sign, U+00A5 ISOnum */ */
%Let YUMLS =%str(\R/RTF""\u255\%'FA""); /* latin small letter y with diaeresis, U+00FF ISOlat1 */ !@#;
%Let ZETAS =%str(\R/RTF""\u950\%'FB""); /* greek small letter zeta, U+03B6 ISOgrk3 */
%Let ZWJ =%str(\R/RTF""\u8205\%'FC""); /* zero width joiner, U+200D NEW RFC 2070 */ acro runifchanged;
%Let ZWNJ =%str(\R/RTF""\u8204\%'FD""); /* zero width non-joiner, U+200C NEW RFC 2070 */

%let l= %str(\R/RTF'\li270 ');
%let s= %str(\R/RTF'{\super -x} ');

%let ZWNJ=%str(\R/RTF""\cf2\b\u956\%'9C\u177\%'BD\u963\%'D7\b0""); /* mu plus or minus sigma */
%let ZWNK=%str(\R/RTF""\cf13\b\u915\%'16\u923\%'1D\u931\%'30\b0""); /* capital Gamma Lamda Sigma */

/* Show symbols withou5 % */

%put ZWNJ=&ZWNJ.;
%put ZWNK=&ZWNK.;

scttttt
Calcite | Level 5

PDF and RTF

Ksharp
Super User

^S={textdecoration=underline}
OR

title1 '~R/RTF"\ul " Title is italic and contains underlined text'; 


sas-innovate-2024.png

Join us for SAS Innovate April 16-19 at the Aria in Las Vegas. Bring the team and save big with our group pricing for a limited time only.

Pre-conference courses and tutorials are filling up fast and are always a sellout. Register today to reserve your seat.

 

Register now!

How to Concatenate Values

Learn how use the CAT functions in SAS to join values from multiple variables into a single value.

Find more tutorials on the SAS Users YouTube channel.

Click image to register for webinarClick image to register for webinar

Classroom Training Available!

Select SAS Training centers are offering in-person courses. View upcoming courses for:

View all other training opportunities.

Discussion stats
  • 4 replies
  • 4403 views
  • 0 likes
  • 4 in conversation