If I put the question other way round then it may make sense to most of us, so let me put it that way – Why should I use Crystal Reports for Visual Studio 2010 with SAP BusinessObjects BI Platform 4.0 (BI4.0) products? Have any thoughts on this? If not, then surely you do not want to miss this.

Recently, I was upgrading one of my projects to use BI4.0 .NET SDK, which was introduced with SP02 as MSI (Windows Installer), as I mostly deal with Crystal Reports and RAS.  Installing MSI lead to a strange problem with my Visual Studio 2010 (VS), as it didn’t integrate the viewer, but fortunately VS already had Crystal Reports for Visual Studio 2010 (CRVS2010) integrated with it, so I was left to conclude that I can use CRVS2010 viewer for viewing the Crystal reports residing in the repository of BI4.0.

Though development machine showed good affinity with whatever it was using, until a point when I discovered that it’s not able to connect to RAS. With lot of troubleshooting and efforts, I finally discovered that CRVS2010 is no good for connecting to BI4.0. Another investigation revealed that BI 4.0 has Crystal reports viewer as well. Now as far as references are concerned I learnt that we can’t use assemblies or SDK of CRVS2010 for communicating with BI4.0.

Did this come as a shock? To me it was a shock as I was thinking CRVS2010 was meant to be used with BI4.0 as it was released much before BI4.0 and Crystal Reports 2011 doesn't contain So, what's up with CR 2011 and .NET SDK - actually, any SDK? so from where was I suppose to borrow the viewer control. Why can’t we use this combination?

Having learnt it hard way I found following as the reasons why the combination doesn't /shouldn't work:

1. CRVS2010 isn’t meant for Enterprise products, though it comes with RAS (InProc RAS, there’s a huge difference between InProc and Managed RAS).
2. Its missing SAP BusinessObjects Enterprise assemblies. For e.g. BusinessObjects.Enterprise.* and CrystalDecisions.Enterprise.xxx.
3. Assembly versions are different. CRVS2010 (13.x) and BI 4.0(14.x). Mixing the references isn’t recommended (though sounds silly but is one of the important reasons).
4. APIs have changed with every version. CRVS2010 may not understand CORBA communications.

Reasons could increase but I find above being the prominent. Now it calls for a conclusion, one simply shouldn't use CRVS2010 with any of the BI4.0 products. For e.g. SAP Crystal Server 2011, SAP Crystal Server 2011 OEM Edition and SAP BusinessObjects BI Platform 4.0.

Additional References:

• How to Install the BI Platform 4.0 .NET SDK on a Development System with Visual Studio 2010
• How to Install the BI Platform 4.0 .NET SDK on a Production, Staging or Test Server
• Integrating SAP BusinessObjects BI Platform 4.0 \ CRS 2011 .NET SDK runtime into VS2010 IDE

This would look like a simple thing that most of us must have done someday, but installing it wrongly on development machine /web app server, could lead to many issues which might waste lot of productive time.

I would recommend installing the sdk from the original media. Most of us would say that we don’t have CDs, DVDs etc…  CDs and DVDs have taken back seat as installer is made available online in the form of *.iso or *.zip etc. Another question would be what is original media? To answer that I would say that the installation files/folder used to create BI Enterprise Server or install the entire product can be called as original media. The other way is to use the MSI Installer that is being offered by SAP to install SDK, which has improved since SP3 and SP4.

Original Media vs. MSI Installer

1. Size of original media is above 1 GB & MSI Installer is merely 100MB or so.
2. Original media can be used to create BI Enterprise Server, but MSI Installer does not provide this facility.

How to download the Original Media or MSI Installer from Service   Market Place (SMP)?

1. Go to SAP Support Portal.
2. Select Software Downloads> BusinessObjects Downloads.
3. On the left hand side select SAP BusinessObjects Download> Browse the SAP BusinessObjects Portfolio.
4. Click on Installation and Upgrade> SBOP Business Intelligence Platform (SBOP Enterprise).

Original Media:

MSI Installer:

