Need help with simple formula

[icarus5000]

I'm a VB programmer just starting to get to grips with crystal formulas. I created a formula field @myField and I need to assign it's value based on another fields value.
I tried a simple select case but I keep getting the error "Statement expected here"

Select Case {vw_compfieldmap.groupchoice}
Case "dpt"
{vw_compfieldmap.dpt}
Case "jobcode"
{vw_compfieldmap.jobcode}
Case "jobloc"
{vw_compfieldmap.jobloc}
Case "jobdesc"
{vw_compfieldmap.jobdesc}
End Select

Thanks in advance,
-Ic

 

[JohnBlaze]

Are you attempting to use Basic or Crystal Syntax within your formulas?

 

[icarus5000]

Was trying to use Basic but I don't have a preference. Easier is better in my book.

 

[icarus5000]

found a solution. I'm slowly getting the hang of the way crystal parses expressions.

if ({vw_compfieldmap.groupchoice}="dpt&quot then
formula = ToText({vw_compfieldmap.dpt})
End if

if ({vw_compfieldmap.groupchoice}="jobcode&quot then
formula = ToText({vw_compfieldmap.jobcode})
End if

if ({vw_compfieldmap.groupchoice}="jobloc&quot then
formula = ToText({vw_compfieldmap.jobloc})
End if

if ({vw_compfieldmap.groupchoice}="jobdesc&quot then
formula = ToText({vw_compfieldmap.jobdesc})
End if

 

[lbass]

To use the select case approach, you would use the following syntax in Crystal:

Select {vw_compfieldmap.groupchoice}
Case "dpt" : totext({vw_compfieldmap.dpt})
Case "jobcode" : totext({vw_compfieldmap.jobcode})
Case "jobloc" : totext({vw_compfieldmap.jobloc})
Case "jobdesc" : totext({vw_compfieldmap.jobdesc})
Default : "";

(Although it looks like some of the fields might already be text and not require conversion with "totext"--even though your example does suggest that they all require conversion.)

-LB

 

[icarus5000]

Thanks.
This is the select statement I was trying to come up with. More efficent than evaluating four IF statements.

-Ic