Date:         Mon, 22 Oct 2001 16:09:17 -0400
Reply-To:     Jim Agnew <agnew@HSC.VCU.EDU>
Sender:       "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
From:         Jim Agnew <agnew@HSC.VCU.EDU>
Organization: Virginia Commonwealth University
Subject:      TRY 2  HHmm..  How do I get something back OUT of a graphics
              catalog?
Content-Type: text/plain; charset=us-ascii

I apologize for not being more exact... the answers I got from the list
who kindly replied
all seem to be expecting a GRAPH.  Here is the code i'm using...

what i need to do is modify if needed tmplate6.three  ;.......

Jim

*X 'DELETE laser.GSF ;*' ;
LIBNAME TMPLATE6 'D:\SASWORK\RPTER6\' ;
FILENAME __LASER 'SYS$DISK:[]LASER.GSF' ;

...

GOPTIONS DEVICE=WINPRTG ; * WINDOWS GREY HARDCOPY ;
GOPTIONS DEVICE=WINPRTM ; * WINDOWS B/W HARDCOPY ;
GOPTIONS DEVICE=PCL5 GSFMODE=APPEND NOPROMPT NODISPLAY ; * ROTATE
GSFNAME=JUNK ;
        * WINDOWS DISPLAY ;
...

PROC GPLOT DATA=GRAPHI1 GOUT=TEMPCAT ;
  PLOT
    HRICP*HRMON=1
    MAP*HRMON=2
    HRDOSE*HRMON=3
      /OVERLAY VAXIS=AXIS1
      VREF=20
      HAXIS=0 TO 156 BY 12 ;
      TITLE1 H=2 'ICP & MAP vs Dosing' ;
      LABEL HRMON='Hour Post Admission' ;
      LABEL HRICP='ICP & MAP' ;
      SYMBOL1 V=NONE I=JOIN ;
      SYMBOL2 V=NONE I=JOIN L=2 ;
      SYMBOL3 V=STAR I=NONE ;

...

PROC GPLOT DATA=GRAPHI2 GOUT=TEMPCAT ;
  PLOT
    HRICP*HRMON=1
    CPP*HRMON=2
    HRDOSE*HRMON=3
      /OVERLAY HAXIS=0 TO 156 BY 12
       VREF=70 ;
       TITLE1 H=2 'ICP & CPP vs Dosing ' ;
       TITLE2 ;
       TITLE3 ;
       SYMBOL1 V=NONE I=JOIN ;
       SYMBOL2 V=NONE I=JOIN L=2 ;
       SYMBOL3 V=STAR I=NONE ;
       LABEL HRICP = 'ICP & CPP' ;
       LABEL HRMON = 'Hour Post Admission' ;

...

PROC GPLOT DATA=GRAPHT1 GOUT=TEMPCAT ;
  FORMAT SEVERI SEVERIF. ;
  PLOT
    SEVERI*HRMON=1
    DSCORE*HRMON=2
      / OVERLAY
        HAXIS = 0 TO 156 BY 12
        VAXIS = 0 TO 7 BY 1 ;
        TITLE1 H=2 'Therapy Intensity Level (Peak)' ;
        LABEL HRMON = 'Hour Post Admission' ;
        LABEL SEVERI='TIL LEVEL' ;
        SYMBOL1 V=NONE L=1 I=JOIN ;
        SYMBOL2 V=X I=NONE ;
        FOOTNOTE1 J=C F=SIMPLEX H=2 " Patient ID : " &sasmrn ;
  RUN ;

GOPTIONS DEVICE=PCL5 DISPLAY GSFMODE=REPLACE NOPROMPT ; * ROTATE
GSFNAME=JUNK ;
PROC GREPLAY NOFS ;
 IGOUT=TEMPCAT ;
 TC=TMPLATE6.THREE ;
* TC=TMPLATE6 ;
 TEMPLATE=THREE ;
 TREPLAY 1:1 2:2 3:3 ;
* DELETE _ALL_ ;
RUN ;
*ENDSAS ;


Jim Agnew wrote:
>
> I have a graphics catalog that was created 12 years ago, and has been
> carefully carried back and forth between versions of vms and sas and
> unix and pc.  Now the time has come to change
> it.
>
> and the source is either long gone, or suspect as not matching what's in
> there.
>
> I've looked at proc catalog, but it seems to be only for moving entries
> into new catalogs...
>
> This is a graphics catalog that allows 3-up printing of graphs on one
> page in portrait mode.
>
> any takers???  ;-)
>
> Jim..