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';