On 4-Jul-08, at 6:57 AM, midrange-l-request@xxxxxxxxxxxx wrote:

I have the following defined in a PRGILE program.

D TestDate S D DatFmt(*iso) INZ(D'2008-07-04')

However what I want to do is assign a value to TestDate at runtime.

ie Something like

Eval TestDate = '2008-07-04'

This should really be in RPG400 but this is a quick one so ...

You need a D in front of the literal - to tell the compiler to treat it as a date and not character.

i.e. TestDate = D'2008-07-04';

Jon Paris


Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2015 by MIDRANGE dot COM and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available here. If you have questions about this, please contact