Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Capturing Time in Millisecond level in CICS

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
ashimprodhan

New User


Joined: 08 Dec 2006
Posts: 12
Location: Kolkata

PostPosted: Wed Feb 11, 2009 11:11 am    Post subject: Capturing Time in Millisecond level in CICS
Reply with quote

Hi Team,

I am using C~CICS, How can I retrieve the time in millisecond level in C language. Please give some examples/ inbuilt functions.

Regrads,

Ashim
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7999
Location: Bellevue, IA

PostPosted: Wed Feb 11, 2009 3:40 pm    Post subject:
Reply with quote

Code:
EXEC CICS ASKTIME ABSTIME(field)

EXEC CICS FORMATTIME ABSTIME(field)
Back to top
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1249
Location: Richfield, MN, USA

PostPosted: Thu Feb 12, 2009 12:58 am    Post subject:
Reply with quote

I think Ashim is seeking the C equivalent of the CICS functions.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7999
Location: Bellevue, IA

PostPosted: Thu Feb 12, 2009 3:07 am    Post subject:
Reply with quote

In C, use EXEC CICS ASKTIME ABSTIME(field) to return the 8-byte unsigned character variable field. Call a COBOL or Assembler subroutine that takes this packed decimal field and unpacks it into a 15-byte unsigned character field (which is PIC 9(15) in COBOL). The EXEC CICS FORMATTIME formats the hours, minutes, and seconds. The returned value from the subroutine call provides the milliseconds. However, be aware that the milliseconds are rounded to the nearest 10 (i.e., hundredths of a second) by CICS.
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2502
Location: Atlanta, Georgia, USA

PostPosted: Thu Feb 12, 2009 3:37 am    Post subject: Re: Capturing Time in Millisecond level in CICS
Reply with quote

If your C~CICS program is LE enabled, then issue a call to the LE Callable Service routine "CEELOCT", which will return the current-date as an 8-byte value of CCYYMMDD and the current-time as a 9-Byte value of HHMMSSTHM, with the last 3-Bytes representing tenths, hundreths and milliseconds.

Regards,
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Date and time format in CICS Chandru3183 CICS 2 Sat Mar 18, 2017 12:46 pm
No new posts How to get current date -1 and curren... murali.andaluri DFSORT/ICETOOL 3 Wed Mar 08, 2017 2:09 pm
No new posts Asynchronous CICS Processing Question moezbud CICS 0 Mon Mar 06, 2017 6:13 pm
No new posts CICS Question RE: Browse, Readnext an... moezbud CICS 7 Sun Mar 05, 2017 5:45 am
No new posts how to send just 10 rows in a CICS sc... Megha Gupta CICS 5 Thu Feb 23, 2017 6:57 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us