How to install .NET SDK from Original Media?

When you use the original media opt for custom install. You would see following:

Select Client Component, you would see Developer Components as soon as you expand the node and unselect whatever is not required.

Select whatever you want to install. Return to parent node and select Database Access. Installing everything is not required you can opt for 'Will be installed on local hard drive'.  With above, you have installed the .NET SDK on the machine.

Things to be cautioned about:

1. Always install .NET SDK from the original media or MSI Installer.
2. Patch level of BI Enterprise Server & Development machine should be same at any given point. For e.g. If BI Enterprise Server is on SP3 + FP 3.2 make sure that your SDK are also on SP3+ FP3.2.
3. Use the service pack that is close to your current product level rather than going incremental. For e.g. install SP3 full and then apply FP 3.2 rather than applying SP1, SP2, SP3 and then FP3.2.

This begs the question "Why should I have the same patch level when it’s already working on my Dev/UAT/Pre-Production environment?"

I would simply say that system registries and assemblies are keeping well. But don’t blame on anything if suddenly things starts breaking. I have seen many issues with clientdoc.dll, crpe.dll, RAS Server has failed etc… Summarizing few reasons below

1. To match every file SAP recommends to ensure that SDK is at same patch level as the Enterprise server
2. With every patch programming interface changes slightly resulting changes in functionality in libraries and assembly files.
3. At SAP, everything is tested at the same patch level; the behavior is not predictable when the mix runtimes come into picture.

For more references you can always log on to SMP and search for KB1501944, KB1441232, KB1364701 and KB1474553.

Customers who recycle their RAS servers periodically may notice that sometimes even though the RAS server is up and running per the CMC or the CCM that it will refuse a crystal reports job like it would if it were down.

There may be instances where the RAS server isn't quite ready to begin taking on report jobs and customers want to know this prior to sending actual jobs to the server from their custom app.

The following code checks the RAS server to verify that it is enabled, running, and ready to take on report jobs.

Check RAS Server
Imports CrystalDecisions.EnterpriseImports CrystalDecisions.Enterprise.DesktopImports CrystalDecisions.ReportAppServer.ClientDocPartial Class _Default    Inherits System.Web.UI.Page    'Crystal Enterprise variables    Dim boSessionmgr As New SessionMgr()    Dim boSession As EnterpriseSession    Dim boInfoStore As InfoStore    Dim boEnterpriseService As EnterpriseService    Dim userid As String = "Administrator"      'Enter a user name here    Dim password As String = ""                 'Enter a password here    Dim cms As String = "localhost"             'Enter the name of the CMS here    Dim auth As String = "secEnterprise"    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load        boSession = boSessionmgr.Logon(userid, password, cms, auth)        boEnterpriseService = boSession.GetService("", "InfoStore")        boInfoStore = New InfoStore(boEnterpriseService)        Dim RASServers As InfoObjects        Dim RASServer As InfoObject        'Query for RAS Servers        RASServers = boInfoStore.Query("select * from ci_systemobjects where si_kind = 'server' and SI_SERVER_KIND = 'rptappserver'")        'Loop through RAS servers        For Each RASServer In RASServers            Dim serverPlugin As Server            serverPlugin = New Server(RASServer.PluginInterface)            Dim RASDoc As ReportClientDocument            'Check to see if the RAS Server is enabled            If serverPlugin.Disabled = True Then                Response.Write("RAS Server " & RASServer.Title.ToString() & " is disabled.")                Continue For            End If            'Check to see if the RAS Server is enabled            If serverPlugin.ServerIsAlive = False Then                Response.Write("RAS Server " & RASServer.Title.ToString() & " has not started.")                Continue For            End If            'Check to see if the RAS Server is ready for jobs            Try                RASDoc = New ReportClientDocument                RASDoc.ReportAppServer = RASServer.Properties("SI_SERVER_NAME").Value.ToString()                RASDoc.[New]()                Response.Write("RAS Server " & RASServer.Title.ToString() & " is running and ready to process jobs!")                RASDoc.Close()            Catch ex As Exception                Response.Write("RAS Server is not available for new report jobs, please wait...")            End Try        Next    End SubEnd Class

