And seeing how this thread is petering out how about this alternative:
meDate = date()
currentMonth = oconv(meDate,'dm')
loop while oconv(meDate + 1,'dm') = curMonth do meDate += 1 repeat
Personally I vote for Marco's solution, though it may need brackets or an
oconv. On UV10.2, Pick flavour, the compiler didn't like the TODAY - TODAY"DD"
+ 32 syntax and spat a nonnumeric data error when I tried to run it. You can
see what the compiler has tried to do here, attempting to format (today -
today) with ("dd" + 32):
00002: EOM = TODAY - TODAY"DD" + 32
00002 00004 : 194 sub TODAY TODAY => $R0
00002 0000C : 004 add "DD" 32 => $R1
00002 00014 : 09C format $R0 $R1 => EOM
This variant works
nowDate = date()
meDate = nowDate - oconv(nowDate,'dd') + 32
meDate = meDate - oconv(meDate,'dd')
Cheers,
Stuart
_______________________________________________
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
