***graphout.sas --UNIX goptions statements;


**This program would generate a graph in the graph window and you can print it from
there with pull down menus if you have modified your printer definition.;

data a;
do x=1 to 100;
y=ranuni(987495);
output; end;

proc gplot;
plot y*x;
run;
quit;



*Graphs look nicer if they are sent directly to the printer.  The following program will
send the graph directly to the printer. You may want to check the graph in the window
 first to be sure it is what you want.;

data a;
do x=1 to 100;
y=ranuni(987495);
output; end;

filename graphout pipe 'lpr';  **can put in autoexec.sas;
goptions gsfname=graphout dev=ps rotate=landscape;   **directly to printer;


proc gplot;
plot y*x;
run;
quit;


**To reset your graphic options to the default issue this command.;
goptions reset=all;