Sample 25552: Adjusting the graphics output in a CGM using PROC GIMPORT
This sample is from the "SAS/GRAPH Software: Reference, Version 8", Volume 2, Chapter 17.
For additional information on the sample refer to this book.
/*+-------------------------------------------------------------+
| S A S S A M P L E L I B R A R Y |
| |
| NAME: GIPGROUT |
| TITLE: GIPGROUT-Adjusting the Graphics Output in a CGM |
| PRODUCT: GRAPH |
| SYSTEM: ALL |
| KEYS: GRAPHICS GIMPORT |
| PROCS: GIMPORT |
| DATA: INTERNAL |
| |
| SUPPORT: GRAPHICS STAFF UPDATE: |
| REF: SAS/GRAPH REFERENCE GUIDE |
| MISC: EDIT AND UNCOMMENT THE FILENAME STATEMENT. |
| |
+-------------------------------------------------------------+*/
/* Assign a fileref for the GSF file */
*filename gsasfile 'external-file';
/* Set the graphics environment */
goptions reset=ll gunit=pct border cback=white
colors=(black) htitle=6 htext=3
vpos=60 hpos=150;
/* Import the GSF file created by the CGM device driver */
proc gimport fileref=gsasfile filetype=cgm format=binary;
scale x=.7 y=.8;
translate x=3.5 y=10;
map 'SCRIPT' to script;
map 'CENTB' to centb;
map 'ZAPF' to zapf;
map 'SWISS' to swiss;
run;
quit;

This example imports the CGM file and modifies the output. This example uses the SCALE and TRANSLATE statements to correct the size and position of the imported CGM. The MAP statement is also used to substitute a SAS/GRAPH software font for a font in the CGM.
| Type: | Sample |
| Topic: | SAS Reference ==> Procedures ==> GIMPORT Third Party ==> Output ==> Device Drivers ==> CGM
|
| Date Modified: | 2005-08-27 03:03:22 |
| Date Created: | 2005-05-23 14:15:04 |
Operating System and Release Information
| SAS System | SAS/GRAPH | All | 8 TS M0 | n/a |