Focal Point
[CLOSED] Excel tabs with HTML

This topic can be found at:
http://forums.informationbuilders.com/eve/forums/a/tpc/f/7971057331/m/1927030296

November 21, 2019, 07:04 PM
JJ
[CLOSED] Excel tabs with HTML
I have two Excel outputs that need to display in two separate tabs in Excel. I would appreciate if anyone can tell me what I am doing wrong? CAR file example below. Thank you!

-SET &HDG=3;
-SET &COLBEG=3;
-SET &COLEND=2;

DEFINE FILE CAR
NEWMODEL/A24=PARAG(24, MODEL, ';', 8, NEWMODEL);
MODELP1/A8=GETTOK(NEWMODEL, 24, 1, ';', 8, MODELP1);
MODELP2/A8=GETTOK(NEWMODEL, 24, 2, ';', 8, MODELP2);
MODELP3/A8=GETTOK(NEWMODEL, 24, 3, ';', 8, MODELP3);
END
TABLE FILE CAR
SUM RCOST
ACROSS COUNTRY AS ''
ACROSS MODEL NOPRINT
ACROSS MODELP1 AS ''
ACROSS MODELP2 AS ''
ACROSS MODELP3 AS ''
BY CAR
ON TABLE SET PAGE OFF
ON TABLE SET STYLE *
TYPE=REPORT, ORIENTATION=LANDSCAPE, FONT='ARIAL',$
TYPE=REPORT, GRID=OFF, $
TYPE=ACROSSVALUE, ACROSS=COUNTRY, BORDER-RIGHT=MEDIUM, BORDER-LEFT=MEDIUM, BACKCOLOR=( 'YELLOW' 'WHITE' ), JUSTIFY=CENTER,$
TYPE=ACROSSVALUE, ACROSS=MODELP1, COLOR=RED,$
TYPE=ACROSSVALUE, ACROSS=MODELP2, COLOR=RED,$
TYPE=ACROSSVALUE, ACROSS=MODELP3, COLOR=RED,$
ENDSTYLE
ON TABLE HOLD AS HOLDFILE1 FORMAT HTMTABLE
END
-******************************************
DEFINE FILE CAR
NEWMODEL/A24=PARAG(24, MODEL, ';', 8, NEWMODEL);
MODELP1/A8=GETTOK(NEWMODEL, 24, 1, ';', 8, MODELP1);
MODELP2/A8=GETTOK(NEWMODEL, 24, 2, ';', 8, MODELP2);
MODELP3/A8=GETTOK(NEWMODEL, 24, 3, ';', 8, MODELP3);
END
TABLE FILE CAR
SUM RCOST
ACROSS COUNTRY AS ''
ACROSS MODEL NOPRINT
ACROSS MODELP1 AS ''
ACROSS MODELP2 AS ''
ACROSS MODELP3 AS ''
BY CAR
ON TABLE SET PAGE OFF
ON TABLE SET STYLE *
TYPE=REPORT, ORIENTATION=LANDSCAPE, FONT='ARIAL',$
TYPE=REPORT, GRID=OFF, $
TYPE=ACROSSVALUE, ACROSS=COUNTRY, BORDER-RIGHT=MEDIUM, BORDER-LEFT=MEDIUM, BACKCOLOR=( 'YELLOW' 'WHITE' ), JUSTIFY=CENTER,$
TYPE=ACROSSVALUE, ACROSS=MODELP1, COLOR=RED,$
TYPE=ACROSSVALUE, ACROSS=MODELP2, COLOR=RED,$
TYPE=ACROSSVALUE, ACROSS=MODELP3, COLOR=RED,$
ENDSTYLE
ON TABLE HOLD AS HOLDFILE2 FORMAT HTMTABLE
END
-******************************************
SET HTMLFORMTYPE=XLS
-**************************************************************
-HTMLFORM BEGIN

<html xmlns:o="urn:schemas-microsoft-com:office:office"
 xmlns:x="urn:schemas-microsoft-com:office:excel"
 xmlns="http://www.w3.org/TR/REC-html40">

<head>
<meta http-equiv=Content-Type content="text/html; charset=iso-8859-9">
<meta name=ProgId content=Excel.Sheet>
<meta name=Generator content="Microsoft Excel 11">


<!--[if gte mso 9]><xml>
 <x:ExcelWorkbook>
  <x:ExcelWorksheets>
   <x:ExcelWorksheet>
     <x:Name>Detail</x:Name>
    <x:WorksheetOptions>

     <!--x:FitToPage/-->
     <x:Print>
      <x:ValidPrinterInfo/>
       <x:Scale>75</x:Scale>
        <x:PaperSizeIndex>5</x:PaperSizeIndex>
        <x:HorizontalResolution>600</x:HorizontalResolution>
        <x:VerticalResolution>600</x:VerticalResolution>
        <x:Orientation>Landscape</x:Orientation>
     </x:Print>

<x:Selected/>
<x:DoNotDisplayGridlines/>
<!-- <x:FreezePanes/>
<x:FrozenNoSplit/>
<x:SplitHorizontal>&HDG.EVAL</x:SplitHorizontal>
<x:TopRowBottomPane>&HDG.EVAL</x:TopRowBottomPane>
<x:SplitVertical>&COLEND.EVAL</x:SplitVertical>
<x:LeftColumnRightPane>&COLEND.EVAL</x:LeftColumnRightPane> -->
<x:ActivePane>0</x:ActivePane>
<x:Panes>
<x:Pane>
<x:Number>&COLBEG.EVAL</x:Number>
</x:Pane>
<x:Pane>
<x:Number>1</x:Number>
</x:Pane>
<x:Pane>
<x:Number>&COLEND.EVAL</x:Number>
</x:Pane>
<x:Pane>
<x:Number>0</x:Number>
</x:Pane>
</x:Panes>

     <x:ProtectContents>False</x:ProtectContents>
    </x:WorksheetOptions>
  </x:ExcelWorksheet>

   <x:ExcelWorksheet>
   		<x:Name>Summary</x:Name>

   </x:ExcelWorksheet>

  </x:ExcelWorksheets>
 </x:ExcelWorkbook>

</xml><![endif]-->
 </head>
 <body>
!IBI.FIL.HOLDFILE1;

<TABLE>
<TR>
<TD>
!IBI.FIL.HOLDFILE2;
</TD>
<TD>
!IBI.FIL.HOLDFILE2;
</TD>
</TR>
</TABLE>
</body>
</html>
-HTMLFORM END

This message has been edited. Last edited by: FP Mod Chuck,


WebFOCUS 8.2.05
Windows 2003
Excel, HTML, PDF
December 02, 2019, 10:31 AM
FP Mod Chuck
JJ

I missed seeing that no one had replied.. I hope you opened a case with techsupport.


Thank you for using Focal Point!

Chuck Wolff - Focal Point Moderator
WebFOCUS 7x and 8x, Windows, Linux All output Formats