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
 

 

Change todays date into julian date(YYYDDD) format

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler
View previous topic :: :: View next topic  
Author Message
kalpana

New User


Joined: 19 Nov 2004
Posts: 24
Location: Banglore

PostPosted: Wed Jul 19, 2006 11:46 am    Post subject: Change todays date into julian date(YYYDDD) format
Reply with quote

Hi all,
I want to retrieve todays date in to one field. Again i have to change this date into julian date(YYYDDD) format
Please respond to this query.

Thanks
Kalpana
Back to top
View user's profile Send private message

Bharanidharan

New User


Joined: 20 Jun 2005
Posts: 86
Location: Chennai, India

PostPosted: Wed Jul 19, 2006 12:06 pm    Post subject: Re: ASSEMBLER Doubt
Reply with quote

You may wish to use TIME macro in your routines to get the current date/time stamp. It will return the date in the format you request. Here is an example:
Code:

          TIME  DEC,TIMEDATE,LINKAGE=SYSTEM,DATETYPE=YYYYDDD
TIMEDATE  DS    CL16         TIME AND DATE RETURNED

Here TIMEDATE is the variable where system would store the result. The first two full words in TIMEDATE would have time of the day in the format requested (DEC means format would be HHMMSS,milli,micro seconds); third full word would have the date in the format you requested (YYYYDDD); fourth full word must be initialized to zero before issuing TIME macro.

Please let me know if this is not what you want.
Back to top
View user's profile Send private message
yesyemviswa

New User


Joined: 13 Jul 2006
Posts: 2

PostPosted: Thu Jul 20, 2006 1:52 pm    Post subject: Re: Change todays date into julian date(YYYDDD) format
Reply with quote

Thanks a lot Bharanidhar........
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 -> PL/I & Assembler All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to change 'K' or 'M' use Sort vice_versa DFSORT/ICETOOL 5 Thu May 18, 2017 7:11 am
No new posts Validate date and numeric fields and ... Rick Silvers DFSORT/ICETOOL 6 Thu May 11, 2017 6:51 pm
No new posts LISTIDR compiled date/time jerryte IBM Tools 3 Thu Apr 20, 2017 7:37 pm
No new posts SUBSTR for Date functions Shaheen Shaik DB2 4 Thu Apr 06, 2017 2:14 pm
No new posts Format record to remove Leading zeroes Learncoholic DFSORT/ICETOOL 14 Wed Apr 05, 2017 2:43 pm


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