Hi

I am getting an error while trying to pass a string value to a formula field in crystal report. I am using VB.Net

Error message is

"The remaining items doen't appear to be part of the formula"

this is the line of code
        rptDocument.DataDefinition.FormulaFields.Item(1).T ext = "Receipt"

but when I use data fields from a table it works fine.But I cannot assign a string constant.
rptDocument.DataDefinition.FormulaFields("crT").Te xt = "{ReceiptMast.RecNo}" , works fine.

I have tried the below lines of code also, but no result.

rptDocument.DataDefinition.FormulaFields.Item("For mulaName").Text = "Receipt"

rptDocument.DataDefinition.FormulaFields("FormulaN ame").Text = "Receipt"

pls help

you forgot the semi-colon at the end of the statment
your statement should read as follows

        rptDocument.DataDefinition.FormulaFields.Item(1).T ext = "Receipt";

Hi Bharat

I am using VB.Net
I tried all the codes below

 rptDocument.DataDefinition.FormulaFields.Item(1).T ext = "Receipt"

rptDocument.DataDefinition.FormulaFields.Item("For mulaName").Text = "Receipt"

rptDocument.DataDefinition.FormulaFields("FormulaN ame").Text = "Receipt"

but the same error message is coming

hi prakash

sorry to reply to you late

where exactly are you using the particular code segment that you sent me
please elaorate so that we can fix the error

regards

Hi Bharat

This is my code

Private Sub btnPrint_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPrint.Click

        Dim strReportPath As String
        Dim strReportName = "rptReceiptDisplay.rpt"
        Dim crTableLogoninfo As New TableLogOnInfo
        Dim crTableLogoninfos As New TableLogOnInfos
        Dim rptDocument As New CrystalDecisions.CrystalReports.Engine.ReportDocum ent

        If CRRecViewer.Visible = False Then CRRecViewer.Visible = True
        strReportPath = Application.StartupPath & "\" & strReportName & ".rpt"

        crTableLogoninfo.ConnectionInfo = crConnectionInfo
        crTableLogoninfos.Add(crTableLogoninfo)
        CRRecViewer.LogOnInfo = crTableLogoninfos

        CRRecViewer.SelectionFormula = "{ReceiptMast.RecNo}= " & txtReceiptNo.Text
        rptDocument.Load(strReportPath)
        rptDocument.DataDefinition.FormulaFields.Item("crT ").Text = "Receipt"
        CRRecViewer.ReportSource = rptDocument
        CRRecViewer.Refresh()
        CRRecViewer.Show()

    End Sub

Regards

hi prakash

please check your declaration of the variable strReportName

You have already included the extention ".rpt" into the variable

why are you adding another extention ".rpt" when putting some value into strReportPath


strReportPath = Application.StartupPath & "\" & strReportName & ".rpt" -------- ??????????????

Regards

Bharat

Hi Bharath

That is not the problem. Sorry I just wrongly pasted the code at that time. The problem is there in the same line. And one more thing can u please tell me how can I edit a Report title in a report at runtime.


rptDocument.DataDefinition.FormulaFields("FormulaN ame").Text = "Receipt"
Thanks and Regards

Prakas

hi prakash

you cannot change the name of the formula field at runtime using code
for that you will have to create an unbound field and then set that field

regards

bharat

You keep missing the problem.

rptDocument.DataDefinition.FormulaFields("FormulaN ame").Text = "Receipt"

This ("FormulaName") field does not show up in the report because it is string data.

This is the only problem.

The word "Receipt" is being passed from the VB code to the report but it does not show up on the report. When I user numeric data that does show up on the report.

Do you have a solution?

This is answer !!!!!!!!!!!!!

                                       RepDoc.DataDefinition.FormulaFields("SchoolID").Te xt = "'" & SchoolID & "'"

THIS WORKS !!!!!!!!!!!!!!