Article View: comp.lang.asm370
Article #672Getting the Current time upto the hundredth of second
From: DRS
Date: Fri, 12 Apr 1991 20:16
Date: Fri, 12 Apr 1991 20:16
25 lines
1379 bytes
1379 bytes
I am trying to get the current time under VM/CMS. I used the TIME
macro in OSMACRO MACLIB to get time upto hudredths of a second. But
I am getting 00 for the hundredths part. Do you have a solution ? or
do you know what is wrong in SVC 11 under CMS session. Here is my
program
START 0 RETURNS TIME IN
STM 14,12,12(13) HH.MM.SS.hh. (12CHARS)
BASE BALR 12,0
USING *,12
L 3,0(0,1) LOAD ADDR OF ARG IN R3
TIME DEC
ST 0,SOURCE
MVO WKAREA,SOURCE
ED PATTERN,WKAREA
MVC 0(12,3),PATTERN+1
LM 14,12,12(13)
BR 14
DS 0D
SOURCE DS F
WKAREA DS PL5'0'
PATTERN DC XL13'402120204B20204B20204B2020'
END
Technical Details
Message-ID:
<9104122025.AA29777@ucbvax.Berkeley.EDU>Path:
arc1-ca.pugleaf.net!utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!usc!ucsd!dog.ee.lbl.gov!ucbvax!IBRDVM1.BITNET!DRSShow Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!usc!ucsd!dog.ee.lbl.gov!ucbvax!IBRDVM1.BITNET!DRS
From: DRS@IBRDVM1.BITNET
Newsgroups: comp.lang.asm370
Subject: Getting the Current time upto the hundredth of second
Message-ID: <9104122025.AA29777@ucbvax.Berkeley.EDU>
Date: 12 Apr 91 20:16:19 GMT
Sender: daemon@ucbvax.BERKELEY.EDU
Reply-To: IBM 370 Assembly Programming Discussion List
<ASM370@OHSTVMA.BITNET>
Distribution: inet
Organization: The Internet
Lines: 25