How to modify the groupoptions of a date in a crosstab

I don't know how to do this in vb, but you could do this within CR in the following way. Create a string parameter
{?date group interval} with defaults: daily, weekly, biweekly, monthly, annually. Then create a formula {@dategroup}:

if {?date group intervals} = "daily" then
date({table.date}) else
if {?date group intervals} = "weekly" then
date(dateadd("ww",datepart("ww",{table.date})-1,date(year({table.date}),01,01)
-dayofweek(date(year({table.date}),01,01))+1)) else
if {?date group intervals} = "biweekly" then
(if remainder(datepart("ww",{table.date}),2) = 0 then
date(dateadd("ww",datepart("ww",{table.date})-2,date(year({table.date}),01,01)
-dayofweek(date(year({table.date}),01,01))+1)) else
date(dateadd("ww",datepart("ww",{table.date})-1,date(year({table.date}),01,01)
-dayofweek(date(year({table.date}),01,01))+1))) else
if {?date group intervals} = "monthly" then
date(year({table.date}),month({table.date}),01) else
if {?date group intervals} = "annually" then
date(year({table.date}),01,01)

Use this formula as your column field in the crosstab.

-LB

LB, Thank you for your help! I tried as you said and it works very well.
Regards jebarcha.