Haven't checked it, but what happens on 01/31 by adding 31, it should take you 
March, backing up
  Will give you 02/xx (28 or 29)?

George

-----Original Message-----
From: [email protected] 
[mailto:[email protected]] On Behalf Of Wols Lists
Sent: Monday, December 05, 2011 3:05 PM
To: [email protected]
Subject: Re: [U2] End of Month date routine

On 05/12/11 19:03, Wjhonson wrote:
>
> Does someone have a routine that, no matter what day you run it, returns the 
> End of Month Date ?
> (Assume the end of month date, is the calendar end of month date not some 
> screwy business date)

Hmmm... no-one seems to have done my approach ...

TODAY = @DATE
THIS.MONTH.O = OCONV (TODAY, "DMY") ;* strip day off
NEXT.MONTH.I = ICONV( THIS.MONTH.O, "D") + 31 ;* random day next month
NEXT.MONTH.O = OCONV( NEXT.MONTH.I, "DMY") ;* strip day off
LAST.DAY.I = ICONV( NEXT.MONTH.O, "D") - 1 ;* subract one day

If you don't have a day in your i/oconv it defaults to 1, so the logic 
works. Unfortunately you can't combine the first three lines because 
there's no number you can pick that will guarantee to land you in next 
month whatever today's date :-(

Cheers,
Wol
_______________________________________________
U2-Users mailing list
[email protected]
http://listserver.u2ug.org/mailman/listinfo/u2-users
_______________________________________________
U2-Users mailing list
[email protected]
http://listserver.u2ug.org/mailman/listinfo/u2-users

Reply via email to