RE: Set a date to default value

I have the Default set in the definition of the column. I am attempting to use an RPG Write state to update/load a table from an another table and convert the dates to a Date data type in the process. Some of the dates from the input table are not assigned, i.e. are zeros, so I wanted to load a default value because I thought the Date data type would not accept zeros directly.

George R. Smith


-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of dlclark@xxxxxxxxxxxxxxxx
Sent: Monday, December 11, 2017 1:43 PM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: Re: Set a date to default value

"RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxx> wrote on 12/11/2017 02:37:23
PM:

If I have a DDL Statement in an output table for a date like:

EX$DRQJ DATE NOT NULL DEFAULT '1980-01-01'

In my input table I don't have zeros as this particular column how
would I code the output statement? I have tried several variations of
the output from the %DATE function just short of me coding the default
value in the program. I appreciate any assistance.

If I understand what you're asking... Then, if it is an UPDATE statement you would use:

SET EX$DRQJ = DEFAULT

If it is an INSERT statement, then you use the word DEFAULT in the VALUES list.


Sincerely,

Dave Clark