RE: TEST Date in free form

Rob,

test (de) doesn't put any messages in the job log.

Ron was talking about the messages %date() would put into the job log.

Charles Wilt
--
iSeries Systems Administrator / Developer
Mitsubishi Electric Automotive America
ph: 513-573-4343
fax: 513-398-1121
 

> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of rob@xxxxxxxxx
> Sent: Wednesday, June 15, 2005 10:31 AM
> To: RPG programming on the AS400 / iSeries
> Subject: RE: TEST Date in free form
> 
> 
> We really need a faq, or the new wiki thing, on this joblog 
> concern with 
> the monitor function.
> 
> However, Ron, I am a little confused.  Does test(ed)... 
> generate the same 
> joblog concern as monitor?  You seem to allude that.
> 
> And if you only have a miniscule amount of date errors than it's not 
> really a concern.
> 
> Rob Berendt
> -- 
> Group Dekko Services, LLC
> Dept 01.073
> PO Box 2000
> Dock 108
> 6928N 400E
> Kendallville, IN 46755
> http://www.dekko.com
> 
> 
> 
> 
> 
> RPower@xxxxxxxxxx 
> Sent by: rpg400-l-bounces@xxxxxxxxxxxx
> 06/15/2005 11:44 AM
> Please respond to
> RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
> 
> 
> To
> RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
> cc
> 
> Subject
> RE: TEST Date in free form
> 
> 
> 
> 
> 
> 
> Not to mention the joblog has a tendency to fill up when 
> using the test 
> date function.
> 
> Ron Power
> Programmer
> Information Services
> City Of St. John's, NL
> P.O. Box 908
> St. John's, NL
> A1C 5M2
> Tel: 709-576-8132
> Email: rpower@xxxxxxxxxx
> Website: http://www.stjohns.ca/
> ______________________________________________________________
> _____________
> Success is going from failure to failure without a loss of 
> enthusiasm. - 
> Sir Winston Churchill
> 
> 
> 
> 
> "Wilt, Charles" <CWilt@xxxxxxxxxxxx> 
> Sent by: rpg400-l-bounces@xxxxxxxxxxxx
> 15/06/2005 11:33 AM
> Please respond to
> RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
> 
> 
> To
> "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
> cc
> 
> Subject
> RE: TEST Date in free form
> 
> 
> 
> 
> 
> 
> Nope.
> 
> Makes perfect sense if a high percentage of the dates are 
> valid.  You're 
> programming to handle the exceptions.  Why waste the cycles 
> testing dates 
> that are valid.
> 
> On the other hand, if a high percentage of dates are invalid, 
> then one 
> could make the argument that testing first might be better.
> 
> 
> Charles Wilt
> --
> iSeries Systems Administrator / Developer
> Mitsubishi Electric Automotive America
> ph: 513-573-4343
> fax: 513-398-1121
>  
> 
> > -----Original Message-----
> > From: rpg400-l-bounces@xxxxxxxxxxxx
> > [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of
> > kristof.anthonis@xxxxxx
> > Sent: Wednesday, June 15, 2005 9:55 AM
> > To: RPG programming on the AS400 / iSeries
> > Subject: RE: TEST Date in free form
> > 
> > 
> > Don't you think it's strange to provoke an error, when it's not
> > necessary??
> > 
> > -----Original Message-----
> > From: rpg400-l-bounces@xxxxxxxxxxxx
> > [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Joel Cochran
> > Sent: woensdag 15 juni 2005 10:26
> > To: RPG programming on the AS400 / iSeries
> > Subject: RE: TEST Date in free form
> > 
> > Even better, user MONITOR:
> > 
> > /free
> >   monitor ;
> >     testDate = %date( Today : *USA );
> >   on-error ;
> >     // do some error handling
> >   end-mon ;
> > /end-free
> > 
> > For more on dates in RPGIV, read this:
> > http://www.midrangeserver.com/fhg/fhg051904-story01.html
> > 
> > Joel Cochran
> > http://www.rpgnext.com
> > 
> > On Wed, 2005-06-15 at 06:28, Simonse, Arco (CMK) wrote:
> > > Hi,
> > > 
> > > It's not that difficult:
> > > 
> > > Test(ed) *USA Today ;
> > > 
> > > Best Regards,
> > > 
> > > Arco Simonse
> > > pgmr
> > > -- 
> > > 
> > > 
> > > > -----Oorspronkelijk bericht-----
> > > > Van: rpg400-l-bounces@xxxxxxxxxxxx 
> > > > [mailto:rpg400-l-bounces@xxxxxxxxxxxx] Namens Chandana Silva
> > > > Verzonden: woensdag 15 juni 2005 07:59
> > > > Aan: RPG400-L@xxxxxxxxxxxx
> > > > Onderwerp: TEST Date in free form
> > > > 
> > > > I have been searching a way to replace the following code in 
> > > > free form..
> > > > 
> > > > C          *USA                  TEST(DE) 
> > TODAY 
> > > > 
> > > > I am sure there are some ideas.
> > > > 
> > > > Thanks.. 
> > > > 
> > > > 
> > > > --
> > > > This is the RPG programming on the AS400 / iSeries (RPG400-L) 
> > > > mailing list To post a message email: RPG400-L@xxxxxxxxxxxx 
> > > > To subscribe, unsubscribe, or change list options,
> > > > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > > > or email: RPG400-L-request@xxxxxxxxxxxx
> > > > Before posting, please take a moment to review the archives 
> > > > at http://archive.midrange.com/rpg400-l.
> > > > 
> > > > 
> > > DISCLAIMER:
> > > This message contains information that may be privileged or
> > > confidential and is the property of C.Meijer B.V. It is 
> > intended only
> > for the person to whom it is addressed. If you are not the intended
> > recipient, you are not authorized to read, print, retain,
> > copy,disseminate, distribute, or use this message or any 
> part thereof.
> > If you
> > > receive this message in error, please notify the sender 
> immediately
> > and delete all copies of this message. 
> > > 
> > > This footnote also confirms that this email message has 
> > been swept by
> > the presence of computer viruses
> > > 
> > 
> > -- 
> > This is the RPG programming on the AS400 / iSeries 
> (RPG400-L) mailing
> > list
> > To post a message email: RPG400-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
> > 
> > 
> > 
> > 
> > -- 
> > This is the RPG programming on the AS400 / iSeries (RPG400-L) 
> > mailing list
> > To post a message email: RPG400-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
> > 
> > 
> 
> -- 
> This is the RPG programming on the AS400 / iSeries (RPG400-L) 
> mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
> 
> 
> -- 
> This is the RPG programming on the AS400 / iSeries (RPG400-L) 
> mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
> 
> 
> -- 
> This is the RPG programming on the AS400 / iSeries (RPG400-L) 
> mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
> 
>