Ciao,
la sintassi Crystal per farlo è questa:
datetimevar data := currentdate; //--- esempio
if Dayofweek (data) <> crSunday then
while Dayofweek(data) <> crSunday
do data := DateAdd('d',1,data);
data
come vedi cerchi tutti i giorni a partire da una certa data (nell'esempio è currentDate, ma ovviamente poi sarà la tua data) che siano domenica, al primo che trovi esci e ritorni la data trovata.
Dovrebbe essere quello che cerchi.
Ciao.
Matteo Raumer
[MCAD, MVP Visual C#]
http://blogs.dotnethell.it/freeteo