I hope this helps and good luck with your projects!

Jason

The RAS SDK is very powerful and can be used to do almost anything you can do in the Crystal Reports designer.

Sometimes the naming of methods can be confusing, but overall it is not overly difficult to find what you are looking for (assuming it exists).

I had a customer looking to modify their report parameters prompt text as well as the descriptions of default values and was running into issues.

I will post the code I used, but there are 2 things that you need to know.

1)  The prompt text of a parameter is modified using the .Description off of the ParameterField object.  This is confusing since you use a .Description method off of the ParameterFieldDiscreteValue to change the default value description.  I wish it was .PromptText instead...oh well.

2) You can NOT modify dynamic parameter information..period.  Even trying to change the prompting text will result in an error stating that dynamic parameters can not be modified.

Here is the code I used to update the parameters prompt text and the descriptions of a couple default values of the parameter.

VB.NET sample code
Imports CrystalDecisions.CrystalReports.Engine Imports CrystalDecisions.ReportAppServer.ClientDoc Imports CrystalDecisions.ReportAppServer.Controllers Imports CrystalDecisions.ReportAppServer.DataDefModel   Partial Class _Default     Inherits System.Web.UI.Page      Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load         'Load the Crystal Report         Dim crRpt As New CrystalDecisions.CrystalReports.Engine.ReportDocument         crRpt.Load("C:\myreport.rpt")          'Cast it as a ReportClientDocument so we can use the RAS object model         Dim rcd As ISCDReportClientDocument         rcd = crRpt.ReportClientDocument          Dim boParameterFieldController As CrystalDecisions.ReportAppServer.Controllers.ParameterFieldController = rcd.DataDefController.ParameterFieldController          Dim param As CrystalDecisions.ReportAppServer.DataDefModel.ParameterField         Dim paramNew As CrystalDecisions.ReportAppServer.DataDefModel.ParameterField         Dim params As Fields = rcd.DataDefController.DataDefinition.ParameterFields          'Loop through each parameter to find the one we want         For Each param In params              If param.Name = "MyParam" Then                  'You must clone the parameter, do not set it directly (ie paramNew = param)                 paramNew = param.Clone(True)                  'Clear out the current default values                 paramNew.DefaultValues.RemoveAll()                  'Set the prompting text of the new parameter object                 paramNew.Description = "My new prompting text"                  'Copy over the existing values and add them to the new object                 Dim paramValue As ParameterFieldDiscreteValue                 paramValue = CType(param.DefaultValues.Item(0), ParameterFieldDiscreteValue)                 paramValue.Description = "My New Description One"                 paramNew.DefaultValues.Add(paramValue)                 paramValue = CType(param.DefaultValues.Item(1), ParameterFieldDiscreteValue)                 paramValue.Description = "My New Description Two"                 paramNew.DefaultValues.Add(paramValue)                  'Save the modification on the report                  boParameterFieldController.Modify(param, paramNew)              End If         Next          'save the changes to the report itself         rcd.Save()          CrystalReportViewer1.ReportSource = crRpt     End Sub End Class

I hope this helps!

Good luck with your project!

Jason

Most of my blog posts have been created when I run into a customer issue that is fairly specific, rarely seen, or undocumented.  This one is no exception :)

My customer has a bunch of conditional hyperlinks that exist in subreports.  They all point to a specific server.  The problem is that if that server is shut down, dies, etc then they have all of these subreports with hyperlinks that will not work.  How can she modify these hyperlinks without having to do so by hand?

Using the RAS .NET SDK I was able to create a simple app that shows how to access these conditional hyperlinks and make whatever changes she needs.

The code is as follows:

