RE: How do I edit timestamp = 0

Try this, note the added z

if cdsstadt = z'0001-01-01-00.00.00.000000' ;

Scott Mildenberger
Programmer/Analyst
Davis Transport Inc.
Missoula, MT
406-728-5510 x128


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Pam Gutowski
Sent: Monday, August 26, 2013 7:56 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: How do I edit timestamp = 0

I have a DDL table that has a field for start date.time. Its defined as a TIMESTAMP. I want to check if that date is zero, then submit the job and 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;