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

www.Partner400.com
www.SystemiDeveloper.com






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