Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.
Keywords: find Monday UDF TimeJulianDay
#DefineFunction FindMonday(dt) b=TimeJulianDay(dt) c=(b+4) mod 7 ;Pause("C",c) d=TimeSubtract(dt,"0000:00:%c%:00:00:00") Return(d) #EndFunction ;Testing... a="2002:10:07:01:01:01" b=FindMonday(a) Pause(a,b) a="2002:10:08:01:01:01" b=FindMonday(a) Pause(a,b) a="2002:10:09:01:01:01" b=FindMonday(a) Pause(a,b) a="2002:10:13:01:01:01" b=FindMonday(a) Pause(a,b) a="2002:10:14:01:01:01" b=FindMonday(a) Pause(a,b)
Article ID: W15768
File Created: 2003:05:13:11:29:58
Last Updated: 2003:05:13:11:29:58