RE: Looking for better coding

["Bob Cozzi" <cozzi@xxxxxxxxx>]

The way RESET works (or at least the way it was designed) was that it
took a mirror image of the initial value stored in a field--made a copy
of it--then moved it back when the RESET opcode is used. So, no it would
not re-retrieve the current system time upon a RESET. You would use the
TIME opcode to do that.

-Cozzi

> -----Original Message-----
> From: rpg400-l-admin@midrange.com
> [mailto:rpg400-l-admin@midrange.com] On Behalf Of Dan Bale
> Sent: Thursday, May 02, 2002 12:09 PM
> To: rpg400-l@midrange.com
> Subject: RE: Looking for better coding
>
>
> Looks like INZ(*SYS) was born in v3r7.
>
> Bob mentioned this to be kind of a one-time use in the
> program.  What if you did a RESET on the field(s)?  Would it
> re-initialize the time & date values to the current?
>
> - Dan Bale
> (I am *NOT* "Dale"
> http://archive.midrange.com/midrange-l/200105/msg00281.html )
> SAMSA, Inc. 989-790-0507 DBale@SAMSA.com <mailto:DBale@SAMSA.com>
>   Quiquid latine dictum sit altum viditur.
>   (Whatever is said in Latin seems profound.)
>
> -----Original Message-----
> From: rpg400-l-admin@midrange.com
> [mailto:rpg400-l-admin@midrange.com]On
> Behalf Of Nicolay, Paul
> Sent: Thursday, May 02, 2002 12:54 PM
> To: 'rpg400-l@midrange.com'
> Subject: RE: Looking for better coding
>
>
> Hi,
>
> At least on a release that is currently no longer supported !
>
> Kind regards,
> Paul
>
> -----Original Message-----
> From: Dan Bale [mailto:dbale@samsa.com]
> Sent: 02 May, 2002 18:52
> To: rpg400-l@midrange.com
> Subject: RE: Looking for better coding
>
>
> What release did INZ(*SYS) come along?
>
> - Dan Bale
> (I am *NOT* "Dale"
> http://archive.midrange.com/midrange-> l/200105/msg00281.html )
> SAMSA, Inc. 989-790-0507
> DBale@SAMSA.com <mailto:DBale@SAMSA.com>
>   Quiquid latine dictum sit altum viditur.
>   (Whatever is said in Latin seems profound.)
>
> -----Original Message-----
> From: rpg400-l-admin@midrange.com
> [mailto:rpg400-l-admin@midrange.com]On
> Behalf Of Bob Cozzi
>
> Sent: Thursday, May 02, 2002 11:30 AM
> To: rpg400-l@midrange.com
> Subject: RE: Looking for better coding
>
>
> If the job start date is what you needed, than its an okay
> technique. But if you want the current date (as you are
> getting the current time) you might also want to use the TIME
> opcode to populate your DATE field. In addition, if you only
> need to do that once, you could simply initialize the DATE
> and HOURS fields to INZ(*SYS) and avoid the TIME opcode all together.
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L)
> mailing list To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>