We are using WebFOCUS 535 Server on HP-UX B.11.23 32on64 bit 9000/800/SD64A
The FEX file is generating EXCEL file in the following command
ON TABLE PCHOLD FORMAT &FORM
when form can be EXCEL or EXL2K or EXL97
When we are running it from HTML page the EXCEL file is generated correctly
But when we are runing it from PERL program the file cant be read by EXCEL
This FEX is called by a PERL program
my $browser = LWP::UserAgent->new;
my $url =URI ->new('http://dhtupgbl.tdc.cingular.net:9010/ibi_apps/WFServlet');
...
# ** hashv is has all the paramters we are passing to webfocus: parameter=value
$url->query_form(%hashv);
# ** output sets to 1 if one of the parameter we pass is OUTPUT=filename
if ($output == 1)
{
my $response = $browser->get($url, ":content_file" => $filename );
die "$url error: ",$response->status_line unless $response->is_success;
}
else
{
my $response1 = $browser->get($url);
die "$url error: ",$response1->status_line unless $response1->is_success;
print $response1->content;
}
When we run it with EXL97 we get an HTML file with XLS extension
<HTML>
<HEAD>
<META name="HandheldFriendly" content="True">
<META name="PalmComputingPlatform" content="True">
<TITLE>FOCUS Report</TITLE>
<BASE HREF="http://dhtupgbl.tdc.cingular.net:9010/approot/prodfex/">
</HEAD>
<BODY>
When we run it with EXCEL format we get empty file
HTML>
WebFOCUS Report<script Language="JavaScript">
< !--
function getrep() {
if(parseInt(window.navigator.appVersion,10)<4)
location.assign("http://dhtupgbl.tdc.cingular.net:9010/ibi_apps/WFServlet?PG_REQTYPE=REDIRECT&PG_Func=GETBINARY&PG_File=agbpwuyf.xls");
else
location.replace("http://dhtupgbl.tdc.cingular.net:9010/ibi_apps/WFServlet?PG_REQTYPE=REDIRECT&PG_Func=GETBINARY&PG_File=agbpwuyf.xls");
} //-->