RAS VB.NET
Imports CrystalDecisions.CrystalReports.Engine Imports CrystalDecisions.ReportAppServer.ClientDoc Imports CrystalDecisions.ReportAppServer.DataDefModel Imports CrystalDecisions.ReportAppServer.Controllers  Partial Class _Default     Inherits System.Web.UI.Page      Dim crRpt As New ReportDocument      Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load         'This report connects to Xtreme with no username or password         crRpt.Load("C:\Path\to your\ReportwithSubHyperlinks.rpt")          Dim rcd As ISCDReportClientDocument          'Get the report as a ReportClientDocument         rcd = crRpt.ReportClientDocument          'Create a ReportClientDocument for the Subreport         Dim subRCD As SubreportClientDocument          'Grab the Subreport         subRCD = rcd.SubreportController.GetSubreport("YourReportwithSub")          'Get the ReportDefController2 for the sub         Dim myReportDefController As ReportDefController2 = subRCD.ReportDefController          'Create a field object to hold the hyperlink object         Dim myHLObj As New CrystalDecisions.ReportAppServer.ReportDefModel.FieldObject          'Clone the field we want to change the hyperlink of         myHLObj = CType(subRCD.ReportDefController.ReportDefinition.FindObjectByName("MyReportObjectWithCondHyperlink").Clone(True), CrystalDecisions.ReportAppServer.ReportDefModel.FieldObject)          'This was used to verify we were accessing the hyperlink text         'You can use this to get the existing hyperlink so you can parse it to make whatever changes         'Dim s As String = myHLObj.Format.ConditionFormulas.Formula(CrystalDecisions.ReportAppServer.ReportDefModel.CrObjectFormatConditionFormulaTypeEnum.crObjectFormatConditionFormulaTypeHyperlink).Text          'Set the hyperlinks text to whatever you want         myHLObj.Format.ConditionFormulas.Formula(CrystalDecisions.ReportAppServer.ReportDefModel.CrObjectFormatConditionFormulaTypeEnum.crObjectFormatConditionFormulaTypeHyperlink).Text = "My new hyperlink text"          'Modify the object         myReportDefController.ReportObjectController.Modify(subRCD.ReportDefController.ReportDefinition.FindObjectByName("MyReportObjectWithCondHyperlink"), myHLObj)          'Save the report         rcd.Save()      End Sub End Class

Good luck with your projects!!

I have seen this question a couple times during my tenure here and it came up again today.

The customer was interested in finding the SI_ID of a recurring instance that he just created. When I inquired as to why he said he would like to be able to find the recurring instance and any instances that result from it.

There are a couple things that you need to know when trying to do this.

People have a misconception that a recurring instance is kind of like a parent object and that each time the instance is scheduled to run it creates "child" instances that are tied to it.  This is not the case. 

A recurring instance is just a pending instance that has the unique ability to create a new instance when it runs.  The result of this is that when you create a recurring instance the SI_ID of that recurring instance will end up being the SI_ID of the next instance it creates and NOT the SI_ID of the recurring instance through its lifetime.  This means that after each run the recurring object has a different SI_ID and nothing ties the recurring instance to the instances that resulted from it in the past.

In the BO Enterprise product as it currently sits there is no definitive way of finding which instances were created by a specific recurring instance. You can get a pretty good guess by looking at schedule times and such, but due to the potential volume of recurring instances and objects it would make it almost impossible to do easily.

I went over this with the customer (my thanks to Yuri Goron at APOS Systems!) and we discussed a way to get around this by using a custom property. This works quite well and in the following code I show how to accomplish this.

