RE: diff btw Procedures and Routines

["Medrano, Rudy" <RMedrano@xxxxxxxxxxxxxxxx>]

Thanks Ali,  but I tried that also and got the same error message.  I must
have tried 6 different formats for the date all with the same error message.
8^O

Rodolfo M. Medrano
Programmer/Analyst
Southern Wine & Spirits of Central Florida
(813) 623-1288 Ext. 1318



-----Original Message-----
From: Ali Ekinci [mailto:Ali.Ekinci@mapics.com]
Sent: Thursday, August 15, 2002 1:57 PM
To: rpg400-l@midrange.com
Subject: RE: diff btw Procedures and Routines


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.



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