> -----Original Message----- > From: The IBM z/VM Operating System > [mailto:[EMAIL PROTECTED] On Behalf Of Gary Eheman > Sent: Wednesday, April 11, 2007 3:40 PM > To: IBMVM@LISTSERV.UARK.EDU > Subject: I need current UTC in a REXX exec > > > I need the current UTC time when executing a REXX exec. In > the old days, I > would just use &DATE and &TIME from an EXEC2 exec. These > days, it appears > that there may be no easy way to get the current UTC date and > time in an exec > unless I missed it (a likely possibility). > > While trolling the online pubs, I found the CSL routine named > DateTimeSubtract > which indicates that it could convert local time UTC, but > conveniently omits > how to use it to obtain the current UTC date and time. > Similarly, I see > DATECONVERT in PIPELINES that will front end calls to the > CSL routine. Lots of > examples of doing date arithmetic, but nothing for giving the > current UTC. > > So, does anyone have or can they point me to a short REXX or > pipeline segment > that can give me the current UTC? It can't be so hard that > nobody has coded > it, can it? > -- > Gary Eheman
I don't have z/VM here to test this. But could use get the TOD using the REXX "DIAG" interface to issue DIAG code X'70'? http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/HCSE2B00/3.90 http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/HCSE5B11/1.2. 21 or X'238' which looks weird "Time-Based Unique Identifiers" http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/HCSE5B11/1.2. 51 -- John McKown Senior Systems Programmer HealthMarkets Keeping the Promise of Affordable Coverage Administrative Services Group Information Technology The information contained in this e-mail message may be privileged and/or confidential. It is for intended addressee(s) only. If you are not the intended recipient, you are hereby notified that any disclosure, reproduction, distribution or other use of this communication is strictly prohibited and could, in certain circumstances, be a criminal offense. If you have received this e-mail in error, please notify the sender by reply and delete this message without copying or disclosing it.