Crystal Reports Via the Web

[merhottin]

Hope this is the right place to ask and I thank you in advance for any help.

We have Crystal Reports Develops edition 9.0 & The Report Application Server 9.0 installed on a windows 2000 server.

We are using Recrystallize to generate the .asp & .htm pages.

We get the first page of the crystal report, everything is fine. It is a drill down report. When we attempt to drill down, we get the following error :


The Report Application Server failed
webReporting.dll error '800003e5'
The Report Application Server failed
/test-dynamic-ras.asp, line 90


(FYI - This report is dynamic, if we create a static report, everything works fine. Doesn't seem to be a problem with the database, as we are able to get the data for the first screen. Possibly a problem displaying the drill down page(2nd page) ?)

Below is the test-dynamic-ras.asp. Line 90 is the last line of the code. Thanks again for your time, and any help you may provide.

John

<%
'This page was created by ReCrystallize Pro Web Publishing Wizard for Crystal Reports, version 11.1.3
'

http://www.recrystallize.com

'

Set ObjFactory = CreateObject("CrystalReports.ObjectFactory.2")
Set RptAppSession = ObjFactory.CreateObject("CrystalReports.ReportAppSession")
If Err.Number <> 0 Then
Response.Write "Failed to create ReportAppSession. "
Response.Write Err.Description
Err.Clear
End If
RptAppSession.Initialize
If Err.Number <> 0 Then
Response.Write "Failed to initialize ReportAppSession. "
Response.Write Err.Description
Err.Clear
End If

basePath = Request.ServerVariables("PATH_TRANSLATED")
While (Right(basePath, 1) <> "\" And Len(basePath) <> 0)
iLen = Len(basePath) - 1
basePath = Left(basePath, iLen)
Wend

baseVirtualPath = Request.ServerVariables("PATH_INFO")
While (Right(baseVirtualPath, 1) <> "/" And Len(baseVirtualPath) <> 0)
iLen = Len(baseVirtualPath) - 1
baseVirtualPath = Left(baseVirtualPath, iLen)
Wend

Set Session("oClientDoc") = RptAppSession.CreateService("CrystalClientDoc.ReportClientDocument")
If Err.Number <> 0 Then
Response.Write "Failed to create ReportClientDocument. "
Response.Write Err.Description
Err.Clear
End If
Session("oClientDoc").Open basePath & "test.rpt"
If Err.Number <> 0 Then
Response.Write "Failed to open report " & basepath & "test.rpt" & " "
Response.Write Err.Description
Err.Clear
End If

If Session("oClientDoc").ReportOptions.EnableSaveDataWithReport Then
Session("oClientDoc").RowSetController.Refresh
End If


Session("oClientDoc").DatabaseController.Logon "", ""



Set newParam = session("oClientDoc").DataDefinition.ParameterFields(0).Clone

ParamValue1 = Request("P1")
Set newValue = objFactory.CreateObject("CrystalReports.ParameterFieldDiscreteValue")
newValue.Value = CStr(ParamValue1)
newParam.CurrentValues.RemoveAll
newParam.CurrentValues.Add( newValue )
Session("oClientDoc").DataDefController.ParameterFieldController.Modify 0, newParam

%>
<%
Response.ExpiresAbsolute = Now() - 1
Set viewer = ObjFactory.CreateObject("CrystalReports.CrystalReportInteractiveViewer")
viewer.IsOwnForm = True
viewer.IsOwnPage = True
viewer.EnableParameterPrompt = False
viewer.HasBooleanSearchButton = True
viewer.HasCrystalLogo = False
viewer.PageLogo = ""
viewer.HasExportButton = True
viewer.HasGotoPageButton = True
viewer.HasPageNavigationButtons = True
viewer.HasHeaderArea = True
viewer.HasHelpButton = True
viewer.HasPrintButton = True
viewer.HasSearchButton = True
viewer.HasToggleGroupTreeButton = True
viewer.IsDisplayGroupTree = False
viewer.HasZoomFactorList = True
viewer.IsEnableDrillDown = True
viewer.PageTitle = "Interactive Test"
viewer.ZoomFactor = 100
viewer.ReportSource = Session("oClientDoc").ReportSource
Set BooleanSearchControl = ObjFactory.CreateObject("CrystalReports.BooleanSearchControl")
BooleanSearchControl.ReportDocument = Session("oClientDoc")
viewer.BooleanSearchControl = BooleanSearchControl
viewer.ProcessHttpRequest Request, Response, Null
%>

 

[Durango122]

Hi
Check with Recrystalize support.
I had that problem and they where able to help

good luck



Durango122