Joined: 06 Jun 2008 Posts: 8363 Location: Dubuque, Iowa, USA
You posted your question in the COBOL forum. Are you asking about the 21-character COBOL CURRENT-DATE intrinsic function format? Something in Assembler? Something else you have not explained? You mentioned STCK -- but why not use the TIME macro in Assembler instead?
I think you need to start over and explain what you want to know and what language you are using -- COBOL, Assembler, or whatever.
Joined: 30 Nov 2013 Posts: 647 Location: The Universe
The Assembler TIME macro can obtain the data you want, though not in the format you propose. That is an Assembler question, as Mr. Sample clearly states, not a Cobol question.
This, too, is an Assembler issue: the STCK machine instruction will store a 64-bit binary value that represents the current value in the hardware Time of Date clock. The high order 52 bits represent the number of microseconds since January 1, 1900 in UTC time. In systems using an External Time Reference, this value must be adjusted by the number of "leap" seconds and then converted to local time. Even after these adjustments, as you can see, it requires considerable manipulation to get something more useful.