Re: How do I edit timestamp = 0

From: Pam Gutowski <pgutowski@xxxxxxxxxxxxx>
To: rpg400-l@xxxxxxxxxxxx,
Date: 08/26/2013 10:14 AM
Subject: How do I edit timestamp = 0
Sent by: rpg400-l-bounces@xxxxxxxxxxxx

I have a DDL table that has a field for start date.time. Its defined as

TIMESTAMP. I want to check if that date is zero, then submit the job

update the table with cuurent
timestamp. I keep getting a compile error that the Operands are not
compatible.

if cdsstadt = '0001-01-01-00.00.00.000000' ;
cdsstadt = %timestamp();
update certdelf; //update the start date/time into

control file

Exec sql
CALL SPCERTDELT(:CDSLOWDT, :CDSHIGHDT, :CDSDELID);
//Execute delete program

Endif;



Pam Gutowski | Senior Programmer Analyst | Grand Circle Corporation,
Boston
Phone (617) 346-6538 | *: pgutowski@xxxxxxxxxxxxx
--
This is the RPG programming on the IBM i (AS/400 and iSeries)
(RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.