Joel Ivey wrote:
A programmer has a cics vsam file that includes a non-formatted timestamp in
the key. This is the number of ms since 1/1/1900.
There is a need to be able to create records in batch with the same kind of
key, and to later merge that batch vsam file with the cics vsam file.
We need a routine to calculate a non-formatted timestamp in batch using the
same date reference point as cics. However, in batch the the date ref seems
to be 1/1/1601. Has anyone dealt with this before and maybe have a snippit
of code we could grab?
Thanks,
Joel
Check out the Date / Time services provided by Language Environment,
especially as it related to picture formats. LE uses a start epoch of
14 October 1582. But the callable services are very flexible; you could
take a constant adjustment factor and add / subtract as necessary to
do the processing you want.
LE uses the same epoch in batch and CICS.
BTW, the COBOL intrinsic functions use 1/1/1601 as the beginning
of their epoch. Have no idea where the 1/1/1900 date comes from -
is it CICS, C, ... ??
Kind regards,
-Steve Comstock
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
