Try this. I think it should work. (Prueba con esto, supongo que debe
funcionar).
DEFINE DATE-INI DATE = PARM
DEFINE DAYNUMBER NUM*2 = MOD(DAYS(DATE-INI),7)
DEFINE DATE-END DATE = DATE(DAYS(DATE-INI) + 33) &
IF DAYNUMBER = 0 ELSE &
DATE(DAYS(DATE-INI) + 34) &
IF DAYNUMBER = 6 ELSE &
DATE(DAYS(DATE-INI) + 35)
Un saludo a todos,
Daniel Rodruiguez
Madrid (Spain)