Iam trying to Display Tabular and Graph reports side by side.Iam successful in displaying two graphs side by side.by considering two graphs as image files.If I want to Display tablular and Graph reports which were derived from the same table,and same sort fields,Iam not.

and my code looklike this,

-SET &ECHO=ALL;
-SET &APPFOLDER = 'baseapp/';
-SET &USERID = GETUSER('A8');
-SET &LC_USER = LOCASE(8, &USERID, 'A8');
-SET &GIF_FILE1 = &LC_USER || 'graph1' || '.jpg' ;
-SET &PATH = &APPFOLDER || &GIF_FILE1;
APP FI GRAPH2 DISK &PATH
-RUN
GRAPH FILE CAR
SUM
CNT.RETAIL_COST AS ''
BY COUNTRY
ON GRAPH SET GRAPHDEFAULT OFF
ON GRAPH SET HAXIS 520
ON GRAPH SET VAXIS 205
ON GRAPH SET UNITS PIXELS
ON GRAPH SET LOOKGRAPH PIE
ON GRAPH SET GRMERGE ON
ON GRAPH SET GRMULTIGRAPH 0
ON GRAPH SET GRLEGEND 0
ON GRAPH SET GRXAXIS 2
ON GRAPH HOLD AS GRAPH2 FORMAT JPEG
ON GRAPH SET STYLE *
TYPE = REPORT, FONT=VERDANA, SIZE=9, $
TYPE = HEADING, FONT=VERDANA, SIZE=10, STYLE=BOLD, $
ENDSTYLE
ON GRAPH SET GRAPHSTYLE *
setTemplateFile("/images/tdg/template/IBISouthWestern.txt");
setFontName(getDataText(),"Verdana");
setDepthAngle(65);
setPieDepth(45);
restoreAllSlices();
setPieFeelerTextDisplay(2);
setPieTilt(25);
setPieLabelDisplay(0);
setDisplay(getPieLabel(),true);
setLegendAutomatic(false);
setFontStyle(getLegendText(),2);
setFontStyle(getPieSliceLabel(),2);
setTextFormatPreset(getPieSliceLabel(),5);
setFontSizeInPoints(getTitle(),12);
setFontSizeAbsolute(getPieSliceLabel(),true);
setFontSizeInPoints(getPieSliceLabel(),8);
setFontSizeAbsolute(getLegendText(),true);
setFontSizeInPoints(getLegendText(),9);
setTextFormatPattern(getDataText(),"$#,###,###,###.##");
setFontSizeInPoints(getO1Label(),9);
setFontSizeInPoints(getY1Label(),9);
setFontSize(getDataText(),10);
setFontSizeAbsolute(getTitle(),true);
setFontSizeInPoints(getTitle(),12);
setLegendMarkerPosition(0);
setTransparentBorderColor(getChartBackground(),true);
setRect(getPieFrame(), new Rectangle(-15500,-13500,27000,27000));
setRect(getFrame(), new Rectangle(-10400,-10000,25000,30000));
setTextString(getTitle(),"TOTAL RETAIL COST BY COUNTRY");
ENDSTYLE
END
-RUN

This message has been edited. Last edited by: Kerry,

You can try this code. It displays 2 reports and 2 graphs side by side in excel format
-SET &ECHO=ALL;
-SET &PATH = 'SESSION/';
-SET &GRAPH1= &PATH ||'GRAPHCAR.GIF';
-SET &GRAPH2= &PATH ||'GRAPHEMP.GIF';

APP FI GRAPHCAR DISK &GRAPH1

GRAPH FILE CAR
SUM SALES
BY CAR
ON GRAPH SET HAXIS 400
ON GRAPH SET VAXIS 200
ON GRAPH SET UNITS PTS
ON GRAPH SET LOOKGRAPH PIE
ON GRAPH HOLD AS GRAPHCAR FORMAT GIF
ON GRAPH SET STYLE *
TYPE = REPORT, FONT=VERDANA, SIZE=9, $
TYPE = HEADING, FONT=VERDANA, SIZE=10, STYLE=BOLD, $
ENDSTYLE
END

APP FI GRAPHEMP DISK &GRAPH2

