LISTSERV at the University of Georgia
Menubar Imagemap
Home Browse Manage Request Manuals Register
Previous messageNext messagePrevious in topicNext in topicPrevious by same authorNext by same authorPrevious page (October 1998, week 1)Back to main SAS-L pageJoin or leave SAS-L (or change settings)ReplyPost a new messageSearchProportional fontNon-proportional font
Date:   Thu, 1 Oct 1998 13:01:35 -0400
Reply-To:   "Fehd, Ronald J." <rjf2@CDC.GOV>
Sender:   "SAS(r) Discussion" <SAS-L@UGA.CC.UGA.EDU>
From:   "Fehd, Ronald J." <rjf2@CDC.GOV>
Subject:   tip: change font + size + orientation
Content-Type:   text/plain

Below are files I have put together, with help from SAS-L, which I use as included files to change print setup.

many thanx to all who have contributed, over the years, to this solution. Ron Fehd the macro -- and include -- maven CDC Atlanta GA

typical program usage: %include SASAUTOS(IPSULAND); %*include SASAUTOS(IPSUPOR8); %*include SASAUTOS(IPSUPORT); *proc PRINT data = <whatever>; %include SASAUTOS(IDLGPRT);*opens [Alt File Print] dialogue box in output window;

note1: linesize and pagesize in the IPSU???? files assume a left margin of 0.6 inch (for portrait use) note2: sysprintfont gives an error if other options follow it, which is why is it last in options statement note3: using dm then options did not work, note4: run may be optional, was necessary for testing note5: usage: save each file under <name>.SAS in fileref SASAUTOS filename SASAUTOS list; will give you list of directories used you can add a directory to SASAUTOS in either your config.sas or autoexec.sas

/*IDLGPRT: Dialog: Print? [Alt File Print]*/ dm output 'dlgprt' output;

/*IDLGPSU: Dialog: Print SetUp [Alt File prinT setup]*/ dm 'dlgprtsetup display' log;

/*IPSULAND: Print SetUp Landscape 8*/ options linesize = 148 pagesize = 51 pageno = 1 sysprintfont='SAS Monospace' 8; dm 'dlgprtsetup orient = landscape nodisplay'; run;

/*IPSUPOR8: Print SetUp Portrait 8*/ options linesize =110 pagesize = 67 pageno = 1 sysprintfont='SAS Monospace' 8; dm 'dlgprtsetup orient = portrait nodisplay' log; run;

/*IPSUPORT: Print SetUp Portrait 10*/ options linesize = 88 pagesize = 54 pageno = 1 sysprintfont='SAS Monospace' 10; dm 'dlgprtsetup orient = portrait nodisplay' log; run;


Back to: Top of message | Previous page | Main SAS-L page