How to tie a recurring report with the resulting instances in VB.NET
Imports CrystalDecisions.EnterpriseImports CrystalDecisions.Enterprise.DesktopPartial Class _Default    Inherits System.Web.UI.Page    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load        Dim boEnterpriseSession As EnterpriseSession        Dim boEnterpriseService As EnterpriseService        Dim boSessionMgr As New CrystalDecisions.Enterprise.SessionMgr()        Dim boInfoStore As InfoStore        Dim boReportObjects As InfoObjects        Dim boReportObject As InfoObject        Dim boReport As Report        Dim boSchedulingInfo As SchedulingInfo        Dim query As String        'Log into BusinessObjects Enterprise        boEnterpriseSession = boSessionMgr.Logon("administrator", "", "localhost", "secEnterprise")        'Create the infostore object        boEnterpriseService = boEnterpriseSession.GetService("", "InfoStore")        boInfoStore = New InfoStore(boEnterpriseService)        'Create query to get desired report        query = "Select * From CI_INFOOBJECTS Where SI_PROGID = 'CrystalEnterprise.Report' AND SI_NAME='World Sales Report' AND SI_INSTANCE=0"        boReportObjects = boInfoStore.Query(query)        'check for returned reports        If boReportObjects.Count > 0 Then            boReportObject = boReportObjects.Item(1)            boReport = CType(boReportObject, Report)            'Create an interface to the scheduling options for the report            boSchedulingInfo = boReport.SchedulingInfo            'create the parameters for our recurring schedule            'run first instance 1 minute from now to allow us to create the new custom property            Dim currentTime As Date = Now.AddMinutes(1)            'recurrance lasts for 10 min            Dim endTime As Date = currentTime.AddMinutes(10)            'Set the report to run on a recurring basis every minute            'running for 10 minutes            With boSchedulingInfo                .BeginDate = currentTime                .EndDate = endTime                .IntervalHours = 0                .IntervalMinutes = 1                .Type = CeScheduleType.ceScheduleTypeHourly            End With            'Schedule the report            boInfoStore.Schedule(boReportObjects)            'Get the SI_ID of the resulting scheduled object            Dim id As Integer = boReportObject.Properties("SI_NEW_JOB_ID").ToString            'Create query to get scheduled report            query = "Select * From CI_INFOOBJECTS Where SI_PROGID = 'CrystalEnterprise.Report' AND SI_ID=" & id            boReportObjects = boInfoStore.Query(query)            boReportObject = boReportObjects.Item(1)            'Adding a custom property to put the SI_ID of the original recurring instance            'into to tie all of the instances to the recurring instance            'Now you can query for the recurring object and grab the OriginalRecurringID and use it for            'your instance queries            boReportObject.Properties.Add("OriginalRecurringID", id)            'Commit to the infostore            boInfoStore.Commit(boReportObjects)            Response.Write("The '" + boReport.Properties("SI_NAME").ToString + "' report will run every minute for 10 minutes")        Else            'no objects returned by query            Response.Write("No report objects found by query ")            Response.Write("Please click here to return to the logon page.")        End If        'Logoff of Enterprise        boEnterpriseSession.Logoff()        boEnterpriseSession.Dispose()    End SubEnd Class

When you use this method you can then query with something like

"Select si_name , si_mycustomproperty from ci_infoobjects where si_recurring = 1"

 to get the recurring instances and their custom property value.  You then query for

"Select * from ci_infoobjects where si_recurring = 0 and si_instance = 1 and si_mycustomproperty =  'the value from the previous query'"

This will return all of the instances that were created by the recurring instance.

I hope this was helpful and good luck with your projects!

Jason

Today I had a customer who had a requirement to get the resultset from a Webi dataprovider in CSV.  He needed this so he would manipulate the data and use it in another part of the application.

Although this is possible in RENet and REBean, it is not possible in the Web Services SDK so I figured he was out of luck.

Luckily when discussing this with a coworker (the all knowing Ted Ueda) he mentioned that he saw that there was a ViewMode for ALL_DATA_PROVIDERS and DATA_PROVIDER, both of which return XML.  This was good news since the customer could then take the xml and parse it to get the same results.

I found that this is actually a minor change from a regular view sample and am attaching the code here.

