Producing HTML from Paradox 10 reports using ObjectPAL

[Leon Chalnick]

Has anyone had any success producing HTML versions of reports via OPAL?

Not getting any error messages, but not getting any reports either, heheh.
Actually, what I'm trying to do is produce report output in an HTML file on
disk. Here's the code I'm using. BTW, I've copied the HTMLIB01 DLL into the
current working dir.
Please reply in email. TIA.
--Leon

type
HTMLReport = record
strURI string
strTitle string
iBGColor longInt
iTextcolor longInt
mHeader memo
mTemplate memo
lStatic logical
lMessage logical
endRecord
endtype

uses HTMLIB01
HTMLPublish_Report(var rpt report, var HTMLrec HTMLReport) Logical
enduses


method pushButton(var eventInfo Event)
var
rpt report
HTMLrec HTMLReport
endVar

HTMLrec.strURI = "d:\\pdoxdata\\myapp\\testrpt.html"
rpt.open(":repts:myreport.rsl", winstylehidden)
HTMLPublish_Report(rpt, HTMLrec)
rpt.close()
endMethod

[Bertil Isberg]

Leon

what I know on this is covered at

http://w1.826.comhem.se/~u82608896/paradox/openbugs.htm#PX0632

[Leon Chalnick]

So Bertil, that appears to indicate that the publishTo() method doesn't work
properly (why am I not surprised? heheh). But you have no knowledge of the
newer HTMLPublish_Report() function in Corel's HTMLIB01 ?

--Leon

[Bertil Isberg]

Leon
<<
But you have no knowledge of the
newer HTMLPublish_Report() function in Corel's HTMLIB01 ?
I have never tested that function.

[Bertil Isberg]

Leon
<<
BTW, I've copied the HTMLIB01 DLL into the current working dir.
HTMLIB01 is not a DLL but a LDL, which means your uses clause should be

uses ObjectPAL

Anyway, I get a syntax error "parameter mismatch" on

HTMLPublish_Report(rpt, HTMLrec)

[Leon Chalnick]

Ah yes, hahah, don't know how I missed that!! Odd that my code doesn't
generate a runtime error.

Ultimately, it is not essential that I publish the reports as HTML. They
just need to be in some more-or-less platform independant format. The
publishTo() RTF format seems to work okay and that will do for now. I'd like
to devote some more time to publishing reports in HTML eventually...but for
now, getting the task done is what is imporant. Thanks for your help.

--Leon

Post by Bertil Isberg
Leon
<<
BTW, I've copied the HTMLIB01 DLL into the current working dir.
HTMLIB01 is not a DLL but a LDL, which means your uses clause should be
uses ObjectPAL
Anyway, I get a syntax error "parameter mismatch" on
HTMLPublish_Report(rpt, HTMLrec)
--
Bertil Isberg - CTECH
online: http://w1.826.comhem.se/~u82608896/
FAQ newsgroup: corel.wpoffice.paradox-faq

[Francois Letourneau]

I have used Paradox to create quite complex static HTML pages, but I am
using the GXEngine to do so.

Here is the code I am using to use the template

