Re: Yesterdays date

["John Taylor" <john.taylor@xxxxxxxxxxxxxxx>]

>
> ----- Original Message -----
> From: <jpcarr@TREDEGAR.COM>
> To: <RPG400-L@midrange.com>
> Sent: Monday, June 26, 2000 10:09 PM
> Subject: Re: Yesterdays date
>
>
>
> >"Quazy"
> >
> >D   ToDay      S         D
> >D    YesterDay      S         D
> >
> >C              TIME                ToDay
> >C    ToDay          SUBDUR    1:*D       YesterDay
>
> >How's That?
>
> One statement too many :-)  Use INZ(*SYS) on the D-spec and you can leave
> out the statement with TIME.
>
> Joep Beckeringh

I have to agree with Jon's code. If you rely on Inz(*SYS), then you have to
consider when initialization occurs. The TIME opcode makes the code
foolproof, and obvious to a maintenance programmer.

Regards,

John Taylor
Canada


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