Steve Comstock wrote:
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
The 1/1/1900 is the base date for the TOD clock in MVS.
I suspect the code generating the key is doing an STCK or STCKE.
----------------------------------------------------------------------
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
