I think that with a slight modification, adding 31 works reasonably well. Just use the “DYM” conversion consistently through the program:
To be concise, in Universe, for any internal date, “D”, the internal form of the last day of the month is: lastdayofmonth = iconv(oconv(iconv(oconv( D, 'DMY'), 'DMY') +31 ,'DMY'),'DMY') -1 “DYM” would work as well. Rick Nuckolls Lynden Inc > > Doesn't work on my system Anthony. > The This month o gives the month and year ok > but the attempt to iconv that sets it to zero, it doesn't pad the "01" into > it or something > so i just get 31 at that point. > > I think you were expecting that it would take "12 2011" and make it into "12 > 01 2011" or whatever > but it's not working > > > > > -----Original Message----- > From: George Gallen <ggal...@wyanokegroup.com> > To: U2 Users List <u2-users@listserver.u2ug.org> > Sent: Mon, Dec 5, 2011 12:10 pm > Subject: Re: [U2] End of Month date routine > > > Haven't checked it, but what happens on 01/31 by adding 31, it should take > you > arch, backing up > Will give you 02/xx (28 or 29)? > George > -----Original Message----- > rom: u2-users-boun...@listserver.u2ug.org > [mailto:u2-users-boun...@listserver.u2ug.org] > n Behalf Of Wols Lists > ent: Monday, December 05, 2011 3:05 PM > o: u2-users@listserver.u2ug.org > ubject: 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 > nd of Month Date ? > (Assume the end of month date, is the calendar end of month date not some > crewy business date) > Hmmm... no-one seems to have done my approach ... > TODAY = @DATE > HIS.MONTH.O = OCONV (TODAY, "DMY") ;* strip day off > EXT.MONTH.I = ICONV( THIS.MONTH.O, "D") + 31 ;* random day next month > EXT.MONTH.O = OCONV( NEXT.MONTH.I, "DMY") ;* strip day off > AST.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 > orks. Unfortunately you can't combine the first three lines because > here's no number you can pick that will guarantee to land you in next > onth whatever today's date :-( > Cheers, > ol > ______________________________________________ > 2-Users mailing list > 2-us...@listserver.u2ug.org > ttp://listserver.u2ug.org/mailman/listinfo/u2-users > ______________________________________________ > 2-Users mailing list > 2-us...@listserver.u2ug.org > ttp://listserver.u2ug.org/mailman/listinfo/u2-users > > _______________________________________________ > U2-Users mailing list > U2-Users@listserver.u2ug.org > http://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________________________ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users