Report prompts for value (Crystal reports & VB .net)

[paul]

Hello,
I have recently upgraded to VB .net 2005 and a Crystal report that
before did not use to prompt for its single parameter now does so.
I have been writing the parameter value to the report in code.

Code below

Dim crReport As New rptIssue_Filtered()

'ParameterFieldDefinitions and ParameterFieldDefinition are off
the CrystalDecisions.CrystalReports.Engine Namespace
Dim crParameterFieldDefinitions As ParameterFieldDefinitions
Dim crParameterFieldDefinition_1 As ParameterFieldDefinition

'ParameterValues and ParameterDiscreteValue are off the
CrystalDecisions.Shared namespace
Dim crParameterValues As New ParameterValues()
Dim crParameterDiscreteValue_1 As New ParameterDiscreteValue()

'*******************************
'TitleOfReport
'*******************************
'Set discrete value
crParameterDiscreteValue_1.Value = m_strTitleOfReport

'Access first parameter field definition
crParameterFieldDefinitions =
crReport.DataDefinition.ParameterFields
crParameterFieldDefinition_1 =
crParameterFieldDefinitions.Item("TitleOfReport")

' Add parameter value
crParameterValues = crParameterFieldDefinition_1.CurrentValues

crParameterValues.Add(crParameterDiscreteValue_1)

' Apply the current value to the parameter definition
crParameterFieldDefinition_1.ApplyCurrentValues(cr ParameterValues)

crParameterFieldDefinition_1.

'*******************************
'Show report
'*******************************
crReport.SetDataSource(m_datIssues.Tables(0))

CrystalReportViewer1.ReportSource = crReport

Thanks
Paul