Setting RecordSelectionFormula to multiple subreports is not working.

Question

Hello,
I have an application vb.net Vs2005 winform an Crystal Report for .NET.
I have a report whith 3 subreports : i want to specify RecordSelectionFormula for the 3 subreport but it work only for one (the last have set) :
Part of my code :
  Dim dob_Report As New CrystalDecisions.CrystalReports.Engine.ReportDocument
dob_Report.SetDatabaseLogon("SYSTEM", "pass@123", "CP", "DB_LIVE")
                Dim Tables As CrystalDecisions.CrystalReports.Engine.Tables = dob_Report.Database.Tables
                Dim table As CrystalDecisions.CrystalReports.Engine.Table
                For Each table In Tables
                    table.LogOnInfo.ConnectionInfo.ServerName = "CP"
                    table.LogOnInfo.ConnectionInfo.DatabaseName = "DB_LIVE"
                    table.LogOnInfo.ConnectionInfo.UserID = "SYSTEM"
                    table.LogOnInfo.ConnectionInfo.Password = "pass@123"
                    table.ApplyLogOnInfo(table.LogOnInfo)
                    table.LogOnInfo.ConnectionInfo.AllowCustomConnection = True
                       table.Location = "DB_LIVE." & Mid(table.Location, InStrRev(table.Location, ".", Len(table.Location)) + 1)
                Next
                Dim osubrpt As New CrystalDecisions.CrystalReports.Engine.ReportDocument
                For i As Integer = 0 To dob_Report.Subreports.Count - 1
                    osubrpt = dob_Report.Subreports.Item(i)
                    Dim subrpt_Tables As CrystalDecisions.CrystalReports.Engine.Tables = osubrpt.Database.Tables
                    For Each table In subrpt_Tables
                        table.LogOnInfo.ConnectionInfo.ServerName = "CP"
                        table.LogOnInfo.ConnectionInfo.UserID = "SYSTEM"
                        table.LogOnInfo.ConnectionInfo.Password = "pass@123"
                        table.LogOnInfo.ConnectionInfo.DatabaseName = "DB_LIVE"
                        table.ApplyLogOnInfo(table.LogOnInfo)
                        table.LogOnInfo.ConnectionInfo.AllowCustomConnection = True
                                            table.Location = "DB_LIVE." & Mid(table.Location, InStrRev(table.Location, ".", Len(table.Location)) + 1)
                        'table.ApplyLogOnInfo(table.LogOnInfo)
                    Next
                    osubrpt.VerifyDatabase()
                Next
                dob_Report.VerifyDatabase()
'... I passed the code that set log info on the table of report and subreport
                        dob_Report.OpenSubreport("Summary").RecordSelectionFormula = "{a.DOCDATE} >= date(" & strFromDate & ") " & " AND " & "{a.DOCDATE} <= date(" & strToDate & ")" & " AND " & "{a.LOCATIONCODE} = '" & strLocation & "'" & " and " & "{a.DOCTYPE} = '" & "I" & "'" & stroption
                        dob_Report.RecordSelectionFormula = "{s.DOCDATE} >= date(" & strFromDate & ") " & " AND " & "{s.DOCDATE} <= date(" & strToDate & ")" & " AND " & "{s.LOCATIONCODE} = '" & strLocation & "'" & " and " & "{s.DOCTYPE} = '" & "I" & "'" & " and " & "{s.ex} <> '" & "exp" & "'" & stroption
'Now i want to set RecordSelectionFormula  for subreport
  form1.crystalreportviewer1.ReportSource = dob_Report
            form1.Text = strFormTitle
            form1.ShowDialog()
when i do that
first and second subreport don't apply the RecordSelectionFormula and show all data
third subreport is displaying proper.
I've tried dob_Report.OpenSubreport(0) this method also but results are same.
Environment:
Visual Studio 2005, Crystal Report 10, SAP HANA Studio, SAP 9.0

Answer 1

Hi Ashish
Couple of things. You mention you are using CR 10, but I am not sure if this is the version of CR that bundled with VS 2005 (CR 10.2), or a stand-alone version of CR. So. Assuming that this is CR 10.2, make sure you apply SP 1:
Crystal Reports for VS 2005 and  VS 2008 Updates & Runtime Downloads
Then see KBA 1204895 - Selection formula is ignored when using Crystal Reports 2008 and VS .NET 2005
Finally, you may want to consider using the code below:
//I loop through all the sections looking for subreports and set the log on info, same as the main report:
foreach (CrystalDecisions.CrystalReports.Engine.Section crSection in crSections)
    crReportObjects = crSection.ReportObjects;
    //loop through all the report objects to find all the subreports
    foreach (CrystalDecisions.CrystalReports.Engine.ReportObject crReportObject in crReportObjects)
        if (crReportObject.Kind == ReportObjectKind.SubreportObject)
            //you will need to typecast the reportobject to a subreport object once you find it
            crSubreportObject = (CrystalDecisions.CrystalReports.Engine.SubreportObject)crReportObject;
            string mysubname = crSubreportObject.SubreportName.ToString();
            //open the subreport object
            crSubreportDocument = crSubreportObject.OpenSubreport(crSubreportObject.SubreportName);
            //set the database and tables objects to work with the subreport
            crDatabase = crSubreportDocument.Database;
            crTables = crDatabase.Tables;
            tableIndex = 0;
            bool SecureDB;
            //loop through all the tables in the subreport and set up the connection info and apply it to the tables
            foreach (CrystalDecisions.CrystalReports.Engine.Table crTable in crTables)
                    crConnectioninfo.UserID = "sa";
                    crConnectioninfo.Password = "PW";
                    crConnectioninfo.DatabaseName = "QTYLTD";
                    crTableLogOnInfo = crTable.LogOnInfo;
                    crTableLogOnInfo.ConnectionInfo = crConnectioninfo;
                    crTable.ApplyLogOnInfo(crTableLogOnInfo);
crSubreportDocument.RecordSelectionFormula = <selection formula>
- Ludek
Senior Support Engineer AGS Product Support, Global Support Center Canada
Follow us on Twitter