Created html from Html Painter that works with fex to consume a .Net web service?

November 26, 2010, 04:36 PM

Adrian Wong

Hi,
Has anyone created a html from the Html Painter that works with a WebFocus procedure that consumes a .Net web service?
The procedure works on its own without the html and returns the simplest report.
However, when I create the html (not create a form) and try to run it on clicking Submit, nothing happens.
Could it be that I need to ask the onInitialUpdate function in the window_onload function in the html to do something first?
Here is the code for the html and procedure.
Thanks in advance.

<codeHtml>

< !-- Generated by Report Layout Painter -->
<HTML>
<HEAD>
<script id=IBI_RelCallBack type=text/javascript>function AdjustChildrenPosition(){
}
</SCRIPT>

<script id=IBI_OptionsScript type=text/javascript>
var rltVersion = "764";
var cgipath = "cgipath";
var ibirls = "ibirls2";

var rltdyncalendar = "rltdyncalendar";
var gmap = "ibigmap";
var olap="olap";
var olappanebase="olappanebase";
var olapdrill="olapdrill";

var ibixmltree="ibixmltree";

var ibiOptions = new Array(cgipath,ibirls);
</SCRIPT>

<script id=IBI_nls type=text/javascript src="/ibi_html/javaassist/nls.js"></SCRIPT>

<script id=IBI_ibigbl type=text/javascript src="/ibi_html/javaassist/ibi/html/js/ibigbl.js"></SCRIPT>

<script id=IBI_ibigblloadCss type=text/javascript>
ibigblloadCss(null);</SCRIPT>
<TITLE>HtmlPage</TITLE>
<script id=clientEventHandlersJS type=text/javascript>
//Begin function window_onload
function window_onload() {

UpdateData();

// TODO: Add your event handler code here
//add onInitialUpdate() function to make changes before initial run of the reports
}
//End function window_onload
</SCRIPT>

<script for=window eventname="onload">window.onload = function() { window_onload(); }</SCRIPT>
</HEAD>
<BODY style="OVERFLOW: auto" bgColor=#9fb3cd edaconnectionrequired="true">
<INPUT style="Z-INDEX: 1; LEFT: 80px; POSITION: absolute; WIDTH: 80px; TOP: 266px; HEIGHT: 30px" id=button1 tabIndex=1 value=Submit type=button name=button1 requests_list="0">
<SPAN style="Z-INDEX: 2; LEFT: 80px; POSITION: absolute; WIDTH: 108px; TOP: 110px; HEIGHT: 19px" id=text1 tabIndex=2>Enter Start Date: </SPAN>
<INPUT style="Z-INDEX: 3; LEFT: 80px; POSITION: absolute; TOP: 146px" id=edit1 tabIndex=3 value=2010-01-01 hspace=0 accept=0 name=STARTDATE dfformat="A10" ibiformat="A10" displayfield="STARTDATE" datafield="STARTDATE" labelid="text1" addalloption="0" operation="NONE" selectedvalue="2010-01-01" datasource boundtovariable="1" requiredfield="1430986" datatype="0" sourcetype="typeMaster">
<SPAN style="Z-INDEX: 4; LEFT: 80px; POSITION: absolute; WIDTH: 140px; TOP: 188px; HEIGHT: 22px" id=text2 tabIndex=4>Enter End Date: </SPAN>
<INPUT style="Z-INDEX: 5; LEFT: 80px; POSITION: absolute; TOP: 224px" id=edit2 tabIndex=5 value=2010-06-30 hspace=0 accept=0 name=ENDDATE dfformat="A10" ibiformat="A10" displayfield="ENDDATE" datafield="ENDDATE" labelid="text2" addalloption="0" operation="NONE" selectedvalue="2010-06-30" datasource boundtovariable="1" requiredfield="1430986" datatype="0" sourcetype="typeMaster">
<INPUT style="LEFT: -100px; POSITION: absolute; TOP: -100px" id=layoutinfo type=hidden inputcontrolids="edit1;edit2">
<INPUT style="LEFT: -100px; POSITION: absolute; TOP: -100px" id=IBIMR_domain value=adrianwo/adrianwo.htm type=hidden name=IBIMR_domain>
<INPUT style="LEFT: -100px; POSITION: absolute; TOP: -100px" id=IBIMR_dir value=#appfolder1tb type=hidden name=IBIMR_dir>
<INPUT style="LEFT: -100px; POSITION: absolute; TOP: -100px" id=IBIMR_folder value=#fexvyuco76hz type=hidden name=IBIMR_folder>
<INPUT style="LEFT: -100px; POSITION: absolute; TOP: -100px" id=ibif_ex value=app/test_wsdl_2.htm type=hidden name=ibif_ex>
<INPUT style="LEFT: -100px; POSITION: absolute; TOP: -100px" id=ibiapp_app type=hidden name=ibiapp_app ismre="1">
<INPUT style="LEFT: -100px; POSITION: absolute; TOP: -100px" id=ibic_server value=EDASERVE type=hidden name=ibic_server>
<xml id=ibi_requests>
<script>
<requests>
<request requestid="0" sourcetype="typeFex" targettype="window" targetname="_blank" ibif_ex="app/test_wsdl_2.fex" IBIMR_domain="adrianwo/adrianwo.htm" IBIMR_folder="#fexvyuco76hz" IBIMR_dir="#appfolder1tb" IBIMR_sub_action="MR_STD_REPORT" activereport="0" reportcolumns="" ibiapp_app="">
<variables>
<variable parametercreatedinreslay="0" displayfield="STARTDATE" format="" field="STARTDATE" file="getproductordersummary.mas" desc="STARTDATE" datatype="0" operation="" default="2010-01-01" name="STARTDATE" textvarname="" accept="0" type="default" select="0" min="" max="" controltype="7" create="1"></variable>
<variable parametercreatedinreslay="0" displayfield="ENDDATE" format="" field="ENDDATE" file="getproductordersummary.mas" desc="ENDDATE" datatype="0" operation="" default="2010-06-30" name="ENDDATE" textvarname="" accept="0" type="default" select="0" min="" max="" controltype="7" create="1"></variable></variables></request></requests></script>
</xml></BODY>
<script id=IBI_loader type=text/javascript>
doBeforeLoad();
</SCRIPT>
</HTML>

