Change database name - Crystal10 and Visual Studio 2005

Question

<p>Hi there,</p>
<p>
I have about 150 crystal reports in my development environment. I need to move them into the testing environment. Every environment has its own database and every database is names '[client name]_[environment]' so I get things like client1_dev, client1_test, client1_prod, etc. The reports are very, very unhappy when moving from dev to test. I have googled this a fair bit and have attempted the stuff on:
</p>
http://www.codeproject.com/KB/aspnet/crystalwithaspdotnet.aspx
<br/>
http://www.tek-tips.com/faqs.cfm?fid=5374
<br/>
<p>
and a few others and have gotten no where. I spent a couple of days working on this and am now over budget and late. I need a fix and fast.
</p>
<p>
I have two ideas I have been working on and both have failed out right.<br/>
Idea 1 - during run time:<br/>
  - loop through everything thing in sight and set the database information on it<br/>
  - that one looks like:<br/>
<br/>
<pre>
using CrystalDecisions.Shared;
using CDCRE = CrystalDecisions.CrystalReports.Engine;
using CrystalDecisions.CrystalReports.Engine;
using CrystalDecisions.Web;
public abstract class ReportBase : Page
     ...snip....
    protected virtual void DoLoad(CrystalReportViewer ReportViewer)
        ReportDocument reportDocument = new ReportDocument();
        SetReportInfo(reportDocument);
        SetParameters(reportDocument);
        DumpParameters(reportDocument);
    protected virtual void SetReportInfo(ReportDocument reportDocument)<br/>
        db_Reports.Reports reportInfo = new ReportsClass();
        CriteriaID = reportInfo.InsertCriteria(CommonUtils.GetLanguagePrefix(), CurrentForm["criteria"].Trim() +
CurrentForm["extracriteria"].Trim(), CSecuritySession.UserSessionInfo.iUserId, string.Empty, CurrentForm["param1"]);
        ADODB._Recordset rs = reportInfo.GetReportInfo(CommonUtils.GetLanguagePrefix(), ModuleName, ReportID, CSecuritySession.UserSessionInfo.iUserId);
        // report to load
        HttpContext.Current.Trace.Warn("Loading the report", rs.Fields["vReportName"].Value as string);
        reportDocument.Load(rs.Fields["vReportName"].Value as string);
        // connection info
        reportDocument.DataSourceConnections[0].SetConnection(rs.Fields["vSQLServer"].Value as string, rs.Fields["vDatabase"].Value as string, false);
        HttpContext.Current.Trace.Warn("Setting connection information",
            string.Format("Server Name:[{0}] Database Name:[{1}]", reportDocument.DataSourceConnections[0].ServerName, reportDocument.DataSourceConnections[0].DatabaseName));
        // logon info
        reportDocument.DataSourceConnections[0].SetLogon(rs.Fields["vUsername"].Value as string, rs.Fields["vPassword"].Value as string);
        HttpContext.Current.Trace.Warn("Setting Logon Information",
            string.Format("Username: [{0}] Password: [{1}]", reportDocument.DataSourceConnections[0].UserID, reportDocument.DataSourceConnections[0].Password));
        DumpConnInfo(reportDocument);
        DumpSubReportConnInfo(reportDocument);
        // reportname / page title
        ReportName = rs.Fields["vDescription"].Value as string;               
    private void DumpSubReportConnInfo(ReportDocument reportDocument)
        foreach (Section sec in reportDocument.ReportDefinition.Sections)
            foreach (ReportObject ro in sec.ReportObjects)
                if (ro is SubreportObject)
                    SubreportObject sro = (ro as SubreportObject);
                    DumpConnInfo(sro.OpenSubreport(sro.SubreportName));
    protected virtual void DumpConnInfo(ReportDocument reportDocument)
        foreach(CDCRE.Table table in reportDocument.Database.Tables)
            Trace.Warn(string.Format("Connection info[{0}]", table.Name),
                string.Format("database: {0} Server: {1} User ID: {2} Pwd: {3}",
                table.LogOnInfo.ConnectionInfo.DatabaseName,
                table.LogOnInfo.ConnectionInfo.ServerName,
                table.LogOnInfo.ConnectionInfo.UserID,
                table.LogOnInfo.ConnectionInfo.Password));
            foreach(NameValuePair2 nvp in table.LogOnInfo.ConnectionInfo.Attributes.Collection)
                Trace.Warn("connection attributes", string.Format("{0} = {1}", nvp.Name, nvp.Value));
                if (string.Compare(nvp.Name as string, "QE_LogonProperties", true) == 0)
                    DbConnectionAttributes dca = nvp.Value as DbConnectionAttributes;
                    Trace.Warn("connection attributes - QE_LogonProperties", "processing the 'QE_LogonProperties'. Is null [" + (null == dca).ToString() + "]" );                   
                    foreach (NameValuePair2 nvp1 in dca.Collection)
                        Trace.Warn("connection attributes - QE_LogonProperties", string.Format("{0} = {1}", nvp1.Name, nvp1.Value));
            Trace.Warn("----------------------");           
    protected virtual void DumpParameters(ReportDocument reportDocument)
        HttpContext.Current.Trace.Write("--------------------------");
        HttpContext.Current.Trace.Write(" Dumping Parameters ");
        HttpContext.Current.Trace.Write("--------------------------");
        for (int i = 0; i < reportDocument.ParameterFields.Count; i++)
            if (string.IsNullOrEmpty(reportDocument.ParameterFields<i>.ReportName))
                HttpContext.Current.Trace.Write(string.Format("[{0}] {1}", i, reportDocument.ParameterFields<i>.Name), GetParamValue(reportDocument.ParameterFields<i>));
            else
                HttpContext.Current.Trace.Warn(string.Format("SubReport Parameter [{0}] {1}", i, reportDocument.ParameterFields<i>.Name), GetParamValue(reportDocument.ParameterFields<i>));
        HttpContext.Current.Trace.Write("--------------------------");