GRAPH FILE EMPDATA
SUM SALARY
BY DEPT
ON GRAPH SET HAXIS 500
ON GRAPH SET VAXIS 200
ON GRAPH SET UNITS PTS
ON GRAPH SET LOOKGRAPH VBAR
ON GRAPH HOLD AS GRAPHEMP FORMAT GIF
ON GRAPH SET STYLE *
TYPE = REPORT, FONT=VERDANA, SIZE=18, $
TYPE = HEADING, FONT=VERDANA, SIZE=10, STYLE=BOLD, $
ENDSTYLE
END

DEFINE FILE CAR
BLANK/A1='';
END
TABLE FILE CAR
PRINT CAR COUNTRY BLANK
ON TABLE HOLD AS CARTEST
END

DEFINE FILE EMPDATA
BLANK/A1='';
END

TABLE FILE EMPDATA
PRINT FIRSTNAME LASTNAME BLANK

ON TABLE HOLD AS EMPTEST
END

MATCH FILE CARTEST
PRINT *
BY BLANK
BY CAR
RUN
FILE EMPTEST
PRINT *
BY BLANK
AFTER MATCH HOLD AS TEST OLD-OR-NEW
END
-*you need to correct img src paths below
-SET &GRAPH1= '<'||'img src="http://localhost:8080/approot/SESSION/graphcar.gif"'||'/>';
-SET &GRAPH2= '<'||'img src="http://localhost:8080/approot/SESSION/graphemp.gif"'||'/>';
DEFINE FILE TEST
IMG1/A5000= '&GRAPH1' ;
IMG2/A5000= '&GRAPH2' ;
DUMMY/A10=' ';

END

TABLE FILE TEST
PRINT CAR DUMMY AS '' COUNTRY DUMMY AS '' DUMMY AS '' DUMMY AS '' DUMMY AS '' FIRSTNAME DUMMY AS '' LASTNAME
BY DUMMY NOPRINT
ON TABLE SUBHEAD
"""
"CAR REPORT<+0>EMPLOYEE REPORT"

ON TABLE PCHOLD FORMAT EXL2K
ON TABLE SET STYLE *
TYPE =TITLE,
STYLE=BOLD,
$
TYPE=TABHEADING,
STYLE=BOLD,HEADALIGN=BODY,$
TYPE=TABHEADING,
ITEM=1,COLSPAN=7,POSITION=CAR,$
TYPE=TABHEADING,
ITEM=2,COLSPAN=2,POSITION=FIRSTNAME,$
END

-EXIT

Sahkumar

my answer does not give you any additional solution, but I'm just a bit wondering why everybody always wants the output in Excel?
sometimes I do understand, people want to use it for further use, but if you combine it with graphs and with this special thing of posting it side by side the only thing I can think of is that you want to print it.
If so, why not a compound PDF?

Thank you very much for ur time,

Reflection, I ran ur code that u has sent ,its dispalying two tabular report fine ,the for graphs its diplaying too many graphs like if the table contains 10 records, its displaying 10 graphs ,I spend some time to fix that , nosuccess.

As I mention I need to Tabular and Graph Reports side by side

Thanks,
Saikumar.

Use SET GRMERGE = ON which is in the manuals. Download some if you have access (and therefore support!) and keep them within arms reach!

T

TABLE FILE CAR
SUM SALES
BY COUNTRY
ON TABLE HOLD AS HLDFILE1 FORMAT HTMTABLE
ON TABLE NOTOTAL
END


TABLE FILE CAR
SUM SALES
BY MODEL
ON TABLE HOLD AS HLDFILE2 FORMAT HTMTABLE
ON TABLE NOTOTAL
END
SET HTMLFORMTYPE=XLS
-* Below code is not displaying properly
-* I had a html table syntax for displaying above files in a table row as two cells side by side.
-HTMLFORM BEGIN
<TABLE>
<TR>
<TD>
!IBI.FIL.HLDFILE1;
</TD>
<TD>
!IBI.FIL.HLDFILE2;
</TD>
</TR>
</TABLE>
-HTMLFORM END

Venupalvai

Thanks for the reminder on the technique, but both of the posts that you responded to are very old (2006 and 2008).