RE: Checking for Valid Dates

["Jansen, Larry" <ljansen@xxxxxxxxxxxxx>]

Use the TEST operation on the field you are calling DDSDATE.  Enter *MDY in
factor 1 of the operation so the system knows what format the DDSDATE field
should be in.  Good luck!
Larry Jansen

-----Original Message-----
From: John M. Bauman [mailto:JMBauman@wardtrucking.com]
Sent: Wednesday, October 17, 2001 5:14 PM
To: rpg400-l@midrange.com
Subject: Checking for Valid Dates



Hi all I am new to the RPG ILE arena so I thought I would run this by
everyone.

 I have a date field in MMDDYY format on a screen, I will call it DDSDATE.
I EXFMT the screen and I move DDSDATE to a date field defined as MDY in my
RPG program.  I then check to see if the date is valid by using the TEST
opcode.  My problem is if the user typed in an invalid date, when I try to
move DDSDATE to date field in my RPG program it blows up on the move itself
stating that the date stamp is invalid.  Any suggestions.  (Note: I have
been programming in RPG III for about nine years)

Thanks

John M. Bauman
Lead Programmer
Ward Trucking
Second Avenue & Seventh Street, Greenwood
Altoona, Pa 16602

Voice: (800) 458-3625 Ext. 284
Voice Direct: (814) 947-1284 (Direct Line)
Fax: (814) 944-5470

Visit our website at http://www.wardtrucking.com

_______________________________________________
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.