</codeHtml>


<codeProcedure>

-SET &ECHO=ALL;
SET NODATA=' '
-DEFAULT &STARTDATE = '2010-01-01';
-DEFAULT &ENDDATE = '2010-06-30';
-SET &ASTARTDATE = &STARTDATE;
-SET &AENDDATE = &ENDDATE;
TABLE FILE GETPRODUCTORDERSUMMARY
PRINT
     GETPRODUCTORDERSUMMARY NOPRINT
     CVORLEVEL2ABSTRACT/I7C AS 'CVOR Level2 Abstract'
     CVORLEVEL1ABSTRACT/I7C AS 'CVOR Level1 Abstract'
     CVORDRIVERABSTRACT/I7C AS 'CVOR Driver Abstract'
     CARRIERSAFETYRATING/I7C AS 'Carrier Safety Rating'
HEADING
"Carrier Monthly Internet Statistics Report"
"for the period<+0> from:<+0> <STARTDATE  <+0>   to:<+0> <ENDDATE "
" "
FOOTING
"Created on: <+0>&DATEtMDYY <+0> "
WHERE ( STARTDATE EQ '&ASTARTDATE' ) AND ( ENDDATE EQ '&AENDDATE' );
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT HTML
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     SQUEEZE=ON,
     ORIENTATION=PORTRAIT,
$
TYPE=REPORT,
     GRID=OFF,
     FONT='TIMES NEW ROMAN',
     SIZE=10,
$
TYPE=HEADING,
     LINE=1,
     JUSTIFY=CENTER,
$
TYPE=HEADING,
     LINE=1,
     OBJECT=TEXT,
     ITEM=1,
     SIZE=12,
     STYLE=BOLD,
$
TYPE=HEADING,
     LINE=2,
     JUSTIFY=CENTER,
$
TYPE=HEADING,
     LINE=2,
     OBJECT=TEXT,
     ITEM=1,
     SIZE=12,
$
TYPE=HEADING,
     LINE=2,
     OBJECT=TEXT,
     ITEM=2,
     SIZE=12,
$
TYPE=HEADING,
     LINE=2,
     OBJECT=TEXT,
     ITEM=3,
     SIZE=12,
     STYLE=BOLD,
$
TYPE=HEADING,
     LINE=2,
     OBJECT=TEXT,
     ITEM=4,
     SIZE=12,
     STYLE=BOLD,
$
TYPE=HEADING,
     LINE=2,
     OBJECT=TEXT,
     ITEM=5,
     SIZE=12,
$
TYPE=HEADING,
     LINE=2,
     OBJECT=TEXT,
     ITEM=6,
     SIZE=12,
     STYLE=BOLD,
$
TYPE=HEADING,
     LINE=2,
     OBJECT=TEXT,
     ITEM=7,
     SIZE=12,
     STYLE=BOLD,
$
TYPE=HEADING,
     LINE=2,
     OBJECT=FIELD,
     ITEM=1,
     SIZE=12,
$
TYPE=HEADING,
     LINE=2,
     OBJECT=FIELD,
     ITEM=2,
     SIZE=12,
$
TYPE=HEADING,
     LINE=3,
     JUSTIFY=CENTER,
$
TYPE=FOOTING,
     LINE=1,
     OBJECT=TEXT,
     ITEM=1,
     SIZE=8,
$
TYPE=FOOTING,
     LINE=1,
     OBJECT=TEXT,
     ITEM=2,
     SIZE=8,
$
TYPE=FOOTING,
     LINE=1,
     OBJECT=TEXT,
     ITEM=3,
     SIZE=8,
$
ENDSTYLE
END

</codeProcedure>

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