RE: diff btw Procedures and Routines

["Ali Ekinci" <Ali.Ekinci@xxxxxxxxxx>]

This is a multipart message in MIME format.
--
[ Picked text/plain from multipart/alternative ]
try Inz(D'2002/08/12'), because *ISO is yyyy/mm/dd.






"Medrano, Rudy" <RMedrano@southernwine.com>
Sent by: rpg400-l-admin@midrange.com
08/15/2002 02:56 PM
Please respond to rpg400-l


        To:     "'rpg400-l@midrange.com'" <rpg400-l@midrange.com>
        cc:
        Subject:        RE: diff btw Procedures and Routines


I am getting a "Thje Date Literal is not valid"  error message whenever I
compile my RPG program.   Below is how I have defined the date:


   40 DTodaysDate       S               D   DatFmt(*ISO)
Inz(D'08/12/2002')

 ======> a

 *RNF0305 20 a      004000  The value D'08/12/2002' is not a valid *ISO-
Date literal.
     41


I want to initialize a the date field to that value.
I have consulted manuals and they all indicate this is the way to define
and
initialize a date field.

Any help is greatly appreciated.


Thanks, Rudy.
_______________________________________________
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.