Re: ILE - Date Substraction

(When posting code. please set your font to a fixed font, like courier 10 or 
12.  Then we can actually see what you wrote, in columns, and not wordwrapped.)

Wouldn't this be a matter of definition?  To me, one month before 6/30 is in 
fact 5/30, not 5/31.  What did you get when you subtracted a month from 5/31?   
          

If you are really trying to find the end of the month, then set the date to 
mm/01/yyyyy and subdur 1:*D.

In another situation similar to this, I had to make a subroutine that tested 
for the the 28th, 30th, and 31st day.  If those days, then test for the problem 
yo encountered.




In <8525673F.006402DE.00@allfun.com>, on 03/25/99 
   at 01:24 PM, Rajan.Srinivasan@Allfun.com said:

>  I tried  this.    I defined  Date1  as   a  Date Field  with (*USA)
>format.

>                            DATE1                   SUBUR
>1:*M                   DATE1

>When I executed the above statements ,   I  get the following results on
>DATE1

>DATE1(before)                               DATE1 (after)

>03/31/1998                                         2/28/1998 ok

>05/31/1998                                        04/30/1998 ok

>06/30/1998                                        05/30/1998 not  ok

>04/30/1998                                         03/30/1998 not ok

>When  I  input  value  06/30/1998  on   DATE1 ,  and after executing
>SUBDUR ,  I  get  the value  05/30/1998, whereas
>I should get  05/31/1998

>I am I doing something wrong

>Thanks
>Raj







>VENU YAMAJALA <venu_yamajala@goodyear.com> on 03-24-99 05:50:49 PM

>Please respond to MIDRANGE-L@midrange.com

>To:   MIDRANGE-L@midrange.com
>cc:    (bcc: Rajan Srinivasan/Servicing/SuperiorBank)
>Subject:  Re: ILE - Date Substraction




>U can do       Date1          SUBDUR   1:*M          Date2
>This will give the last date of previous month if Date1 is last date of
>current
>month. HTH.
>Vg
>+---
>| This is the Midrange System Mailing List!
>| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
>| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
>| To unsubscribe from this list send email to
>MIDRANGE-L-UNSUB@midrange.com.
>| Questions should be directed to the list owner/operator:
>david@midrange.com
>+---






>+---
>| This is the Midrange System Mailing List!
>| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
>| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
>| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
>| Questions should be directed to the list owner/operator: david@midrange.com
>+---


-- 
-----------------------------------------------------------
boothm@ibm.net
Booth Martin
-----------------------------------------------------------

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---