VB.NET Web Services
Imports BusinessObjects.DSWS Imports BusinessObjects.DSWS.BIPlatform Imports BusinessObjects.DSWS.BIPlatform.Constants Imports BusinessObjects.DSWS.BIPlatform.Desktop Imports BusinessObjects.DSWS.ReportEngine Imports BusinessObjects.DSWS.Session Imports System Imports System.Data Imports System.Configuration Imports System.Web Imports System.Web.Security Imports System.Web.UI Imports System.Web.UI.WebControls Imports System.Web.UI.WebControls.WebParts Imports System.Web.UI.HtmlControls  Partial Class _Default     Inherits System.Web.UI.Page      ' Modify the variables here to reflect the environment      ' CMS-specific parameters     Private CMS_USER As String = "Administrator"     Private CMS_USER_PASSWORD As String = "Password123"     Private CMS_CLUSTER_NAME As String = String.Empty     Private CMS_AUTHENTICATION As String = String.Empty      ' Web Services URLs     Private WS_BASE_URL As String = "http://localhost:8080/dswsbobje/services/"     Private WS_URL_SESSION As String = WS_BASE_URL + "Session"     Private WS_URL_REPORTENGINE As String = WS_BASE_URL + "reportengine"     Private WS_URL_BIPLATFORM As String = WS_BASE_URL + "biplatform"      ' Name of the report to be viewed     Private REPORT_NAME As String = "DPtoXML"      Private bipService As BIPlatform     Private boRepEng As ReportEngine     Private wSession As Session      Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init         ConfigureCrystalReports()     End Sub      Private Sub ConfigureCrystalReports()          ' The following sample code demonstrates how to view a report using the Web Services BIPlatform and \         ' Report Engine services.         ' Just running the following code will enable you to view a simple report with no additional options.         ' Include the commented blocks of code to view reports with different viewing options:         ' - View a report in PDF format         ' - View a report with database logon information         ' - View a report with discrete parameters         ' Note: You may have to change some parts of the code to make the special viewing options work.         Logon()         ViewReport()      End Sub      Private Sub Logon()         Dim wSession As BusinessObjects.DSWS.Session.Session          Try              Dim boConnection As BusinessObjects.DSWS.Connection = New BusinessObjects.DSWS.Connection(WS_URL_SESSION)             ' login to BusinessObjects Enterprise using web services             Console.WriteLine("Logging into web service...")             Dim credential As New EnterpriseCredential             credential.Login = CMS_USER             credential.Password = CMS_USER_PASSWORD             credential.Domain = CMS_CLUSTER_NAME             credential.AuthType = CMS_AUTHENTICATION             wSession = New BusinessObjects.DSWS.Session.Session(boConnection)             wSession.Login(credential)             Console.WriteLine("Logged into web service.")              boConnection.URL = WS_URL_BIPLATFORM             bipService = New BIPlatform(boConnection, wSession.ConnectionState)              boConnection.URL = WS_URL_REPORTENGINE             boRepEng = New ReportEngine(boConnection, wSession.ConnectionState)              Session("Platform") = bipService             Session("ReportEngine") = boRepEng          Catch ex As DSWSException             Console.Error.WriteLine(ex)             Console.Error.WriteLine(ex.CauseDetail)             Throw         End Try     End Sub      Private Sub ViewReport()         Try             Dim reportRH As ResponseHolder = bipService.Get("path://InfoObjects/Root Folder/**/" + REPORT_NAME, Nothing)             Dim infoobjects As InfoObjects = reportRH.InfoObjects             If (Nothing Is infoobjects) Then                 Return             End If              Dim repID As String = infoobjects.InfoObject(0).CUID              Dim boMustFill As RetrieveMustFillInfo = New RetrieveMustFillInfo             boMustFill.RetrievePromptsInfo = New RetrievePromptsInfo              Dim oActions(0 To 0) As Action             oActions(0) = New Refresh              Dim boDocInfo As DocumentInformation = boRepEng.GetDocumentInformation(repID, boMustFill, oActions, Nothing, Nothing)              'set up to view in xml             Dim objViewSupport As ViewSupport = New ViewSupport             objViewSupport.ViewMode = ViewModeType.ALL_DATA_PROVIDERS             objViewSupport.ViewType = ViewType.CHARACTER             objViewSupport.OutputFormat = OutputFormatType.XML              Dim objRetrieveCharacterView As RetrieveCharacterView = New RetrieveCharacterView             objRetrieveCharacterView.ViewSupport = objViewSupport              'Use this code instead of the above to view the report in PDF format             '***********************************************************************'             'Dim objViewSupport As ViewSupport = New ViewSupport             'objViewSupport.ViewMode = ViewModeType.DOCUMENT             'objViewSupport.ViewType = ViewType.BINARY             'objViewSupport.OutputFormat = OutputFormatType.PDF              'Dim objRetrieveBinaryView As RetrieveBinaryView = New RetrieveBinaryView             'objRetrieveBinaryView.ViewSupport = objViewSupport             '***********************************************************************'              ' Include this code to view a report that requires database logon information              '***********************************************************************'             'get the name of the connection             'Dim dbLogonInfo() As DBLogonInfo = boDocInfo.DBLogonInfos             'Dim cnnName As String = dbLogonInfo(0).Name              'fill DBLogon properties             'Dim oFillDBLogons As New FillDBLogons             'Dim oFillDBLogon(1) As FillDBLogon             'oFillDBLogon(0) = New FillDBLogon()             'oFillDBLogon(0).UserName = USER_NAME             'oFillDBLogon(0).Password = USER_PASSWORD             'setting the connection is important to identify whether             'you're setting the connection for the main report or subreports             'oFillDBLogon(0).Name = cnnName             'oFillDBLogons.FillDBLogonList = oFillDBLogon              'oActions(0) = oFillDBLogons             '***********************************************************************'              ' Include this code to view a report with discrete parameters             '***********************************************************************'             'Dim oPromptInfos() As PromptInfo = boDocInfo.PromptInfo             'Dim myPrompt As PromptInfo = oPromptInfos(0)              'Dim FillPrompts As New FillPrompts()             'Dim fillPromptList(1) As FillPrompt             'fillPromptList(0) = New FillPrompt()             'fillPromptList(0).ID = myPrompt.ID              'Dim dPromptValues(1) As DiscretePromptValue             'dPromptValues(0) = New DiscretePromptValue()             'dPromptValues(0).Value = "promptValue"              'fillPromptList(0).Values = dPromptValues             'FillPrompts.FillPromptList = fillPromptList             'oActions(0) = FillPrompts             '***********************************************************************'              Dim boCallOpt(0 To 0) As CallbackOption             Dim boImgMan As ImageManagement = New ImageManagement             boImgMan.CallbackScript = "getImage.aspx"             boImgMan.ImageManagementHolder = "imageName"             boImgMan.DocumentReferenceHolder = "docRef"             boCallOpt(0) = boImgMan              Dim retBOData As RetrieveData = New RetrieveData             objRetrieveCharacterView.CallbackOption = boCallOpt              retBOData.RetrieveView = objRetrieveCharacterView              boDocInfo = boRepEng.GetDocumentInformation(boDocInfo.DocumentReference, Nothing, oActions, Nothing, retBOData)              Dim myBOView As CharacterView = boDocInfo.View             Dim docContents As String = myBOView.Content              Response.Write(docContents)              'Use this code instead of the above to view the report in PDF format             '***********************************************************************'             'Dim strToken As String = boDocInfo.DocumentReference             'Dim myBOView As CharacterView = boDocInfo.View             ''Dim myBOView As BinaryView = boDocInfo.View             'Dim docContents = myBOView.Content              'Response.Clear()             'Response.AddHeader("content-disposition", "inlinefilename=" + REPORT_NAME + ".xml")             'Response.ContentType = "application/xml"             'Response.BinaryWrite(docContents)             'Response.End()             '***********************************************************************'          Catch ex As DSWSException             Console.Error.WriteLine(ex)             Console.Error.WriteLine(ex.CauseDetail)             Throw         Finally             If Not wSession Is Nothing Then                 wSession.Logout()             End If             Console.Write("Press the [ENTER] key to terminate program.")          End Try     End Sub End Class

Good luck!