Telerik Reporting in ABL Open Edge 11.7

Posted by jeff.bornolla on 02-May-2019 05:25

Hi Telerik Team,

Please help!, I'm newbie in Open Edge ABL. I'm trying to call the report that has been created in a Standalone Designer but I was stack up in the connectionstring. Could someone help me on how to translate this Changing the connection string  to ABL language? My codes below was derive from this which is the way of calling the crystal report.

My company is still using the Report Builder of Progress9.1E which so old. We have already buy license for OpenEdge 11.7.4 and our problem now is on how to move our a system reports in Telerik. We have just downloaded the trial version to test on how to create report in Telerik using ABL programming and once we make this work, we are going to buy our own license. Please help. We really want to move to OE11.7 completely once we make this works. Thanks.

USING Progress.Windows.Form.
USING Telerik.Reporting.*.
USING System.Xml.*.
USING UtilityMethods.ReportConnectionStringManager.
DEFINE VARIABLE FormObjectRef                AS CLASS    Progress.Windows.Form                                 NO-UNDO.
DEFINE VARIABLE reportViewer1                  AS          Telerik.ReportViewer.WinForms.ReportViewer    NO-UNDO.

DEFINE VARIABLE uriReportSource1           AS          Telerik.Reporting.UriReportSource          NO-UNDO.
DEFINE VARIABLE sourceReportSource     AS          Telerik.Reporting.UriReportSource          NO-UNDO.
DEFINE VARIABLE reportSource                    AS          Telerik.Reporting.ReportSource               NO-UNDO.

DEFINE VARIABLE connectionString                     AS CHARACTER.
DEFINE VARIABLE connectionStringHandler      AS ReportConnectionStringManager.

DEFINE VARIABLE username                     AS CHARACTER   INIT "sysprogress"                      NO-UNDO.
DEFINE VARIABLE hostname                     AS CHARACTER   INIT "localhost"                             NO-UNDO.
DEFINE VARIABLE port                                 AS CHARACTER   INIT "16231"                                 NO-UNDO.
DEFINE VARIABLE db-name                       AS CHARACTER   INIT "bpls"                                     NO-UNDO.
DEFINE VARIABLE passwd                         AS CHARACTER   INIT "sysprogress"                      NO-UNDO.

    FormObjectRef = NEW Progress.Windows.Form().
    uriReportSource1 = NEW Telerik.Reporting.UriReportSource().
    reportViewer1  = NEW Telerik.ReportViewer.WinForms.ReportViewer().

    connectionString = "DRIVER=~{Progress OpenEdge 11.7 Driver};uid=" + username + ";host=" + hostname + ";port=" + port + ";db=" + db-name + ";pwd=" + passwd.
    connectionStringHandler = NEW  ReportConnectionStringManager(connectionString).
    sourceReportSource = NEW UriReportSource() .
sourceReportSource:Uri= "C:\eGaps\Butuan\Report\BusinessApplication.trdp".
    reportSource = connectionStringHandler:UpdateReportSource(sourceReportSource).

    reportViewer1:ReportSource = reportSource.

    FormObjectRef:Size = NEW System.Drawing.Size(1280, 768).
    reportViewer1:CausesValidation = FALSE.
    reportViewer1:Cursor           = System.Windows.Forms.Cursors:Default.
    reportViewer1:Dock             = System.Windows.Forms.DockStyle:Fill.
    reportViewer1:Location         = NEW System.Drawing.Point(0, 0).
    reportViewer1:Name             = "reportViewer1".
    uriReportSource1:Uri           = "C:\eGaps\Butuan\Report\BusinessApplication.trdp".
    reportViewer1:ReportSource     = uriReportSource1.
    reportViewer1:Size             = NEW System.Drawing.Size(545, 442).
    reportViewer1:TabIndex         = 0.
    reportViewer1:ReportSource = reportSource.

    FormObjectRef:StartPosition = System.Windows.Forms.FormStartPosition:CenterScreen.
    FormObjectRef:Text          = "Telerik Print Preview".

    WAIT-FOR FormObjectRef:ShowDialog().    
/*     crwReport:CLOSE(). */

All Replies

This thread is closed