Question : Need help converting this crystal syntax to work in SQL Reporting Services

I need the to convert this crystal syntax to SRSS to extract from my database , since i have very limited knowledge on both reporting tools . I can basically say that the first what i am trying to achieve is select all client types in my database equal to "CN" from the beginning of the month to current date.

I know that {@StartDate} and {@EndDate} are formula fields in crystal but i am not sure how to create them in SRSS.

{CLHST.CSTXTP} = "CN" and
{CLHST.CSENDT} >= {@StartDate}
{CLHST.CSENDT} <= {@EndDate}

Code for {@StartDate}
==================
DateVar NextWorkDate := DataDate - 1;
StringVar field:= totext((NextWorkDate),"ddMMyy");
StringVar yr;
StringVar mo:= field[3 to 4];
StringVar dt:= '01' ;

if field[5 to 6] = "00" to "79" then
    yr:= ToText(100+ ToNumber(field[5 to 6]),0,"")
else
    yr:= ToText(00 + tonumber(field[5 to 6]),0,"");
tonumber(totext(yr) + totext(mo) + totext(dt))


Code in formula {@EndDate}
======================
DateVar NextWorkDate := DataDate - 1;
StringVar field:= totext((NextWorkDate),"ddMMyy");
StringVar yr;
StringVar mo:= field[3 to 4];
StringVar dt:= field[1 to 2];
if field[5 to 6] = "00" to "79" then
      yr:= ToText(100+ ToNumber(field[5 to 6]),0,"")
else
    yr:= ToText(00 + tonumber(field[5 to 6]),0,"");
tonumber(totext(yr) + totext(mo) + totext(dt))


Thanks

Answer : Need help converting this crystal syntax to work in SQL Reporting Services

If it's always based on todays date, you could move all this processing into SQL. It really depends on how advanced your SQL skills are compared to your VB.Net skills.

The formatting of the date does need further code but it can all be done as an expression either in SQL or VB. Personally I'd do it in SQL and maybe write a specific function.

Create Function SpecialDate(pDate As DateTime)
    Returns Char(9)
Begin
    Declare @String As VarChar(10)

    Set @String = Convert(VarChar(8), pDate, 12)

    If Convert(Int, Left(@String, 2)) Between 0 And 79
        Set @String = '1' + @String

    Return @String
End

Then use that function in your main query.