Re: Date question -- RPG400-L

× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.

In a message dated 6/1/2001 7:52:29 PM Eastern Daylight Time,
Tyra_Brodsky@vfc.com writes:

Today is June 1 2001. Therefore any date in May 2001 is 1 month old, any
date in April 2001 is 2 months old, any date in July 2001 is -1 months, any
date in June 2001 is 0 months old. This holds true for ANY date in June
2001. Basically I need to calculate the amount of months that have elasped
without using the DAY portion of the month.

That does clear up what you want. Still don't know why your SUBDUR wouldn't
work... wish I could see the code.

Like I said before, try this:

��startdate ��adddur ��1:*M ��nextmonth

Since that jumps you ahead one month you can extract out the 'nextmonth' YY&
MM and compare it to the 'enddate' YY&MM.

If the 'nextmonth' YY&MM is LT 'enddate' add 1 to a counter and if it is *EQ
you have found the month you are up to and can drop out of the loop and stop
counting.

Doesn't seem to difficult...

Bill

Keep a counter rolling and once it hits the date you have as your 'enddate'
you can stop counting.