strPath = getaliasPath("collection")
strPathQC = getaliasPath("quebecmineral")
GXEngine.Open ("Corel.GXEngine")
GXEngine^AddTemplateFile ("vendors", strPath +
GXEngine^AddSourceTable
("vendors",fullName(":collection:"),"web_echantillon.db")
GXEngine^OutputMethod = 1 ;output to a file
GXEngine^LongFileNames = true
GXEngine^OutputPath = strPathQC + "\\webdb\\specimen"
GXEngine^OutputFileName = "sp.HTM" ;output to the working directory
GXEngine^Execute()
GXEngine^RemoveSource ("vendors")
GXEngine^RemoveTemplate ("vendors")

I cannot show here the template used with this code (it is very long and
complex), but you can see how it works by generating a report HTT
template file while publishing your report to HTML. In the HTML Report
Expert, click on the Save As Template (3rd step) and then reuse the
template through the GXengine. You can rewrite all the basic HTML code
to include your logos, formatting, etc.

Here is a link to the website that shows the webpages produced.

http://www.quebecmineral.com/webdb/ech/Mine%20Jeffrey_1_5.HTM#Site=Mine%20Jeffrey&Index2=V%E9suvianite%20Sur%20Diopside

Hope this helps

Francois Letourneau

Post by Leon Chalnick
Has anyone had any success producing HTML versions of reports via OPAL?
Not getting any error messages, but not getting any reports either, heheh.
Actually, what I'm trying to do is produce report output in an HTML file on
disk. Here's the code I'm using. BTW, I've copied the HTMLIB01 DLL into the
current working dir.
Please reply in email. TIA.
--Leon
type
HTMLReport = record
strURI string
strTitle string
iBGColor longInt
iTextcolor longInt
mHeader memo
mTemplate memo
lStatic logical
lMessage logical
endRecord
endtype
uses HTMLIB01
HTMLPublish_Report(var rpt report, var HTMLrec HTMLReport) Logical
enduses
method pushButton(var eventInfo Event)
var
rpt report
HTMLrec HTMLReport
endVar
HTMLrec.strURI = "d:\\pdoxdata\\myapp\\testrpt.html"
rpt.open(":repts:myreport.rsl", winstylehidden)
HTMLPublish_Report(rpt, HTMLrec)
rpt.close()
endMethod

[Francois Letourneau]

One line has been truncated in the previous post. Here is the good one

Post by Francois Letourneau
I have used Paradox to create quite complex static HTML pages, but I am
using the GXEngine to do so.
Here is the code I am using to use the template

strPath = getaliasPath("collection")
strPathQC = getaliasPath("quebecmineral")
; gabarit pour page de chaque échantillon
GXEngine.Open ("Corel.GXEngine")
GXEngine^AddTemplateFile ("vendors", strPath +
"\\gabarits\\qc_min_liste_echantillons1.htt")
GXEngine^AddSourceTable
("vendors",fullName(":collection:"),"web_echantillon.db")
GXEngine^OutputMethod = 1 ;output to a file
GXEngine^LongFileNames = true
GXEngine^OutputPath = strPathQC + "\\webdb\\specimen"
GXEngine^OutputFileName = "sp.HTM" ;output to the working directory
GXEngine^Execute()
GXEngine^RemoveSource ("vendors")
GXEngine^RemoveTemplate ("vendors")

Post by Francois Letourneau
I cannot show here the template used with this code (it is very long and
complex), but you can see how it works by generating a report HTT
template file while publishing your report to HTML. In the HTML Report
Expert, click on the Save As Template (3rd step) and then reuse the
template through the GXengine. You can rewrite all the basic HTML code
to include your logos, formatting, etc.
Here is a link to the website that shows the webpages produced.
http://www.quebecmineral.com/webdb/ech/Mine%20Jeffrey_1_5.HTM#Site=Mine%20Jeffrey&Index2=V%E9suvianite%20Sur%20Diopside
Hope this helps
Francois Letourneau

Post by Leon Chalnick
Has anyone had any success producing HTML versions of reports via OPAL?
Not getting any error messages, but not getting any reports either, heheh.
Actually, what I'm trying to do is produce report output in an HTML file on
disk. Here's the code I'm using. BTW, I've copied the HTMLIB01 DLL into the
current working dir.
Please reply in email. TIA.
--Leon
type
HTMLReport = record
strURI string
strTitle string
iBGColor longInt
iTextcolor longInt
mHeader memo
mTemplate memo
lStatic logical
lMessage logical
endRecord
endtype
uses HTMLIB01
HTMLPublish_Report(var rpt report, var HTMLrec HTMLReport) Logical
enduses
method pushButton(var eventInfo Event)
var
rpt report
HTMLrec HTMLReport
endVar
HTMLrec.strURI = "d:\\pdoxdata\\myapp\\testrpt.html"
rpt.open(":repts:myreport.rsl", winstylehidden)
HTMLPublish_Report(rpt, HTMLrec)
rpt.close()
endMethod