</pre>
<br/>
  - this one always errors out with a can't find database type connection and spits out the old database message.<br/>
  - as you can see there is a stack of tracing in there. all of the trace messages make it look like it is hitting the right database. I have no clue why this isn't working.<br/>
<br/>
Idea 2 - fix up reports before moving to the other environments:<br/>
  - I figured I would write a little app that would crawl through the directories of reports and fix them up<br/>
  - I read a few examples of this online and none of them seem to work with Crystal 10. They work with some of our legacy Crystal 8 reports (I have been testing this all over the place) but not with 10.<br/>
  - the last function is the interesting one.<br/>
  - that one looks like:<br/><br/>
<pre>
using System;
using System.Collections;
using System.Collections.Generic;
using System.Text;
using System.IO;
using System.Reflection;
using System.Diagnostics;
namespace crystal_10_switch
    public class Changer
        protected CRAXDDRT.Application app;
        protected object missing = Missing.Value;
        protected string currentFolder = string.Empty;
        protected string OdbcName;
        protected string DBName;
        protected ICollection Folders;
        public Changer(string OdbcName, string DBName, ICollection Folders)
            this.OdbcName = OdbcName;
            this.DBName = DBName;
            this.Folders = Folders;
            app = new CRAXDDRT.Application();
            string junk = Console.ReadLine();
        public virtual void Switch()
            foreach (string dir in Folders)
                SwitchDir(dir);
        protected virtual void SwitchDir(string dir)
            DirectoryInfo di = new DirectoryInfo(dir);
            FileInfo[] files = di.GetFiles("*.rpt", SearchOption.AllDirectories);
            currentFolder = di.FullName;
            foreach (FileInfo file in files)
                Trace.WriteLine("Processing the report: " + file.FullName);
                Trace.Indent();               
                SwitchFile(file);
                Trace.Unindent();
        protected virtual void SwitchFile(FileInfo file)
            CRAXDDRT.Report rpt = app.OpenReport(file.FullName, missing);
            SwitchTable(rpt);
            SwitchSubreports(rpt);
            SaveReport(rpt, file);
        protected virtual void SwitchSubreports(CRAXDDRT.Report rpt)
            Trace.Indent();
            foreach (CRAXDDRT.Section section in rpt.Sections)
                foreach (CRAXDDRT.IReportObject robj in section.ReportObjects)
                    if (robj is CRAXDDRT.ISubreportObject)
                        CRAXDDRT.ISubreportObject sub = (robj as CRAXDDRT.ISubreportObject);
                        Trace.WriteLine("Processing sub report: " + sub.Name);                       
                        SwitchTable(sub.OpenSubreport());                       
            Trace.Unindent();
        protected virtual void SwitchTable(CRAXDDRT.Report rpt)
            Trace.Indent();
            foreach (CRAXDDRT.IDatabaseTable table in rpt.Database.Tables)
                Trace.WriteLine(" Processing table: " + table.Name);
                // this one line should do it
                (table.ConnectionProperties["Database"] as CRAXDDRT.IConnectionProperty).Value = DBName;
                // but it didn't so try this
                (table.ConnectionProperties["UseDSNProperties"] as CRAXDDRT.IConnectionProperty).Value = "1";
                // read that this 'might' work
                table.SetLogOnInfo(OdbcName, DBName, missing, missing);
                // but it didn't so I tried this with the user anme and password set
                table.SetLogOnInfo(OdbcName, DBName, "XXXXX", "XXXXX");
                // read that this is requiried, but it does nothing
                table.Name = table.Name;
                // this causes issues - the map fields thing pops up which is way not cool
                //table.Location = table.Name;              
            Trace.Unindent();
    }//class
}//namespace
</pre>
<br/>
At this point I really don't care which one will work the best, I am just desperate for a working solution. Any help, any at all would be greatly appreciated.<br/>
<br/>
Thanks<br/>
<br/>
-Cam<br/><br/>

Answer 1

This is a typical requirement of most application and is relatively trivial to implement. There are a lot of samples and documentation on our support site (links below). Also, search these forums for code snippets that will help you. BTW., do not use the craxDDrt.dll as you are not licensed to use it.
To look for downloads:
https://websmp130.sap-ag.de/sap(bD1lbiZjPTAwMQ==)/bc/bsp/spn/bobj_download/main.htm
Articles:
https://www.sdn.sap.com/irj/sdn/businessobjects-articles
Notes:
https://www.sdn.sap.com/irj/scn/advancedsearch?cat=sdn_ossnotes&query=&adv=true
Samples:
https://wiki.sdn.sap.com/wiki/display/BOBJ/CrystalReportsfor.NETSDK+Samples
Dev. Library and API reference:
http://help.sap.com/businessobject/product_guides/boexir31/en/crsdk_net_dg_12_en.chm
http://help.sap.com/businessobject/product_guides/boexir31/en/crsdk_net_apiRef_12_en.chm
My recommendations:
https://www.sdn.sap.com/irj/boc/index?rid=/library/uuid/2081b4d9-6864-2b10-f49d-918baefc7a23&overridelayout=true
https://www.sdn.sap.com/irj/scn/go/portal/prtroot/docs/library/uuid/208edbbf-671e-2b10-d7b5-9b57a832e427
https://www.sdn.sap.com/irj/boc/index?rid=/library/uuid/702ab443-6a64-2b10-3683-88eb1c3744bc&overridelayout=true
Ludek
Edited by: Ludek Uher on Jul 21, 2009 8:38 AM