Date:         Mon, 20 Dec 2004 09:31:04 -0500
Reply-To:     "Thomas, Robert G (Bob)" <RPT7@CDC.GOV>
Sender:       "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
From:         "Thomas, Robert G (Bob)" <RPT7@CDC.GOV>
Subject:      Question about inserting an html link between a title statement
              and a Proc GChart.
Content-Type: text/plain; charset="iso-8859-1"

                SAS-L:,
                I have a SAS/intrnet (CGI-Broker) program that generates an HTML page.  I want to add an HTML link at the top of a chart produced by Proc Gchart.
                The link would ideally go right below the text produced by the TITLE2 statement (Run report on full 4-char ICD code:).

                Can a TITLE statement generate an HTML Link?
                Can the ANNOTATE file put a link somewhere at the top of the page?  
                Is the Data Step Graphics Interface (DSGI) a possible solution?
        Will the ODS ESCAPECHAR = parameter help?
                 
                Any suggestions would be appreciated!

                Here is an abbreviated version of the code so far:

                        *** make annotate file to put percentages beside the bars;;
                        data annotate_file;
                        length function color style $ 8 percent 8 midpoint $6 text $ 50;
                        retain function 'label' color 'black' when 'a' style 'triplex'  xsys ysys '2' position '5' size 1.75 hsys '3';
                                set charttest (keep= newicd deaths);
                        percent=(deaths/&totd)*100;
                        midpoint=newicd;      If deaths > 0 then text=left(put((percent/100),percent7.1));     else deaths=.;
                        x=deaths + ((&roundup)*.05);  y=deaths/2;
                        run;

                        TITLE1 j=c f=triplex h=12 pt c=cx002288 "&injtitle - &dcause";
                        TITLE2 j=l f=triplex h=9 pt c=cx002288   " Run report on full 4-char ICD code:"  ;

                        axis1 label=(j=c "&save_ICDcodeVer" ) ;
                        axis2 label=(j=c "Number of Deaths" j=l)  major=(color=blue number=10) minor=(number=1) order=(0 to %eval(&roundup)) by %eval(&roundinc * 2));

                        proc gchart data=work.charttest;
                             hbar newicd / discrete     sumvar=deaths midpoints=&midpoints  raxis=axis2  maxis=axis1
                             annotate=annotate_file
                        cframe="#EEEEEE"    autoref  clipref   html=drillvar    name='lead'         des='Leading Causes of Death';
                        run;

                Bob Thomas
                IT Specialist
                HHS.CDC.NCIPC.OSP
                770-488-1978