HI promod
Please try the folloing steps
Download the RUPEE font from the Net and paste in Fonts folder in windows OS
try the following code
options sysprintfont="Rupee Foradian";
proc fontreg mode=all;
fontfile 'C:\Documents and Settings\Instructor\Desktop\rupee\';
run;
proc format;
picture rupee low-high='0000,000' (prefix='`');
run;
proc template;
define style New_style / store = SASUSER.TEMPLAT;
parent = styles.printer;
replace fonts /
'docFont' = ("Rupee Foradian", 12pt)
'headingFont' = ("Rupee Foradian", 10pt, bold)
'headingEmphasisFont' = ("Rupee Foradian", 10pt, bold italic)
'TitleFont' = ("Rupee Foradian", 12pt, italic bold)
'TitleFont2' = ("Rupee Foradian", 11pt, italic bold)
'FixedFont' = ("Rupee Foradian", 11pt)
'BatchFixedFont' = ("Rupee Foradian", 6pt)
'FixedHeadingFont' = ("Rupee Foradian", 9pt, bold)
'FixedStrongFont' = ("Rupee Foradian", 9pt, bold)
'FixedEmphasisFont' = ("Rupee Foradian", 9pt, italic)
'EmphasisFont' = ("Rupee Foradian", 10pt, italic)
'StrongFont' = ("Rupee Foradian", 10pt, bold) ;
end;
run;
ods pdf style=New_style;
proc print data=ia.empdata;
format salary rupee.;
title f='Rupee Foradian' '` symbol' ;
run;
ods pdf close;