RE: Corrupted timestamps?

["Reeve Fritchman" <reeve@xxxxxxxxxx>]

I know it's been trashed because the program blows up at my EVAL NCPATS =
$TIMESTAMP statement.  It's garbage in the dump and garbage in DEBUG.  No
pointers in use.  When I TIME  $TIMESTAMP for each record, the program runs
correctly.  I'm betting it's a rogue CHECKR.

-----Original Message-----
From: rpg400-l-admin@midrange.com [mailto:rpg400-l-admin@midrange.com]On
Behalf Of Jim Langston
Sent: Tuesday, October 23, 2001 12:14 PM
To: 'rpg400-l@midrange.com'
Subject: RE: Corrupted timestamps?

A few things.

1. How do you know this timestamp field is becoming garbage?  Perhaps
   the field is fine, it's just the way you are displaying it?  Or are
   you looking at the field in debug?

2. You could be overflowing a varaiable on the stack right next to this
   timestamp which is overflowing into the timestamp field.  Take a close
   look at any pointer type usage you are using in your program.  If the
   field is actually becoming garbled, this is the most likely cause.

HTH

Regards,

Jim Langston

-------Original Message-------

From: rpg400-l@midrange.com

Date: Tuesday, October 23, 2001 11:43:09 AM

To: Rpg400-L@Midrange. Com

Subject: Corrupted timestamps?

This is a multi-part message in MIME format.

--

[ Picked text/plain from multipart/alternative ]

I'm using a timestamp (type "Z") field with INZ(*SYS) to stamp added

records.

Somewhere in the program (my debug Watch says it happens when I CHECKR on a

completely different field) the timestamp becomes garbage and ends up

looking like this: '01-10- 23-10.16.42.927000' instead of

'2001-10-23-10.16.42.927000'

This is a production program.

Has anybody else experienced this problem?

Thanks,

rf
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.